99unXGJJd888WcXjbZ4aaKsscqGII0aRRJ5y81osss4JII2ORRhnH2GRRRZ899HWjjTmZv008EHG
QXG9Z4GQI1W0Wa4DDCWW79099I000e599981F_00aaaW7jnVl39M2KUF@Vd8919yV@UpaWW1y@Vd
VIGIcW@@PDI0X@@VFHIIae@@RSy0Fbaa1FQ31bfMbjX0W020BPa02c2RcsY2012GPRRR5100WIRR
RY0000ejjPZ0000qsEuH20mss6yOl7KZnLOG5D0LBG6sa14Kn34J6eG8z7aJ2H92CHq0x4eUb3G4
HFaKMkqB1FoLuU35yOZR4mG0QG1820OS4cYJG34000nCOmk8E411KbVSGq09i9u6trrJq0AC0G87
vvJr1KCSXErX8Ik0BCFJL54WmAc65Ws@TKCJS25s_18dPGHmZvC1Y1d2OG60640iE1dqHE1aagX2
1FQ4IYIIaae9r0K00IIoUu80IIIImZD5KN4H3SGmZGrDY31FgrTfVLGG1021060O1c0001dyVmMA
bIp91QO1P99fuIHHKIIImZw4DG9HTOGq0x4TW11ETHyHD4WsF20ai9xR3024Wcjzj5006Hq_MsC0
120PRBpE2000DRhsc0W67BG0000SRRRo000DEsGmZiWjbHYbaahscs8IIG2QR3B099A1jXbLd4a5
9ajDR3ba89qskMi0ijjjeaaa8qssg1IIAuHROJJd898WcfXDZ44aKsqoKG2I2aRPRpC99HYORhs2
9fW79mY99PmZ408999uHU400de9eHeaH288f00G0I2ac60080BIJJY80004JIIsuu12000Gaaaqu
e21FA3@@6IWiWyU@_BHIUIu@Vkd9B11ulVVtaWW8P@@zFXa89n@lnn2u@@@3baa4m@@VZZD4y8B2
4cQbMs2022GKRBR70145ibDjE0220rscgr2000Xssm344y8160000sssA200enH82U4s10mBc6hE
ZKq0QQyTWD2QWas2IvonK3USnu96Aun670WXscF80Da22gYOCfY040G5TLaJG3RDqGaNuK0b1btP
H4UnSqIWn9WmkA756cwhqWMmzAVk12982KmZpizf21dOGmZ8L5Y1v3jKG3UyBo42000EczYW7f9E
kE0JIIs371MIIIWaaa8C999unTg1W0f9f1r0i0IpIo89HeJW3iaaa08999uHb22whoFcuOMZAY0a
COwfzZIMTfhWJKEG3DOIIIsNH71F2JD09GMoIg602KIGIYaeaDun5GKIIs9W2IMII2UCdW6AZ00a
T9Z6m_ss2010G9Z4020WKBRRNMZ64yu1PDQ0900WW7pfan6WjjG2aaKposs9oII2ssss0III2UyW
67JGpaaKmZsWssEHGI2DJRR7989fibjjV2mWW7FG999PmZ7C8W1h3SGmZrKoO2IGIIBPa0QII0W0
0e8D99suO71FAZ_@7oI6D0P99X@z@VcKaaW@z@zJ2IY4_@l6W3yC99ruu10@@@3UC720GjQRR101
00U@01400sijj5020Wocssg000Wi6D8uH2oQqWW75AhBq60O_Ha_9Edg2sYy10YEuntE1HfW7pi6
0dYj0j8lYh1tRZ79nKwkeWWeY6WXq1e9ioq50104GpovUum61C4SIPvLgJm9yLoO6nnHGZZT4yOC
HIsH4U853ZTXj0TLBQ5yewtLOGmZJHIoIYWaeKW6M09999GZW2Q0jI6lennH2UCdI6PenHG2UybI
6h8uH2QSiZW7tfan72U4gI6hmF99PZZa4y8BbCYXM10W6799unN60u@10_Fun@3Uy@e2tBun@3UC
rWJ_F4n@3ev@W7TDua@3Uy@W7@Fua@3U4nOBMAGZr2QmCG0GsbCUWts20800jQRR3080GgjijBuH
kCijGYWaKpMss9IMIYW7VYfjTY4a4QsqsEI2IIPRPR7yuOWaK00009HUI20W0059D9nW7Vox@3P9
Z7O99_tz@RY4a4U@z@FI2II2Uy9G0GjQRR10800U@01W00sijj50G0WosqsQmZ@F00y40002evwS
XI0W00GR1b5D0GHRbJmZE5DW41FQr6495yu@1F_VmZ@7Qm@1F_VmZo14008ua@3U4bgt8G2IIGmZ
X59f61F_Vm9L6e131dyVmZLIMI2AuHe1A0G6y8MQPRZ2UKEDjjPaWa43UCBHIA000Wa8D914yuNK
IY@3Uq0Vz@F1FY5W10mW7L0e00LmZ03200O0WgRXfhWj_FciHZy2j0dGBun@3GBL80001F_V8Ya6
BhM54uGKke5q0m0102o8efW7NFwec2Uylu5r8uHdAbZ14eaa1F_@fMj422PtTnMmZ@7y8H1QeLS2
WyhJCT2K1408RUss0010eBPa0200jgRR3040GgjjjZ000WijjDZ0000ossiX00quu10kjj3Uq6bj
DIabaSrqs6H2IIGRPRB8P99gjfjwa4a81ijPRWa49HscjDMoW792jjTYWa4QMssEbCIWqs692IIk
QPRp8999ARRRhnH5GRRR3899HejjD3aaaW7j120SYma4XI6FW00a4599WI6B8uH2KJII24000W99
PZZA00999uHRS@@GYXaatt@@9IJI2@t@@C9A91@l@xdaa49z@l@1a499z@_@1Iaa4ztu82UA993U
q6A0GjAQR1APy0600R6ss2APi0jI00PDI0H0000qssiH00oQa0H0000ORR3UaqG4RUrnZ3ePF200
0j5KMq06rvsVbBzGq0B4yeLT7aKmZ@7WsM51yGaNPL4W80200EgBfe1qAMMe3Du@WXvSJ1rspGZs
oEeNx92Enh6lF9un5ZNqXW7rAeEk2UyvY8ieA6L2Ev@W7@3099PmZb5D0I1DiM9Z40G0WkaH2G0G
qMoO2DEEImZlGIImLRRBK9ZAOBRx499fGZZW4yuBijbJaaaIpcssHIGIQmZ60tsscOIIY4tss67t
8uHP00Wd8D9Hean2GB00Kou1eIIJ2UaW67r8uHPy@FGYWaatV@@9III0@l@lbCQWSI2o6799uHMW
00rgjj10W0Guz34W00OpssM0010ARRRhDEQImZIsOkM30eJyVi5L0fC0002s2v10aEmfMYmxWW73
BoBVI1xYW7@F0jQ2KWW8lYwD07oLC180001s_Vy87g0008un@3ev@bEEutZBgF9gg3S8RLVYJ0ZM
18e60821uWW7RY4aaKyYo4y8Dr0GWqaa0999Tr0S0f99BIIIYC999x40210991FYh001WGGkz01B
Q10XhIFfWWP2HpXCDe9uHE1sII6yOPH3WKG3W4EHIGeaiPPR300Wakan2a0jzPR302GIsMmZ8O20
08unZe5Io20SRpY499IReDRB9a89WrifbSY4K0WjjjDYaa41sssCGIIa0RRtuu1Qcaa2Uy6aSIIK
2QRrIE9HIRjLQ9Z41XCNjiaOaa40bjjjfaaa4mssMZZA8qssEunSWWMd8D9L000II9Z7GGQ300G2
599jn67J0W99PmZ3vU0X41j1l@@IpI6B0fca51W@NdaJIcG6_pQi0Y@@@UWaaQSy0W@@@1Fg30hj
9JA00W0msiDP0W0IOpokK0009gW7JW8000WRRRs400PDIW800WW7pPf7W608@HRkOr32MXnfKrM3
102GmM@Ne_JD5ma008W0d899W62UCfdGufj0H6peWG0A8QW2Yd7YW7H5240mV1Hy_mEn9a1280WG
6I0401GmZCSFo5HUT42000B00030u4W0004000pZO0820W10G812Dgeede1E8fbDwGeb10S96ceY
WOX8Lo2W000W40Wx2EOz63c2WWpXhgW096fXd0QQ9nbIYW0dzUoeTWTEXUa0RxY0000840WRBu9m
ME0a00i0X41Foa4ai4989ALlj0s2IIaaba85HIYNa189991F241899IYII4aWag1W04eaa89891I
MI69v71rDJUA44yuPVMGHk9H14000850G217G80WW00004W0WEYMu_aO2DmYJJK8L03W000ajLM1
sgCIIIMbaaWG99Bhem0ieaW8989HQII6RX1IGIGYju8aaair0K0B18fe1C8YLJ2UadO9a8tYRQOm
29bjj1FIWjjjDR100Ycssij1009BRpso5GZZCG0000jjjDP00WW7pHR2W49fDNjj0GaaK0qss20I
I2XQRRf8991G8RRs6897LaWW798hH38qsssue21FE3DbsMjWJIaMIRrMB8HIGmLR30699WKPRRRY
9991ijjPnaa49qssga48ossUT022Ui608u9IIw42Ua0IJA0@YMW0002H99fIL000GD9HIO0efH42
Uy7@d5a895vz@7GYa4am@@3P9Z5u4UIY44ml@@7Gaaam_@@dHIIIW@@@FunV00argjf100GMessa
C000GbCM0qsQRsc9100WI7Ue00qssiH0000QRtu851FcIZXsC0m@HuuGI2H42I3jeBO99ta@Z1Hh
jJmZfF0W7fPYKWJW4D051FcKG3JbJ04X0eG9ZQbtZ31eTrP67KKs1JufJ0QSSQW4F_tmw0G41nCF
75Hg07S9G3D@1LbIXifXEG200YjeC2000hvGH8YH5D01Hg0T11gix691qSUWjg1C30e90726bWZA
r9unH2RfeWwieanBYZZWMm8e7E64baa4yeEboTHGTK8A99H2IIIGTu8000AunpQD1YsMA8WH221n
gLOO0GG0mIPv4S2YNOYKm9fCEmF1QSHi5g4yOFWWaaY6Ga8MX8uHUYX1CPRRP600GWjjjPB00mYq
scjD00GBPRssAaoQi03I00DEgHmZjO9aa4jvscj4IIaGGRs628HI2fPR3u49980PRRR8999Y9jjV
Ja0bijjmaaa8sssg1IIAunR4u99HRejLBna49iqMj14Ia4WSrsIZHII1rassc2GIIG9RRDEI0QRR
ReD99YijjRSyWW7dXadaK9Z7mM00eaH2C0008B99LY00GmZ4que2GRII2Ui79199II_@z9ba8f4_
t@cQI9Z4uNOIYKqSRmZ5quu1w@@@H0II2w@@FuHTOJjjPI100WCscj9300q2Rsst2008OPRRQ4J0
0GZZAG9000JQRRmZRD00oBxXKn0Rabp1dSF5W10W3RQ8OOi222Z0QkwT656Dmde1oe7g6AKWWPcp
Aq04g6QZy1C8S@TANAXe1Y8mfe24aYW7xAqW3E4aYg36Q@Z8YWuW0qWASl3sKdW0Dq28100080Wn
4S822g0200CD1153O0810Wg0MuH3ewImX1LcgK1C2Fnd_0qOD130200C101X6qHCD_KGW1PGSGq0
KypSBT8Co68H4hZJ1thSN2I4fYGvU0oXeH4OxLtsSHWjE5YA51Fs41B99IWIIJEIGGTh4yOF8A99
h1W00999HIgG4U8LTm3nOcrm0FG0000K00m00O1120844pscWXIJuuc6WA8OYZ3s9u4_2Ui34aaa
zLGmQ564y8GHIQMCCg1iijjaH2ejjjPB00GYqscjC00G8PRssA0QSS2100W1FcZCGIoT490GIIg2
QRRs09928jjP8da890iKRRJ4999Ijjj1aaa4msss2QIIYOQRhc19fW7lHZda4jWsMj5JIaaIRr6I
8HI0pLRh16999KORRRA9991ijjrue22bjj3Uq790008999nA000aaa49300GnIIar80DEY00JIo6
790JIIImZze989HIo@llbaaI690Xca49X@VV5JIa44_pQi0Y@@@UWaa8nx@xVGIYaWxVmZxGaQRp
a2000OiDRR60084sijD5000sossseG000rsss41006UW01000ORRR51000eljDunRsrgXGemOdei
MmGYzm6Q8Na60WcIjQPhSQ2enWd1A0W40GCQD5yO3H3GG6374DmD1dKHE354yuPJKXnAPDj9W2W0
00YYv01000HG4LWe44d04H3SGWJG5hK3G0002eWWKDs9Q0B2H5XIwZB4052GJhk4M8D8T2GhZnHU
8y_2YQNh48C0W000Wa0WJGauW02kHYdqKegKXGM7GYJve8UaQ26vZT8C8wcXYPnXqJy80DWU48Xj
6uuWcV2DeaW7NT00pYK1juUa8wY5I1WW84W9uaDg50XJE8ub34400147G61FE3XB9fgt800999mI
IICeaa8189HQKIYa490IIMIFS9O1999unXYaaWQ0C03A9vxT44KN4M2II0qaa4yeI1GdHo9F433G
tNirgCOKOG2DE5JanPiH3Q1gNI01g4yuYWH99ZNC1B999zLm04aaaW7R2119Hq0L0f999unZY02c
66S1QPRhs60GWWjjbCIWbejDRR00WIosibT1qu83W000GRRRJ2008uHT41IIZcSRpM299GOeDB39
a890ribfKYaaWWbjjDWaa4nsss1FIGZZJ4yuBCjWJ2Ua0CCJIWmIRLMo8HI0mLRBO6995GPRRR29
991ijjPnaainH2mWaaiEm11FQ38E99Qg00bCI0R1000aaquD000AKIoaM5000Kgaa4cc6Jenn62U
K6llCa898uzddMYaa0m@@RAJIG0m@@7w99810@@xV88HI2@VZZ5mz@@79999m@@@W7p14YMRmZ40
K6Rpsi1088XDRxR104iiijDj24008hH30GRRFy01GRRRRSSYW7Lv0g7gSKh@599lzj60Oiy4Mef5
5sk7gQ1COt640200S1m1fkGKY0FiBW2d3iGq0g4GJ7tptG44_KIG7H3iq00MGG008r28I7WWt7W2
026mi044DG41TNL0Qa5ye1X6mKETN4DmPxVGGr1B04W4uO2W2U4aQ1Eu105YW0goFC8OD5k4eYnO
6AQ02G002qqm12002AxuW4DQ8Q022KVej3A8QW2C004CPWFDPeHK164841jXfLu4DyR41H34Kx7f
W0208u_q2Uy@GW6H000G9P9Sha31sgLC8Am0008GZdA9v181007XGGj14qMmC88002g33baWaG99
BHGI2YiaaK9A99m0II4aba88GIoQi00aaazmH0aaaaW77AQW60IGI2aia419IID054Dm1DqDHmZz
4zPHnMaIKC5a0h1tghq_B4W0088gZpIymiWJKx4_9_78dW711O9992KIIa0aaLKGGW640aaailY3
acaa0199HKIIImZA59P2T28Hq0m04baCuHA2QmB4ajjQR0004qsMoe20MosijT2arO1c000QSa0W
0001FcY_60WW7F01qscbD0WW7Fmo8992mjDRQaabCI0PXa4ffssifJIa44qgjjPYaa4esss0QII2
OQRR1199HiijDuHLWGRRJM89HMgjTmZ6msGEHI22DRRP799fjF1Kmga4mC999uH2KIII6yu1iijj
Xaaa8qssEuHGas99r9m11F21aE99IY000aaaAPy0q400bCIW410W67F0W99PZZH4y8744102Uy04
aaaT2SW4_@Vp299II_@ztcaKo81ktaa88y@xdUIYacuVMZ5Gy_@tJaa49__@W7LHMo@lV@aaQ08m
_ca41X@@W7D00KKxZ38WC0001ijDJB0WI69Gh00GMZ4G4008uH24000WjjjL420GmZWWWQRpo20G
mZ7q9W21FQGewv5WKPR6myXJ9iNSCba4Jq025SY5n2GmAKA4fYML31HzGAbAz5va2c000mu4A8Q0
92UygwCGgTAC61pXc0Mea_i0900CR032000QXuYWxDQ1MG2GheSjK82YeW000C701FBc0840WNVj
QJ3904024DWK0o00U4hYkkeY00GGNoYX000ORSa2DWXK1MA13N2s2ge14hXE3cE8a92MONXeQ@mZ
l1ieAaSQM5YE3m9UHCgF1aMA3AeE4ajSa899HH2oIGrRBWWiaCEE40JIIs3t1OIII2Ua7PBR9I02
Kaai48998B2F3g1m0BIIIT2S0YIIo5180oIIImZ01G20OraAYX1gYLQe8g3E7W0Ga0aN0KmQKC0G
0Gu102g1OZK0AeiW6g1u00401HHDrJJZ0K20uy8bAo0XrX8u5W5gXPec2i02000480W0d0399f3I
IIWAACOm22ge8XW790909GV548898flY30999H2I2e60A8999L3G2T2GWWaWiE1Ke6W28B99LU14
HTiGJ6QK3G644baULb0bbaajVK0899BII2211X1801WW6U2GPRRMZ40RRRpM0000fjDRR00Wsosi
jL0que7r0SHNa64yu1THQGmZ781aa4bvscj5IIq0GRsM28H2RfPRHo4990GZZW4y88THQWaKRxW7
FG9da49XsMf4JIaqIRrYM8z401M2C9H2eRtuu61F2Yss9fW7Z02da4DH0002IIaaM0ARa0q60000
B9HJY0qu871Fo19H0WW7FeBI5am@@RQ89HGo@lTga499m@_rMJaa0mx@NYHI2JIZZVK3m5s7IIg1
WWW7Dm@caKmZAGoQRps2002OijW79G9ijDRB004ersijJ0QSSZW7xe6W32Uq0sM001Fgn00LTxY1
D0G0800Y66twHCJQMAfvV3h612wAeW15C8669kUSfWJM8QWX2SYZ88CuW1nYmqgE9iW400m11V5q
W1H34nPH64D051FspH6T1102uveC2focF9mG000mR0N4SFK0X00040002808n9Z22w21000A0002
FXXe1G8gTmY6eWwKuP4X9W0G0iTG5Vi2Lq05W000u6p9s9mXlEK9E1CQE01H000J1SmICM1808uj
Zc_30a5iC0400mLkMLH199wsIm9zD0GQG200wmzgm929_th2EnXe2j2999XIIIMeaa40899HMI2Y
4b449199MoIoWwAe5C2QSCZW7VHI2IY4a4bH1Ae6W4mIMIYW49fXE6W4aa4KNA1FgHCcCrnn8tfa
GIkM4UzBV1GH119qmxEHTqIq05LGmD1RrKR1WLUn3OH991IGIYaja49BMYbaaau5h9GZBg1G1bba
aOH99h1W0R999IiabY6WfOOMhan204qsMou2aijjP7004y8Dr0SGmZJOBaa4DuscDDIIaWGRbCMW
rssMTIII4mss2UCeQ088un4ao99HIejLBxa49frsd0GWOIIY0tssW7fHRdaKD044yu40waa8f20C
F11A500APKXW7Fg6022Uq0x299I2_@zxcaKo81_raaAPa0vaaa1FUJD074yO2r0GGmZ6WmQRxnX3
O600Koe2Q5002UacQ0KOI222Uak10uRaymYnyh032ffDMUIOZ01B8QcFY6GbWjCV0Wq2wUX0d0h6
09ETZds2QvpK2Y9pfQ0GBs2qgRuXlEE8EXTYzpa108kw06_7xbuHqxUZDA8e9GG00jScI0Qqr9mI
1qqi00003000N4GHm9N522I1dOImZN9B9AfwjAa999ruu2GIII2Uyd508e6050YIIM3m11FwGGTi
GGKIAuHnGG004Rn9vKnW0W0Wf1me60DAY8agM4Au4F2enkWJy599PPLYM4RH1GIGGwhuYQ0u8uHB
Y6WZW7f51PRR9ZA0OQRhaH42USAacRRx8IWGQRRI099I2jjPRbaque81F2ZcE9922jjQ9caAPa0R
Xaa81ts2Ua09kjj1FwK9Z4G100ean4GR00Ko81I5002Uq9R399I2_@zVba89D_t@@OYa40U@@@FI
II22U4AWMRRFEG04RRRs1008XjjPx1000isEunmsKve10_lfol2h4hIICeNW8UFvcW7@FuUr2USi
W6W2800G9ZoDJ64r0eGV0G4yeIpOkJ0QyD00QlKImaWa5DW1XXTGq075dGAnJWmq2HDAm5Xj4500
0eLOQeC2iYXPiGEA8W6rMvFcOOgf60q2gxls2M2B99fIGIIeaa4LlT05aaauuKennE2Uq5iaaa88
993gx2Waaa1rjKCCfzeJ31tqGZZ601018806I6eWQ0s8f3AM1uW0RbAdqIMffX10AwTW3G0005Uo
I1Fw799982WIILKa0191eW7XGGIGIV5AGGIGe60Gw4W0199PnMeGD07KUH488B93Uyfm9egJ0CAP
yYW7FY300GmZ6Ko861FU4nsssW7DeaHAOcaa4yOLbCEX410WW7TgaHAyJIIsu891FsI9ZN4y8O30
y@00pyRkQn@_Qan2ED1q1FgSE1FyWc3rFAND0sCRG4Z0iGB835yuX@0qmNbxKVIdT2aL4425F@61
evKffqyw9H1tJTylkL3GPnmiMm9YLoO61F_KfSP4KdEHuLGmZy5Ibq1q0TD0I4t3F1FYHi5FL3m1
1Q4MGgO4u4QbCMW0WssW7jgJW3sHa0IJIkQJRZ89C9ejbj5aaW4rsMsW7NgBo3ijfjLoO1GRda89
fsgbjHAuHq8D91Ko81e9H02Uq9l@FabCI0z@a499n@_zVJamam7y814aa@3Uq9G0GjFEG020iDRR
70W00sAPa040rs1FArCtDC00nzxAre10s@x19jqmzDGjT11GW00Y5WWe1GAOhAF3It0dMBunug18
kJDA80j@Zy2kP199GIlYb5wG3_FWcTg6WfWKP9un@3UKH11P9LlL00IIIcbaa8H99PIGIY4iaCun
H3g3ZOOWh0FEIXze22AOTYa2EXze10hYY88D915Rn4GIIIYjmd0D01099PmZMjAtGT2K1808Rsss
G400eBPa0W00jQRR3020G6yeKNBQWMsseI698uH2aaAPNoO11F_4PRx4989qibjT0aaaIoss6IIG
YSRBRc9191FIb9H0000IIcaK02UC1RIIY1FE5aajV@@99GIY@zz@c819Xtt@@3WaaaW7V2G0Khss
M0010W1FcWY40WW7fQ0W@70GeXCLeMoW3evjDtEgvPe3Uy@Q0mDEkq0204411P2400600wG4fxwi
Z2Uy@WXJEuHTh2XWYZQAe1EU8eXYbG8uHcYZZZW7Tg609GGMI6y8Q7BLGylt2008yWWc2DelhAFO
SX2scZWwmS8unS9B19LHH1KMIIYBjge1W88rjYJeCjjj9C000mSRxxJIIYKRRhaC000Wtsy@la89
vfHIR10000VJW6GJIRR303Q2a0jjjjr0eWjjjjQ0KG30001000_700ma000s20081000v300m800
06000W8HIIYLRG209991899DEn1Yaaa8aaaK3m189991999L3080C206TT1a000W400I2u01000l
mS0aaaaY8QeN456MqWQ021100OD0AqGm1n9W0Rja4BvGIaaI0ADa0jvIIi4B9HIU000WRpss2BIs
M499910000ijjjXiaiLGIIoU04ejjj5jjjTD0AWjjjj6W3q000m600WB100C00Wu48WB00Wa00WD
08GIIIYRI2REjjjwijjPtaa89ZaaiPRhssRRssUIaaaArMIYPRRRKRRR39999iijaWsssiqssgba
a49HIID0BWaaai6W3a000O200WR100CB00W9000o400Gs000i68eX20QRJ2400G289Hm140jj9H0
0041aaWX4E0GGIGz170999H4a4mT2AaYW2XLQm0060GI0elU8YS110IIGrFI0IIIY11A0a80Gx24
WC0000GGIW04K3m188902P0YQ0EegX6QamWQ0GO9p2w4u0L0WcOIIIaWa4KGW1C9GIaaGa810100
0KgaqMeM9I0QIQh899fm9EGjjjTD0AWjjjj605KJIIY900uKY3mcaa8I0000GIY4qsMjXtsOxIIa
aOjP@@jLRR7DRts4999Xss_Vijjj1RRRpaaa4X@@V@ORRscsskVW04@@@r0iXD999O999gaaa8_b
a8PJIYarIYaC99IIy9II2jPRRjx@RpcjjjlaajTssssw@@syQRRpO99psRRhsQRRs6jj3FK0RRRR
ORRRcjjjPijjPZjjj60Ci999fjjjrsaa4vssMjRIIaCRRrsl9HIYjLRx1GGt@7Haf1F_MTsG4yu@
r0qI70C4e1Nl_DKW6@7aw@1fQV0Dhrhc41QOLq0F0GG08AprEKk1W0401QCKS2Z5eHspRj00a0We
1QA2B2gE8Xe1MOzD22eHsA_QG2IIIiVOL3m2Waia24ih0QS6I06Gd95CrE5b@fG0D@7enU2G0Ige
W0IGGIaaia889AHII0AsY40III2WaailY20890HGI2Yaaa4119X0DiXWaaKD0A00baCGZAa0aa4e
nf@yGW00204000G00100G0080W0088GD0H1;
INTEGER CHECKSUM=54843;
BOOLEAN UROW[128];
' bit 24-17 and 5-0 unsed
BOOLEAN UROW_MASK[128] = $FFFFFFFFFFFFFFFFFFFFFFFFFE01FFC0;
ENDDATA;

