From b71e9a52e8e425ff71f6f9a37263f2bfda5ee2c5 Mon Sep 17 00:00:00 2001
From: love2hina <webmaster@love2hina.net>
Date: Sun, 22 Aug 2021 00:28:23 +0900
Subject: [PATCH] =?UTF-8?q?=E6=AE=B5=E8=90=BD=E3=82=B7=E3=83=95=E3=83=88?=
 =?UTF-8?q?=E3=81=AE=E5=AE=9F=E8=A3=85?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

resolved #7
---
 doc/excel/stmt_blocks.md                  |  15 +++---
 src/main/powershell/ControlStatement.psm1 |  60 +++++++++++++++++++---
 src/main/powershell/DocumentWriter.psm1   |  46 ++++++++++++++++-
 template/test.xlsm                        | Bin 14870 -> 16936 bytes
 4 files changed, 105 insertions(+), 16 deletions(-)

diff --git a/doc/excel/stmt_blocks.md b/doc/excel/stmt_blocks.md
index 089698b..96381df 100644
--- a/doc/excel/stmt_blocks.md
+++ b/doc/excel/stmt_blocks.md
@@ -2,13 +2,13 @@
 ### begin ステートメント
 指定された要素の繰り返し処理を開始します。
 
-|パラメーター|概要|例|ヘッダー/フッター|
-|:-----------|:---|:-|:---------------:|
-|fields|フィールド定義を繰り返します。|`{#begin fields}`|〇|
-|codes|コード記述を開始します。|`{#begin codes}`|×|
-|description|処理記述を開始します。|`{#begin description}`|×|
-|assignment|代入編集記述を開始します。|`{#begin assignment}`|〇|
-|condition|条件分岐記述を開始します。|`{#begin condition}`|〇|
+|パラメーター|概要|例|ヘッダー/フッター|シフト|
+|:-----------|:---|:-|:---------------:|:-:|
+|fields|フィールド定義を繰り返します。|`{#begin fields}`|〇|×|
+|codes|コード記述を開始します。|`{#begin codes}`|×|×|
+|description|処理記述を開始します。|`{#begin description}`|×|〇|
+|assignment|代入編集記述を開始します。|`{#begin assignment}`|〇|〇|
+|condition|条件分岐記述を開始します。|`{#begin condition}`|〇|〇|
 
 #### コード記述(codes)
 コード記述ブロック中(codes)に以下の記述を含める必要があります。
@@ -26,6 +26,7 @@ begin ステートメントでは追加パラメーターを指定できるも
 |:-----------|:---|:-|
 |header|ヘッダー行数を指定します。|`{#begin condition header:2}`|
 |footer|フッター行数を指定します。|`{#begin condition footer:1}`|
+|shift|段落右シフトを指定します。|`{#begin description shift:1,5}`|
 
 追加パラメーターは同時に複数指定も可能です。(例:`{#begin fields header:2 footer:1}`)
 