PROCEDURE DO_EXIT USES GV;
IRSTOP IDLE;
IRSCAN 8,$81;
IRSTOP IRPAUSE;
WAIT 20 USEC;
STATE RESET;
EXIT STATUS;
ENDPROC;

PROCEDURE PROC_INIT_AES USES GV;
    IRSCAN 8, $DD;
    DRSTOP IDLE;
    DRSCAN 128, $00000000000000000000000000000000;
    DRSTOP DRPAUSE;
    WAIT 3 CYCLES; 
    WAIT 48 USEC;

ENDPROC;

PROCEDURE PROC_VERIFY_IDCODE USES GV, PROC_INIT_AES, DO_EXIT;
' Shift IDCODE instruction
IRSCAN 8,$0F;
DRSCAN 32, $00000000,COMPARE $02A141CF,$0EFFFFFF,PASS;
IF PASS ==1 THEN GOTO idok;
STATUS = 6;
PRINT "Failed to verify IDCODE";

EXIT STATUS;

idok:

    CALL PROC_INIT_AES;
    IRSCAN 8, $0A;
    DRSTOP IDLE;
    DRSCAN 128, $E137623A2EEEE91126015F3F73664945;
    DRSTOP DRPAUSE;
    WAIT 3 CYCLES;
    WAIT 256 USEC;

    DRSCAN 128, $00000000000000000000000000000000, CAPTURE Buff128[];

    IF Buff128[127] THEN GOTO M7VerDone;

    STATUS = -31;
    PRINT "Failed to verify AES Sec.";
    CALL DO_EXIT;
    M7VerDone:
    
    IF 1 THEN GOTO RegDev;

    IF Buff128[126] THEN GOTO M7idok;
    STATUS = -32;
    PRINT "Failed to verify IDCODE.";
    PRINT "The Target is not an M7 Device.";
    CALL DO_EXIT;
    
    RegDev:

    IF Buff128[126]==0 THEN GOTO M7idok;
    STATUS = -32;
    PRINT "Failed to verify IDCODE.";
    PRINT "M7 Device detected.";
    CALL DO_EXIT;
    
    M7idok:

ENDPROC;

PROCEDURE DO_VERIFY_IDCODE USES PROC_VERIFY_IDCODE;
WAIT RESET, 5 CYCLES;
CALL PROC_VERIFY_IDCODE;
ENDPROC;

PROCEDURE PROC_BP_VER USES GV;
BOOLEAN PLAYER_VERSION_BOOLEAN[32];
PLAYER_VERSION_BOOLEAN[31..0] = BOOL(PLAYER_VERSION_VARIABLE);

INTEGER PLAYER_MAJOR_VERSION = INT (PLAYER_VERSION_BOOLEAN[23..16]) - SCULPTOR_MAJOR_BASE;
INTEGER PLAYER_MINOR_VERSION = INT (PLAYER_VERSION_BOOLEAN[15..8]) - SCULPTOR_MINOR_BASE;

ACT_UROW_SW_VERSION[6..5] = BOOL(PLAYER_MAJOR_VERSION);
ACT_UROW_SW_VERSION[4..1] = BOOL(PLAYER_MINOR_VERSION);
ACT_UROW_SW_VERSION[0] = PLAYER_VERSION_BOOLEAN[0];

ENDPROC;

PROCEDURE DO_READ_SECURITY USES GV;
IRSTOP IDLE;
IRSCAN 8,$A4;
IRSTOP IRPAUSE;
WAIT 3 CYCLES;
DRSCAN 44, $00000000000,capture SecReg[];