diff --git a/src/main/powershell/ControlStatement.psm1 b/src/main/powershell/ControlStatement.psm1
index 4bed249..cbca70a 100644
--- a/src/main/powershell/ControlStatement.psm1
+++ b/src/main/powershell/ControlStatement.psm1
@@ -73,6 +73,14 @@ class ControlStatement : ControlHolder {
     [long] $headerLength = 0
     # フッター行数
     [long] $footerLength = 0
+    # シフトステップ
+    [long] $shiftStep = 0
+    # シフト上限
+    [long] $shiftLimit = 0
+    # シフト開始列
+    [long] $shiftColumn = 0
+    # シフト列幅
+    [long] $shiftWidth = 0
 
     ControlStatement([string[]] $params, $cell) {
         $this.command = $params[1]
@@ -80,10 +88,16 @@ class ControlStatement : ControlHolder {
 
         # 拡張パラメーター
         for ($i = 2; $i -lt $params.Length; ++$i) {
-            if ($params[$i] -match '^(\w+):(\d+)$') {
-                switch ($Matches[1]) {
-                    'header' { $this.headerLength = [long]$Matches[2] }
-                    'footer' { $this.footerLength = [long]$Matches[2] }
+            switch -regex ($params[$i]) {
+                '^header:(\d+)$' { $this.headerLength = [long]$Matches[1] }
+                '^footer:(\d+)$' { $this.footerLength = [long]$Matches[1] }
+                '^shift:(\d+),(\d+)(?:,(\d+),(\d+))?$' {
+                    $this.shiftStep = [long]$Matches[1]
+                    $this.shiftLimit = [long]$Matches[2]
+                    if ($Matches.Count -ge 5) {
+                        $this.shiftColumn = [long]$Matches[3]
+                        $this.shiftWidth = [long]$Matches[4]
+                    }
                 }
             }
         }
@@ -93,6 +107,32 @@ class ControlStatement : ControlHolder {
         # 基底処理呼び出し
         ([ControlHolder]$this).Close($params, $cell)
 
+        # 定義値チェック
+        if ($this.headerLength -lt 0) {
+            Write-Warning "[Close] headerLength: $($this.headerLength)"
+            $this.headerLength = 0
+        }
+        if ($this.footerLength -lt 0) {
+            Write-Warning "[Close] footerLength: $($this.footerLength)"
+            $this.footerLength = 0
+        }
+        if ($this.shiftStep -lt 0) {
+            Write-Warning "[Close] shiftStep: $($this.shiftStep)"
+            $this.shiftStep = 0
+        }
+        if ($this.shiftLimit -lt 0) {
+            Write-Warning "[Close] shiftLimit: $($this.shiftLimit)"
+            $this.shiftLimit = 0
+        }
+        if ($this.shiftColumn -lt 0) {
+            Write-Warning "[Close] shiftColumn: $($this.shiftColumn)"
+            $this.shiftColumn = 0
+        }
+        if ($this.shiftWidth -lt 0) {
+            Write-Warning "[Close] shiftWidth: $($this.shiftWidth)"
+            $this.shiftWidth = 0
+        }
+
         # 行数算出
         $this.length = $cell.Row - $this.row + 1
         if ($this.headerLength + $this.footerLength -gt $this.length) {
@@ -120,7 +160,9 @@ class ControlStatement : ControlHolder {
 
     hidden [void] _AppendHeader([DocumentWriter] $docWriter, $target) {
         if ($this.headerLength -gt 0) {
-            $docWriter.Append($this.row + 1, $this.headerLength, $target)
+            $docWriter.Append($this.row + 1, $this.headerLength,
+                $this.shiftStep, $this.shiftLimit, $this.shiftColumn, $this.shiftWidth,
+                $target)
         }
     }
 
@@ -130,7 +172,9 @@ class ControlStatement : ControlHolder {
             # 開始と終了を除く
             $appendLength = $this.length - $this.headerLength - $this.footerLength - 2
             if ($appendLength -gt 0) {
-                $docWriter.Append($this.row + $this.headerLength + 1, $appendLength, $target)
+                $docWriter.Append($this.row + $this.headerLength + 1, $appendLength,
+                    $this.shiftStep, $this.shiftLimit, $this.shiftColumn, $this.shiftWidth,
+                    $target)
             }
         }
         else {
@@ -142,8 +186,8 @@ class ControlStatement : ControlHolder {
     hidden [void] _AppendFooter([DocumentWriter] $docWriter, $target) {
         if ($this.footerLength -gt 0) {
             $docWriter.Append(
-                $this.row + $this.length - $this.footerLength - 1,
-                $this.footerLength,
+                $this.row + $this.length - $this.footerLength - 1, $this.footerLength,
+                $this.shiftStep, $this.shiftLimit, $this.shiftColumn, $this.shiftWidth,
                 $target)
         }
     }
diff --git a/src/main/powershell/DocumentWriter.psm1 b/src/main/powershell/DocumentWriter.psm1
index 9e54b3f..b3e22da 100644
--- a/src/main/powershell/DocumentWriter.psm1
+++ b/src/main/powershell/DocumentWriter.psm1
@@ -156,9 +156,19 @@ class DocumentWriter {
     #   テンプレート側行位置
     # .PARAM lineLength
     #   行数
+    # .PARAM shiftStep
+    #   シフトステップ
+    # .PARAM shiftLimit
+    #   シフト上限
+    # .PARAM shiftColumn
+    #   シフト開始列
+    # .PARAM shiftWidth
+    #   シフト列幅
     # .PARAM target
     #   出力置換対象
-    [void] Append([long] $lineStart, [long] $lineLength, $target) {
+    [void] Append([long] $lineStart, [long] $lineLength,
+        [long] $shiftStep, [long] $shiftLimit, [long] $shiftColumn, [long] $shiftWidth,
+        $target) {
 
         if ($lineLength -le 0) {
             throw (New-Object -TypeName 'System.ArgumentException' `
@@ -171,6 +181,40 @@ class DocumentWriter {
         [void] $this.sheetDocument.Rows("$($lineDocumentStart):$($lineDocumentStart + $lineLength - 1)").Copy()
         [void] $this.sheetDocument.Rows("$($this.lineDocument + 1)").Insert($global:const.xlShiftDown)
 
+        # シフト処理
+        if ($shiftStep -gt 0) {
+            [long] $offset = ($this.stackParagraph.Count - 1) * $shiftStep
+            if ($shiftLimit -gt 0) {
+                $offset = [System.Math]::Min($offset, $shiftLimit)
+            }
+
+            if ($offset -gt 0) {
+                [object] $shiftSrcRange = $null
+                [object] $shiftDestRange = $null
+
+                if (($shiftColumn -gt 0) -and ($shiftWidth -gt 0)) {
+                    # 一部のシフト
+                    $shiftSrcRange = $this.sheetDocument.Range(
+                        $this.sheetDocument.Cells($this.lineDocument + 1, $shiftColumn),
+                        $this.sheetDocument.Cells($this.lineDocument + $lineLength, $shiftColumn + $shiftWidth - 1))
+                    $shiftDestRange = $this.sheetDocument.Range(
+                        $this.sheetDocument.Cells($this.lineDocument + 1, $shiftColumn + $offset),
+                        $this.sheetDocument.Cells($this.lineDocument + $lineLength, $shiftColumn + $shiftWidth + $offset - 1))
+                }
+                else {
+                    # 行全体のシフト
+                    $shiftSrcRange = $this.sheetDocument.Range(
+                        $this.sheetDocument.Cells($this.lineDocument + 1, 1),
+                        $this.sheetDocument.Cells($this.lineDocument + $lineLength, $global:config.searchColumns))
+                    $shiftDestRange = $this.sheetDocument.Range(
+                        $this.sheetDocument.Cells($this.lineDocument + 1, $offset + 1),
+                        $this.sheetDocument.Cells($this.lineDocument + $lineLength, $offset + $global:config.searchColumns))
+                }
+
+                $shiftSrcRange.Cut($shiftDestRange)
+            }
+        }
+
         # 出力置換処理
         $this._TranslateLines($lineLength, $target)
     }
diff --git a/template/test.xlsm b/template/test.xlsm
index d015dac21c29f31e06ea5620cbdd279371a32972..4944cade7ba9fb7c45e8656a347acc0e00148f50 100644
GIT binary patch
delta 6347
zcmb7oby!s2+V&6w0uqi4GUN;l;LzPMf;31-Nq0z>$Pk-GN@4^=q(hL9R#6)15K&UP
zrMuzvc+UI&&UdcweBXKZAA7HT?RDMjS^K`9d#&}Pcol`=R9p~%t>oS<FJo~Cxqx|2
zPE}bvWDMLL8xtIqvij^9@+~D);>J;x^d{cH*9BZD%CU9Rb3y5v_@Nvpu?NPKE_D%V
z(Ewvp+NrJAg^Si=58j-R%@SH(G2(3kzXghGo8Xtmg2BE{0o4aJ_W>1tO-ALiMv2p_
zPYYrT#}7NUprE_!!LNw4PU}tCU;xT3pq*X2wI_BLmxOvxqM=;0#UbMsQ?#)NY1<DH
zHC6Ap*?l?QF(-xFkg9x?5^4ngdeH!MDW0c0l>_ZYxPh0C)eBfki$Intp6m=pnz|^+
z^+CBcorWi`Uof3b%bfdM{7w75EmnhxPj9n{?1a*zn1e<}^N%+aBc6XH0q$@f1-MZs
zm3i)=ZEn6V{cx_Jw?)+(Kp@v4l7~ppD}ge;K2{L4>+RRkcy1@iHtM*>{^9NPf~*3&
zelp!ClS(ms4ZYct(BB<HG_7+_&eK51dH6u*(wbw1q&(=Xo5u0=(3x$Xr>=7MO_7h(
zq0OHh5mv_UUBw|d_yT?4Ie>-Ax?Kh5?C02dnW0mqA`EYdBXw~l!ULCxupW;Q9dnye
zW1WPPzhLeZO?uf4ol6+z>wV}pxR|6<S{Sn1*{vHP#=#as2}P2oZ9Jpiw(A2D_#Whw
zd%3l~T0Oh0l?&oImMAv8QQmy+@RVS#zLlIpGC`@nd-LHlvMQI}FyMUk2*r@=MooHd
zNOy3v|G8y8Dc9&X+&qzAVsgEFt+RO4Z6-1nA8w5++<{=SC*UCs1)iT*^%CYp1Op0p
zt(^j2ZI}s7O%OU%lm?By=v%h~cjr`n$g$~JhReJmOrEc#HLSyXB;<O>)t;R{A$uLB
zX+7#G1Hq)?SS^k-h>GE{g-9pxWs>QrzA{(I#5+XQoG}xU;`LXQCEDf{y#c$dI<#qR
z1S`&G(g#aeqo3TUOTP20u0gvFJ4-|b$U`iAjvt@){#sc1(K(~n%Ohde+`I|fKTLbW
zxTsE%z6mw&e)6dn0MA}m8glFRYV=$^@>?mLq8WRXJS&;lO=9Ax$OyAF+k%t0>&4VX
zUS!WoS<|*<4!sv*uA=KdIxAcrPbrSu_!|4#lu{v>`3q9U>FQc*dQ$N46HlQvK;&?@
zgO2TZC!+yb4I0h98krH_nPQ<8H8nRt4?WkqnX^S}Nb#X=IjnN&KvOjO^+{T(AaK+%
z|7&g2Aw(VztT2-DWTRJjy3d8pZape4)|8U?n*T-M%<HT7ar))~56FJfnK6EFKe+Pu
z51gH@w)gkD{a*G=(Q$Mr!MOy{0FIgKo&jN7V3gHlB=jW2E;|PE_{1R4uq0N9iV?u7
zyXNsyL~L_x0u}y*`%oH9rQ|~S$;rnugU?|hP+I0m2T0jb(>D5rSAlV^3UzG1<UZLx
zX7}m$=+D94-wvR0ZO<U9;SSbKWvhdX-n?(xeWyi?(-_z>xQdLaSu$K?9b3kPvqTV#
z{?NdAj&)xYnV?S&EW0yf#GqfQ5t!ie3<XcC-7~C2Mtc-~+*nJ~obaPAbS?<8V?Lt6
z01*b7Kl1`dyIV}`4S$9X|J*u~gU2#ZR3@sN4dWNwkJ<B{r0o?UUYG8G-C4BXRdLHt
z6&yZOXXOeP8mN)J&oANF$kk*HUYJ*@FT3Ved(B7U>ftmi!G8KO|LGGO7GS&LAhhCw
zm=;LoI<6{S&GOACU&myC9TJ!BrF@nIm*~DC^fggD-6#m`s+#99;iieAXDDH!nuso+
z_c(mfch`uUmGCmj&F#8BY9)O;8~wDIlaD3uo=C?=2f3L$ibif+-AM{|P{Kl5<Nxkr
zqG+aS*F=7pmpdAnDbu%V1MH`Z`Qv=tl(cOQ<r8XhdN4SPUw_LpY&>6+I(%a1K@D9z
zv_6V)H|@>-&E%=Q44F9Y7`C{F2QnZK==%E4?ZxD{%cKES_?$k`0VqT1Nnr?m5M;$S
zb1OtAsPV1Ki_l+N?_Iy;D?h%(C;ohc!hbxn%3lxZ5rx5=t_%WMO?}%<jey_TzS*_!
z@yh<1KjwIEdmH$C6FA@8TRPZkTIt-D2|T|9mIqTAWv)*S{m*vdJLBKDYRGh0SiKH3
z5x8jU%?1J_fI!Uk==(RvG7&Ouh|~pBGJ2oa4A0NqFz@M3_H4v<)~(D^(~kEwJVRen
zkXR1xeF!LhcMQZYaSFJ`FUd+ilj+@2HO&0dc6!y-!oUAykpgnhQVCZX0YgSoCP1|B
zJyybVK+xw$QWLB>uMEDK^LcWo3c*9zD)FExVq;Su2>%IZZ4Vi%c49u<xyMx7$C()N
zlmbZkq-28B?(Ku1l<=bvM96UK1UhZBiW0aOL7E@#1tc(7Qs=+Vu*;8-lB6hhKRfk;
zg^D#Osqa)YtGDP>P&$DXTXc6Q{ln1+ooAGm;r9``U6dZ-vN<|Ml#jy|a&%WIG2pf!
zV>aLRlD<y4MCvzL8jPb#YC8^bVIjrls4?Q_Atke@6XIamA_`PHag^-a1k@sNxNNZ|
z>N{~9AY1YkbwC_}^YOtREb+waE@a`r1j#yfU-o}BxCK(0F}hte;7$~gaH1wJloM>!
zqU8pa1e+l=Z$O#C4G>yNQ2ub^9L>8>_He@-EqkbVxM>S792ixmj+*oM)%>wtR7%0J
z;i+h^O}97Ac-Z~_#rS=GoeBO@lu7Pq(#Uv^aNi6CVT9Iy76kAoiv4Lm<O+GD_MUj)
z@ezOT&T=gkr$;!($acEiR_$4>4;@i<oGw{=_)`i-2wL|4O5`6N*VQD_#0@Uhr)G{W
z*O=7X4<-AZO#S}If`V}Vx5mhc;0R<$djfuvEWZ*N3eE!LhkQ>U_$Di^L=J=G8`*!}
z{PiHDqkIePE2--@i7(aT`1NlfxAQG6J3_|(4aon2K`V^3&&|M(`|&dvUtN8=&=@Ae
zPpvvNhchy8IoAkpD3e>4n4A_Do2vUTz$ykHQx_BcwJXlO7`C$>ba~%Gv9jd9c#-I#
zeUDukTFfdWP<Fj$q(r!ekUJ<eF(DVc@0y#j8s|L|ysExAD~!R$^1NIZOWydg`T1tq
z(4^7vZeToDd9^ZGH;XSai?X!FS3FA)^Hls6ITQ=gR_Rd^D~2cMN9$l;rPU3kXU+rc
z^tPBT3MmuezXR9K{|4q-6vj;GOb@XCEua4XbKYyM@-58x9GkHa{8<gUG?jLChPpfu
z`|&8IpSC^BfP!`&ZTyUI7lDHeyPrUvgw|Ff=th9^!*mj8z5!^%Ka&d?Qy;9sW>@A)
zCS(^6{bXIe=h`XiNRIjA6>@aXNOs}U$e^%<8xT2&5^*<NEI;T)0<pFnjS|TkT*_LB
zqGTiO2}Dr%6(K|rnmu`3s(iJq763EUNIe>v^CDW`5a>dDM8+>-akZ7AmH1GI0uJYL
z$3-WAbD{pVPJ)WI{99$xVixcGOu=??3BlI_>UG$rN=~VSredS1W!I!8F%z?hk&DeT
zY|pT`Rff8U5_dQAX?_r85|g%?iqe`&`bD?${SNQ{{=GEXs=t(^9J&~Vox5hN`(~C5
z@UF!JN1F$$9P0jAkHEhQ@}IQiqE08U<3BM%BCxr*Wbi3)++nn!qkceO65rvG<9{f}
z_9p>_8Tj;$qdcygXC6HBoRgokRXbzBm59Hm6Y%fziGMNN<V;P%S8Sxf>}$bbRe#J;
zF{>@-Gg5arcYEkb0th0@q;yjmjzWemCg5tzvMZ4~z`6264-ybOoXvI<-My8#7khd^
zu3H+d`hqq14gDn}YH7c%|DWju{vDrwf8*1uw6jqyc_sC5Wc5*F`LTkW+Oz+O{QniW
z&BS+alDKuXwm7!lWAEvAW|HUsv|xHA4n1x~Q^*50<K#e*x+UKuHTV!!?h9hs8GU+e
z0pF)sE0VwfHtoZlg@uO5kDfku7?6`Wfr*cf5%3E&I&}ZeaC#ZV(MMB-sMA=8)S2S4
z8WmIV%f9>C9m~2s7*#c{v&v#Ci(@8X8<vo;;1@dbFrS`wAM0f~Bu6Hym+&sVCi@~+
z9^dtt!B0SNnGvh>MWC7xX~VRcrieOjOc=UM`65`;Na!&MecP~IJiTiX$=@Qp<5KB<
zspVa<;wK~Xg~u?*aUvbgNC326b=*E})2%i42?|vaT*1^wH!TW%MHQLj%}!(>M$_~d
z=nt&BPo+m&m~*`Ib$hSU(#KsG=-3_~l6Hk})7*+%7%|x9{-P+u(Da-O1Z@IUx4^Op
zfry%Ydo_FzC=3b$k^bIhJayvn^zwDG@#KE$?9^v4<uWNu*~nPoL*eyqwKItsmJ%Z#
z6@)v*3x`!08Rk0WQaWgQvHFaupON7m5j3p#2SNQZK)%oEwUY`;9WNh#+L5<R5|_Lf
zAeUkAxX5KMa*vl+7L8FqZsjBG)6TpF2*>wlZ9_N&<FuJl5IwNx{X*RRcd*+{w5cBI
zyPLRH4nf3v9m}#kOI>xnUcn?fraLUQJ1i@?Xh^-KOR8$Hmfl-saII7)Yy!;GS1J@6
z?RAF*3~|*{<yiUxQRZiU(N#NQLnAMa5wbJRhJlNc*Ymy?{mj{kRjG+t9nt_sP)h7i
zyFGnzFwU7P$S+x~aT{F<4sVDA84J5fojUz&{aDDpFHYjl+=fbf@(+k%3ljIB*h(=_
zb`LmDB=))oa!ADVQ%SvJ$!LK=i`re?kN<(#QfmT*_|9tvi=yV*_TkR>cyd5W`r`6r
zYigm5kR>xO<g54P`0)N6r58W~Nv#Txj+OXr8hUW>hoXB%7Nv<#s3U&$zBh0yG^g*~
zX+cCdo~ycna=dP{o5_O-SgpDoqQI)zR)U+K4k4DU=I1}IhCPh(S8&Trc*X)`yHVYg
z(WkmHx6O}LbCbG1eu&Mz>lJB1t#H+R7(jpYi1~p*1jp+y%U?$wkNPwL#0+@v2|ga$
z4Tf(qtB^?!h^rsp%MK3OwllUy`)(?@)AN32NRLGgupp!0`{8HF{zTVy#wxSn-J;C)
z1F&57#7Wp?T5~cwrV@1r?YLPk%h8>#Zo_dHcT`qI6B<#WOKDzr_kGVu2i<7OFy`$@
zWBlzWH-7BHvy@JwEI$L0zJ72~-P~(7vF9n-S>uI@qrfwgCgS^YT+KSD!UH|69v)vs
zeKe=8ONDMC<sQ_H`@7RGP3LrUoqDxxVZ8v1S!KDj`6ihICsO&xT$b#e(G`zmyf=rV
zCHmVubaXXUT1$TDr?zQ~o0b!{ICxyCUY84RUs@!t);}C_kvapaY8%UguLfc0+_N3+
z%rV-Cw{<iUP54%C<1<|edu22XT6|mg25wV1?RfT;&H1+0OKKQss$^MF1X~Q=qWXH2
z){JYpJupOXQM_){x%+0`-<-p{T04?M@R*QDNRDt1-9^IPWu*C?gH_thbi<>F!MdAo
zs>~5ygu#3nt^Ni$K4gOZYGD%2n!Y|g7-Vel$|$=LuIg#BUlcQMOR(DawmiX8rxx+U
zDw%s%xCAt1C#uN7zAemXRqc2kBv8fPtQGfNV=+^;j7j*@k)wC0_hBz_`QkdHJY&bP
z6hEqe#-%WI=umzBQH}s97Z8NUL0mYhH*2Q;?j5#k_jQTmjGu<B*{*q^*-3V`$EB9?
z+#_|t4&hnXPnBaE-j7e}8SuseHWEd=ObN=ZSnxV)FA&6KZlX6zk!}s^IWi4IN!gK7
zqB|D-l_u{4b05xzCL+OwVYQWynZGlJ!|xrFD2zEHH?~f__IUmrO#w_^$=V<u2z2?|
zY$*TXH})1DHr5ZlJRDr?{%$+^Gp@sWlz~|_*DW6VV{@zy5;`ouYd+tmpN?g+i8MNJ
zei=;*2t`952Jkor^A}GLcyTyI2SE%cLRfp^tCr)%ylJmu=qE=Xe|yxG%9gJbh4mb`
z9QZhMIshndw(7nwGeHE-KCLNF9aLYV$srwlvMOtGef3GzEMv4b=+XDO2?iGLOB$jB
zlI2vh?;$}BtE!>()0U+IcGUOs<c&E*SG;e0F?*G{ZFrOM63o1M(q0uxh3IppO)f5e
z)K*LP){*p`>LZh^j)(Q%Pb*cqdwAIEACb^icl3P$qS`g~?L&><!TL(Q4R3^t#q~Ch
z9Nax0QJAf_7>OOT_*uMG^CN@Cnd1gABY2*Bhhe7^UKi7Lz9t^#H`IT*TH)jG3Qjo@
z8R|c$a8Z<49}1NY13+eR1Ty3zayPcoUAwp9;F4iGt_H*!Qf*TQqZZ`-N4d#9Lz|>G
zZb760mwQj~8X!7XODR-+qld81=Kd1#hc>J`q12)?;9bggDT-@k9RW>xZC@UpC$34)
z(sxBkLU-oDa;D8fn+<@EVJAQmF^JJKR7K9~#}em~`wMi|Gg;_Uy6N|>5&d|n>Rzs#
z@^P+2*Fl_F-7NHJ((HINN87Oi9BN^PTAl*Pzk5Kt^tJgF)!>;p0BzYN|C1*E+rETM
ztc5fuc`aL!ijhMD69xv|!N2SSPFUSIb&MG=vJIK;$QQ0rnB}}#=?;+-@_Ib^<=oRf
zMAPU8%HfwHeA?<^=m+n*uB5o?D#Z5~y35*E`ljO+{<J6P+RP2ZH=>j93ohR>+$L{e
z?+Cmz+19d6G0li4lp!oXayw5w!6DRX{v8V!g^wBO@#-AgyOW_$OYuKg$U}58V$<y4
z)@U2<y$;I>>3an@iATppi+9!Tq*kQZaZrfbGLh-$wobn|h&E-J@Ltiyl!Rr|G!9#Q
zAiT?Zu$D<0Kk<AbiY0Pl@v(bY0Y^#*(3<W2sicax{Z4dmNHy9-Hm!9aC@FYBE4z-4
z{-;!6ec<O^)_2EM9kPubSiT>VgIa@#OhNv<>c?W`%vroiRI0z)WSw6>KnihvJ!`vq
zP;+iq^MdS$n#q7#XXv7BDmH^x=Tq52WJ6x)r6g%z-Aj?~c6s*CbY`Q(LGgORzt=kt
zurNtxtY>9`xL^K+eGJPoZ$X^ILlG3dA;~ox1yCNF-q1Nu9`5&R(fhis!=uJW)PMY3
z>9QSDmE42Fn`Hka)g#kdbp!q=VOU7fS1o@$gSh>AcsL|w*xGZc8@426f8R$VPfd^Y
z4at4}o$d5f#y`aiJdma;9zG?u4@OjNaCeUYOmBN_r%<iI!-@mkQ*Gm=j@S;l&RLvh
zU3;DK^+|RW7Oy30o(nlsSHa4qTr=4u;{4t)ZI;h>M$&gL(ck^6?g4nDc!Kg7E55w>
zeXitjs#WiXSOH40!MH_T=WMj1o4uB)*;1}WZrzU4Izg%aY%ZGrc~l`<Vw*Oi^0vg+
zpDZ~RvLA}emZdp?O)3%NjZ-Q&l`gK4*^i5v3uM$H%(pTUv}3!LhxMe;#5bY#yweu1
zG%tn^&1=v1(OGJ*3{S0YPkVjKs4AdttqgE`%vtB0UQ=z#eDd(35rbLFqTv|sR{^nm
zqFz=s2RQdaef-}Xc|T`Mp8|1gU9k6I^3c<aYz@7fJD5u}4lzHmtkYK+HrMLN&O=Bt
zO4&he%QC5KE%sKc%a(L~36QakA4wVjIZ1u_1!XcUrn(YqeS03JxqLGJ@WnrBejR*4
zc>gHns|so3;9xU_6mitB%R=%vs#s28d7LS%hcE~2UsXX6i264(e_agN55n@e25{`P
zFbmzkZVUhFw!nr(i!jpttB?QH!H^T{CxXT`;>DVY(qhL%1aVFH{xngdg1F}VzndDk
zRsz@x(TBK|g1;X~>?|i3%Pq!^doA?mHBbyn_eUK#Adm$v2z2W&?B6YQ5$roLDcl}0
O?3Nf4!GPr7KK>W1s;YMY

delta 4130
zcmZ9PXEYpI*T=``o#-uyI?+2J1`|C(^qydd&LGhZqfJB~o#?$YxQLQy6M{rfL^paD
zo$%(~^{o58&wD<c^<QW2bw2EM_J99Qc?3?HPyG!6zSv$d{Td2~PzYWqC^)Es%l(c6
zhI$tknzo5Va#zx_$rGJ5D(>N)d|L%Rrv1KSeJ!cjlrUD{D)-Ei*1ZLx69Z@O&b)N+
zxp99^KZLtXZf}%d$OSRdNNtQY_6@t5;2%>ka>A<>x2%uB+vakb^yOQG`zpM;3F-OX
z2?Q9?l($he*X`(Jq2Tvq)T?>vs-H56G=y??Ph@A&<VeYJ77F@Ih+1~`HR;a~DT49B
zb;=}p#I#@WRP-@Npn#<Li`XXjM@{07@oM{SLX2HN0xqE$-w-hvdPAe3NpNQsBL)Q=
zw&qYb^So#~R40&h@TC#lvoab_K}YHIQ!DMbj0c`^LDV-R;iUA}in3&b({ld#;!zgH
zbHQ8!zVFr)!#P*8$EY-_reY{Z1G%!$YYvrs7z6Xfon{|8%b5chh|8#4D~v^KxSYc*
z|Lo=Gb!<Og-qdm|eZBK+=~l(npz$b!CC({IYMQ@nWJGPFGC2v9OJ|D*JgAL~h0S+u
zY2Z-}=Tk+%O-vJ!M!=J{hI5PN@3!i4xN8FG*bSyNyn7Trgo>f`Ws13y45rwjScWj>
z>s5gs&N3Qf=u++xPlXu-e>GvXiq+dV4j<&A!7RQ&Ew=DA<Br2FM~i)PDMD)O^x7pF
z@M7Orzmv)`?0n*atmkzkJBJ@fk}K+G85J9J-WUWwAKNoPkdb~W>bIGjaGik6zGS3m
z3UOsFSY=FN$zuP=xPJxel}PgN;Vi(NBB0(CdcUgr7lI6~hJMAYJFq?my{p`sR@4Z$
z$L}bGE+`0SP^9*g*N96~PIm37;0NzU-EXv!^<eOD<n>C--#X3DsNM+SJ`pAy_}mzn
z7$OU&I|++D<kk~%LV)}UwhdfQxd_QsM(S%c&|~#wk?y-r;rvIj)+r~uHs6mYe2H38
z8IUcV`prL%XEqk^ZmtAU{LE4<(yK_$*Vt|(A>%#s^HpmiRS9_}>~IUA?%f=mv!4>{
zI}*C!&)FQ(KLtJ}@4a!kBl&n|*KApvmX`wmjXoPS`(R}G$|&ZYA+Lx}4O=iYBe*SG
zu+NNZ_Wp4=;ylrfEI@5>I<{cVv1LX^>TAnWp+-CJ&6B7jQJ>-rZ1l(-cqlNtG~~QL
zMUa!cAGvyRzYCoXWnLkeT)eU%?D_zOU`WYH`Dcl>I3|N3q>!2E9NC7P`!PiYC<T2~
z>bmZtspaF&$2#>H%3(>(C2ZG?I@0K$gIfW%Tty6#J>9V-i!x<*ZmV>rFA{NO_+|**
zV;AxgMk(h4rCH|}xN8z`$7WwkLVr4I9N79D%b=cf(4i?w*+?nQlMCH^Z~=gR5&(b^
zfC4Mhp_UZ!;W^{;y5XW!fJ0xJyXew`>L7A9CJ6)elaY(lg;YDqA|WUFzxpq_1M6jV
z&Kfh6R7lT1$OlYhzjq!aH06sEc9bLm;RrqDIjzk1sI&LfdHc)Kq(h3Cq@7UR!y%nv
zqNc%R2H=N4yuo+tIPe<Caa4lIh_g8c8L(8fVoI#U;4@}RQ&h#~^wBm0wCP#*Bj$4L
zGTPIC`*Gj-zuktKI<{f1thnUQi$E}nvQ{gPb|uCs&W4nllWUxkCvR_HC2?zC=&u)4
zK@8AWM=?jwLdMCi`7%>zr)3SUsfTv;emPy!NZVMlmQ37!wJl6ByGZ<vbE|)Jrxi1x
zE^ynQ42RqPpx%L}kH|DW+}wDbIhVR-#mtS8BpvsIu?%l$(nIZ;99C8RQ%g}IkFt&L
z>9!ukn3j`1N;p<!HIUAxz&#PR*|}Aq`I;{B4RIK%`9SOH(vlgy4-V?9si(B(YgiM_
z(@itf`=zs!H*$u9tvo_5ZBk;gO|Anyfg9wR@aK=zwpajwyF0+&TZ+-1d$=fB5M2r(
zV}??9%7fHKLS<T~?)D1hy|XiKJvt0O=#-LsDIQI;h;P?D0NcK*@EG2^PMVJ=F?4`m
zRrP;>lr+95zgqUZ+)<N{o!KgnNvJfAV`4pzfCkwgT`qi_#-0ygajnbO@SC4d4Z^KG
zH%`}W-H>~$&GpOY+3Mm_-GcOpY`=!MV#eg)hDIc*I}bvGSDB4rju_8^8^v+h36`jj
zHTkJMt1fO-wSv$?b|76vDrg+=-ga7Gcs0$>b}<s_PIwZtFv;c~eQ{1DX*cG!;~&qE
z+gX(Lc8l8)Man5gn9}(IK*LG+bN=Lb9f7Bs(}g+^X-(cya-yPW_6~(pb4-XBVN^0@
zUJKFlPUH_hlV@169@9D*7Bv&TXZMNFA9($}T+P99apYZOHJuN)zWXqWl%-5~Y_p@@
z(6yi)INlM$Gv>uIe*pmiE<yl+{7-rPTt&Qn{9Wz6h5g)In~X-Be=1RRF<eo6S)lvf
z=jFx)nuOtn(UWKv%rrMOrtc>FuqyM?78#VMy&~v5)py+7VLWDipNci*{FWDCT|J*U
z@6na%@g|3L3Q?q8Np2wCzpNZeof`Qt)3W$t&wn2tCn}!yIoXrPDMn^;sc82S-S?fm
z?3K2b5Rk}8zoY4m)KRd3U<JpzQcXFYZb=gdeM`V{c4}#{<bLu}2rVAu1r;ysohWtx
zVkl9e$h1J6o~^22w#4Xe>8BnITGT|OVb-vmUQI6!NRN%;b%b*#>9{F-A9eM&q4J^o
zfZ95EWenX3=X?YBOtV29h{bS5Hn2ZA_o_SPN+RegO&=bNMi=XkGaHsSH-X|q%LP7R
zRVvTLeTDT}<x_dqaof3B1v$^q#d?-bP~}JEmUc-`zMb{$jf|XaU!QGb&aMIiPe<75
zkS~KK+Kbk2lO1t8zp1Eky>fX}&`U+;15<-9!dx@=<;dP|+!460FcS^S9;B8_L5WY2
zOU&1oROhdP&<Jx4$Llni)?2@Tf<fNcl?D86;tU?|5^X;Rc~}lb4M<zIMi5)~!*;97
zxMs<>wmQ;yI5{~fGCAVI?4G+1sYY3TPF`EtMQwYum5D~Js_?E;rmf#(?e+&A?s2$~
zMaLTyPXs!W)({b6XkpyC&;L@}VtJc{@np4mERU6OYN}g2G^2C!fG0$qsx3t8Xm3X3
zFEF^*U=xvlnFad-Wf`YC-6wdNcG?viW-!)nHcopXOk#*GrZe*n4B2>k6!JSO%~fdW
z^mW-ny|z6IlJ;PxE@#$e;-aagjtt&Gd{Nl!0J`-P4;IUPk4=&xDdqC;)Ufkl)qQ2H
zAe%eta4CyKtm<~YJ&W+4CR-8=(-ae9EzR9e-us-l=LXt$Gr!Ww!`)Lnhe?uI57;cN
zMJsQTM?tZ1QPB<Q7#m3zic&t<{qt5#LQY^9d(<A@YwYS<dxRISulXMBwvdG~_xD>~
zVt83Z_nq&T5S+ga1{a{Gjf+PMAOH~k=?G4M8x+J+{%0zPpkRV5@Ent$?h{H>!RjmQ
zf--eWyr8whJ|a%eqXAq6E|~@Cw3XNOGIT^?+gAJ~_!TSht!hdjA-6W9mxrQ*^Xx6Y
zU7%3%kjjEq(mg)!H(y6b<s>TDx;I;zG*<}Y)pr6em+EV&XAfPYpG}^6ztUxsEp)*_
zm%BA9Xl-Bd+}p&Az<*ymD}R*i8_%zmVRB)Yh|M44uBBr=nT=QxS<O8#Cu9Fj%;k99
z*BH*rIqb%iy1e|nx0$ulg}e@8X2mX7?ZUQgxtWOCVwfswHzQ?54-9{S5I_6n7;ag?
zG+f=Btq~~~C($Ln|NPCY+Dg04bS$GN5woxPcD~vd5=4(h7`&CTgY-rUxwdjrYaQk(
zlx3D6-44G$7YYh_kmXOb?A3J4AJ9&;Y`5h7{NU<Lg=krbNKVm~DuRWoE41Q}UEER!
zKEH4K-P~tYUGf@Fr8pu%o5~tu*fRv4m_#(RhY*P{F2=tM$t1pc^)#mr;YYfHgZ!#l
z9rnpV2$Hgz1y|B&%dzbXq?$Qic_{Awr1m$<3~pDvJXSSf$Z_z=+$SStLEwweZ)-JX
z>F^h(yxJkn4=%aOhON5HQwyS@n<i8q_Y}2Z4j1O^B@d=dVs`cwnk^$&1VE8od{hUa
z@Pu^_%DFm)w;j0D45iGMBMaN3RdJ5?Aur9$aHno>4&nGq8RfFz3uP%);jH0SND#hG
zLK1PbGm-O;{!@Q{q@D#`3i65$`GVh>O2(JZ%y_k&HX<OoXv5ooE0tvR%g4aVOKAFR
ze-(Mphd~#Li;<cG_Rz2H=ljYRo}rT(4`ZIv{C@DcLpkQ6UXT>qSw8Rq{;NhL=ojYX
z?l@UpxgGw@IP(KP^vRkTHm=|Pn&3UblgfjTFV8oHg>7`c8gJ5?@;k;nC@UoJ?j-zC
zY9IeTyIh0IDCI%r6Z!p&7*B1D%4K=CC`eS}+<8=-RJSj*x2UCPparX!Z7CS?XpNh~
z-j}DsNr$xp39m*#5;2F6w!?LJ?rRx%t-8d-SQ*@Z$v1h-Cg41ugAMGGyLhii9dnlf
z=Fwns2<FS>39Z969V;JTwLgNxGmO0BhPynO1F|_trR>*5Bb_`q)=q1#wf)^wO7JL=
z6yo5F1mM%c=D59t`Ma7q?b61kza9omOwaVc=bIQaoIRDeX6bl(#NWo|gz#TYV~vKw
zNkK+|W5p%krnOPVRYl?@Whx(;<}>q!3j_^RU^vANmmZP8A+bZsgi8jrkthKnzW0?(
ztt$GZ3@;AcO1oE-HtGQX4l)>=U1}hs@-u9xmX*ku_CUp}B~^-@d(8cAp=sXP9+5tH
zy*`M79Iq)$k1?2<xEOIH7xM%Ao6DzKl<KA)TIYZEFU50dLIBx571;X+r+P!$S`J;C
zaduohpL2lJ+d$t&10iB>f(Vn_xFrpVWM;M2d&lAK4K_hvTSC#2oxS%IXoe-`aO@=R
zjS+(`kdk>VTQ~?iM<v8D1u9}Gua;0?K9BGUI-b%D&N?hb?WYJ`P{r?sS7B^_wrI-l
zNFl(V4tC1YZ!2Im?Pf3~dtuo%`iz+tO9{-IQ|k@C#vkPMHluaD)iP4Z>(yf4OnmD)
zFjz_Xi87MnY6I(bc4%6oms!H}cEUeL_@Q`_la|Li`}|b*s4t>7N`d%B+p-U8ofNy^
zfb)nm7sozcL{asU9Nj0Eg8QG3u+?LI9002Ru{uzj{2xrFP!z$@LMbY$0_X1ibC9J-
z$NJwm{l`oHU2OFKfol;Uh6zOt=HdJQAo6c2K%evfU<oShF)i!AhWv+EX#Y3ykMiV3
z#etQ8TKp)O5({b@ED3xH`bWwuNdk2r{*k&seE}3)0)*O8dI-!H{3E$h^2#E>eW8D3
nqB0%pKTqb*B(V9zMb!Uwy@Ckplk#I=t5~wi1A-38zhnOc4`;b=