ULUWE = SecReg[9];
ULARE = SecReg[8];
ULUPC = SecReg[7];
ULUFE = SecReg[6];
ULUFP = SecReg[5];
ULUFJ = SecReg[4];
ULFLR = SecReg[3];
ULULR = SecReg[2];
ULAWE = SecReg[1];
ULARD = SecReg[0];
ULOPT[1] = SecReg[11];
ULOPT[0] = SecReg[10];
ENDPROC;

PROCEDURE DO_CHECK_R USES DO_READ_SECURITY, GV, DO_EXIT;
CALL DO_READ_SECURITY;
IF SECKEY_CHK THEN GOTO SkipRChk;
IF ULARD THEN GOTO ArrayRP;
IF ULARE THEN GOTO ArrayEPR;
GOTO SkipRChk;

ArrayRP:
STATUS = -30;
PRINT "FPGA Array Verification is protected by pass key.";
PRINT "A valid pass key needs to be provided.";
CALL DO_EXIT;

ArrayEPR:
STATUS = -33;
PRINT "FPGA Array Encryption is enforced. Plain text verification is prohibited.";
CALL DO_EXIT;

SkipRChk:
ENDPROC;

PROCEDURE DO_CHECK_W USES DO_READ_SECURITY, GV, DO_CHECK_R, DO_EXIT;
IF SECKEY_CHK THEN GOTO SkipWChk;
CALL DO_READ_SECURITY;
IF ULAWE THEN GOTO ArrayWP;
IF ULARD THEN GOTO ArrayRPW;
IF ULARE THEN GOTO ArrayEPW;
CALL DO_CHECK_R;

GOTO SkipWChk;

ArrayWP:
STATUS = -28;
PRINT "FPGA Array Write/Erase is protected by pass key.";
PRINT "A valid pass key needs to be provided.";
CALL DO_EXIT;

ArrayRPW:
STATUS = -30;
PRINT "FPGA Array Verification is protected by pass key.";
PRINT "A valid pass key needs to be provided.";
CALL DO_EXIT;

ArrayEPW:
STATUS = -33;
PRINT "FPGA Array Encryption is enforced. Plain text programming is prohibited.";
CALL DO_EXIT;

ArrayEPW_B:
STATUS = -37;
PRINT "FPGA Array Encryption is not enforced.";
PRINT "Cannot gaurantee valid AES key present in target device.";
PRINT "Unable to proceed with Encrypted FPGA Array programming.";
CALL DO_EXIT;

SkipWChk:
ENDPROC;

PROCEDURE PROC_READ_FSN USES GV;
    ' Read FSN
    IRSCAN 8,$F9;
    DRSTOP IDLE;
    DRSCAN 3,$0;
    DRSTOP DRPAUSE;
    WAIT 1 CYCLES;

    IRSTOP IDLE;
    IRSCAN 8,$BF;
    IRSTOP IRPAUSE;
    WAIT 3 CYCLES;
    WAIT 264 USEC;
    DRSCAN 128, $00000000000000000000000000000000, CAPTURE Buff128[];

ENDPROC;

PROCEDURE DO_INITIALIZE USES GV, DO_EXIT, PROC_VERIFY_IDCODE, DO_CHECK_W, DO_CHECK_R, PROC_READ_FSN, BITSTREAM, PROC_BP_VER, PARAMETERS;

FREQUENCY freq * 1000000;

IRSTOP IRPAUSE;
DRSTOP DRPAUSE;

'Goto reset state
WAIT RESET, 5 CYCLES;

' Sample/Preload BSR Value
IRSCAN 8, $01;
DRSCAN 708, BsrPattern[];

'IDLE State check
IRSCAN 8, $84;
DRSCAN 5, #00000, COMPARE #00100,#00100, PASS;
if !PASS THEN GOTO jtagOK;
PRINT "Failed to enter programming mode.";