快捷通道

QQ登录

只需要一步，快速开始

  注册地址  找回密码

数学建模社区-数学中国

留学>>
返回列表 发新帖
查看: 10727|回复: 9
打印 上一主题 下一主题

[问题求助] 怎么在matlab工具箱倒出神经网络系数

[复制链接]
字体大小: 正常 放大
琳123        

1

主题

10

听众

296

积分

升级  98%

  • TA的每日心情
    开心
    2014-11-9 17:59

    • 签到天数: 75 天

    [LV.6]常住居民II

    自我介绍
    无

    群组: 英语科技论文写作实训

    群组: 数学建模培训课堂1

    群组: 第四届数学中国美赛实

    群组: 第一期sas基础实训课堂

    群组: 物联网工程师培训
    跳转到指定楼层
    1#
    发表于 2013-7-29 20:37 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta
    怎么在matlab工具箱倒出神经网络系数？任何一种都可以，谢谢大家啦
    zan
    matlab, 工具箱, 网络
    转播转播1 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信

    相关帖子
    回复

    使用道具 举报

    兰秋小沫        

    0

    主题

    7

    听众

    31

    积分

    升级  27.37%

  • TA的每日心情
    开心
    2013-11-21 23:26

    • 签到天数: 7 天

    [LV.3]偶尔看看II

    自我介绍
    额
    2#
    发表于 2013-7-29 22:18 |只看该作者 |招呼Ta 关注Ta
    帮忙顶，等高手。
    回复

    使用道具 举报

    涳夢        

    0

    主题

    0

    听众

    1

    积分

    升级  20%

    该用户从未签到

    自我介绍
    爱好数模！
    3#
    发表于 2013-7-30 20:31 |只看该作者 |招呼Ta 关注Ta
    神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗
    回复

    使用道具 举报

    冰E柠檬        

    10

    主题

    43

    听众

    1434

    积分

    升级  43.4%

  • TA的每日心情
    奋斗
    2021-8-13 22:51

    • 签到天数: 278 天

    [LV.8]以坛为家I

    自我介绍
    冰E柠檬

    社区QQ达人

    群组: 2013认证赛A题讨论群组

    群组: 2013认证赛B题讨论群组

    群组: 数学建摸协会

    群组: 2013年数学建模国赛备

    群组: 高数系列公益培训
    4#
    发表于 2013-7-30 20:45 |只看该作者 |招呼Ta 关注Ta
    同问上一楼的观点。
    回复

    使用道具 举报

    百年孤独 实名认证       

    3503

    主题

    538

    听众

    5990

    积分

  • TA的每日心情
    开心
    2017-2-7 15:12

    • 签到天数: 691 天

    [LV.9]以坛为家II

    社区QQ达人 元老勋章 发帖功臣 新人进步奖 优秀斑竹奖 金点子奖 原创写作奖 最具活力勋章 助人为乐奖 风雨历程奖

    群组: 2013年国赛赛前培训

    群组: 2014年地区赛数学建模

    群组: 数学中国第二期SAS培训

    群组: 物联网工程师考试

    群组: 2013年美赛优秀论文解
    5#
    发表于 2013-7-30 20:56 |只看该作者 |招呼Ta 关注Ta
    问题完善一下！或者把代码贴上！, y+ w! C" N9 M9 x) W
    回复

    使用道具 举报

    琳123        

    1

    主题

    10

    听众

    296

    积分

    升级  98%

  • TA的每日心情
    开心
    2014-11-9 17:59

    • 签到天数: 75 天

    [LV.6]常住居民II

    自我介绍
    无

    群组: 英语科技论文写作实训

    群组: 数学建模培训课堂1

    群组: 第四届数学中国美赛实

    群组: 第一期sas基础实训课堂

    群组: 物联网工程师培训
    6#
    发表于 2013-8-24 13:13 |只看该作者 |招呼Ta 关注Ta
    涳夢 发表于 2013-7-30 20:31
    7 m7 h; v8 P1 J" l/ p8 F! \神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗
    $ I8 l" [6 M# P! m8 X! N' t
    (* Content-type: application/mathematica *)0 A  j" {" J9 m5 u

    5 F8 j: }8 t6 ]- ]! p(*** Wolfram Notebook File ***)
    5 ~# X  u" c  K9 m6 @; P- Z(* http://www.wolfram.com/nb *)
    & u0 A$ D8 _# P4 s% B! {: T9 O$ u( c1 u& V5 e& z0 l
    (* CreatedBy='Mathematica 7.0' *)
    7 ~0 h4 J2 O) \* J  u
      W& ?4 }( x# ?, s$ }! e! L(*CacheID: 234*)
    8 w5 L7 V' G" t& W0 n(* Internal cache information:
    $ }$ F1 J: ~7 y6 V/ |  bNotebookFileLineBreakTest/ C. _. F; ?9 M( x
    NotebookFileLineBreakTest
    ! }5 W7 T, P% k: C( J% ZNotebookDataPosition[       145,          7]4 {* x7 [. J1 A) Y& W1 G1 V4 l
    NotebookDataLength[    423629,      11534]! p+ f$ J, u$ X) V; B# ?: o
    NotebookOptionsPosition[    412607,      11173]
      g/ v- F" A7 e8 M4 b- t. qNotebookOutlinePosition[    412953,      11188]/ H. V/ {& H# M0 B* o% l1 A
    CellTagsIndexPosition[    412910,      11185]8 w7 O& U% E7 \1 r* Z7 Y
    WindowFrame->Normal*)- l0 r7 P3 f0 V7 U+ S

    2 ~$ T: t6 j' {; a  q(* Beginning of Notebook Content *)
    5 c9 r% d. S: `/ z* x6 eNotebook[{
    ( |# @8 D; R1 t2 c# ?- T
    2 f$ d9 _' t" O4 PCell[CellGroupData[{9 Z9 Y3 N4 ~* ^, `
    Cell[BoxData[
    4 C; o8 S1 g' W% @# k  G/ p, y RowBox[{"Data", "=", 4 C) z! q% x! p
      RowBox[{"{",
    : Y% V- I) f  Q" ]0 Y. m& ?   RowBox[{
    ! l: K) v# Z4 d  Z- @7 }    RowBox[{"{",
    : G& f% I% _' k. u: M, K+ K1 C" z- {     RowBox[{9 q7 [( Z4 r. Z6 C2 ?6 n
         "0.304348", ",", "0.552818", ",", "0.330370", ",", "0.025823", ",",
    0 ^0 p3 u( d- `4 b1 c      "0.538462", ",", "0.752072", ",", "0.408943", ",", "0.504532", ",", 4 ?/ y( ^* O2 |- z( a
          "0.000000", ",", "0.277091", ",", "0.873239"}], "}"}], ",", " ",
    6 f1 x4 z( d3 r. M" m    RowBox[{"{",
    - I# A5 o- L$ C     RowBox[{& o, C8 S8 l7 {# R. S/ d* H" C" I8 C
         "0.565217", ",", "0.346857", ",", "0.393585", ",", "0.118785", ",",
    ' h( _8 Y: n  x      "0.349650", ",", "0.370761", ",", "0.413008", ",", "0.502518", ",", 7 l8 o" L* K1 k  I4 D( U, e
          "0.000000", ",", "0.220259", ",", "0.464789"}], "}"}], ",", " ",
    9 M$ N8 I9 X0 Q3 O6 ]    RowBox[{"{",
    ) y. r# T) P2 {# N     RowBox[{& D7 D3 ~0 N0 a
         "0.608696", ",", "0.339186", ",", "0.494300", ",", "0.099338", ",", " h9 t. X) L* M3 W7 j  H. I4 B
          "0.321678", ",", "0.375283", ",", "0.000000", ",", "0.505539", ",",
    5 \8 }, F/ R; k  O$ k+ h2 D      "0.000000", ",", "0.899882", ",", "0.492958"}], "}"}], ",", " ", " F: @1 a0 T1 v* z* `* y
        RowBox[{"{", , U+ I  Z: t, ]: J3 q' y5 f+ B$ J
         RowBox[{* n' _+ P0 E( s# _- L# ~
         "0.521739", ",", "0.334022", ",", "0.355500", ",", "0.025156", ",", , \* F$ ?' i6 M. r* e
          "0.489510", ",", "0.376790", ",", "0.411382", ",", "0.000000", ",",
    0 b. U3 G1 W, }( a- C      "0.000000", ",", "0.265607", ",", "0.774648"}], "}"}], ",", " ", , h: ^$ R- X* S. Z2 h0 f: T
        RowBox[{"{",
    / m2 j6 g, c9 p- w  f9 u1 X     RowBox[{
    8 t$ |7 N* T% d" `     "0.565217", ",", "0.346931", ",", "0.218229", ",", "0.043639", ",", 6 a: C! e2 j6 g! p& G# z
          "0.503497", ",", "0.761115", ",", "0.415447", ",", "0.503525", ",",
    ' N: F7 D1 e; @. ]: h" g      "0.000000", ",", "0.642226", ",", "0.380282"}], "}"}], ",", " ",
    $ B& I6 z9 {( N; n0 M) b    RowBox[{"{", 2 c' Y) Z/ v+ |4 ]) j9 [- |
         RowBox[{
    3 ~, A% H% g0 Z1 {( }& P1 s     "0.478261", ",", "0.293154", ",", "0.259368", ",", "0.026688", ",",
    $ \1 Y* E' g# C6 w. @) F/ W3 f      "0.587413", ",", "0.755840", ",", "0.409756", ",", "0.498489", ",", ! f# F" I# \4 y/ S3 {
          "0.000000", ",", "0.306243", ",", "0.647887"}], "}"}], ",", " ", / p8 B5 B0 {, T5 N0 ~: U0 l. Q
        RowBox[{"{", / f, R; u7 a$ K' z3 V" P
         RowBox[{
    6 p  E+ V7 ~: @8 W2 V5 N, R     "0.347826", ",", "0.359693", ",", "0.614393", ",", "0.081521", ",",
      V9 G- t; W; ?4 c6 I' i: n      "0.258741", ",", "0.367747", ",", "0.410569", ",", "0.499496", ",",
    - o! f4 u$ L2 J# T8 |, T6 N/ L- \      "0.000000", ",", "0.186985", ",", "0.563380"}], "}"}], ",", " ", - h  w; s" i( T4 {( f! E& }
        RowBox[{"{",
    1 a3 Z$ |6 o& r$ T1 O& ^' m3 L     RowBox[{" A( T6 y( ]' j+ B& ^
         "0.565217", ",", "0.705518", ",", "0.510223", ",", "0.066892", ",", $ _* g5 l$ ?& T- c
          "0.244755", ",", "0.748304", ",", "0.000000", ",", "0.000000", ",",
      c9 j  v# J" m+ k( J- w- g% S) E      "0.243032", ",", "0.175501", ",", "0.295775"}], "}"}], ",", " ", 8 R% D$ G1 d5 j' `* v1 W6 e
        RowBox[{"{", " A6 x! I) _/ h; P$ q# A' E/ J
         RowBox[{7 W! F2 p" g9 c- e: J* t
         "0.565217", ",", "0.710460", ",", "0.649730", ",", "0.119897", ",",   X9 {2 ~5 ^3 v2 F( C' p
          "0.468531", ",", "0.000000", ",", "0.636585", ",", "0.000000", ",",
    , l5 i0 h  I) J      "0.766748", ",", "0.147821", ",", "0.338028"}], "}"}], ",", " ", 6 f1 a+ c2 s( b8 M4 s" X( e
        RowBox[{"{",
    # s0 m4 t2 d( x, U' m1 w' d     RowBox[{
    ( F* S2 g& \/ {8 j0 @2 {6 |     "0.565217", ",", "0.697772", ",", "0.171587", ",", "0.028566", ",", 4 S7 Q: c$ r; c5 m: v- l
          "0.363636", ",", "0.449887", ",", "0.408130", ",", "0.000000", ",", 0 ^/ z+ M0 s( o" u0 n/ e
          "0.000000", ",", "0.352768", ",", "0.211268"}], "}"}], ",", " ",
    " ]- ~' S+ u2 h5 y, h    RowBox[{"{", 1 D/ d1 A3 r, j+ L, [
         RowBox[{" W( a4 n! i* Y; c* y
         "0.282609", ",", "0.660888", ",", "0.460064", ",", "0.110334", ",", $ ]" U4 m* R! e7 Q
          "0.475524", ",", "0.000000", ",", "0.545528", ",", "0.000000", ",", ! T# P0 k6 Z: M! a
          "0.551100", ",", "0.238810", ",", "0.690141"}], "}"}], ",", " ",
    ! F' U/ P1 W$ ^7 T, n    RowBox[{"{", 4 P% q  Q! ?% T
         RowBox[{
    % N% c. b5 y) h; m! o3 a+ o     "0.130435", ",", "0.682724", ",", "0.258697", ",", "0.019299", ",",
    ( {* w# a  a- |      "0.510490", ",", "0.420497", ",", "0.535772", ",", "0.000000", ",",
    : N: T( V& {! E  L# B4 {0 L# x+ L      "0.494866", ",", "0.095701", ",", "0.436620"}], "}"}], ",", " ",
    2 g! N5 M/ @* r  Z7 Y, `7 A    RowBox[{"{", $ Z5 P% n$ F% B  |4 e+ T
         RowBox[{+ R  C- P; Q! Z4 ]6 S0 F9 P
         "0.347826", ",", "0.697772", ",", "0.108288", ",", "0.022413", ",", ! M7 z4 y2 X( e; Y# G1 ?9 q( c
          "0.356643", ",", "0.247928", ",", "0.908130", ",", "0.000000", ",",
    & T' M% p' ^! b) G      "0.383374", ",", "0.162839", ",", "0.000000"}], "}"}], ",", " ", ) {& J5 H) ~2 c3 ^& v
        RowBox[{"{",
    1 g( W8 I6 M; |  S% c* O7 A0 z5 F     RowBox[{
    ) v% C+ g. |* {  J  w# N6 c/ Z% l3 e     "0.695652", ",", "0.718280", ",", "0.339730", ",", "0.110285", ",", 7 L  w5 s7 w- a
          "0.335664", ",", "0.000000", ",", "0.636585", ",", "0.780463", ",",
    . P6 D% y8 Z& H- b- p. D& A/ C' F      "0.000000", ",", "0.335395", ",", "0.267606"}], "}"}], ",", " ", 7 n- v5 |9 }- k
        RowBox[{"{",
    8 s, ~& X5 F4 E     RowBox[{
    " l  y# L' ^& I: J2 R     "0.652174", ",", "0.569711", ",", "0.414297", ",", "0.175398", ",",
    " z$ T7 {: G. s8 G' @8 {% j      "0.167832", ",", "0.000000", ",", "0.544715", ",", "0.000000", ",", $ B" _: y4 d& }; ], X% H
          "0.000000", ",", "0.160483", ",", "0.211268"}], "}"}], ",", " ", ) q# A# W4 K0 j: @& a. a& ^9 }
        RowBox[{"{",
    ( C; w/ P  o7 `6 m2 {     RowBox[{
    ) L; h6 B7 y, @: `6 r/ ^2 X     "0.000000", ",", "0.395544", ",", "0.027011", ",", "0.048087", ",", " k4 c+ ?. q5 g. B2 L+ J
          "0.496503", ",", "0.000000", ",", "0.452033", ",", "0.000000", ",", : p8 b$ S3 Y1 \! T- R
          "0.278729", ",", "0.398115", ",", "0.408451"}], "}"}], ",", " ",
    0 T1 `4 r+ n  ]/ w4 x: X9 O$ [    RowBox[{"{", + d5 J+ u1 p8 C. J
         RowBox[{
    9 {  w# R1 s! L! f' n8 \$ n, j& C8 }' h     "0.608696", ",", "0.425199", ",", "0.012979", ",", "0.000000", ",", ! o9 z' q# F) o
          "0.482517", ",", "0.509420", ",", "0.406504", ",", "0.000000", ",",
    7 k& k1 j8 ~- p4 P! `      "0.000000", ",", "0.157833", ",", "0.478873"}], "}"}], ",", " ",
    & r0 L# Q" K: w8 M) g    RowBox[{"{",   h8 S& ?4 G9 S4 |* y( W
         RowBox[{
    : ]. m0 r& e" G" s1 K+ `1 E5 u     "0.608696", ",", "0.577973", ",", "0.213587", ",", "0.030889", ",", % t7 b; z& K, P5 w. O
          "0.370629", ",", "0.000000", ",", "0.452846", ",", "0.000000", ",", + ^1 Q- W! ]( w! @3 Y8 ^
          "0.000000", ",", "0.315665", ",", "0.380282"}], "}"}], ",", " ", ( o) ?6 t- ?, j: x7 |% l% n$ O
        RowBox[{"{",
    : b7 q# @$ E/ r% V8 L9 [/ G$ H$ b3 c     RowBox[{
    ' Q- @4 z" K% _) U, ]1 M' N, d6 G     "0.565217", ",", "0.572293", ",", "0.655012", ",", "0.281852", ",",
    0 ]8 A; D, B6 U( a      "0.000000", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 8 @+ f# n' b! B+ v( F5 g' J
          "0.000000", ",", "0.492344", ",", "0.211268"}], "}"}], ",", " ", 4 K7 G! ?4 w. A9 G( b8 V. {
        RowBox[{"{", # T) C, A' I+ K' _
         RowBox[{" M  Y1 q$ D: g5 K, a" `
         "0.130435", ",", "0.562039", ",", "0.331662", ",", "0.032643", ",", 7 N! x6 X, s5 p, g7 a9 \& u
          "0.314685", ",", "0.414469", ",", "0.275610", ",", "0.000000", ",", , l: ~0 T* K6 o* z9 f; w
          "0.000000", ",", "0.638398", ",", "0.436620"}], "}"}], ",", " ",
    , _$ a3 n% x. w' X8 @& j    RowBox[{"{", / B# A; B& v- s. `
         RowBox[{: \4 ?# v6 W" O$ U1 S7 {
         "0.717391", ",", "0.736205", ",", "0.267704", ",", "0.036152", ",",
    3 F* E; l1 z) Y      "0.307692", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", ) e7 y3 y/ N* `& `- S
          "0.000000", ",", "0.392521", ",", "0.478873"}], "}"}], ",", " ", , F6 i$ F# D# f; S6 y# B& U
        RowBox[{"{",
    5 R. o* Q, U* D; A1 K/ Y     RowBox[{! Y! h1 [3 F- t9 Y/ D
         "0.608696", ",", "0.769475", ",", "0.289283", ",", "0.022882", ",", ( ^4 \3 P* V# f5 x" J
          "0.321678", ",", "0.000000", ",", "0.274797", ",", "0.333333", ",", ! O5 B8 ]5 V. S) D
          "0.000000", ",", "0.362191", ",", "0.295775"}], "}"}], ",", " ", # I* W6 n" p/ U8 R) w- K
        RowBox[{"{", $ [" c& V, f# I0 R  |" E; x1 P% a
         RowBox[{
    ! c  ~4 s3 y" M' Q     "0.913043", ",", "0.170478", ",", "0.000000", ",", "0.012973", ",",
    9 t9 N: F1 U5 t1 @4 p- J      "0.293706", ",", "0.000000", ",", "0.000000", ",", "0.672709", ",",
    5 l& K; L" P9 c      "0.000000", ",", "0.114252", ",", "0.028169"}], "}"}], ",", " ", : d: C5 T: C3 p# }6 s
        RowBox[{"{", 7 i* M8 a& @7 U9 B. A/ B- R
         RowBox[{' n! k: ]6 k' f5 c, B' Y# E( p, d
         "0.739130", ",", "0.193199", ",", "0.160584", ",", "0.037907", ",", ; a; N. c6 }) k
          "0.461538", ",", "0.000000", ",", "0.684553", ",", "0.000000", ",",
    . P) j2 q; j& ^0 [      "0.000000", ",", "0.401355", ",", "0.436620"}], "}"}], ",", " ",
    ' o( i# f# g+ z, ?5 U    RowBox[{"{",
    4 S1 c* o; `6 U4 \- T0 v     RowBox[{
    : e1 O; B3 J3 q+ G7 G* I5 n     "0.826087", ",", "0.203969", ",", "0.234619", ",", "0.272240", ",",
    # l( n/ n5 M; G( g# v( ^& J6 R      "0.265734", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", # O5 K* W8 ]7 g/ z2 M  Y/ H% U
          "0.000000", ",", "0.827444", ",", "0.394366"}], "}"}], ",", " ", 1 [7 K) @1 I0 Y! ]. M- G
        RowBox[{"{", & {! F$ p6 V: @2 p& F+ a1 M) i- R/ ]
         RowBox[{
      i: p+ o8 G  c2 l# Q2 B7 \     "1.000000", ",", "0.199248", ",", "0.295044", ",", "0.041613", ",", $ W! U; g0 c8 x, f
          "0.209790", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    0 [8 r" Z( e2 F7 X4 m      "0.000000", ",", "0.676973", ",", "0.295775"}], "}"}], ",", " ",
    8 M* \# d7 H- P  Z4 M" Q7 E    RowBox[{"{",
    * U7 d5 o3 a, ~! k0 e( `     RowBox[{
    : S$ T( g$ o4 A: q+ R# Q     "0.869565", ",", "0.180363", ",", "0.243056", ",", "0.098349", ",",
    8 i# T+ x5 k+ n9 q      "0.265734", ",", "0.503391", ",", "0.000000", ",", "0.000000", ",", + K: X7 j( c% k
          "0.000000", ",", "0.331272", ",", "0.830986"}], "}"}], ",", " ", ! }6 B2 `' C1 ?
        RowBox[{"{",
    ) H) m, q) d3 Q$ L/ t* @. \$ C     RowBox[{% Q! [: r3 L! e+ e% J& J: E  Z+ A2 d
         "0.695652", ",", "0.551785", ",", "0.326201", ",", "0.253608", ",",
    , X" f6 n, w5 a. ]. G+ Y4 J      "0.195804", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 1 I3 l7 d' d; P
          "0.000000", ",", "0.845701", ",", "0.169014"}], "}"}], ",", " ",
    0 W" {+ |0 k' _) j' q, N7 v! V    RowBox[{"{",
    " m( Z$ A" z+ X     RowBox[{
    & t3 A( E9 C  [9 z& N     "0.652174", ",", "0.572293", ",", "0.111511", ",", "0.035584", ",", , Z; h/ o8 o$ L0 D7 e5 Q
          "0.405594", ",", "0.249435", ",", "0.544715", ",", "0.000000", ",", 7 _  [# P+ B+ P( H% a# V! U* O
          "0.000000", ",", "0.287102", ",", "0.366197"}], "}"}], ",", " ", 3 J# I  Z& N+ d
        RowBox[{"{", ! Q7 {& s3 ~1 o6 y
         RowBox[{' M2 u4 o- _, m2 d* F
         "0.652174", ",", "0.562039", ",", "0.336155", ",", "0.014604", ",",
    6 F/ z) [+ m8 L% P% m5 c' W      "0.174825", ",", "0.244160", ",", "0.000000", ",", "0.000000", ",", . L5 I0 d# }- K
          "0.000000", ",", "0.000000", ",", "0.309859"}], "}"}], ",", " ",
    2 C, |. O" Q2 H( i6 r    RowBox[{"{", ; w6 n5 g8 Z! E: _9 ?
         RowBox[{
    $ J2 @+ p. R+ u( S) V) A     "0.565217", ",", "0.577383", ",", "0.155870", ",", "0.030963", ",", " E' s2 h2 v# m' }$ d0 e
          "0.258741", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 4 _9 A1 a& h; o+ v
          "0.000000", ",", "0.050059", ",", "0.352113"}], "}"}], ",", " ", - r; o$ C4 [: G" o) [; l+ O8 S
        RowBox[{"{", 7 n1 T4 G5 F" ^4 W/ d8 q8 @0 U
         RowBox[{
    0 [" `( L/ l: d     "0.565217", ",", "0.613234", ",", "0.232956", ",", "0.053870", ",", + i& M* w; @" o0 `' e2 p5 X
          "0.230769", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    $ |0 Z7 P$ ?3 P      "0.000000", ",", "0.254122", ",", "0.309859"}], "}"}], ",", " ",
    % q* o8 `" ], I- w+ C4 n    RowBox[{"{", ' R1 T) Q2 `. p2 ^
         RowBox[{! ]+ @; T/ Q! q- f
         "0.565217", ",", "0.559531", ",", "0.493262", ",", "0.046209", ",",
    4 x# w( h( _/ O) y$ _3 u( A9 J      "0.293706", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    ( O: |1 E$ Q) X) E5 s      "0.000000", ",", "0.086867", ",", "0.774648"}], "}"}], ",", " ",
    0 F; {- g, Z9 {- t7 j    RowBox[{"{",
    3 L2 Z) I0 C2 z$ N' }& |: V& T     RowBox[{
    % _& u. F9 O6 `. n4 M     "0.608696", ",", "0.569711", ",", "0.111932", ",", "0.013542", ",", 7 B7 \: Y4 `* b
          "0.335664", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",   K. Q- I/ t" r4 C0 D5 e7 d
          "0.168704", ",", "0.659894", ",", "0.422535"}], "}"}], ",", " ", # j( w3 C9 u  i! g) Y
        RowBox[{"{",
    ; w0 X3 X$ T1 e7 y- ]2 U- ~3 J0 S     RowBox[{5 t& I' a5 O4 Z2 S1 }2 Q
         "0.608696", ",", "0.564547", ",", "0.329844", ",", "0.202036", ",", . ]3 a$ |  j6 C
          "0.510490", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", & K$ c$ n) B' p7 S  y1 S) e% Q
          "0.000000", ",", "0.317138", ",", "0.887324"}], "}"}], ",", " ", * q1 P3 o! c' L8 \2 t0 ~
        RowBox[{"{", 1 ^) V! D" j6 X2 {# m# W
         RowBox[{# N% G; ?* v3 b5 r! T
         "0.521739", ",", "0.546695", ",", "0.165788", ",", "0.029431", ",",
      t+ C& J% x% {. c* B      "0.510490", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    8 y* p, [* H4 u& r- V( m      "0.000000", ",", "0.605124", ",", "0.887324"}], "}"}], ",", " ",
    9 k' V' b, l: A. r2 A- j  m) d    RowBox[{"{",
    8 Z$ _. u- x6 ]. I     RowBox[{
    - d* N# `6 m$ D     "0.521739", ",", "0.564178", ",", "0.400518", ",", "0.045023", ",",
    7 ?) Y' K! `$ p5 l& n      "0.615385", ",", "0.368500", ",", "0.660163", ",", "0.301108", ",",
    $ n3 [* x4 J$ u0 r* v      "0.000000", ",", "0.321260", ",", "0.859155"}], "}"}], ",", " ", % `# v. c, S% Q" f7 ^& ~
        RowBox[{"{", 6 H; w8 c/ _0 z% M  \: J
         RowBox[{& r" g) f& o( X' x
         "0.413043", ",", "0.551859", ",", "0.544826", ",", "0.230503", ",",
    7 B; ~5 T# y0 M. M% U      "0.244755", ",", "0.530520", ",", "0.819512", ",", "0.000000", ",", ! K3 E  ^1 f9 M5 w5 F$ ?
          "0.000000", ",", "0.595406", ",", "0.239437"}], "}"}], ",", " ",
      k, ]1 |: E3 g2 E    RowBox[{"{", : @! u1 v8 {( u! l3 j; ~
         RowBox[{, q$ x, O1 X- f) s) x
         "0.652174", ",", "0.549277", ",", "0.257578", ",", "0.058688", ",",
    & B$ y1 }/ w# X  r' c( I9 M      "0.356643", ",", "0.000000", ",", "0.817886", ",", "0.000000", ",",
    + ~( W8 G; e. n" ]+ v; x, E0 @      "0.000000", ",", "0.555359", ",", "0.295775"}], "}"}], ",", " ", 6 J- T- f0 N" _( V' N
        RowBox[{"{", 4 p5 K- L( L' e3 F$ x
         RowBox[{6 P) N8 l$ ^: \) B. ?8 `
         "0.695652", ",", "0.549277", ",", "0.572308", ",", "0.082411", ",", % H; B% _) v9 ~$ n$ A/ `
          "0.461538", ",", "0.528259", ",", "0.819512", ",", "0.000000", ",",
    2 u% Y: W2 F% {) x( B# h, b5 y# I      "0.000000", ",", "0.333333", ",", "0.746479"}], "}"}], ",", " ", , M9 Y1 `( j1 w2 D8 K; N5 w4 x' z/ ]/ [
        RowBox[{"{", 1 }0 Z" w0 A0 q, g
         RowBox[{
    ) D/ @) P5 l. v6 V9 ?# [% I9 C, _     "0.434783", ",", "0.551785", ",", "0.530346", ",", "0.151651", ",",
    0 y7 {9 B# s6 e- g/ h% k      "0.790210", ",", "0.529013", ",", "0.409756", ",", "0.000000", ",",
    # ?# j1 _6 e* t4 }( J      "1.000000", ",", "0.149588", ",", "1.000000"}], "}"}], ",", " ", 4 x( G, y9 T" J5 _& I9 ]1 a
        RowBox[{"{",
    ) }7 ^% u7 Z2 Z+ _9 ?     RowBox[{( L* y% }5 w/ w9 `. W3 Z
         "0.282609", ",", "0.531278", ",", "0.321428", ",", "0.228625", ",", 8 b) c3 W% @) Q2 D* G1 V
          "0.594406", ",", "0.530520", ",", "0.410569", ",", "0.000000", ",",
    9 X& \7 v* F5 Q! @/ ?3 V( I  b      "0.757457", ",", "0.493522", ",", "0.549296"}], "}"}], ",", " ",
    ; y" F; R7 e( i  R/ }; c8 X: s    RowBox[{"{", 2 g* {* R# z" I3 u- i( n  D
         RowBox[{
    * q: o: t" Y3 B9 y     "0.347826", ",", "0.705444", ",", "0.109343", ",", "0.072008", ",",
    8 i% A0 u3 m. `) t      "0.496503", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 9 D6 s- W$ w7 D( ?* l3 q
          "0.752567", ",", "0.224676", ",", "0.366197"}], "}"}], ",", " ", + N9 A) A) s  `
        RowBox[{"{", + b8 r6 F: U# r- `3 {, @9 K. r
         RowBox[{
    7 w& |% r4 c3 o     "0.391304", ",", "0.705444", ",", "0.045908", ",", "0.073120", ",", 2 V! K$ ]6 f' r7 v
          "0.622378", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", . K2 d1 L- W$ z6 m
          "0.496333", ",", "0.410188", ",", "0.549296"}], "}"}], ",", " ", ! P! r+ M4 y& v3 @& a. L& A  i
        RowBox[{"{", + m6 j/ a" Q7 m6 h! n& b/ Z& _: D
         RowBox[{5 ]6 w8 Y+ _! z( T" C. o9 C
         "0.282609", ",", "0.661921", ",", "0.344992", ",", "0.085178", ",",
    & H3 n; p0 ~' C) Q8 Z      "0.293706", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    6 V: g  |. E; R! ?- X3 \      "0.000000", ",", "0.668139", ",", "0.577465"}], "}"}], ",", " ",
    4 X- C9 _. o4 R& T8 k5 w! j& Q: E" E    RowBox[{"{",
    * u, R: ?! r2 X$ w; G8 R1 U: B& w     RowBox[{
    2 s& ?. W' L; q, o& B! ]! }& I     "0.478261", ",", "0.661921", ",", "0.644209", ",", "0.077296", ",", 5 ]  r( v: S3 S5 ~. ^& r* T. F$ a; i
          "0.412587", ",", "0.000000", ",", "0.413008", ",", "0.502518", ",",
    4 \' [, U1 F  G7 j8 N      "0.000000", ",", "0.102179", ",", "0.690141"}], "}"}], ",", " ",
    + ~, s$ T4 l; _    RowBox[{"{",
    : E) v4 W4 c8 A. U" ~7 o     RowBox[{
    ; ], ?) h( E+ F7 X. z! i     "0.173913", ",", "0.984656", ",", "0.420753", ",", "0.137022", ",",
    ! y" s  u) f! @' \4 W      "0.321678", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    # `3 W: x1 ^* M9 d7 }$ X      "0.000000", ",", "0.380742", ",", "0.718310"}], "}"}], ",", " ", ' R( V/ o( f/ l
        RowBox[{"{", + [1 i1 z. r$ j$ [- f6 c" `/ L
         RowBox[{
    5 W% b$ q4 x0 _: B, K8 e     "0.500000", ",", "0.984656", ",", "0.288432", ",", "0.047692", ",", 4 w8 ]* f% v: Z) c" T/ a0 z
          "0.279720", ",", "0.000000", ",", "0.821138", ",", "0.510574", ",", & E( Q0 ?6 ]. j: h
          "0.000000", ",", "0.319494", ",", "0.521127"}], "}"}], ",", " ", % C; i5 s& _! a) }$ L8 v
        RowBox[{"{", 0 f5 B! l4 E1 _. S. N" K+ a( X6 H0 A
         RowBox[{) \, o" d! A$ @7 p7 O/ c! b
         "0.391304", ",", "1.000000", ",", "0.452931", ",", "0.150909", ",",
    * @- S# z4 ^; l. t! k      "0.342657", ",", "0.370761", ",", "0.000000", ",", "0.509567", ",", & }3 m! d1 N1 B# X
          "0.000000", ",", "0.031508", ",", "0.929577"}], "}"}], ",", " ", 8 O8 M! O. F7 _: R) s! }8 w
        RowBox[{"{",
    % U9 ^3 o4 t. S) N     RowBox[{
    % E; l4 P: Z9 d) @4 ]     "0.739130", ",", "0.774639", ",", "0.175120", ",", "0.036498", ",",
    3 |. G* {  A, `3 W' E+ Q" C; T) c      "0.391608", ",", "0.739261", ",", "0.408943", ",", "0.553877", ",", ; k; G% @# D# p) Q2 d* {5 y
          "0.000000", ",", "0.292108", ",", "0.521127"}], "}"}], ",", " ",
    2 `" e. F+ S" R5 E8 D    RowBox[{"{", 7 H  R2 |  V& s
         RowBox[{
    " v+ n2 D* I6 ]" b8 {     "0.586957", ",", "0.982074", ",", "0.158462", ",", "0.063902", ",",
    4 U& M( D& I: u# V' r      "0.321678", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", # e# C- f+ N! q# f
          "0.000000", ",", "0.329505", ",", "0.338028"}], "}"}], ",", " ",
    * z+ Y$ M: j1 m( i3 N5 O" s5 s    RowBox[{"{", % Y' N/ _8 g0 d( I  r2 S8 @
         RowBox[{
    ; {; w3 R' B6 u/ s     "0.543478", ",", "0.982074", ",", "0.306872", ",", "0.041934", ",", 5 e9 b2 Z5 d9 a. |% n# s
          "0.426573", ",", "0.380558", ",", "0.414634", ",", "0.506546", ",", 2 e) J. l: t2 t$ y
          "0.000000", ",", "0.337456", ",", "0.380282"}], "}"}], ",", " ",
    $ X9 e4 s1 H6 v    RowBox[{"{", " ?% F9 b5 x9 @) f# Q) o. d1 ]
         RowBox[{
    $ m8 ^0 s# z( O" X. M     "0.739130", ",", "0.997418", ",", "0.170143", ",", "0.058268", ",",
    9 f" ?: K1 q$ I* U2 J) c; n3 \* m9 P      "0.538462", ",", "0.248681", ",", "0.000000", ",", "0.339376", ",",
    ! {4 |3 C) r6 l* ]8 L/ B  Y      "0.000000", ",", "0.766784", ",", "0.676056"}], "}"}], ",", " ", : O4 |/ v7 b/ n( V7 X
        RowBox[{"{",
    : T# z8 q8 R& r% C( l7 O" i     RowBox[{' h" N8 |4 D% Q# E9 E- X' j3 ?
         "0.695652", ",", "0.700428", ",", "0.139361", ",", "0.182169", ",",
    " O- r- ]3 b- i      "0.412587", ",", "0.243406", ",", "0.000000", ",", "0.000000", ",",
    - K5 ?6 H8 x0 c: A      "0.136919", ",", "0.676678", ",", "0.591549"}], "}"}], ",", " ",
    8 Z$ O4 Y$ [( j  X    RowBox[{"{", 5 ~0 |; B/ p' O* z+ N- T9 T
         RowBox[{' S9 H$ U: k, f3 u8 ~* w6 ?
         "0.782609", ",", "0.751623", ",", "0.177646", ",", "0.350845", ",", ! [6 W/ R& y3 o5 c
          "0.412587", ",", "0.502638", ",", "0.000000", ",", "0.000000", ",", # T) G8 ^0 P7 l' p$ R7 o. x( V4 T
          "0.178973", ",", "0.541519", ",", "0.464789"}], "}"}], ",", " ", 6 `! M- _9 o& D) E. H7 U
        RowBox[{"{", 9 t0 T" z) K2 e) C7 c" A
         RowBox[{
    . B7 `' g3 D7 A- ^% Y     "0.652174", ",", "0.751623", ",", "0.355593", ",", "0.039883", ",", ' D; D" q! \, j5 A* @# @
          "0.195804", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    / A" T* W0 |, Y      "0.000000", ",", "0.064488", ",", "0.295775"}], "}"}], ",", " ",
    : v% R" u' G6 L9 a$ q1 h    RowBox[{"{",
    . t* W: O/ y( s( t" ^2 T# }/ S     RowBox[{# k' V9 l& `; h4 r* k: L# _& v
         "0.521739", ",", "0.679847", ",", "0.152375", ",", "0.030048", ",", 3 J3 {: G$ h. |3 `
          "0.363636", ",", "0.000000", ",", "0.271545", ",", "0.000000", ",",
    % X1 k2 Q# C' S( D      "0.000000", ",", "0.463192", ",", "0.380282"}], "}"}], ",", " ", # |6 r# z8 E; q/ D( m# }
        RowBox[{"{", 1 z' @0 T4 K1 M( |1 e% h  ^
         RowBox[{
    3 _- K$ c: E& z" v9 }     "0.434783", ",", "0.728533", ",", "0.186830", ",", "0.129510", ",",
    1 G% t+ h% x7 V; T      "0.195804", ",", "0.000000", ",", "0.269919", ",", "0.000000", ",",
    4 r# P1 y. k4 W& O) N% [& ^" H      "0.326650", ",", "0.388398", ",", "0.211268"}], "}"}], ",", " ",
      D3 O. e- u4 S1 K( j7 O    RowBox[{"{", & f* F; n6 o+ p# _
         RowBox[{
    . c2 ?4 i+ l# l# C9 X; ~     "0.608696", ",", "0.606152", ",", "0.158058", ",", "0.090170", ",", ; O$ M' h0 f1 N" @
          "1.000000", ",", "0.166541", ",", "0.278049", ",", "0.000000", ",",
    : h6 _  Z! l& n: j5 i" Z; V      "0.236675", ",", "0.262367", ",", "0.253521"}], "}"}], ",", " ", / @, |' y3 I: }/ }
        RowBox[{"{",
    0 g6 i: {( K) t2 G3 Y& _5 F     RowBox[{
    ; d3 I7 Q/ m4 u2 u9 ], g8 R* l     "0.608696", ",", "0.633742", ",", "0.322697", ",", "0.068597", ",",
    % T) r9 l- J% z. y      "0.328671", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", - X3 z- C+ J: r, H
          "0.287042", ",", "0.290931", ",", "0.281690"}], "}"}], ",", " ",
    5 u+ `5 I; A" |% e: d' p    RowBox[{"{",
    . @- z& k7 w, L+ g$ r     RowBox[{
    + q! X( d( G: Q- U0 i$ x9 X     "0.478261", ",", "0.539023", ",", "0.412108", ",", "0.107566", ",", 1 T6 W. U0 c' o" S; h6 ^4 L
          "0.237762", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", , ~& K0 Y. c- I5 t8 I% j  v1 N) t# y2 v
          "0.000000", ",", "0.380742", ",", "0.507042"}], "}"}], ",", " ",
    ) d" H2 g. p6 S+ D    RowBox[{"{",   S9 P3 N6 `5 H9 l7 X% t. }
         RowBox[{
    9 P' G' C" U: q8 }* U. _     "0.608696", ",", "0.551859", ",", "0.176821", ",", "0.076332", ",", ! y# z  E9 V- u8 G
          "0.265734", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 9 @, p. }- H% u! ~4 l4 F
          "0.000000", ",", "0.429034", ",", "0.239437"}], "}"}], ",", " ",
    ; @- h0 z% r0 W5 M' v    RowBox[{"{", 3 G+ V8 F( V" J2 q$ a; G
         RowBox[{4 z( q" t" W3 I' u2 e) `
         "0.652174", ",", "0.551859", ",", "0.033549", ",", "0.018459", ",",
    & C- x% }( N! k- P" g* i      "0.573427", ",", "0.000000", ",", "0.553659", ",", "0.000000", ",", ) Q- ?' j- b7 z" _. x- j; z5 i5 ]
          "0.404890", ",", "0.193168", ",", "0.394366"}], "}"}], ",", " ", 1 g/ T. ^# _( v# w/ D
        RowBox[{"{", - v$ n' C- a9 f( ~
         RowBox[{
    ! w8 G% ]6 e% v8 E( o; }     "0.695652", ",", "0.595382", ",", "0.277493", ",", "0.100326", ",", $ ^' b9 m9 Y  p! v7 S8 F* o6 `
          "0.286713", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    * O8 X  T, w, V9 w* ^: V      "0.000000", ",", "0.448763", ",", "0.338028"}], "}"}], ",", " ",
    9 e9 `% S- d; c; k# p" |. }) ]    RowBox[{"{", : c: r& G/ X! t7 l5 p; j
         RowBox[{
    % Q) G$ U% r) ^     "0.565217", ",", "0.559531", ",", "0.422669", ",", "0.078111", ",", 3 V- W. `) q' a2 v0 j+ J
          "0.286713", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    2 H* e2 o- P. A+ w; a% ?! K; o8 H      "0.000000", ",", "0.442285", ",", "0.394366"}], "}"}], ",", " ",
    # i, l1 A' @2 M  y& R    RowBox[{"{",
    % m+ n' F3 S% z; S0 Z& \, J7 K) ?     RowBox[{9 P% U9 |' d1 }" f. l0 `
         "0.586957", ",", "0.398126", ",", "0.140619", ",", "0.069116", ",",
    ) {2 p% ?. K, H! u# f: u4 B, k      "0.461538", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    ' g6 V8 o2 G  G. T8 ]+ h$ l      "0.000000", ",", "0.575383", ",", "0.154930"}], "}"}], ",", " ",
    0 P8 X: T2 x1 s2 {5 N: B    RowBox[{"{", 3 z9 c- o: }& @! E3 s( q/ w
         RowBox[{/ F5 C$ n6 I) l& l0 ~2 z
         "0.695652", ",", "0.398126", ",", "0.019829", ",", "0.041366", ",",
    1 V) K4 f( w/ H      "0.552448", ",", "0.244160", ",", "0.000000", ",", "0.000000", ",",
    4 X7 Y* P1 l; i7 b( F      "0.000000", ",", "0.515607", ",", "0.591549"}], "}"}], ",", " ",
    # R* s3 ]3 G% _" l* u, Y    RowBox[{"{", 6 k3 o. \( F4 A" t! G" v# i
         RowBox[{
    9 F! x8 O  B7 Y* w7 c     "0.695652", ",", "0.700354", ",", "0.422467", ",", "0.068128", ",", ( y' `! J, g6 ]
          "0.209790", ",", "0.000000", ",", "0.000000", ",", "0.500504", ",",
    9 h, h4 x7 c9 t/ K2 W  W7 _      "0.000000", ",", "0.057715", ",", "0.408451"}], "}"}], ",", " ", 7 i; l% A5 x6 c6 G
        RowBox[{"{",
    ' O3 I: p' i( w$ N7 S( J     RowBox[{8 D+ l: ~8 d5 X
         "0.521739", ",", "0.193125", ",", "0.210582", ",", "0.110433", ",", $ S) v/ |6 P# u
          "0.447552", ",", "0.382065", ",", "0.413008", ",", "0.498489", ",", ) X% I$ X7 o" g* F( _2 D( b
          "0.000000", ",", "0.174617", ",", "0.295775"}], "}"}], ",", " ",
    3 a3 }9 @: J. ~, u    RowBox[{"{",
    & j' K" q' @( C, H1 l     RowBox[{' H, @! j( x0 A  {) d
         "0.347826", ",", "0.063588", ",", "0.830527", ",", "1.000000", ",",
    * ~- C; R8 [7 ?- X! r9 J4 d      "0.111888", ",", "0.000000", ",", "0.410569", ",", "0.000000", ",",
    3 [  H4 D3 g/ m, r+ E5 s      "0.000000", ",", "0.667550", ",", "0.661972"}], "}"}], ",", " ", 6 ~0 y8 }% D3 V  D
        RowBox[{"{",
    ! z! T+ I; u7 y  J8 o     RowBox[{
    6 c3 ~% v  T4 W     "0.521739", ",", "0.188109", ",", "1.000000", ",", "0.785485", ",",
    ( e# f) v/ s7 p: p) s      "0.342657", ",", "0.373775", ",", "0.406504", ",", "1.000000", ",",
    7 V/ D- A+ m6 F# O- k      "0.000000", ",", "0.371025", ",", "0.774648"}], "}"}], ",", " ", ) N# Y9 C- O% I  K8 Y
        RowBox[{"{", 3 t6 a8 Z4 B% |, R3 m
         RowBox[{
    ' M. n; t' J* ~, J9 X1 e9 Q9 e     "0.695652", ",", "0.188404", ",", "0.088836", ",", "0.059504", ",",
    # D) b0 X2 m3 T% Q      "0.706294", ",", "0.376790", ",", "0.000000", ",", "0.000000", ",",
    ( Y" c1 Q3 ?' E      "0.000000", ",", "0.570966", ",", "0.746479"}], "}"}], ",", " ",
    2 n4 \2 E! j5 |- Y/ ], W) s    RowBox[{"{",
    5 ?* T6 w, ~8 a% E     RowBox[{. ^9 r1 t; r& Z& ?
         "0.695652", ",", "0.057465", ",", "0.316316", ",", "0.151280", ",", ' I+ S! w1 S) P9 z! _) N, l* I
          "0.615385", ",", "0.371515", ",", "0.412195", ",", "0.500504", ",",
    7 P2 z3 ?/ b6 j7 Z2 [' [      "0.000000", ",", "0.468198", ",", "0.887324"}], "}"}], ",", " ", , I* i$ M8 r0 y1 e. ?
        RowBox[{"{", 4 a0 I6 K/ v, D% d; b  f6 R
         RowBox[{
    # f+ t: r. j& X! o. Z) _! X$ \5 u     "0.608696", ",", "0.011360", ",", "0.295586", ",", "0.113892", ",", / o7 F2 a) ~( c' r6 c4 b
          "0.580420", ",", "0.746044", ",", "0.405691", ",", "0.501511", ",",
    2 T$ e/ C7 w9 ]$ f! s* S      "0.000000", ",", "0.414016", ",", "0.845070"}], "}"}], ",", " ", ' U3 G5 V3 c! T2 L4 L9 O9 `5 \; N
        RowBox[{"{", / Q6 b* t0 W5 ]; m& u# P
         RowBox[{6 D# [' J) C2 u2 ]
         "0.608696", ",", "0.364783", ",", "0.130582", ",", "0.020214", ",", - j9 k! |  Z8 `0 a# \9 P
          "0.356643", ",", "0.379804", ",", "0.000000", ",", "0.000000", ",", % K/ e5 }. \3 _  a/ h# R
          "0.000000", ",", "0.186690", ",", "0.704225"}], "}"}], ",", " ",
    " N( [0 A/ r- v& j# V0 X/ W. q    RowBox[{"{",
    7 W4 n# j' q1 \0 H) Q8 L+ Y$ ?3 r  i     RowBox[{, |8 [) J  e  M9 O
         "0.608696", ",", "0.193199", ",", "0.112690", ",", "0.036152", ",",
    ' M, @& ^; ?& S8 d5 R8 R( }      "0.636364", ",", "0.382065", ",", "0.409756", ",", "0.495468", ",",
    8 O" M& |1 U1 ?; @7 `      "0.000000", ",", "0.442874", ",", "0.760563"}], "}"}], ",", " ", ( A9 w- {1 H  @. m" ~
        RowBox[{"{", 5 _" a3 I. g( L1 O
         RowBox[{
    * l" _# ^& {4 k( f0 Z% O0 [/ I     "0.739130", ",", "0.328932", ",", "0.246779", ",", "0.126520", ",", 3 n$ A4 {3 M3 x" f/ g
          "0.454545", ",", "0.000000", ",", "0.495122", ",", "0.000000", ",",
    * `" {* @" f& y! s% {      "0.414181", ",", "0.686690", ",", "0.436620"}], "}"}], ",", " ", * B3 ~; D* Q) n" b
        RowBox[{"{",
    6 @* Z: W4 u5 y) ]# B: v/ \7 R     RowBox[{
    5 o/ C  T+ e, l7 m) v; g; y     "0.739130", ",", "0.341767", ",", "0.362090", ",", "0.183528", ",",
    / T+ m8 ]; f% H  M" h      "0.573427", ",", "0.413715", ",", "0.454472", ",", "0.661631", ",", ( ~9 `& o/ T2 o9 I, S
          "0.000000", ",", "0.244111", ",", "0.633803"}], "}"}], ",", " ",
    % p) {- b: E4 J0 s    RowBox[{"{",
    % J8 A3 |3 L; R: {     RowBox[{
    3 f0 b. X1 p- N. z     "0.695652", ",", "0.187076", ",", "0.279724", ",", "0.006252", ",",
    , ?4 r% @8 S# y( x4 `      "0.405594", ",", "0.418237", ",", "0.544715", ",", "0.000000", ",", ! r' S, c' U1 f# j; B
          "0.000000", ",", "1.000000", ",", "0.422535"}], "}"}], ",", " ",
      U1 v; W; [$ C' E4 f# m1 @6 R/ m/ I  J    RowBox[{"{",
    3 J( D- a( v$ q     RowBox[{
    / a- k- I8 ?9 A! _* a9 W) M     "1.000000", ",", "0.333948", ",", "0.064750", ",", "0.065855", ",",
    / E. M# T3 F0 J: d      "0.342657", ",", "0.000000", ",", "0.408130", ",", "0.000000", ",", - W6 Y5 s. e! a( l; J
          "0.000000", ",", "0.957892", ",", "0.295775"}], "}"}], ",", " ", # x2 c* Q4 O. b5 u* ^, Y
        RowBox[{"{", ' }# P4 g+ t# q# [) W# `0 C+ V
         RowBox[{
    / w8 v$ E' O$ ~4 X$ g% E     "0.739130", ",", "0.305400", ",", "0.374567", ",", "0.132870", ",",
    4 x8 b5 R& ~/ y      "0.258741", ",", "0.834966", ",", "0.000000", ",", "0.000000", ",", 4 b8 v+ M. i2 s7 {& |% n8 ]( p
          "0.272861", ",", "0.266784", ",", "0.309859"}], "}"}], ",", " ",
    " e8 k: g* q7 v* T/ R( a0 U    RowBox[{"{",
    + D- }" e* w6 B  ]     RowBox[{
    + w- j) z4 z& ^& l% I0 x  F  V     "0.826087", ",", "0.151962", ",", "0.360280", ",", "0.221632", ",", - v# ?% ]: O" X0 k; s! M/ f
          "0.447552", ",", "0.584778", ",", "0.457724", ",", "0.000000", ",",
    / X9 A& `8 ~. ?1 d+ X! C. y      "0.000000", ",", "0.826855", ",", "0.408451"}], "}"}], ",", " ", . K1 x- {5 J& y! d8 N: W6 T# U
        RowBox[{"{",
    & r4 p8 e4 c3 N2 c     RowBox[{
    5 m9 k% n9 c; s! ?     "0.565217", ",", "0.047212", ",", "0.233154", ",", "0.121528", ",",
    ; G" J9 |# n! {$ `9 M      "0.314685", ",", "0.417483", ",", "0.546341", ",", "0.000000", ",",
    5 `! E7 R: r$ B" \$ D      "0.669438", ",", "0.341873", ",", "0.197183"}], "}"}], ",", " ",
    " T+ p( `: t; S  V5 g4 X+ R# H; a& ]0 y    RowBox[{"{",
    / O3 p3 F. r! k+ d     RowBox[{* ?+ g, p& }6 H8 y# z& l0 ]/ S9 U
         "0.826087", ",", "0.034376", ",", "0.690349", ",", "0.512380", ",", % L$ U0 I( |2 _& F. L' L+ a# d' z' l
          "0.685315", ",", "1.000000", ",", "1.000000", ",", "0.000000", ",", ' I4 t1 L8 a- [5 i  I+ s' O# E
          "0.556479", ",", "0.412544", ",", "0.732394"}], "}"}], ",", " ",
    7 g8 O% a( [! y3 H$ n7 s! Y0 Z! R! D    RowBox[{"{",
    - s9 y, P8 }$ G3 D2 s8 M     RowBox[{9 e0 E4 g9 \, D3 C- W
         "0.652174", ",", "0.000000", ",", "0.374417", ",", "0.188075", ",",
    5 |7 T/ I3 t: s) d& m) h      "0.706294", ",", "0.498116", ",", "0.729268", ",", "0.000000", ",",
    - f( G4 F" B" K      "0.454279", ",", "0.322144", ",", "0.802817"}], "}"}], ",", " ", 5 r  ^9 u2 L) c5 \
        RowBox[{"{", 6 }/ c: D9 H  i& Z$ v
         RowBox[{1 Z- }1 _% V  b6 u6 l
         "0.782609", ",", "0.180363", ",", "0.237142", ",", "0.054809", ",",
    / }& d# [0 B7 K- c/ K      "0.629371", ",", "0.373775", ",", "0.247967", ",", "0.000000", ",",
    ' T9 |9 l: Q4 u5 v      "0.163814", ",", "0.370436", ",", "0.746479"}], "}"}], ",", " ",
    5 I: m' w- R( [: z( ^    RowBox[{"{",
    ' h; b/ B+ |* x  ]9 B/ u     RowBox[{
    - v* Q3 }/ `$ p& }9 H" `     "0.608696", ",", "0.169150", ",", "0.368148", ",", "0.393768", ",",
    2 @) w; q/ P4 r1 J6 y0 B      "0.440559", ",", "0.995479", ",", "0.545528", ",", "0.000000", ",",
    * H2 u' d6 r) k1 m      "0.565770", ",", "0.333039", ",", "0.380282"}], "}"}], ",", " ",
    1 k, a  ?# N9 D" Z7 {    RowBox[{"{", ; k; A+ K0 s3 L' z: K% N5 P
         RowBox[{: r( h% H6 P# K3 F
         "0.695652", ",", "0.390454", ",", "0.186683", ",", "0.039439", ",", # i% C+ J, @) _+ E2 }
          "0.482517", ",", "0.497362", ",", "0.415447", ",", "0.508560", ",",
    : Y) o$ }/ S* ^. C      "0.000000", ",", "0.390754", ",", "0.563380"}], "}"}], ",", " ",
    4 J/ F* C1 U# M. Q3 D# \    RowBox[{"{",
    * b7 i0 x' w5 |$ T: N     RowBox[{4 J* l9 |; a: H( P2 N! Y* k0 K
         "0.739130", ",", "0.428888", ",", "0.082728", ",", "0.070154", ",", - J2 P/ E% J' U5 j6 E
          "0.279720", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 8 i) q5 F" u: C) k' O  l( U
          "0.000000", ",", "0.694935", ",", "0.323944"}], "}"}]}],
    3 R( z# X7 @7 b) s5 y6 W   "}"}]}]], "Input",- A5 l3 C( c) m
    CellChangeTimes->{3.5779587825701036`*^9}],
    5 s' k1 W, K/ @5 \3 q* m
    3 p2 i: P" F% h: k; e$ Z) cCell[BoxData[
    & ]* l) u- g4 s8 k RowBox[{"{", * n6 R% m- L! b) n
      RowBox[{/ u" c1 G( q" z& ~
       RowBox[{"{",
    # `3 H2 d% f) @& i  }4 h: [    RowBox[{% I: X6 Y6 X+ A) M# D2 g
        "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",",
    / O2 r( g( G9 n( s     "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", * i5 |" A. }! ^7 f
         "0.`", ",", "0.277091`", ",", "0.873239`"}], "}"}], ",",
    - t6 @5 k& w; R& }: j6 n& `2 H  U   RowBox[{"{", 7 K5 [* ?5 ]4 |+ x
        RowBox[{
    0 o, \5 S" M  s- p8 y    "0.565217`", ",", "0.346857`", ",", "0.393585`", ",", "0.118785`", ",", * D' ^% J2 {. U. G) E
         "0.34965`", ",", "0.370761`", ",", "0.413008`", ",", "0.502518`", ",",
    : m# v- g% T: ^  l     "0.`", ",", "0.220259`", ",", "0.464789`"}], "}"}], ",", 4 G+ d$ S8 S/ E, c! }) q
       RowBox[{"{", + q& f) J# J1 }9 z4 T) t
        RowBox[{
    7 n- x) _# K, n9 t$ @    "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    3 e* G, D$ D6 Z# l     "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`",   ~6 r7 P; s. N
         ",", "0.899882`", ",", "0.492958`"}], "}"}], ",", & W  J& K' [8 N9 N# e% P
       RowBox[{"{",
    : Y4 b  I0 `5 g& I2 j+ a    RowBox[{
    ) r% w+ `" _# j) T0 A    "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",",
    ) F% q* n* a" m: X- s) N: p     "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`",
    + {4 b# L  [6 M$ ~/ @2 f     ",", "0.265607`", ",", "0.774648`"}], "}"}], ",", ; C, s$ r$ P/ f- e8 y
       RowBox[{"{", . b7 @: g9 U5 |
        RowBox[{. ?+ y( E- ?2 A; c/ n9 n  i
        "0.565217`", ",", "0.346931`", ",", "0.218229`", ",", "0.043639`", ",",
    / e" }: r& u  R9 j8 F2 G     "0.503497`", ",", "0.761115`", ",", "0.415447`", ",", "0.503525`", ",",
    ' x/ H9 Z) [# s5 _     "0.`", ",", "0.642226`", ",", "0.380282`"}], "}"}], ",",
    & a( A. T- r8 }8 s* _   RowBox[{"{", 3 V( W4 o6 _( M- _
        RowBox[{
    # A' A+ b" |8 Y2 k: I( G, b    "0.478261`", ",", "0.293154`", ",", "0.259368`", ",", "0.026688`", ",", 4 @0 p% U6 b% K8 w
         "0.587413`", ",", "0.75584`", ",", "0.409756`", ",", "0.498489`", ",", ( }6 P$ B% ~4 V& h" P
         "0.`", ",", "0.306243`", ",", "0.647887`"}], "}"}], ",", 6 i7 o# t  D, X- ]! \) j
       RowBox[{"{",
    1 O$ y! \: r4 z1 U; J$ @  @    RowBox[{
    0 X% C, [# K5 Y  ]! y    "0.347826`", ",", "0.359693`", ",", "0.614393`", ",", "0.081521`", ",", # \; S& Y4 {; R2 u1 m0 l* H% A/ f' F
         "0.258741`", ",", "0.367747`", ",", "0.410569`", ",", "0.499496`", ",", ( C3 F( ~! k! I1 \1 I
         "0.`", ",", "0.186985`", ",", "0.56338`"}], "}"}], ",",
    , Q( q1 ~5 @& L7 o3 |   RowBox[{"{", 1 V5 t- b% T" D1 `
        RowBox[{
    $ z6 ^, a+ F% v* y& ~4 X9 [    "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",", 1 J" b5 u  F; H) Q
         "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`",
    5 I3 {* O* Y  o2 H# V' h     ",", "0.175501`", ",", "0.295775`"}], "}"}], ",", : g2 F( P- a9 m* y& }* |# u) S
       RowBox[{"{", ) F9 k& ?/ a, T; a' l
        RowBox[{
    0 G3 S8 ]4 x' @4 {' J& p; U' b    "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",", " Z# G: d( l* z9 `7 _2 ?! e
         "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`", , a2 K& g  J2 F; g7 R; i5 r
         ",", "0.147821`", ",", "0.338028`"}], "}"}], ",",
    & G) {( I* D* E& R. {   RowBox[{"{", ! w+ }! c. V! V, @0 `* b
        RowBox[{
    7 K' ?0 A9 Y4 D( b5 d! i1 Q9 w    "0.565217`", ",", "0.697772`", ",", "0.171587`", ",", "0.028566`", ",", * q7 G7 W7 c" B+ a6 {, h
         "0.363636`", ",", "0.449887`", ",", "0.40813`", ",", "0.`", ",", "0.`", ' l' p: ^& N3 m, A: y
         ",", "0.352768`", ",", "0.211268`"}], "}"}], ",", : F! a7 C3 H) i1 Q( ?, f$ _
       RowBox[{"{", : }6 C" ?1 n% }# S0 H! S9 {
        RowBox[{6 K7 u9 v" C8 s: Y
        "0.282609`", ",", "0.660888`", ",", "0.460064`", ",", "0.110334`", ",", 1 H4 Z9 a5 d0 Q+ N  o
         "0.475524`", ",", "0.`", ",", "0.545528`", ",", "0.`", ",", "0.5511`", 1 N+ `: T* w6 D& `
         ",", "0.23881`", ",", "0.690141`"}], "}"}], ",", 7 u$ z0 c2 S, O% l5 ^4 E+ H/ _
       RowBox[{"{", * n. G% l) E4 d: E. J% f4 ^& p
        RowBox[{
    8 m9 X9 w' j0 v4 @    "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",",
    7 J& f( `! M. V( w5 S9 c: a     "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",", ' C- o2 r) f9 R' l/ x2 J6 I6 C. G
         "0.494866`", ",", "0.095701`", ",", "0.43662`"}], "}"}], ",",
    5 x' f" x/ t" `; f, N   RowBox[{"{",
    0 }) k  `7 o- P) O4 \4 L    RowBox[{
    0 u8 r& m+ `) \( g& s    "0.347826`", ",", "0.697772`", ",", "0.108288`", ",", "0.022413`", ",",
    4 u% m" O% k0 t1 H! ~     "0.356643`", ",", "0.247928`", ",", "0.90813`", ",", "0.`", ",",
    ; X4 Q# M- S! Z" z  A+ V     "0.383374`", ",", "0.162839`", ",", "0.`"}], "}"}], ",",
    ( F7 C% u6 j6 M2 d3 S   RowBox[{"{", ; ^5 s( A! U! O& ?
        RowBox[{
    6 Q& G) V9 V1 d) K6 e1 I0 A% C    "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",", ( v+ @2 }7 G( h/ k: t
         "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`",
    9 N) ?5 f; {7 s$ K5 [     ",", "0.335395`", ",", "0.267606`"}], "}"}], ",", % M/ B+ p( F4 ~8 I  [- j
       RowBox[{"{",
      u2 t- @; U4 Q- ?% Q1 N2 q    RowBox[{
    . `" Y( d) j6 [2 m5 K    "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",",
    ( u. |, X7 `% B1 s8 g8 ?. p     "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`", ",",
    ! H6 L. h& v+ P( {$ H     "0.160483`", ",", "0.211268`"}], "}"}], ",",
      v: e5 ?+ m8 p9 k! Z   RowBox[{"{", 5 ^" p2 T: @: w6 q, ]/ B* [! k5 \
        RowBox[{
    ; E( w/ f4 o, ?: d2 \* R    "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", - l5 B# t9 P# h2 s4 Z- Z! K  C
         "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`",
    . T4 ]! N, f9 x; y. u- S     ",", "0.398115`", ",", "0.408451`"}], "}"}], ",", ; b$ M( O' P+ B/ R5 u
       RowBox[{"{", 9 E* r4 B% P( w6 r& j! E5 L3 t  l
        RowBox[{9 p, E" g  v6 n) x
        "0.608696`", ",", "0.425199`", ",", "0.012979`", ",", "0.`", ",",
    + E3 F% }+ G' W: p     "0.482517`", ",", "0.50942`", ",", "0.406504`", ",", "0.`", ",", "0.`",
    # ?5 R$ [0 k6 B     ",", "0.157833`", ",", "0.478873`"}], "}"}], ",", - j3 `2 H& ?' d6 B3 e: J4 T
       RowBox[{"{", 3 u- \# l' i! @0 L& v
        RowBox[{
    * F8 k9 g' ]8 u2 M6 E7 x1 K    "0.608696`", ",", "0.577973`", ",", "0.213587`", ",", "0.030889`", ",", / B9 K- A' p8 M
         "0.370629`", ",", "0.`", ",", "0.452846`", ",", "0.`", ",", "0.`", ",", # }: S+ R0 J7 G
         "0.315665`", ",", "0.380282`"}], "}"}], ",", ( u, X: u7 Z! B
       RowBox[{"{",
    " Y5 D. M. Y. [+ `7 L) W    RowBox[{; a/ v0 C6 R9 w, [/ H+ D( i4 O9 |
        "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",", " ]/ r0 i! c- ^  f
         "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.492344`", # \  Y) u( c/ s! ]& [
         ",", "0.211268`"}], "}"}], ",",
    " ^. J7 ?$ B- r# F   RowBox[{"{", # t6 X  N1 i( ^! d2 `4 ~
        RowBox[{9 J- C1 D# t  p3 t6 \
        "0.130435`", ",", "0.562039`", ",", "0.331662`", ",", "0.032643`", ",",
    ! D0 Y' c2 P/ c0 [1 f# a& i; e     "0.314685`", ",", "0.414469`", ",", "0.27561`", ",", "0.`", ",", "0.`", % y3 B5 H) ~' ~# z5 Q
         ",", "0.638398`", ",", "0.43662`"}], "}"}], ",", 1 \2 ]; b6 E. K$ [; M
       RowBox[{"{",
    ' }0 n$ }1 D' _  X    RowBox[{
    3 J" |8 T7 y& I6 d+ d8 J    "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",",   a5 B7 j0 |$ z2 m% k2 m+ k% o
         "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", $ Z# q4 E$ l- M; ?; Q  l6 \" f
         "0.392521`", ",", "0.478873`"}], "}"}], ",", & ^7 t. j' |( b& Z! k* f
       RowBox[{"{", # W- m& H8 ^- C
        RowBox[{0 l7 m! X( v* r% x: `
        "0.608696`", ",", "0.769475`", ",", "0.289283`", ",", "0.022882`", ",", - d$ B0 }+ a: O/ L. @
         "0.321678`", ",", "0.`", ",", "0.274797`", ",", "0.333333`", ",", "0.`",
    6 l$ a# c+ j% Q0 H/ \% w+ O# {     ",", "0.362191`", ",", "0.295775`"}], "}"}], ",",
    ) U# Z$ B; \* x6 t/ n. Z/ h% R# x   RowBox[{"{", ! @. ?8 i  G& C" O; X# `8 l
        RowBox[{9 z, p" J9 a4 p! _- }
        "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",",
      y9 F  P. j3 M     "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`", ",",
    & \3 e' T$ R+ T- k  J7 s     "0.114252`", ",", "0.028169`"}], "}"}], ",",   N0 e+ b% H- W
       RowBox[{"{",
    - x5 v7 ]* i! X0 o/ @/ S    RowBox[{- k' r8 ~1 x3 u  X
        "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",", + {* N6 I/ h& M$ U( \/ R1 h* ]
         "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`", ",", 2 K) k6 T6 r3 A/ Z/ w9 @
         "0.401355`", ",", "0.43662`"}], "}"}], ",", : ^) r9 e1 R, K# V+ W; \! [
       RowBox[{"{", 0 C; W: n4 z; D! k+ H' {4 O" ?
        RowBox[{
    + w! ?8 w" v) \  @+ V. h    "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",",
    5 W! x# U+ E7 t) @! M7 O     "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    - Q8 N, Y4 R+ O: E& t     "0.827444`", ",", "0.394366`"}], "}"}], ",",
    5 g5 o5 S- C: a9 N2 M   RowBox[{"{", , C: u* }. t- c' l
        RowBox[{
    8 y3 n; L0 r, L, j- G8 F    "1.`", ",", "0.199248`", ",", "0.295044`", ",", "0.041613`", ",", & q% b) [  h# X% J
         "0.20979`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", $ j' R: O9 a/ o0 g' E* q4 H( s$ W
         "0.676973`", ",", "0.295775`"}], "}"}], ",", 0 f  [  l9 i" c+ L& z+ v2 M
       RowBox[{"{", " Y  v3 }, U6 @: b$ o
        RowBox[{
    3 t$ \- K4 B6 z# ?1 d0 j    "0.869565`", ",", "0.180363`", ",", "0.243056`", ",", "0.098349`", ",", " D% m1 a* A9 E5 ^8 [
         "0.265734`", ",", "0.503391`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    + ^3 |: E: s$ |6 l/ Q- j     "0.331272`", ",", "0.830986`"}], "}"}], ",", ) q0 P+ ^3 a% g2 e5 J- l
       RowBox[{"{", & N2 ?3 O: {2 A& ]& g2 @. `
        RowBox[{
    # E% c# e: k1 G  [1 T8 i7 _/ ~    "0.695652`", ",", "0.551785`", ",", "0.326201`", ",", "0.253608`", ",",
    : {. F& f# E! _, |     "0.195804`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    $ ]) e) b$ u. M3 h     "0.845701`", ",", "0.169014`"}], "}"}], ",",
    % s, K8 B7 A3 Z  U9 y$ P   RowBox[{"{",
    $ B$ j+ q2 N5 G; o! N4 a/ R    RowBox[{" R$ P+ d% z$ ^! Z
        "0.652174`", ",", "0.572293`", ",", "0.111511`", ",", "0.035584`", ",", 3 X- X/ Y) D7 z
         "0.405594`", ",", "0.249435`", ",", "0.544715`", ",", "0.`", ",", "0.`", ) I& S9 P5 Z+ L' W; j# ?
         ",", "0.287102`", ",", "0.366197`"}], "}"}], ",", ' g0 ], P) K# h
       RowBox[{"{", ' ~. _1 G2 u! @. J* A
        RowBox[{
    . P# ?5 f7 `1 B. I3 e    "0.652174`", ",", "0.562039`", ",", "0.336155`", ",", "0.014604`", ",", - D! u5 D# e0 `; ?, H8 P2 P
         "0.174825`", ",", "0.24416`", ",", "0.`", ",", "0.`", ",", "0.`", ",", # u# c7 r  f, S  i
         "0.`", ",", "0.309859`"}], "}"}], ",",
    9 O2 d/ j  m" X7 E( t4 ?   RowBox[{"{",
    : a2 j$ _1 ^' U    RowBox[{
    + \9 m/ W) y7 s: k$ ^    "0.565217`", ",", "0.577383`", ",", "0.15587`", ",", "0.030963`", ",", 6 _5 _0 }' W* ?5 g- Q
         "0.258741`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    3 ^/ C5 |0 g+ J3 ]* \( }# }$ b     "0.050059`", ",", "0.352113`"}], "}"}], ",",
    - r7 @3 A8 q2 u( v9 [, i   RowBox[{"{",
    ) ^) _( Z' I7 P( H  x* z7 s0 a8 [    RowBox[{6 i6 x0 n9 g* ]5 a
        "0.565217`", ",", "0.613234`", ",", "0.232956`", ",", "0.05387`", ",", $ Y0 V  q: i0 _7 {2 `# t
         "0.230769`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    0 P5 Q; ?6 a+ b; J     "0.254122`", ",", "0.309859`"}], "}"}], ",",
    ! }; p9 n4 v1 \   RowBox[{"{", : ~" z" |. z# V! i- l
        RowBox[{( s# v6 J8 A1 B+ u: _' T3 V
        "0.565217`", ",", "0.559531`", ",", "0.493262`", ",", "0.046209`", ",",
    9 w: M6 @8 \1 ~% |3 m2 j" L     "0.293706`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", ! Y' p2 k! c% X. K; m, |
         "0.086867`", ",", "0.774648`"}], "}"}], ",",
    0 a2 G( y% x3 D4 {" E% b   RowBox[{"{", . `  v; F* q* ?/ l$ c2 Q
        RowBox[{/ \! b6 W- A/ W- a
        "0.608696`", ",", "0.569711`", ",", "0.111932`", ",", "0.013542`", ",",
    % a$ K- `' v; P, T9 T( I     "0.335664`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.168704`", ",", 3 c% d- ~5 E; O2 z) d$ i. s; n
         "0.659894`", ",", "0.422535`"}], "}"}], ",",
    / H1 T% @7 b* h# `7 n9 Q   RowBox[{"{",
    + C0 i+ }+ ?- `, u* f. V9 ~    RowBox[{9 {/ a, T  H2 O* O- L" q0 |' ~
        "0.608696`", ",", "0.564547`", ",", "0.329844`", ",", "0.202036`", ",", 2 v4 {1 A, b* g& h3 e1 @+ P
         "0.51049`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    ( ^$ L: `" m9 @  |9 p; b     "0.317138`", ",", "0.887324`"}], "}"}], ",", 6 z6 ^+ `% d1 T4 P& D
       RowBox[{"{",
    " Y7 @7 s  \# d, t; v& z% ]# t    RowBox[{! P+ g# |) Z$ K' `5 h4 p0 A! i
        "0.521739`", ",", "0.546695`", ",", "0.165788`", ",", "0.029431`", ",",
    " h7 T6 f' f/ c, S" e     "0.51049`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", $ J3 R8 @! m. u8 Q) s. b8 r! @
         "0.605124`", ",", "0.887324`"}], "}"}], ",",
    , n+ W# o, K: q! G! J   RowBox[{"{",
      Q9 w% S. R1 [1 |% _* F% I    RowBox[{5 Y) J& I' y  f! K! E! b2 e7 k$ r
        "0.521739`", ",", "0.564178`", ",", "0.400518`", ",", "0.045023`", ",", 4 V$ {9 [- M: x# C. T! P
         "0.615385`", ",", "0.3685`", ",", "0.660163`", ",", "0.301108`", ",",
    ! O, |! a; v2 x7 J' f. ?     "0.`", ",", "0.32126`", ",", "0.859155`"}], "}"}], ",",
    - }* M8 J5 q' ]3 ?* o   RowBox[{"{",
    ! U7 Y  L* N' w) x7 b* o* i8 U    RowBox[{3 c& }  `: J9 d9 Z+ j% O
        "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
    ; t; `6 a4 `4 ?$ O  l     "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`", % l) e" K: S6 {
         ",", "0.595406`", ",", "0.239437`"}], "}"}], ",", 9 F/ z& g  g/ u/ a/ h, p
       RowBox[{"{", 8 c3 i1 X" u4 S1 Y
        RowBox[{6 u8 Z2 O( c2 K+ H7 w8 R
        "0.652174`", ",", "0.549277`", ",", "0.257578`", ",", "0.058688`", ",", 7 R! n# \# D& L) }: k
         "0.356643`", ",", "0.`", ",", "0.817886`", ",", "0.`", ",", "0.`", ",",
    0 S( v) t; I0 N) Y4 L* n, O7 r     "0.555359`", ",", "0.295775`"}], "}"}], ",",
    0 H- g+ z2 p2 }% z7 l: v; e. n8 k   RowBox[{"{", 8 L8 F% I# q7 d5 y2 c
        RowBox[{
    2 }! p; Z5 @9 S0 W& O+ q    "0.695652`", ",", "0.549277`", ",", "0.572308`", ",", "0.082411`", ",",
    - g, f3 S4 k9 i. n' [7 @$ ~     "0.461538`", ",", "0.528259`", ",", "0.819512`", ",", "0.`", ",", "0.`",
    * g# x% V0 ^+ d- p& t5 }     ",", "0.333333`", ",", "0.746479`"}], "}"}], ",",
      C7 W- _& x; u   RowBox[{"{",
    % J! f2 \: b% A* @; T    RowBox[{
    2 I$ c+ W+ o+ O9 m5 @) {( \    "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",", 3 \# E* @. Y, {9 O% i: S  t) l
         "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`",
    2 K, [8 n  i5 F- i     ",", "0.149588`", ",", "1.`"}], "}"}], ",", ; O: T( C# Q1 z: b
       RowBox[{"{", 6 j% z  F* I, J8 i# G
        RowBox[{' {; G0 e1 `& k6 {2 R
        "0.282609`", ",", "0.531278`", ",", "0.321428`", ",", "0.228625`", ",", $ m1 r+ }2 M! j9 @; \
         "0.594406`", ",", "0.53052`", ",", "0.410569`", ",", "0.`", ",", ; t, i* T# R! o4 M
         "0.757457`", ",", "0.493522`", ",", "0.549296`"}], "}"}], ",", : V* _! D$ T/ f' e
       RowBox[{"{", 7 k: L" p/ ?4 h" F6 }4 y, a5 E% y1 k
        RowBox[{: _. t! w& z0 ?% C) w4 H
        "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", 9 ]- q* F9 D- x7 [
         "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`", ",", % I" e" ~" E: B0 L  Z8 _5 b3 O/ c( ^
         "0.224676`", ",", "0.366197`"}], "}"}], ",", # G/ \, I2 P( e! R/ t' F9 u+ ^
       RowBox[{"{", % m/ J' ^9 Q5 }+ D8 @7 N
        RowBox[{& U( i' c' N$ G8 ^. I# x
        "0.391304`", ",", "0.705444`", ",", "0.045908`", ",", "0.07312`", ",", ' ^0 J/ l" l1 }# n$ g' S
         "0.622378`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.496333`", ",", 4 a+ e* t/ W, j% m1 ^( i/ ?1 y
         "0.410188`", ",", "0.549296`"}], "}"}], ",",
    * k/ r0 N4 C& w7 B   RowBox[{"{", ' q7 Z, t, `( }5 ]7 m
        RowBox[{: O2 m- i* ?) d8 S
        "0.282609`", ",", "0.661921`", ",", "0.344992`", ",", "0.085178`", ",", % }  N3 Q& q5 v2 L$ U
         "0.293706`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", ( H# I: }1 E8 j. b+ j/ J% P. v# m
         "0.668139`", ",", "0.577465`"}], "}"}], ",",
    3 p! e" I- P7 H4 G. {* G( E   RowBox[{"{", . N! a( w3 U' a( }1 d: {/ n
        RowBox[{; Y& F: j9 h8 n2 ~
        "0.478261`", ",", "0.661921`", ",", "0.644209`", ",", "0.077296`", ",", 6 y' U9 N* h$ _" J6 {
         "0.412587`", ",", "0.`", ",", "0.413008`", ",", "0.502518`", ",", "0.`",
    . m0 l% h, }9 u  \     ",", "0.102179`", ",", "0.690141`"}], "}"}], ",", . C$ a! t. Q+ q# \+ [0 P
       RowBox[{"{", : ~' r9 K3 j4 S. D3 L, H9 e( N
        RowBox[{
    7 s& {4 T, m. k8 U    "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",",
    8 z) K0 _/ j3 u- z7 S9 _     "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", / n2 H$ E9 z- X2 h" ~1 y
         "0.380742`", ",", "0.71831`"}], "}"}], ",",
      L4 _- \. N) M2 s   RowBox[{"{",
    ! [+ ~8 P8 x  r/ }" [    RowBox[{
    ) i% b9 C3 x! d) y    "0.5`", ",", "0.984656`", ",", "0.288432`", ",", "0.047692`", ",",
      ?3 j# p9 C  y     "0.27972`", ",", "0.`", ",", "0.821138`", ",", "0.510574`", ",", "0.`", ( B; s, I7 T. S3 H- X$ d0 [! k
         ",", "0.319494`", ",", "0.521127`"}], "}"}], ",", $ z3 p* N$ D8 G. l. V3 O- e& m4 x
       RowBox[{"{", $ a4 [9 [7 m' U, x' ?, P
        RowBox[{5 V' i* H- p8 U- ~" ^( `
        "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",",
    % Z5 _# v' w4 e- _+ \: f     "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`", 1 U# i% I" p$ ~
         ",", "0.031508`", ",", "0.929577`"}], "}"}], ",", 1 }9 ^* L8 C! r
       RowBox[{"{",
    4 i2 I7 R3 w) `% q, X5 K    RowBox[{# u6 b! W/ N6 _8 S( l
        "0.73913`", ",", "0.774639`", ",", "0.17512`", ",", "0.036498`", ",",
    4 o6 _1 K" U: ?     "0.391608`", ",", "0.739261`", ",", "0.408943`", ",", "0.553877`", ",",
    & C! {$ {* }* |' F  C2 W7 Y! T1 J     "0.`", ",", "0.292108`", ",", "0.521127`"}], "}"}], ",", 3 k) w: p7 r. f. ^9 o
       RowBox[{"{",
    2 }6 X# u8 P2 s) B( Q$ R3 G' n    RowBox[{  E# I7 l4 ~* j0 a% C3 F* ?
        "0.586957`", ",", "0.982074`", ",", "0.158462`", ",", "0.063902`", ",",
    " B7 b0 W& Q/ ]" Z$ h% Z: C: p     "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", : e9 @  e- e  |- l$ R" @7 E
         "0.329505`", ",", "0.338028`"}], "}"}], ",",
    8 g; o5 F( f0 k" F+ k* x   RowBox[{"{", 2 H& ~: x! |' o0 i* }
        RowBox[{. B5 ~1 o+ T8 A- {8 I
        "0.543478`", ",", "0.982074`", ",", "0.306872`", ",", "0.041934`", ",", 8 e. a0 X" g  o2 J1 t+ B
         "0.426573`", ",", "0.380558`", ",", "0.414634`", ",", "0.506546`", ",",
    ( ^; k; `6 _% @2 v" A& m     "0.`", ",", "0.337456`", ",", "0.380282`"}], "}"}], ",", # K. D, h5 q( g& A) b# [  M
       RowBox[{"{", 3 |! U# D% C3 y5 L1 b% b
        RowBox[{0 ^  t/ `2 q! }% z  i
        "0.73913`", ",", "0.997418`", ",", "0.170143`", ",", "0.058268`", ",",
    . y; _4 J. W/ g4 F' F- ^     "0.538462`", ",", "0.248681`", ",", "0.`", ",", "0.339376`", ",", "0.`", & N2 y9 _, S& [( y" f" j) s7 V
         ",", "0.766784`", ",", "0.676056`"}], "}"}], ",",
    ) [6 i- t7 y$ Y5 S   RowBox[{"{",
    , x$ s" N! N+ N4 g  J8 P" }: [  e    RowBox[{
    6 s7 u, k; b. w: q    "0.695652`", ",", "0.700428`", ",", "0.139361`", ",", "0.182169`", ",", 6 O# |6 s7 u1 b7 d& T4 J
         "0.412587`", ",", "0.243406`", ",", "0.`", ",", "0.`", ",", "0.136919`",
    9 y  B! S/ B+ p  p3 N3 p* }3 Z  |     ",", "0.676678`", ",", "0.591549`"}], "}"}], ",", + X) `# C' V. h" M
       RowBox[{"{", 9 D5 _. @! A" A$ K0 |
        RowBox[{8 ]1 N+ f0 Z' G$ u
        "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",",
    ! z8 ?2 ^" U" B- v     "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`", & k+ v+ z  e& m6 E
         ",", "0.541519`", ",", "0.464789`"}], "}"}], ",", , @) K6 [4 \1 z2 h  z9 V
       RowBox[{"{", / _5 _6 U' J# `  ~
        RowBox[{/ X& e; G* c; @- ?% q% h
        "0.652174`", ",", "0.751623`", ",", "0.355593`", ",", "0.039883`", ",",
    # F( W) J" I5 V: N$ |4 y5 Z, J     "0.195804`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 8 i) a5 y9 b2 X: b7 y4 p
         "0.064488`", ",", "0.295775`"}], "}"}], ",",
    % ^2 k9 I! ^7 _+ N% k7 E   RowBox[{"{",
    3 c9 G& [' @* j2 P- s! B0 N    RowBox[{! P2 a& F! m( C
        "0.521739`", ",", "0.679847`", ",", "0.152375`", ",", "0.030048`", ",", 5 k9 ^! n' f5 c1 T" P4 r$ i6 b
         "0.363636`", ",", "0.`", ",", "0.271545`", ",", "0.`", ",", "0.`", ",", 0 }% n$ s) v) d% S9 |$ M
         "0.463192`", ",", "0.380282`"}], "}"}], ",", : r0 X- S' _; n) n5 S
       RowBox[{"{",
    # j( V4 b7 c$ Y$ n2 p8 t    RowBox[{
    3 H% c8 ~; X! Q9 G+ u) j4 ^    "0.434783`", ",", "0.728533`", ",", "0.18683`", ",", "0.12951`", ",", 0 o4 ^0 W% i# q/ T# q/ ?, ?- J; |
         "0.195804`", ",", "0.`", ",", "0.269919`", ",", "0.`", ",", "0.32665`",
    ' p" h( |' A' D0 b' \! Z     ",", "0.388398`", ",", "0.211268`"}], "}"}], ",", 8 I  ?2 {9 {. R$ w  J3 _0 v
       RowBox[{"{",
    ; v: ?% A8 h5 M9 |3 w! Y    RowBox[{2 @% A2 K/ T/ Z- p1 Y+ F, L) w; q
        "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",", " B% e7 x4 Z0 {# P1 N* c) \! ?
         "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`", , R* P5 }7 V" y' q+ I
         ",", "0.262367`", ",", "0.253521`"}], "}"}], ",",
    0 R; S/ g) D$ o4 q! G' b   RowBox[{"{", 2 {8 z. t# {; M# g9 V* k- v4 Y2 b
        RowBox[{
    0 [  r! N- o) A# u% y    "0.608696`", ",", "0.633742`", ",", "0.322697`", ",", "0.068597`", ",", , D9 y$ K: e, N- Q
         "0.328671`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.287042`", ",",
    ! j) |$ ?8 @! n) k     "0.290931`", ",", "0.28169`"}], "}"}], ",",
    9 K% h7 Y: l6 V   RowBox[{"{", ) `7 M3 {' `3 I2 z" {; d8 v6 [
        RowBox[{  c" p/ p3 x& u' T
        "0.478261`", ",", "0.539023`", ",", "0.412108`", ",", "0.107566`", ",",
    4 Z0 i, N) |( D/ J     "0.237762`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    " P3 _/ D& T, B8 ~. _/ H2 Q$ R     "0.380742`", ",", "0.507042`"}], "}"}], ",", / u7 ~% [% U6 y5 D' A3 l
       RowBox[{"{", 1 |; e1 s1 k9 S" [5 W0 F
        RowBox[{
    : l8 H# b* b# s8 B5 C9 {+ n1 P( O    "0.608696`", ",", "0.551859`", ",", "0.176821`", ",", "0.076332`", ",",
    / y4 j( q( S  F, W2 h     "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    7 T7 R+ O( D6 p) m     "0.429034`", ",", "0.239437`"}], "}"}], ",",
    1 [5 ^7 K) R; f3 d   RowBox[{"{",
    5 e) B! S! y! t9 L$ X    RowBox[{
    * i" v8 ?8 X  W( v1 j( T    "0.652174`", ",", "0.551859`", ",", "0.033549`", ",", "0.018459`", ",", 3 u" `! k" b0 _+ D
         "0.573427`", ",", "0.`", ",", "0.553659`", ",", "0.`", ",", "0.40489`", . O8 t8 W. u! l8 g9 }1 O. |
         ",", "0.193168`", ",", "0.394366`"}], "}"}], ",", / L1 Y) S# v) p! b4 u
       RowBox[{"{",
    : B: Q2 F4 d9 O    RowBox[{
    4 t( Y( c6 s$ }2 v$ w8 `! R    "0.695652`", ",", "0.595382`", ",", "0.277493`", ",", "0.100326`", ",", # @1 R# e; [6 ^
         "0.286713`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    + B; F/ t# {5 \     "0.448763`", ",", "0.338028`"}], "}"}], ",", 1 b+ }, G( x- ?' V/ ]1 H% ^
       RowBox[{"{",
    5 h& c2 a8 S0 p  H  e( _5 _    RowBox[{
    ( i) q- R" P/ ]0 j$ a3 i% j. Q, O    "0.565217`", ",", "0.559531`", ",", "0.422669`", ",", "0.078111`", ",", ; }. Z: D2 U4 m( v( @/ G$ U/ K
         "0.286713`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 9 s7 H% o$ K5 E; E/ C* w4 h  H3 C
         "0.442285`", ",", "0.394366`"}], "}"}], ",", 3 }) P9 T2 B1 ]7 Z. m) B
       RowBox[{"{",
    / f4 D2 b: g* k    RowBox[{& l0 X! G# o0 b. x' J% t) J$ ]
        "0.586957`", ",", "0.398126`", ",", "0.140619`", ",", "0.069116`", ",",
      Z5 Y: L$ V8 F+ O     "0.461538`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    2 ^0 D+ ?* T0 n6 _& f     "0.575383`", ",", "0.15493`"}], "}"}], ",", 3 F  i: y4 g5 A" o/ U
       RowBox[{"{",
    " }0 {# E: `9 |2 v    RowBox[{
    + u+ L% F4 o# @5 N    "0.695652`", ",", "0.398126`", ",", "0.019829`", ",", "0.041366`", ",",   g$ C% e" M2 F$ n
         "0.552448`", ",", "0.24416`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    8 I. I9 E/ D* ~2 L0 h# w     "0.515607`", ",", "0.591549`"}], "}"}], ",", 7 S( G. G& N- i
       RowBox[{"{",   a5 F$ u, {+ b: f$ m# a# [' ?0 U
        RowBox[{; y* C+ U* V. |$ F$ f/ v2 ^$ e# W' K
        "0.695652`", ",", "0.700354`", ",", "0.422467`", ",", "0.068128`", ",",
    7 |' E( W; g9 K/ u! F     "0.20979`", ",", "0.`", ",", "0.`", ",", "0.500504`", ",", "0.`", ",", , g! L, }0 @3 f% G! s4 }( C
         "0.057715`", ",", "0.408451`"}], "}"}], ",", ) @: J. ]4 y: D: d8 v
       RowBox[{"{",
    2 p' N! x/ p* g/ q- d    RowBox[{
    & P) b' Q+ n0 e8 f8 n    "0.521739`", ",", "0.193125`", ",", "0.210582`", ",", "0.110433`", ",", $ m5 p$ H+ E5 N5 h* j: b
         "0.447552`", ",", "0.382065`", ",", "0.413008`", ",", "0.498489`", ",", ! @3 V' m. o+ Y) G
         "0.`", ",", "0.174617`", ",", "0.295775`"}], "}"}], ",", ) ]. ~- J* W( u) d* y) V' a- k+ W' M
       RowBox[{"{",
    " C  T; N( w* O# e    RowBox[{7 P) ]7 K0 f  u
        "0.347826`", ",", "0.063588`", ",", "0.830527`", ",", "1.`", ",",
    $ f. A1 @: ?- i# S- p- z5 A     "0.111888`", ",", "0.`", ",", "0.410569`", ",", "0.`", ",", "0.`", ",",
    - G% }+ x' ^) Z  X: d: K' ^; t     "0.66755`", ",", "0.661972`"}], "}"}], ",",
    5 `* b% S, y  ]   RowBox[{"{",
      P& o! g2 @. l- y    RowBox[{9 `5 d! F% j# K3 x. i
        "0.521739`", ",", "0.188109`", ",", "1.`", ",", "0.785485`", ",", 6 y2 i6 ?5 X* f7 k. y7 X  w4 L* u
         "0.342657`", ",", "0.373775`", ",", "0.406504`", ",", "1.`", ",", "0.`",
    2 ?9 j( \/ A1 S( z! R+ w. I' m     ",", "0.371025`", ",", "0.774648`"}], "}"}], ",",
    : A9 B3 U! j, d. H3 f; W8 f. u   RowBox[{"{",
    2 c4 e, _, Q5 ^( Y    RowBox[{
    4 S3 Y7 d+ x( f, x3 Y- F5 c0 e    "0.695652`", ",", "0.188404`", ",", "0.088836`", ",", "0.059504`", ",", + h$ w2 k- W% K# b. f" _9 [
         "0.706294`", ",", "0.37679`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 3 u$ w4 I! `, b& X* H4 s
         "0.570966`", ",", "0.746479`"}], "}"}], ",",
    - Y: C9 E% l$ p3 t9 o% B9 [7 P% U   RowBox[{"{",
    6 ?. x* a: p: F3 r% E! X    RowBox[{
    6 j4 W* p4 b4 g# X    "0.695652`", ",", "0.057465`", ",", "0.316316`", ",", "0.15128`", ",",
    4 i% Q' l5 M8 p* c% H9 N/ z; N) I     "0.615385`", ",", "0.371515`", ",", "0.412195`", ",", "0.500504`", ",",
      \8 ~* i4 Y# n# ]     "0.`", ",", "0.468198`", ",", "0.887324`"}], "}"}], ",",
    / y$ y3 E: y1 @3 w/ z% r   RowBox[{"{",
    ' v! z7 m# Z" D( p6 L7 M) u. g) n    RowBox[{
    * W6 Q6 X( U- k6 b6 M6 J6 a    "0.608696`", ",", "0.01136`", ",", "0.295586`", ",", "0.113892`", ",",
    ( g* [" `, _1 B( i+ y( h$ H     "0.58042`", ",", "0.746044`", ",", "0.405691`", ",", "0.501511`", ",",
    & V! y. V; f; K% Z. `+ D     "0.`", ",", "0.414016`", ",", "0.84507`"}], "}"}], ",",
      h4 f: O. D$ ^: A9 l   RowBox[{"{",
    8 p, t* J. P- c& v    RowBox[{
    0 b& h# n' G9 m! L7 Z6 L" c9 _    "0.608696`", ",", "0.364783`", ",", "0.130582`", ",", "0.020214`", ",", / |! {8 c2 R& R
         "0.356643`", ",", "0.379804`", ",", "0.`", ",", "0.`", ",", "0.`", ",", + W3 d; }. S) H" k' A8 p% ?
         "0.18669`", ",", "0.704225`"}], "}"}], ",",
    ( y2 F& b) Z& }) H' r" h* C   RowBox[{"{", / n# e; C4 f  O7 W" |+ x: O
        RowBox[{; n- }0 b7 ~& H  T4 E- X' j- s5 @5 n9 R
        "0.608696`", ",", "0.193199`", ",", "0.11269`", ",", "0.036152`", ",", % {5 ^; T( M$ D  l0 C3 V4 {
         "0.636364`", ",", "0.382065`", ",", "0.409756`", ",", "0.495468`", ",",
    , g# N3 {8 x2 @- J6 K, C. `     "0.`", ",", "0.442874`", ",", "0.760563`"}], "}"}], ",",
    ! A. u2 H. x, M; m   RowBox[{"{",
    $ {# }3 q4 l; V2 f3 e$ ?( N8 E    RowBox[{, `+ I; u6 b: z( `+ @
        "0.73913`", ",", "0.328932`", ",", "0.246779`", ",", "0.12652`", ",", ) V, }: C4 q- x1 A; o& S- o2 ]
         "0.454545`", ",", "0.`", ",", "0.495122`", ",", "0.`", ",", "0.414181`", : [; B- w8 R% Q: m# a; [$ z
         ",", "0.68669`", ",", "0.43662`"}], "}"}], ",", + ^7 |& G1 N! N! N, p" V7 L" P% B
       RowBox[{"{", / `; u! w6 M, j5 D! m" ?) ~
        RowBox[{
    ' h6 C- F; w4 E4 v( K    "0.73913`", ",", "0.341767`", ",", "0.36209`", ",", "0.183528`", ",",
    4 ?8 ~7 \2 l9 J& U# M' Y* ]/ u     "0.573427`", ",", "0.413715`", ",", "0.454472`", ",", "0.661631`", ",", # I  H. f# X& f/ H" x* U3 r
         "0.`", ",", "0.244111`", ",", "0.633803`"}], "}"}], ",",   t( Q; s* B" B
       RowBox[{"{", - z' E( ]1 z2 G' P5 h
        RowBox[{
    - z( G4 a0 U1 u7 z; R6 U    "0.695652`", ",", "0.187076`", ",", "0.279724`", ",", "0.006252`", ",",
    ) H& ]( i5 X; x5 u. J' L  j     "0.405594`", ",", "0.418237`", ",", "0.544715`", ",", "0.`", ",", "0.`",
    4 _" O! T+ W5 r& e  G     ",", "1.`", ",", "0.422535`"}], "}"}], ",",
    ! V# ?, Y( q: ?# y- Q) W: V) b   RowBox[{"{", 9 a/ s0 j6 u/ ]) _( W* d. c9 I
        RowBox[{- V  J  N8 i9 l4 n: v
        "1.`", ",", "0.333948`", ",", "0.06475`", ",", "0.065855`", ",", ) @( \# U' L" e5 w7 u) N
         "0.342657`", ",", "0.`", ",", "0.40813`", ",", "0.`", ",", "0.`", ",",
    " ]! X) E9 `8 j) ~     "0.957892`", ",", "0.295775`"}], "}"}], ",", + O; P) d6 F9 L$ {
       RowBox[{"{",
    / h$ i8 e3 i; n7 D1 K: m    RowBox[{
    2 W- Y9 B. _6 }+ M' X    "0.73913`", ",", "0.3054`", ",", "0.374567`", ",", "0.13287`", ",", $ o, F+ y  u% Z# P  O
         "0.258741`", ",", "0.834966`", ",", "0.`", ",", "0.`", ",", "0.272861`", % a1 O1 J( t. l9 ]  w
         ",", "0.266784`", ",", "0.309859`"}], "}"}], ",",
    # j) R9 f' E6 u1 Q   RowBox[{"{", % E" B+ S! Z* r+ q. F
        RowBox[{
    . C5 x6 B/ R1 Q    "0.826087`", ",", "0.151962`", ",", "0.36028`", ",", "0.221632`", ",",
    & i5 @5 e$ A0 V( L+ t     "0.447552`", ",", "0.584778`", ",", "0.457724`", ",", "0.`", ",", "0.`",
    : L) c) F1 w$ U( N8 x/ p& |. f5 M     ",", "0.826855`", ",", "0.408451`"}], "}"}], ",",
    9 B% U. @8 y! D) O" D2 u   RowBox[{"{",
    ! B' R: L9 D& V* J# A    RowBox[{0 `( z! H. b/ b2 @  I4 p+ L
        "0.565217`", ",", "0.047212`", ",", "0.233154`", ",", "0.121528`", ",", # O2 }: q& u/ M& b. c
         "0.314685`", ",", "0.417483`", ",", "0.546341`", ",", "0.`", ",", 9 w% x- n: c5 c+ u" i
         "0.669438`", ",", "0.341873`", ",", "0.197183`"}], "}"}], ",", . i4 O) E! B6 T8 ]$ t  k
       RowBox[{"{", 1 n' X7 h5 O8 K7 I
        RowBox[{
    ' s- Y9 ]( Y  Q; b    "0.826087`", ",", "0.034376`", ",", "0.690349`", ",", "0.51238`", ",", 7 M) n3 x! ?- b" d* o, K/ K
         "0.685315`", ",", "1.`", ",", "1.`", ",", "0.`", ",", "0.556479`", ",",
    : w# f& b7 ?  t) T" {2 T- E     "0.412544`", ",", "0.732394`"}], "}"}], ",",
    ! n* i5 }& {1 n# G) i/ W; B  \   RowBox[{"{", , t8 A6 S" U1 G7 m2 h( ~
        RowBox[{
    - R8 @  O* P3 t    "0.652174`", ",", "0.`", ",", "0.374417`", ",", "0.188075`", ",",
    / \" x+ N" Y( s" @' i, P$ ^     "0.706294`", ",", "0.498116`", ",", "0.729268`", ",", "0.`", ",",
    ; [/ S1 p7 {2 V6 G     "0.454279`", ",", "0.322144`", ",", "0.802817`"}], "}"}], ",",
    0 Q& A! H* z0 O9 f+ @   RowBox[{"{", ; {: Q  B4 \6 k+ J2 s
        RowBox[{
    " t: [2 L* w' A+ N* w  `    "0.782609`", ",", "0.180363`", ",", "0.237142`", ",", "0.054809`", ",",
    ! Y1 C0 D/ a  D' u     "0.629371`", ",", "0.373775`", ",", "0.247967`", ",", "0.`", ",",
    ; P0 C% a$ H2 I& h1 _) T     "0.163814`", ",", "0.370436`", ",", "0.746479`"}], "}"}], ",",
    # a) f! k6 B6 {: I; @   RowBox[{"{",
    * e5 _/ I( o# S/ k3 f( U; K% t    RowBox[{
    8 P% g3 E  z/ d0 N& V    "0.608696`", ",", "0.16915`", ",", "0.368148`", ",", "0.393768`", ",",
    3 A2 H# D4 C& I( q1 i/ `     "0.440559`", ",", "0.995479`", ",", "0.545528`", ",", "0.`", ",", 6 u1 k# k2 p6 I
         "0.56577`", ",", "0.333039`", ",", "0.380282`"}], "}"}], ",",
    7 Y; N1 }7 ^1 t( N   RowBox[{"{",
    - C2 V+ C% J! E, O    RowBox[{
    ' G' N# H6 i6 I% Z    "0.695652`", ",", "0.390454`", ",", "0.186683`", ",", "0.039439`", ",",
    + b- Y/ ]' E- ~# c3 @0 {! C4 J     "0.482517`", ",", "0.497362`", ",", "0.415447`", ",", "0.50856`", ",",
    % ~! n) d' W& E  j     "0.`", ",", "0.390754`", ",", "0.56338`"}], "}"}], ",", % R# H1 B" m, c
       RowBox[{"{",
    ( Q+ {( m0 }2 z8 m+ u    RowBox[{9 r( Y# [) S8 g% U0 m
        "0.73913`", ",", "0.428888`", ",", "0.082728`", ",", "0.070154`", ",", . ?4 k! n0 d& {
         "0.27972`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 7 a% J! r( L6 q- d6 \1 r* N9 y
         "0.694935`", ",", "0.323944`"}], "}"}]}], "}"}]], "Output",3 [! n# C: A; U! ]: k; I6 o! N2 Z
    CellChangeTimes->{3.57795879182092*^9, 3.5779604974578943`*^9, 5 `6 G9 b% R- @5 T" \# \
      3.57801214396875*^9}]4 A9 e6 H: S% x( U& ?/ F
    }, Open  ]],
    & `2 c& b4 Z- m1 o1 ?
    ; m; z' j8 V! q# E$ {Cell[CellGroupData[{" Z# \2 G5 T# e& w9 x5 F/ ?

    7 O7 o% q8 M* ^/ mCell[BoxData[) Y5 S  A2 N  |+ p8 K; _
    RowBox[{"Array", "[",
    0 I) F: }- Z- l2 e% |) u  RowBox[{"CM", ",", 0 ]6 [" I4 Z* g& H( z. S+ }
       RowBox[{"{", 2 t8 W2 A7 B. s) `3 e# C% e( ]
        RowBox[{"80", ",", "9"}], "}"}]}], "]"}]], "Input",
    6 q% X$ h5 V# X, |) i# i; a CellChangeTimes->{{3.577844235859375*^9, 3.577844291953125*^9}}],! w1 r4 d# U# n* R% R6 @
    # [8 k1 a0 ^" J
    Cell[BoxData[$ }; G6 G/ q  g, @& j: V
    RowBox[{"{",
    4 G7 J- d( M7 S6 X2 D. W  RowBox[{
    : u) o( _7 T- k0 G   RowBox[{"{", 7 [% S' d/ R: R- q, A3 U; p$ j
        RowBox[{
    3 R& O% O4 `" ]" e4 j     RowBox[{"CM", "[",
    ' u1 p8 v. A. Z& Q  c9 _+ Z      RowBox[{"1", ",", "1"}], "]"}], ",",
    ' @4 ^' U& A( m1 ?! l: O# o     RowBox[{"CM", "[", 6 l8 l3 ~/ a- h* H$ {4 p4 |, \; d
          RowBox[{"1", ",", "2"}], "]"}], ",", 2 b0 c. }9 A2 n( K$ M/ n2 e
         RowBox[{"CM", "[",
    " m+ |; @+ e. u# G. x" G      RowBox[{"1", ",", "3"}], "]"}], ",",
    ( n# v3 F" d6 t: I     RowBox[{"CM", "[",
    1 B1 k- I, k) `0 E; C  ?1 [+ A      RowBox[{"1", ",", "4"}], "]"}], ",", 9 a/ p* k5 @$ \$ O
         RowBox[{"CM", "[", 1 w2 `) Y0 M; n' ^! D% z; [/ N
          RowBox[{"1", ",", "5"}], "]"}], ",",
    ) z: d! I# y. m     RowBox[{"CM", "[",
    - I+ Z" ]( T) L) l* V      RowBox[{"1", ",", "6"}], "]"}], ",",
    1 d; @3 O  b5 i( B     RowBox[{"CM", "[", 4 o; C" P/ Q, K. b; @" ?7 ~- _) o
          RowBox[{"1", ",", "7"}], "]"}], ",", ; N* g& n/ e4 Q4 z1 ^5 }
         RowBox[{"CM", "[",
    : C) P& S- ?, d# q. D3 O      RowBox[{"1", ",", "8"}], "]"}], ",", : @) s" m! L: p6 Q+ m) N4 @
         RowBox[{"CM", "[", 6 W5 x6 |2 K; ]
          RowBox[{"1", ",", "9"}], "]"}]}], "}"}], ",",
    / x: N/ X, }; B* e% ~8 D   RowBox[{"{",
    $ l* j1 r3 ]% @+ V    RowBox[{
    ! E* z- x& B8 O  n     RowBox[{"CM", "[", + `7 J) l; S- L9 s
          RowBox[{"2", ",", "1"}], "]"}], ",",
      L( t6 F3 Y* a$ r/ ^     RowBox[{"CM", "[", " C6 N+ P6 N/ V" h' \
          RowBox[{"2", ",", "2"}], "]"}], ",",
    $ P, E) X8 h8 |3 k0 f8 A     RowBox[{"CM", "[", ) v% h  z8 B4 g7 Q! D5 m( l% M' y
          RowBox[{"2", ",", "3"}], "]"}], ",", ! E% }- F) G, h; F( E( [* l/ Z
         RowBox[{"CM", "[",
    ! A  X) h0 t6 _2 O$ v. @/ P  c      RowBox[{"2", ",", "4"}], "]"}], ",",
    3 u( W  w6 L: u! ^: z: b     RowBox[{"CM", "[", , D; }3 p7 e9 a7 B6 o
          RowBox[{"2", ",", "5"}], "]"}], ",", 1 R6 K) n; N6 l; Z$ I
         RowBox[{"CM", "[",
    : I+ B6 z7 E1 p: Q      RowBox[{"2", ",", "6"}], "]"}], ",",
    ( i# N- ]% p2 Q% ?     RowBox[{"CM", "[", " R/ }% n* s: t7 [
          RowBox[{"2", ",", "7"}], "]"}], ",", 8 @$ K& U" x2 P' R6 o  F* s
         RowBox[{"CM", "[",
    . k8 Q8 I1 e. N      RowBox[{"2", ",", "8"}], "]"}], ",", 7 r! x, B" A  N7 w" O9 Z/ P
         RowBox[{"CM", "[", - L- j$ X1 u! j7 g2 @: n
          RowBox[{"2", ",", "9"}], "]"}]}], "}"}], ",", / }/ w1 x$ L+ ?8 K  g) H
       RowBox[{"{",
    4 ], t% c1 [4 S5 p$ e5 B    RowBox[{
    # I1 {: w+ ?( N7 P9 F     RowBox[{"CM", "[",
    " l0 z" d* f  o  d& O2 O, V* a      RowBox[{"3", ",", "1"}], "]"}], ",", . ?5 ?5 e" q: P) v% U% u# y
         RowBox[{"CM", "[",
    ) k! l; \2 F; ^      RowBox[{"3", ",", "2"}], "]"}], ",", 6 ~3 z9 |5 ^' |% i( ]1 t
         RowBox[{"CM", "[", 7 n- V# I' E% C- |* ^8 E  c4 e
          RowBox[{"3", ",", "3"}], "]"}], ",", : H6 q7 n  }5 H+ {: B7 [! [( a
         RowBox[{"CM", "[",
    & p% A! E( X! U9 [$ K& ~      RowBox[{"3", ",", "4"}], "]"}], ",",
    - R* F7 W7 ~: A; S7 }& z  @     RowBox[{"CM", "[", , ]2 |) g; A, v0 V" h. ^
          RowBox[{"3", ",", "5"}], "]"}], ",", % h7 p" b0 `$ k
         RowBox[{"CM", "[",
    ; B' z8 e3 W! Y      RowBox[{"3", ",", "6"}], "]"}], ",", 8 a* T( O  _7 ~0 O) S1 c
         RowBox[{"CM", "[", 6 \2 k1 J* Y/ ]5 A1 X6 V. {, }, z
          RowBox[{"3", ",", "7"}], "]"}], ",",
    9 K1 G6 r* n0 t1 A. F     RowBox[{"CM", "[",
    ; H. c; L9 ?4 t+ [5 ?: `      RowBox[{"3", ",", "8"}], "]"}], ",", ; B( M. I9 a+ o" Q- b; U6 o
         RowBox[{"CM", "[",
    ; p8 ?8 q, j5 W. D      RowBox[{"3", ",", "9"}], "]"}]}], "}"}], ",", 1 U6 z: A. o6 y
       RowBox[{"{", 4 H; T" g; B4 r4 L
        RowBox[{
    5 t* R: Z! J4 s1 K1 W" d! ?/ Y     RowBox[{"CM", "[", 7 B0 T) h1 v4 V7 f; D* P- X
          RowBox[{"4", ",", "1"}], "]"}], ",", 8 i9 ^8 }5 y2 ], }* z, B
         RowBox[{"CM", "[", 9 e7 M4 W5 P" W( _
          RowBox[{"4", ",", "2"}], "]"}], ",", ( j& {- B; P9 S- t7 C0 [3 u
         RowBox[{"CM", "[",
    , i$ I8 R! `* K( C( e      RowBox[{"4", ",", "3"}], "]"}], ",",
      f" }7 p3 a% @& {: `* \     RowBox[{"CM", "[",
    ! L# p% Y* W* K      RowBox[{"4", ",", "4"}], "]"}], ",", + L4 g0 J; z; ^- [
         RowBox[{"CM", "[",
    ( J3 c1 Z/ J: P+ y( L% G      RowBox[{"4", ",", "5"}], "]"}], ",", ) @! w6 W5 S$ u$ L+ ~2 Z/ ~( M
         RowBox[{"CM", "[", ' l' ?  u# ~" i0 g1 W
          RowBox[{"4", ",", "6"}], "]"}], ",",
    8 K* \1 y5 j+ v& f+ D* q2 e2 l( J     RowBox[{"CM", "[",
    $ n' n  [5 p- u5 k! q      RowBox[{"4", ",", "7"}], "]"}], ",",
    ) z) c* J+ v  p  k( J3 K* E$ C     RowBox[{"CM", "[", " x. ^8 B, h7 S8 e: C% \% v
          RowBox[{"4", ",", "8"}], "]"}], ",",
    , {" Z% x1 u' }2 f, E     RowBox[{"CM", "[", 7 ?  k: {4 A, E
          RowBox[{"4", ",", "9"}], "]"}]}], "}"}], ",", 7 G: }7 L8 H4 m" L
       RowBox[{"{",
    ! ?$ k& J, I1 c; v( U* m    RowBox[{
    ( ~9 ^6 A7 I9 L- c- y; S     RowBox[{"CM", "[",
    % F5 I, i/ D+ }- |      RowBox[{"5", ",", "1"}], "]"}], ",", % k1 \6 m0 l7 h
         RowBox[{"CM", "[", 0 s- r! |0 j8 _' p4 H
          RowBox[{"5", ",", "2"}], "]"}], ",",
    6 l3 \: C5 B1 t9 i/ Y/ |     RowBox[{"CM", "[",
    " J: D" Y7 L  Q2 Y& h      RowBox[{"5", ",", "3"}], "]"}], ",",
    ; F7 I2 S% e2 i/ `' A/ U+ v: ^     RowBox[{"CM", "[", , s: F4 X; f: M! C% X( Y
          RowBox[{"5", ",", "4"}], "]"}], ",", % K. ^0 S7 v' p/ Z2 D  m$ Z
         RowBox[{"CM", "[",
    ) C) z0 j/ v0 C9 Y, I, M9 G6 P; k      RowBox[{"5", ",", "5"}], "]"}], ",",
    $ _5 n' j2 [" v. A2 ]     RowBox[{"CM", "[",
    % l$ }8 S- _7 P/ K$ J9 O5 A      RowBox[{"5", ",", "6"}], "]"}], ",", 4 i& O. m% J+ E! I3 t, h
         RowBox[{"CM", "[",   k# [( L3 @4 q
          RowBox[{"5", ",", "7"}], "]"}], ",",
    1 y8 l/ S; m0 Z2 p5 z- f     RowBox[{"CM", "[",
    1 [! c4 H* M& E+ g6 T      RowBox[{"5", ",", "8"}], "]"}], ",",
    : t  ]: s# u4 a* l! P     RowBox[{"CM", "[",
    ; {1 ]2 Q2 K1 A+ Y3 M7 r      RowBox[{"5", ",", "9"}], "]"}]}], "}"}], ",", " _3 R& H( x) [& z
       RowBox[{"{", 6 t& b4 V  m/ Y9 J9 ]
        RowBox[{
    & ^$ ^7 P2 `- R5 V, U+ s     RowBox[{"CM", "[",
    4 _* g8 ]& F  I/ A2 _; x      RowBox[{"6", ",", "1"}], "]"}], ",", ; ^% d# ^! H0 h
         RowBox[{"CM", "[",
    ) F# I- g% W, _3 n+ h3 R& J      RowBox[{"6", ",", "2"}], "]"}], ",",
    % l$ i( ]# c, j. Y) X, H2 v     RowBox[{"CM", "[", : e- @% ~) U4 L
          RowBox[{"6", ",", "3"}], "]"}], ",", 7 _! A# y/ b1 v% }, V
         RowBox[{"CM", "[", / z, S  g7 a" U: {
          RowBox[{"6", ",", "4"}], "]"}], ",",
      ^2 L- I- X5 K% M4 A     RowBox[{"CM", "[", / q$ M2 T3 L3 D& _8 s
          RowBox[{"6", ",", "5"}], "]"}], ",", " d) y& S1 X8 L) ]3 X1 H
         RowBox[{"CM", "[",
      p8 E/ A. _5 \) C9 Z* _      RowBox[{"6", ",", "6"}], "]"}], ",", ) {/ ^+ q: Z. T5 r0 h2 ?+ ]
         RowBox[{"CM", "[", 9 V* s1 t: \3 t, m' u4 f
          RowBox[{"6", ",", "7"}], "]"}], ",",
    " X! i; m, W' e6 n! G, f6 D! ^     RowBox[{"CM", "[",
    : x9 h$ \+ \7 z/ Z      RowBox[{"6", ",", "8"}], "]"}], ",", 9 N. }  x* y# \' [# x
         RowBox[{"CM", "[", * d8 V$ a$ m5 b. u
          RowBox[{"6", ",", "9"}], "]"}]}], "}"}], ",", , t/ E+ j* T4 {) o
       RowBox[{"{", - Y; {& N* W- D3 A
        RowBox[{3 y4 N/ G/ w3 L6 W- M  b+ Z
         RowBox[{"CM", "[",
    , P* L( o7 }$ M3 H( i9 [" F  X      RowBox[{"7", ",", "1"}], "]"}], ",", 8 j; n* x9 Y: v/ R0 Z
         RowBox[{"CM", "[",
    % ]% J, H% B! L: y6 [) @      RowBox[{"7", ",", "2"}], "]"}], ",",
    9 c% g0 @/ ^' [$ y5 X     RowBox[{"CM", "[",
    - p* p8 z+ L$ ?      RowBox[{"7", ",", "3"}], "]"}], ",", $ ~8 P# t/ S2 E: m$ u
         RowBox[{"CM", "[",
    3 S, f+ c* y0 N2 \; H  z: J      RowBox[{"7", ",", "4"}], "]"}], ",",
    / h+ j5 @/ q8 h+ M; T7 R! G     RowBox[{"CM", "[", * g& r8 `, X( H8 d
          RowBox[{"7", ",", "5"}], "]"}], ",", ' A( F# u( P5 N. A+ [/ M! B" a
         RowBox[{"CM", "[",
    7 M9 U9 Z4 x9 I4 K9 o# T0 M6 r* h0 n      RowBox[{"7", ",", "6"}], "]"}], ",", 5 W. v  `& j# C( {! M
         RowBox[{"CM", "[",
    5 Q7 a0 ^# f4 L* [+ e. j/ ~2 s      RowBox[{"7", ",", "7"}], "]"}], ",",
    / y; S/ r4 S! l9 W" G+ p     RowBox[{"CM", "[", 6 ]# [' ~# g- |
          RowBox[{"7", ",", "8"}], "]"}], ",", ; ?) ^% C3 U: ]/ r$ r" N
         RowBox[{"CM", "[", 4 A+ V" V5 N3 ^
          RowBox[{"7", ",", "9"}], "]"}]}], "}"}], ",",
    - T, @! W+ D& H$ ~( \   RowBox[{"{",
    " ^8 s+ c% [: U& e5 d" s! O; H    RowBox[{& D6 a+ s3 N0 w( k3 g* H( l& N
         RowBox[{"CM", "[", ' y5 }  b2 ~$ ^! h( D1 c3 w' n6 _
          RowBox[{"8", ",", "1"}], "]"}], ",",
    # D; g! x. Y" R     RowBox[{"CM", "[", 6 k  s& V" a, p4 T/ i6 U
          RowBox[{"8", ",", "2"}], "]"}], ",",
    # P9 B0 p) \/ c& z# C     RowBox[{"CM", "[",
    8 g& c5 u) C3 B. V$ ~& ^      RowBox[{"8", ",", "3"}], "]"}], ",",
    # y' }: W7 n/ N8 J) m6 |     RowBox[{"CM", "[", & z1 ^3 U8 C; ^
          RowBox[{"8", ",", "4"}], "]"}], ",", ) v9 i* i! p  w: ]( z
         RowBox[{"CM", "[",
    - R* N5 G* s5 a$ o. l# n      RowBox[{"8", ",", "5"}], "]"}], ",",
    3 i, a  [3 k9 Y5 B  _1 f     RowBox[{"CM", "[", : H% N9 P7 l" W) y2 m/ q! h. e
          RowBox[{"8", ",", "6"}], "]"}], ",",
    ; z) P/ t" N8 K$ L     RowBox[{"CM", "[",
    " d* A) E: ^# o# `      RowBox[{"8", ",", "7"}], "]"}], ",",
    " S! G+ M( o1 X$ I     RowBox[{"CM", "[",
    ' I+ f. Z+ k: ]9 x      RowBox[{"8", ",", "8"}], "]"}], ",",
    4 X* j, @! e  ?/ z4 w* U% Z     RowBox[{"CM", "[", 7 W' l% s; i! O& @' y, p6 @
          RowBox[{"8", ",", "9"}], "]"}]}], "}"}], ",",
    ; E0 I  P" }% U' u6 @. {   RowBox[{"{", , b( E( f: ]) X/ x9 w$ ~2 i' m
        RowBox[{
    7 }* B$ I- f8 z     RowBox[{"CM", "[", & ]; b2 Z1 [' `3 t& K
          RowBox[{"9", ",", "1"}], "]"}], ",",
    2 s8 \* O* z6 @; y/ L" W     RowBox[{"CM", "[", 4 p3 u  V5 g8 q& I+ F1 y
          RowBox[{"9", ",", "2"}], "]"}], ",", . ]+ B8 D. o7 ]& o3 V2 u2 D
         RowBox[{"CM", "[", ; a0 m" M7 e5 G1 d0 n" M. O' _# V
          RowBox[{"9", ",", "3"}], "]"}], ",", 9 \( u5 m1 N" c; Y/ X4 ?
         RowBox[{"CM", "[", ! D- \" F$ a# S: l8 j# ]+ a# v
          RowBox[{"9", ",", "4"}], "]"}], ",", 4 m1 u. ?/ S3 E  M1 X+ Q+ i- z
         RowBox[{"CM", "[", . y% W9 X5 Z+ h! F1 z8 q% M
          RowBox[{"9", ",", "5"}], "]"}], ",",
    ! ?+ `3 y% {: E/ ?# m6 M     RowBox[{"CM", "[",
    ) M" A5 a6 n: W+ P/ {      RowBox[{"9", ",", "6"}], "]"}], ",",
      P9 n" A  q- e     RowBox[{"CM", "[",
      I! A( Z/ {4 F6 `      RowBox[{"9", ",", "7"}], "]"}], ",",
    5 d5 f$ O. N0 _; `$ d% e     RowBox[{"CM", "[", $ K5 s. O. e; J- V- V
          RowBox[{"9", ",", "8"}], "]"}], ",",
    ' U. e. D/ O+ U5 g. C: h/ l( O     RowBox[{"CM", "[", # |4 F/ A( S' g/ G4 H: G: U
          RowBox[{"9", ",", "9"}], "]"}]}], "}"}], ",",
    $ T; B, B# W: l   RowBox[{"{",
    + M* h, U5 P& I- N" }: M9 f0 ]& _/ W5 y    RowBox[{1 @5 _. K5 v8 [' _" h- A
         RowBox[{"CM", "[", & \8 a/ t9 j* u# w4 Q4 j7 X
          RowBox[{"10", ",", "1"}], "]"}], ",",
    9 X; k( j- Q4 Y' f7 Z$ T     RowBox[{"CM", "[",
    " }0 a9 r& L7 B  m  F      RowBox[{"10", ",", "2"}], "]"}], ",",
      K# r. |0 p" b: B     RowBox[{"CM", "[",
    & q) j5 L9 n& p$ [      RowBox[{"10", ",", "3"}], "]"}], ",",
    / w. T7 s) h' Q; X7 F$ O     RowBox[{"CM", "[",
    7 E) y2 ]3 U; V* J      RowBox[{"10", ",", "4"}], "]"}], ",", 2 q  B4 v( M: N# {* x+ E
         RowBox[{"CM", "[", / Q+ W7 P& E. c; P8 z& r# j" f- G
          RowBox[{"10", ",", "5"}], "]"}], ",",
    % W1 \/ A# g* A" ~' k( d( T) O     RowBox[{"CM", "[", / e7 B/ u4 N/ h7 o9 }" u7 c
          RowBox[{"10", ",", "6"}], "]"}], ",",
      s6 [/ R/ N- P, T2 v5 Z( e9 V- K     RowBox[{"CM", "[",
    - R2 \* m: v6 |+ {" n) |" u      RowBox[{"10", ",", "7"}], "]"}], ",", 8 R9 x$ Q5 i; P0 h
         RowBox[{"CM", "[", # d% A6 y  n4 [/ w6 Q, G2 [
          RowBox[{"10", ",", "8"}], "]"}], ",",
    ) `1 h; T0 `5 `& d     RowBox[{"CM", "[",
    ! m0 Q0 x9 ?8 J      RowBox[{"10", ",", "9"}], "]"}]}], "}"}], ",", 1 k( E) k, v3 I9 Q6 B2 G1 G
       RowBox[{"{", 2 C0 S/ P: j2 o/ v3 F
        RowBox[{
    , e- O$ n1 k+ n     RowBox[{"CM", "[",
    ' k- s$ `, Z5 t% p, A8 S      RowBox[{"11", ",", "1"}], "]"}], ",",
    : f4 @# B) o% Z3 H+ ^. l     RowBox[{"CM", "[",
    ' g# B1 s' G2 h) q: l! o- J      RowBox[{"11", ",", "2"}], "]"}], ",",
    " [# n( Z) s( s) Y: z! r0 n1 K     RowBox[{"CM", "[", " F# i/ I) U; Q9 Z" n2 _, z
          RowBox[{"11", ",", "3"}], "]"}], ",",
    - j$ m0 p1 C" }) F     RowBox[{"CM", "[",
    1 N( i& J( N  {8 M" B" E  h      RowBox[{"11", ",", "4"}], "]"}], ",", * s: l+ N3 e$ I- w) s
         RowBox[{"CM", "[",
    & Y8 n! U0 @# ?" p: |0 q      RowBox[{"11", ",", "5"}], "]"}], ",", * V: r2 A+ I- E) B
         RowBox[{"CM", "[",
      B" _4 r8 ^9 M8 T2 z3 S      RowBox[{"11", ",", "6"}], "]"}], ",",
    ; o; w" D4 E* ^8 s' U. f* D     RowBox[{"CM", "[", 3 L% B( H1 f" _
          RowBox[{"11", ",", "7"}], "]"}], ",", ; y4 }+ r- n% Z6 K8 M" u) h6 q
         RowBox[{"CM", "[", 4 s2 ]7 z6 `! O# x7 V" X* d
          RowBox[{"11", ",", "8"}], "]"}], ",",
    " E+ C) m' @+ n$ ~     RowBox[{"CM", "[",
    , k. S4 h9 M8 h- g7 h" C$ T      RowBox[{"11", ",", "9"}], "]"}]}], "}"}], ",",
    9 D3 g$ O/ o6 T. A% v   RowBox[{"{",
    8 t/ ^* H/ a% ~. W& |( r    RowBox[{
    * Y! U- q' z" ~0 u     RowBox[{"CM", "[", - n* F3 Q- i2 P" g6 V
          RowBox[{"12", ",", "1"}], "]"}], ",", 4 R) f/ c. _* J6 R; }$ V
         RowBox[{"CM", "[", & ~2 h( v8 i9 C1 b
          RowBox[{"12", ",", "2"}], "]"}], ",",
    . U# Y/ E: e  S6 X4 d- d# t/ b     RowBox[{"CM", "[",
    ) [/ E4 A2 Q$ s& X      RowBox[{"12", ",", "3"}], "]"}], ",",
    6 I9 {3 T  A% Q- @     RowBox[{"CM", "[",
    8 l& W& J0 e9 [      RowBox[{"12", ",", "4"}], "]"}], ",",   r2 h* w. D, v9 U" O; C+ t
         RowBox[{"CM", "[",
    + F; f; ?) z# W" d# h# E! |* k3 b      RowBox[{"12", ",", "5"}], "]"}], ",",
    , F- ]4 o; }, B  p0 s/ Z     RowBox[{"CM", "[",
    . Y0 j: [' h, ?0 Z6 k      RowBox[{"12", ",", "6"}], "]"}], ",",
    0 V( y4 E& J' h0 N: q     RowBox[{"CM", "[", 3 B! z- e# y  o* G
          RowBox[{"12", ",", "7"}], "]"}], ",", 3 O6 q6 H7 A" ]# N! M6 U; `
         RowBox[{"CM", "[", / |3 K( p) V$ p+ l
          RowBox[{"12", ",", "8"}], "]"}], ",",
    % L# U7 F" W! Q5 b: n     RowBox[{"CM", "[",
    2 Q1 M& O3 z( P# a8 }7 S( Q8 l      RowBox[{"12", ",", "9"}], "]"}]}], "}"}], ",",
    8 o: M. X8 s( j2 y   RowBox[{"{", : G2 v; U1 w' v* M, u5 |3 D1 h6 B
        RowBox[{( [! N) C6 f( f" k
         RowBox[{"CM", "[", ) ?; R. h* ~, z7 N9 X
          RowBox[{"13", ",", "1"}], "]"}], ",", . s& h, J+ B8 |! t/ |' {
         RowBox[{"CM", "[",
    * X2 \, c! S4 Y  }" u9 I      RowBox[{"13", ",", "2"}], "]"}], ",",
    % z' A$ H( Y4 K) m5 y     RowBox[{"CM", "[",
    ! _0 |/ K- J' c# x4 I- L      RowBox[{"13", ",", "3"}], "]"}], ",", - D3 ^6 u; @( ?. M* T7 C
         RowBox[{"CM", "[",
    + P  k$ D" p, k. O. }8 O      RowBox[{"13", ",", "4"}], "]"}], ",",
    3 G7 g' T( V; d8 i9 v# x     RowBox[{"CM", "[", 1 P; b& ]! c- G( F7 g) j) ~
          RowBox[{"13", ",", "5"}], "]"}], ",", 5 \: ?, s# U8 _/ F6 {8 S& }
         RowBox[{"CM", "[",
    9 \9 B8 S/ o6 [6 r      RowBox[{"13", ",", "6"}], "]"}], ",",
    4 I9 |6 e  a" b( F     RowBox[{"CM", "[",
    ) h: g0 i7 j4 y2 W! P; |      RowBox[{"13", ",", "7"}], "]"}], ",",
    " c5 h' [/ Q, S( T* B3 N) a     RowBox[{"CM", "[",
    3 X8 U- l$ e0 J3 k      RowBox[{"13", ",", "8"}], "]"}], ",",
    * ^- \2 R- c$ c     RowBox[{"CM", "[",
    , B1 q+ A4 R; M* n      RowBox[{"13", ",", "9"}], "]"}]}], "}"}], ",",
    1 ~  d; M$ N3 |. }* x6 v   RowBox[{"{", - J- k+ C; G* s* k* R9 i, [
        RowBox[{8 y. C" R, f$ e; Y
         RowBox[{"CM", "[",
    4 r5 B9 v: j: A' H      RowBox[{"14", ",", "1"}], "]"}], ",", . J% P* o: J( g; @: k9 C
         RowBox[{"CM", "[", 8 W; W4 G( p6 F( Q) D2 |. z
          RowBox[{"14", ",", "2"}], "]"}], ",",
    : F: v' n8 {1 @. x' s     RowBox[{"CM", "[",
    ) h% _1 v# M3 ~9 F1 {6 Q8 p- H      RowBox[{"14", ",", "3"}], "]"}], ",",
    / p% Z. G3 K. r% ]5 f9 k* ~     RowBox[{"CM", "[", 3 o( e4 V6 j/ f/ Y* O0 j
          RowBox[{"14", ",", "4"}], "]"}], ",",
    # ], T, w5 ?, `4 d2 p     RowBox[{"CM", "[", + ~5 T2 v9 D2 J
          RowBox[{"14", ",", "5"}], "]"}], ",", & ]0 p- ]& H$ o8 e$ k8 W% [! x
         RowBox[{"CM", "[",
    ) ^8 ~/ W: ?# F3 B" d8 U      RowBox[{"14", ",", "6"}], "]"}], ",", . {1 Y; t) G/ `& u1 r+ M" F
         RowBox[{"CM", "[",
      F2 r; K, s5 G- G& H      RowBox[{"14", ",", "7"}], "]"}], ",", / s+ {. k$ |4 `  P& t
         RowBox[{"CM", "[",
    1 @* ?- f0 g) q      RowBox[{"14", ",", "8"}], "]"}], ",",
    2 S) y: p4 c0 k     RowBox[{"CM", "[", 0 n3 q( N; N6 M" |$ O
          RowBox[{"14", ",", "9"}], "]"}]}], "}"}], ",",
    2 x7 b* M2 O: k: k9 V6 s   RowBox[{"{",
    2 u' |7 a, p+ ^( t    RowBox[{9 P: t6 j: H) h5 ]5 g: }3 H! U: z
         RowBox[{"CM", "[",
    ) z5 f! z, M5 O      RowBox[{"15", ",", "1"}], "]"}], ",", ' V! C- M# M- ~+ g; ?* b
         RowBox[{"CM", "[", ; [2 G- q. x. ^, e  O
          RowBox[{"15", ",", "2"}], "]"}], ",",
    4 b. |% p/ H, \# d; _' e1 l6 g+ x9 w     RowBox[{"CM", "[", - y0 n0 S% Y! y2 _
          RowBox[{"15", ",", "3"}], "]"}], ",", ! e, l3 u: k* j( z8 _
         RowBox[{"CM", "[",
    , w7 L  x+ r% e      RowBox[{"15", ",", "4"}], "]"}], ",", # {: I( {# t; D" ^
         RowBox[{"CM", "[",
    . M1 b; V( k3 H; [. N) W0 g2 L* O5 g      RowBox[{"15", ",", "5"}], "]"}], ",",
    - Q) G% t0 z% w9 r     RowBox[{"CM", "[", ! E9 y1 g# f  S6 e4 p6 X5 T
          RowBox[{"15", ",", "6"}], "]"}], ",",
    - Q9 w% B+ B! Y, P     RowBox[{"CM", "[", 1 S1 t" Y7 A' R) P# c
          RowBox[{"15", ",", "7"}], "]"}], ",",
    ( K/ S2 |6 Q3 j2 H% y7 o     RowBox[{"CM", "[", 6 G* ?9 N: @% M
          RowBox[{"15", ",", "8"}], "]"}], ",",
    ! B7 p5 M+ Y: v+ d     RowBox[{"CM", "[",
    $ P$ G1 ]% U* O% p$ l. B      RowBox[{"15", ",", "9"}], "]"}]}], "}"}], ",",
    + f% ?3 {2 l# N! Z/ Q   RowBox[{"{",
    * z2 g' z- \' l, Q. R2 H% ]' }    RowBox[{
    ; D! f" F$ R+ W0 t" R; o$ U, i$ Z     RowBox[{"CM", "[", 0 S* k2 d; I9 I: x. @
          RowBox[{"16", ",", "1"}], "]"}], ",", % R3 O5 K  f9 C3 J
         RowBox[{"CM", "[", % n9 h  c; P# ?( @( G8 N# |* l
          RowBox[{"16", ",", "2"}], "]"}], ",", + `9 ^& l( [% Q" |% T
         RowBox[{"CM", "[", + J! j' F* X* R* k% a7 D  Q
          RowBox[{"16", ",", "3"}], "]"}], ",",
    3 I4 }( u! Y2 C7 O     RowBox[{"CM", "[", 2 m( A% I: T$ b' m$ @- ]
          RowBox[{"16", ",", "4"}], "]"}], ",",
    7 k  \& U" f2 p6 I/ ^. S( S) T7 q     RowBox[{"CM", "[", # h! Q& a$ N: z- j
          RowBox[{"16", ",", "5"}], "]"}], ",", 6 t, ~8 A/ T5 {2 O6 H- G$ j
         RowBox[{"CM", "[",
    $ D& m2 i! Z7 t      RowBox[{"16", ",", "6"}], "]"}], ",",
    ; \9 e" s) \2 P& W1 X     RowBox[{"CM", "[",   a& M9 q) L+ C) z+ ~5 d
          RowBox[{"16", ",", "7"}], "]"}], ",", $ g3 I  U- M( g% G4 f6 G" P
         RowBox[{"CM", "[", 5 R) x8 g8 W9 D) {% p9 V5 k4 \
          RowBox[{"16", ",", "8"}], "]"}], ",", 4 |- Q4 ]  s% T
         RowBox[{"CM", "[", 9 t. ]: d+ X# f' [3 u, v! x
          RowBox[{"16", ",", "9"}], "]"}]}], "}"}], ",", " c$ G6 ~& E9 o" q; \# n
       RowBox[{"{", $ V" z, z: F5 H1 l
        RowBox[{
    & H+ Q! `: D" k) Y' F' |; [     RowBox[{"CM", "[",
    % D* H' I/ G# `/ B0 B% S      RowBox[{"17", ",", "1"}], "]"}], ",",
    ) G$ W0 C2 h0 F. ]2 i     RowBox[{"CM", "[",
    5 ], g, r/ x! f+ u! D% N      RowBox[{"17", ",", "2"}], "]"}], ",",
    ) y) d. {1 n6 G# o8 C: i, f     RowBox[{"CM", "[", / _) A( @: T9 D  `+ J3 d% G4 v* E6 Z
          RowBox[{"17", ",", "3"}], "]"}], ",", * f' t* v  H9 \3 S; O, \
         RowBox[{"CM", "[", 9 T6 P4 V% X+ V. O1 z, x
          RowBox[{"17", ",", "4"}], "]"}], ",", . s  Q  k" e4 M0 U$ n' _2 w2 ?+ E
         RowBox[{"CM", "[",
    ! _" R) O* S, q$ z4 ~3 i      RowBox[{"17", ",", "5"}], "]"}], ",", ) {5 u3 w: k0 Z9 z  O; k" F6 V
         RowBox[{"CM", "[",
    : [0 z1 T/ O8 B- ~      RowBox[{"17", ",", "6"}], "]"}], ",",
    - Y: w0 H0 A. E" N' K9 e/ J     RowBox[{"CM", "[", % {% ~. e5 w2 x% }- H
          RowBox[{"17", ",", "7"}], "]"}], ",", 2 H' t0 z5 O; y% T- @( }
         RowBox[{"CM", "[", ! y& d3 S1 `; {, F! @; i  B: f8 W
          RowBox[{"17", ",", "8"}], "]"}], ",",
    " J/ ]! \7 t% G/ o9 Y" z& \4 i     RowBox[{"CM", "[",
    & g3 F+ p4 K. \6 j9 ~      RowBox[{"17", ",", "9"}], "]"}]}], "}"}], ",", / n' r' |) _7 b
       RowBox[{"{", / J6 _" K3 x& Q+ v! L6 O: P, A
        RowBox[{# `; z' R5 Z& {
         RowBox[{"CM", "[",   ]* w1 q$ u  g8 d; f, h8 J
          RowBox[{"18", ",", "1"}], "]"}], ",",
    ' Z. A" X. }1 ^: F* ~     RowBox[{"CM", "[",
    : z$ F! T/ S6 D: \      RowBox[{"18", ",", "2"}], "]"}], ",", - G1 |  a" ~4 E$ _" u6 M
         RowBox[{"CM", "[",
    " @0 i" l4 M3 O& C, f; {      RowBox[{"18", ",", "3"}], "]"}], ",", 6 R: [3 Z) z" Z7 C; X9 }
         RowBox[{"CM", "[",
    ) f) t" m$ o3 [- g      RowBox[{"18", ",", "4"}], "]"}], ",",
    4 {& |. L& w5 n4 U& o% n     RowBox[{"CM", "[", 5 ?% Q# b6 p  N' g' Q
          RowBox[{"18", ",", "5"}], "]"}], ",", + a$ O% I! `; A7 H$ X
         RowBox[{"CM", "[", / f* n/ ?8 U. M  u, f' {* V
          RowBox[{"18", ",", "6"}], "]"}], ",", 7 G" [1 n) r3 z9 y( \
         RowBox[{"CM", "[",
    ; J. Y" z  {5 K6 c& D6 @      RowBox[{"18", ",", "7"}], "]"}], ",",
    " |, x- O/ W; U, x8 O     RowBox[{"CM", "[", ( D! X, b# |) M. q) w
          RowBox[{"18", ",", "8"}], "]"}], ",",
    3 p" x, y' q$ G7 U* C+ h     RowBox[{"CM", "[", 7 T5 X+ w# z4 D6 S( H! M! r3 B
          RowBox[{"18", ",", "9"}], "]"}]}], "}"}], ",",
    " E+ N; b" T! {. q. e9 |   RowBox[{"{",
    2 _( k) U: r3 v. J0 a% _% o2 x( d    RowBox[{, Z( M9 N# {+ ~. r5 I
         RowBox[{"CM", "[", " o7 a' L+ e8 I  c1 l' ?  n9 A' ^
          RowBox[{"19", ",", "1"}], "]"}], ",",
    & g9 E6 W1 ^  I5 A4 K/ F     RowBox[{"CM", "[",
    ; z2 \& B9 e3 k/ @2 l7 ]      RowBox[{"19", ",", "2"}], "]"}], ",", 2 Y& c% o5 n. f2 ]% a0 w2 X
         RowBox[{"CM", "[",   r- {; N+ ^( q0 B: n; R1 ?
          RowBox[{"19", ",", "3"}], "]"}], ",", $ z& v3 ]4 `3 i$ t! I# l
         RowBox[{"CM", "[",
    & \' v/ f% x" N" y- t  j5 D      RowBox[{"19", ",", "4"}], "]"}], ",",
    - U* |- V2 d( L6 c0 z6 h) n1 K     RowBox[{"CM", "[",
    : y  U! L) g( I      RowBox[{"19", ",", "5"}], "]"}], ",",
    ; M5 K9 z0 T. ?5 s4 {     RowBox[{"CM", "[",
    1 I+ d/ E8 e. s      RowBox[{"19", ",", "6"}], "]"}], ",",
    ( M, w# ?& B- A. O/ G) P     RowBox[{"CM", "[", + X) v' Z, \* l: s$ g
          RowBox[{"19", ",", "7"}], "]"}], ",",
    ; y& y5 Q/ k+ [& y" g; _( |     RowBox[{"CM", "[",
    8 u( o9 |( O+ d% n; h      RowBox[{"19", ",", "8"}], "]"}], ",",
    * r0 [; Z0 a% I# f! `6 U     RowBox[{"CM", "[",
    ' j1 e; e! d: z3 W' z: d$ ^1 X9 l      RowBox[{"19", ",", "9"}], "]"}]}], "}"}], ",",
    + y. o8 e, {/ v% K! _- l   RowBox[{"{",
      O6 r' L  E7 b# {( ?( u8 F% ?    RowBox[{) V* i( }! [* Z  J  \
         RowBox[{"CM", "[",
    9 L1 }4 T  U* N( M5 x8 H  ?& y. f5 G      RowBox[{"20", ",", "1"}], "]"}], ",",
    ' P) z  Z7 @" Y( _: @' e     RowBox[{"CM", "[",
    8 }$ d3 a  F& X7 W0 _      RowBox[{"20", ",", "2"}], "]"}], ",", 8 i! @" {  M' ~) @* S# F; v" Y
         RowBox[{"CM", "[",
    / G, s; _2 q  Q3 k; n1 V& h$ J# \      RowBox[{"20", ",", "3"}], "]"}], ",",
    ! l3 N+ A/ J; [& G6 S     RowBox[{"CM", "[", , O% O0 I8 n9 j* n  h
          RowBox[{"20", ",", "4"}], "]"}], ",", 1 O7 M' c. J, J3 [/ l
         RowBox[{"CM", "[", 2 O7 Q  U1 V( U( J
          RowBox[{"20", ",", "5"}], "]"}], ",", 8 G; q4 q4 W6 W8 ?
         RowBox[{"CM", "[",
    9 k; X% r. {9 q7 U2 o      RowBox[{"20", ",", "6"}], "]"}], ",",
    0 O5 u. q4 ]5 P( D$ r7 a     RowBox[{"CM", "[", 8 Y) a5 ?" U: N, H, ^$ T
          RowBox[{"20", ",", "7"}], "]"}], ",",
    / B, y5 M- Q) _/ K$ x7 q  d' `     RowBox[{"CM", "[",
    - ]  n+ d4 S, x1 f* ?# J      RowBox[{"20", ",", "8"}], "]"}], ",", 9 B- p. v, O& O( B
         RowBox[{"CM", "[",
    " O* ?; ?% G! b$ m1 e# g      RowBox[{"20", ",", "9"}], "]"}]}], "}"}], ",", ! X4 P, R; u3 _7 D+ o) U0 g4 ^% z
       RowBox[{"{",
    $ s9 k: }5 v. y    RowBox[{% w4 V5 T0 y" L! T3 G
         RowBox[{"CM", "[",
    ' l' E6 F1 U0 i' c      RowBox[{"21", ",", "1"}], "]"}], ",",
    ) S! _( B3 Y8 \& p     RowBox[{"CM", "[",
    . N( r$ e8 u# s, I0 q$ A8 J      RowBox[{"21", ",", "2"}], "]"}], ",",
    2 m, H9 O. o; `/ \: C: f$ o& X     RowBox[{"CM", "[", : X( ~( A/ j/ H( M: W4 k
          RowBox[{"21", ",", "3"}], "]"}], ",",
    " T4 X4 B, E7 @- K2 ~3 C; H1 L9 A6 Z     RowBox[{"CM", "[",
    ! _& e) [/ o# Y3 g+ O4 c9 C% [% R; k      RowBox[{"21", ",", "4"}], "]"}], ",",
    0 T' m$ P& [# J7 M3 W- [" P3 S     RowBox[{"CM", "[",
    - t5 m: H( G- e- ]      RowBox[{"21", ",", "5"}], "]"}], ",", 9 J3 X. q0 O+ v7 j6 ?& K7 N, P, B
         RowBox[{"CM", "[", + i% z0 n( q6 h$ h3 O
          RowBox[{"21", ",", "6"}], "]"}], ",", ' T: M, `9 c+ l- C* n* G- z* y
         RowBox[{"CM", "[", . T6 p0 N; [1 ^1 L
          RowBox[{"21", ",", "7"}], "]"}], ",",
    ' L4 G4 ^; `, B" p! _! P7 f. e     RowBox[{"CM", "[",
    9 F2 N' y0 c/ h" ~4 {6 w' o      RowBox[{"21", ",", "8"}], "]"}], ",", 2 ?" o( U6 N5 {1 E) e; h
         RowBox[{"CM", "[",
    0 D0 n' [/ U0 X+ K3 V# Q2 ?+ n" e      RowBox[{"21", ",", "9"}], "]"}]}], "}"}], ",",
    " k9 V2 ~8 x8 R  d  q1 o   RowBox[{"{",
    ) [/ n4 g6 X: N* X2 H    RowBox[{
    1 `$ T8 n" u/ a) x     RowBox[{"CM", "[",
    % M5 R: D$ t2 {0 W- e* ?  d( B      RowBox[{"22", ",", "1"}], "]"}], ",", 4 f, K- w$ u1 s
         RowBox[{"CM", "[",
    $ B: [& ^% o0 A: D' c" h      RowBox[{"22", ",", "2"}], "]"}], ",", ( y2 z6 ]; |  F. c
         RowBox[{"CM", "[",
    6 d* ^- a5 H3 N. s6 g: P: x      RowBox[{"22", ",", "3"}], "]"}], ",", ) s4 a5 k) P6 Z2 g
         RowBox[{"CM", "[", % d5 O$ P8 I0 P/ ]
          RowBox[{"22", ",", "4"}], "]"}], ",", & C! [3 h- Q/ |3 U0 y+ h$ P; V/ P
         RowBox[{"CM", "[",
    : U3 X) a0 Q: P) y      RowBox[{"22", ",", "5"}], "]"}], ",", 8 B% e, Q5 n' O0 \0 D; A* I# ]
         RowBox[{"CM", "[",
    5 ?: p' O  Y7 e, y      RowBox[{"22", ",", "6"}], "]"}], ",", * s, O% N. _! t* p9 F
         RowBox[{"CM", "[", 9 B7 o9 p+ h, \
          RowBox[{"22", ",", "7"}], "]"}], ",",
    3 e6 R3 @/ j. R- c1 p2 [2 L     RowBox[{"CM", "[", # W9 U! u! B, _. m- p, c2 l, c
          RowBox[{"22", ",", "8"}], "]"}], ",", 8 k, F: l# F/ g7 }
         RowBox[{"CM", "[", ! K( M9 P0 _7 T$ c
          RowBox[{"22", ",", "9"}], "]"}]}], "}"}], ",",
    ' G& S! v* U+ X! P   RowBox[{"{", 3 U  {1 {: e/ X
        RowBox[{
      H) o% x- R+ ?  t     RowBox[{"CM", "[", . U0 G8 V0 ~' M& ~5 K5 {) i
          RowBox[{"23", ",", "1"}], "]"}], ",", : D& e, F+ R$ E/ z7 e
         RowBox[{"CM", "[", ' c- ^7 i2 T4 o6 G- I3 O( ^* i
          RowBox[{"23", ",", "2"}], "]"}], ",", 3 i7 l& E& ?$ M5 y- E; }( r
         RowBox[{"CM", "[",
    ; `) }- D+ n: G# H- q9 T$ f5 n      RowBox[{"23", ",", "3"}], "]"}], ",", ' {# S0 L9 y, b9 J. v' c
         RowBox[{"CM", "[", 9 E8 D6 i" s  K6 b7 }: D. x
          RowBox[{"23", ",", "4"}], "]"}], ",",
    7 o' R( B, C& Z, F     RowBox[{"CM", "[",
    & e" r+ e% i- F3 z- |5 }/ u      RowBox[{"23", ",", "5"}], "]"}], ",",
    ; X  w# z( n9 b) P     RowBox[{"CM", "[", - S1 ?' b8 z5 a0 Y- n
          RowBox[{"23", ",", "6"}], "]"}], ",", 4 q1 [$ O7 q5 x
         RowBox[{"CM", "[", % ]5 k0 V2 t( @7 S8 N/ y- {  \
          RowBox[{"23", ",", "7"}], "]"}], ",", ' h' k/ H: f3 m) R4 A
         RowBox[{"CM", "[", . i. r0 f1 g# [; F
          RowBox[{"23", ",", "8"}], "]"}], ",",
    : @  i2 g- W( X1 R! ]$ ^     RowBox[{"CM", "[",
    * o4 q3 q  e7 ~1 S+ B! h7 ~* Q      RowBox[{"23", ",", "9"}], "]"}]}], "}"}], ",", % y2 F. h8 |/ B4 Z* ]& |2 T8 Q
       RowBox[{"{", 2 m* C% H/ i4 l6 U. W' @  w
        RowBox[{8 d$ v% e# a; S: d" @6 ]& B5 t
         RowBox[{"CM", "[", 5 K2 {4 k" t8 U( i5 u
          RowBox[{"24", ",", "1"}], "]"}], ",", 5 ?% M* _. \8 l' j  F
         RowBox[{"CM", "[", 5 ~! w% [6 h2 D7 ^" c  S
          RowBox[{"24", ",", "2"}], "]"}], ",",
    2 @4 O$ }7 }' i     RowBox[{"CM", "[",
    7 w0 ^7 ^; q0 w" C! Q5 \      RowBox[{"24", ",", "3"}], "]"}], ",",
    ) x8 _( A7 c: r8 k& M5 U, j     RowBox[{"CM", "[",
    * p5 p8 z1 ?0 x  L3 e      RowBox[{"24", ",", "4"}], "]"}], ",",
    $ {# U4 x" n8 A' q7 f& F     RowBox[{"CM", "[", # y3 r0 G* A# g- ?3 R1 m
          RowBox[{"24", ",", "5"}], "]"}], ",",
    1 t2 h, \5 h; D     RowBox[{"CM", "[", 7 f; o- n- J3 r' _1 h' C! I
          RowBox[{"24", ",", "6"}], "]"}], ",",
    ' c+ I4 q" B: z. O, k& s$ o     RowBox[{"CM", "[", 5 d: n. ]% c2 h, Y( j  d) F( s3 E3 D
          RowBox[{"24", ",", "7"}], "]"}], ",",
    $ z% j+ v" V) o$ c/ S     RowBox[{"CM", "[",
    ) @6 x4 p* q' j/ m. @, O" t      RowBox[{"24", ",", "8"}], "]"}], ",",
    $ n! D6 y* n' Z9 Z5 r     RowBox[{"CM", "[", 2 l9 \) Q0 {& G9 `9 ^
          RowBox[{"24", ",", "9"}], "]"}]}], "}"}], ",",
    & A0 R. a" h/ F! t# V" d$ y9 z9 C   RowBox[{"{", 0 N& ~, k: ^2 d' O  f
        RowBox[{
    7 o  v% i3 t6 |. r* v# d9 n: m( `     RowBox[{"CM", "[", $ `  A( I6 z# J2 A  |: \& x  f! s) L
          RowBox[{"25", ",", "1"}], "]"}], ",",   a5 ]+ x4 ]  C$ n. [8 g4 O7 _
         RowBox[{"CM", "[",
    3 C9 U+ N; E, m* v9 Q      RowBox[{"25", ",", "2"}], "]"}], ",",
    ' `0 Q8 I6 e1 S1 b     RowBox[{"CM", "[", 4 k' H, m- V  e: m  K/ ]
          RowBox[{"25", ",", "3"}], "]"}], ",",
    / N) J6 Y' D* r$ ?" z     RowBox[{"CM", "[", $ O, |+ {4 s+ r: b# N! x# j* W
          RowBox[{"25", ",", "4"}], "]"}], ",", ; F- s0 J  X9 E* F% C2 ~1 j: d
         RowBox[{"CM", "[",
    ( V9 v$ [! m# z' u      RowBox[{"25", ",", "5"}], "]"}], ",",
    ) [) J% k3 A& y' j% |     RowBox[{"CM", "[", 1 w" C( t/ ~0 ?& N! N3 M& x
          RowBox[{"25", ",", "6"}], "]"}], ",", / y- Z6 ^; X/ I: l, g$ j8 ^
         RowBox[{"CM", "[",
    1 B: {2 g2 P8 g  L- e% {      RowBox[{"25", ",", "7"}], "]"}], ",",
    0 \) ?5 `8 @9 W$ ~5 C     RowBox[{"CM", "[", $ M- k: B3 n$ {# A+ d+ F8 t
          RowBox[{"25", ",", "8"}], "]"}], ",",
    & b) w% Y  z% W) {$ a0 R: O     RowBox[{"CM", "[",
    " U7 H; G/ ^; }+ P. c" m. K      RowBox[{"25", ",", "9"}], "]"}]}], "}"}], ",", 2 z! ]0 L+ G- m+ P. }
       RowBox[{"{",
    8 p1 s) ~( I# o. S, J    RowBox[{7 _4 |$ s) V+ _; W2 x
         RowBox[{"CM", "[",
    - |1 e0 h- Y4 F. T      RowBox[{"26", ",", "1"}], "]"}], ",", & E  n- N) v% t( A1 a: k/ t
         RowBox[{"CM", "[", * P+ o' z1 K' _( {7 W
          RowBox[{"26", ",", "2"}], "]"}], ",", ' `8 s: O1 p& P% z, C9 K" T
         RowBox[{"CM", "[",
    & A: u. `8 ~) P5 p5 @( n- H      RowBox[{"26", ",", "3"}], "]"}], ",", 8 W. u5 u$ M) H! x9 `
         RowBox[{"CM", "[", . ^+ Z3 x* X* x
          RowBox[{"26", ",", "4"}], "]"}], ",",
    7 c6 P3 J4 i7 J$ t     RowBox[{"CM", "[", # |( i+ _3 i( `5 j4 r) P6 d% ~2 A
          RowBox[{"26", ",", "5"}], "]"}], ",",
    9 E( i; `- ?* A( w5 }     RowBox[{"CM", "[",
    * T" a  H$ D3 D+ t      RowBox[{"26", ",", "6"}], "]"}], ",", 7 U0 {$ f. w1 q2 C1 F
         RowBox[{"CM", "[", 4 q8 f% U3 Z& b6 F! k( a- ?* }
          RowBox[{"26", ",", "7"}], "]"}], ",",
    - E# w$ t5 n3 ]' [     RowBox[{"CM", "[",
    ; N9 Q: Q) V6 ?' M      RowBox[{"26", ",", "8"}], "]"}], ",",
    % v4 @/ K/ r# `8 F2 P/ B  H# k6 n     RowBox[{"CM", "[", 6 c& m/ \" {  D
          RowBox[{"26", ",", "9"}], "]"}]}], "}"}], ",", 7 S! P* l9 m% f$ Z8 x) \7 M
       RowBox[{"{",
    6 Y. A* e8 }, ^' t4 Y3 x    RowBox[{+ _8 }& X$ T/ I! M
         RowBox[{"CM", "[", 8 z) B! A$ H9 b4 l
          RowBox[{"27", ",", "1"}], "]"}], ",", & k5 z( r/ v$ @& P; ]* X. k
         RowBox[{"CM", "[",
    5 N1 a& x$ F; F6 \, L* V$ n; ]      RowBox[{"27", ",", "2"}], "]"}], ",",
    9 z) h. x8 d% |/ `! H* e8 x$ Z, Q  T     RowBox[{"CM", "[",
    " @1 a8 _( P: A" H, R- m      RowBox[{"27", ",", "3"}], "]"}], ",", , g, E4 a8 H7 B' u& H
         RowBox[{"CM", "[",
    ; c7 u( o+ B! h8 L* U      RowBox[{"27", ",", "4"}], "]"}], ",", : Q8 {5 ?2 `) ~& F4 ]
         RowBox[{"CM", "[", ) G: V5 ]) E+ o8 Y; `4 j
          RowBox[{"27", ",", "5"}], "]"}], ",",
    ' n) @5 |' {2 R6 v     RowBox[{"CM", "[", - s  p5 _) r7 ?7 H' u
          RowBox[{"27", ",", "6"}], "]"}], ",", ' a/ t% s! A* \/ }& }. z! e$ I' Y
         RowBox[{"CM", "[", ! U) Q+ s# O( T# ^! ^
          RowBox[{"27", ",", "7"}], "]"}], ",",
    & `: v; F, F9 G- A( f2 Y. T     RowBox[{"CM", "[",
    ! X# n# `- o4 h) N/ T! y. |1 o& J9 X      RowBox[{"27", ",", "8"}], "]"}], ",",
      g: {5 v5 k5 A  C' W2 |     RowBox[{"CM", "[",
    2 D/ t# R  t. ~+ [: P      RowBox[{"27", ",", "9"}], "]"}]}], "}"}], ",", 9 A' n( H* E1 \) q
       RowBox[{"{", % x% q7 j1 w0 }% j) v! m/ r
        RowBox[{: |8 I4 A- b" x: E+ S
         RowBox[{"CM", "[", # Y7 {; j- M2 F3 O
          RowBox[{"28", ",", "1"}], "]"}], ",",
    & m0 x2 r$ w: r3 F     RowBox[{"CM", "[", 1 g! R) M! k- F. q0 f
          RowBox[{"28", ",", "2"}], "]"}], ",",
    & I& S3 \  S- e# _; ^     RowBox[{"CM", "[",
    % C6 o8 ^( S/ h: x5 K' {, @      RowBox[{"28", ",", "3"}], "]"}], ",",
    % _9 P* B$ \5 l$ D: |+ X     RowBox[{"CM", "[",   d. T( Q- [  H
          RowBox[{"28", ",", "4"}], "]"}], ",",
    + K& i& y. s* b& R4 O8 S     RowBox[{"CM", "[", ; l: }$ a& O2 c! c) L
          RowBox[{"28", ",", "5"}], "]"}], ",", $ i% o3 Y, d4 D2 C  d
         RowBox[{"CM", "[", & P5 X- W, q% a3 j
          RowBox[{"28", ",", "6"}], "]"}], ",",
    6 O4 I5 P$ u. d2 e1 q& r% [' Z     RowBox[{"CM", "[",
    1 t! [* F7 X* Y0 I$ l  o* C      RowBox[{"28", ",", "7"}], "]"}], ",", ) q3 O. w+ R* S8 z  H. {0 y
         RowBox[{"CM", "[",
    ! {# x& ]. F% E& q  B- |: Q      RowBox[{"28", ",", "8"}], "]"}], ",", 1 w, k  P4 W+ t5 `
         RowBox[{"CM", "[", 9 q9 B/ X( g/ ?  E0 O
          RowBox[{"28", ",", "9"}], "]"}]}], "}"}], ",",
    9 k0 v, C  Q  G# H   RowBox[{"{", ! _0 j" V/ L# }% p, V
        RowBox[{! ^, n9 D& @& k) C: C2 ^
         RowBox[{"CM", "[", , s! G& v" A0 T
          RowBox[{"29", ",", "1"}], "]"}], ",",
    - V" v' ^5 J$ b( d. Q5 N     RowBox[{"CM", "[",
    % o7 m  ~) l: @+ \4 ?% k# P      RowBox[{"29", ",", "2"}], "]"}], ",",
    ; J: p  L/ R+ k+ u! |! m3 v     RowBox[{"CM", "[", / f1 J) y7 l* j( ~% m) t
          RowBox[{"29", ",", "3"}], "]"}], ",", 7 D6 r& c! R6 ~7 {: u$ \- p: C# D% t
         RowBox[{"CM", "[",
    1 n: F& O8 h* k* H      RowBox[{"29", ",", "4"}], "]"}], ",",
    ! U* |- l) p9 b  N" J- S     RowBox[{"CM", "[",
    ) @. e6 ?6 _8 P) L' s7 M1 i      RowBox[{"29", ",", "5"}], "]"}], ",",
    % O. \0 J, o# E3 g0 Q5 v     RowBox[{"CM", "[", . `8 v. M! \8 k3 h
          RowBox[{"29", ",", "6"}], "]"}], ",", " \3 {- F  n4 Q  E8 n1 E$ Y
         RowBox[{"CM", "[",
    8 B# F) G% h& L# x9 w/ x5 w      RowBox[{"29", ",", "7"}], "]"}], ",", 8 S6 P* B# }/ W9 C2 X  l* u4 I$ q
         RowBox[{"CM", "[",
    & A$ |2 o$ x* S/ _6 X      RowBox[{"29", ",", "8"}], "]"}], ",",
    $ H7 V' J9 X5 w8 b     RowBox[{"CM", "[",
      c. S  G: R. \0 H! V      RowBox[{"29", ",", "9"}], "]"}]}], "}"}], ",",
    1 J3 g; N$ z6 h( ], n/ ]' \& `   RowBox[{"{", 6 ?* E; a& H! D+ `5 W$ |* w
        RowBox[{4 T6 D+ q2 }& Y0 ~$ h( j
         RowBox[{"CM", "[", ( v% `! f3 M; N3 x
          RowBox[{"30", ",", "1"}], "]"}], ",", 2 l/ A4 F8 X7 J
         RowBox[{"CM", "[", * Z! b2 S* A$ \
          RowBox[{"30", ",", "2"}], "]"}], ",",
    ; E  r: d; Q# T0 g* p9 P1 y" ~     RowBox[{"CM", "[", " t% P/ K, I; ~0 Q# m
          RowBox[{"30", ",", "3"}], "]"}], ",", 3 S( j4 Q! R, c+ H& ~2 i# e
         RowBox[{"CM", "[",
    - C. Y; J  j. ^% d$ d( H      RowBox[{"30", ",", "4"}], "]"}], ",",
    # ^" X4 b" U7 M! x& _     RowBox[{"CM", "[",
    $ A2 H) g  {  D4 K9 W7 q# ~      RowBox[{"30", ",", "5"}], "]"}], ",",
    ; D& d$ {/ {  H0 R/ m  S. E7 ^     RowBox[{"CM", "[", ) t9 x9 ~- m2 y6 ]) G( V/ y/ f
          RowBox[{"30", ",", "6"}], "]"}], ",",
    8 Z/ {  f5 ]# U2 {8 S' @4 H, E' T' @" D     RowBox[{"CM", "[",
    - K2 P& r  f2 O$ t      RowBox[{"30", ",", "7"}], "]"}], ",",
    # }( x4 g" I3 j- a( p     RowBox[{"CM", "[",
    $ s- ]5 _2 x9 x- H! q      RowBox[{"30", ",", "8"}], "]"}], ",", ( v4 b8 i$ D, Y9 L" ~
         RowBox[{"CM", "[", ( E' ?) l+ k7 q$ ^& z
          RowBox[{"30", ",", "9"}], "]"}]}], "}"}], ",", 4 C" |% p' C6 \- N3 {' ]& \: q  N4 S
       RowBox[{"{", 3 c: p$ s# K0 _; T
        RowBox[{2 v0 e: U6 W. C4 d9 y# `- F9 A
         RowBox[{"CM", "[",
    ; i* b+ a; a- i" G      RowBox[{"31", ",", "1"}], "]"}], ",", ) _7 {" I, v9 Y$ C4 l* P5 @
         RowBox[{"CM", "[",
    - R/ `$ F; _( ^+ C8 H5 _+ p      RowBox[{"31", ",", "2"}], "]"}], ",",
    ' F# Q7 @5 ?( w8 _6 D; m% w  Z* a     RowBox[{"CM", "[", 2 b. ]: ~) f6 x! R( F9 h$ E
          RowBox[{"31", ",", "3"}], "]"}], ",",
    6 i0 L% b5 p7 A% l- j) o( r     RowBox[{"CM", "[",
    + e$ v+ w' L' o7 j      RowBox[{"31", ",", "4"}], "]"}], ",", ; l& ^9 n0 K  t" B2 u
         RowBox[{"CM", "[", " n: q% }2 ]6 S: s% k1 O
          RowBox[{"31", ",", "5"}], "]"}], ",", , k$ s# F1 d  ?6 P3 X" ]7 j
         RowBox[{"CM", "[", ! f' D' u* }/ h" r2 H' y, }
          RowBox[{"31", ",", "6"}], "]"}], ",", - s' w1 B2 M3 |% X  |
         RowBox[{"CM", "[", ; l1 L( V' G/ _& C  C8 V6 z2 @
          RowBox[{"31", ",", "7"}], "]"}], ",",
    ; ^0 z1 _4 h1 k0 p/ Q     RowBox[{"CM", "[",
    ; C" P7 E8 h+ z9 B" v7 \. m$ O1 T      RowBox[{"31", ",", "8"}], "]"}], ",", , y8 V2 p  {  a8 ^7 X
         RowBox[{"CM", "[",
    3 j" L3 C  [( z  Q  e' m7 G      RowBox[{"31", ",", "9"}], "]"}]}], "}"}], ",", - U2 @( C: S: z- q8 h
       RowBox[{"{", 5 X! Z" v$ j4 I: g# f
        RowBox[{* H1 p) S3 D+ a& c$ [; @# _) f
         RowBox[{"CM", "[", ' m3 u- r: l  n
          RowBox[{"32", ",", "1"}], "]"}], ",", - l' c; f2 `( z+ B+ O( \+ K
         RowBox[{"CM", "[", * |* j% J" T8 i* {; o0 [
          RowBox[{"32", ",", "2"}], "]"}], ",",
    " q+ e/ ]# B" E0 ^! @" P% M. Q. E     RowBox[{"CM", "[", 0 P+ n1 s8 j9 z( T& y
          RowBox[{"32", ",", "3"}], "]"}], ",",
    ! u" C" s( k- N* \     RowBox[{"CM", "[",
    & {9 E) e( p% [' |  U0 S      RowBox[{"32", ",", "4"}], "]"}], ",",
    8 K2 Z( g8 d$ i" E2 V. Y% F: t7 I     RowBox[{"CM", "[",
    ! b" w6 [$ k, a* P3 B      RowBox[{"32", ",", "5"}], "]"}], ",",
    " z4 d. O) o4 e     RowBox[{"CM", "[", 7 N8 S  ~$ c- b& ?
          RowBox[{"32", ",", "6"}], "]"}], ",",
    ' K3 {" {: D) f     RowBox[{"CM", "[", ! {( g6 h. ^! }6 L* H4 [5 N
          RowBox[{"32", ",", "7"}], "]"}], ",",
    0 A$ L( L9 J0 ?4 j) K* N     RowBox[{"CM", "[",
    . E* F/ z. n$ g0 ?! U      RowBox[{"32", ",", "8"}], "]"}], ",",
    7 ], h- e  ]; L     RowBox[{"CM", "[",
    & ~! |% Q- }1 Z: q1 \, c7 j      RowBox[{"32", ",", "9"}], "]"}]}], "}"}], ",",
    0 d  c' U/ b+ @, j* Z- F: i   RowBox[{"{", $ L  W' S# x0 q" h6 y
        RowBox[{/ i0 c- ]. e; [# x! y
         RowBox[{"CM", "[",
    * \+ G% A$ H" p+ X4 |( n      RowBox[{"33", ",", "1"}], "]"}], ",", / `3 K% m+ v" Q: R* h
         RowBox[{"CM", "[", # R4 p; X/ |0 P- k) n! y* l
          RowBox[{"33", ",", "2"}], "]"}], ",",
    ; Y% D2 U% a, [; \1 r! Z     RowBox[{"CM", "[",
    + {! T& f1 i; f      RowBox[{"33", ",", "3"}], "]"}], ",",
    9 R6 Y6 s8 |0 ]: K+ b( i     RowBox[{"CM", "[",
    4 ~, {5 o1 m! A! |2 V5 c1 ~      RowBox[{"33", ",", "4"}], "]"}], ",", 7 z6 n5 o' P9 V6 y, L& V" _; R. I9 z
         RowBox[{"CM", "[", 5 \6 R) r5 \' k
          RowBox[{"33", ",", "5"}], "]"}], ",",
    * A. G  i" I5 u# v7 H     RowBox[{"CM", "[",
    $ R# C2 i, ?4 m' L3 n      RowBox[{"33", ",", "6"}], "]"}], ",",
    % n! ], b" h; b& Z0 l$ }" D" {' W2 t     RowBox[{"CM", "[", 3 x& d8 z9 B0 y. [$ F$ _+ p
          RowBox[{"33", ",", "7"}], "]"}], ",",
    $ _# x  n1 Q9 t* p: B1 N$ C     RowBox[{"CM", "[", 2 L/ }& G' M1 t! F' V& {7 x0 {
          RowBox[{"33", ",", "8"}], "]"}], ",",
    : w( ~/ ~7 _. P5 F" k+ b     RowBox[{"CM", "[", 6 n& h1 R3 ?8 G" o6 }
          RowBox[{"33", ",", "9"}], "]"}]}], "}"}], ",",
    % Q1 R7 a' l! Z   RowBox[{"{", 7 a! P$ M1 Q6 o- w3 t9 {" ~
        RowBox[{
    0 I! C5 d5 T( s) S, a! P% ^     RowBox[{"CM", "[", 5 l: y+ X; P- ^, }
          RowBox[{"34", ",", "1"}], "]"}], ",", - R( R! K0 l/ c/ C) V
         RowBox[{"CM", "[", ! W( o; r. q2 a4 K
          RowBox[{"34", ",", "2"}], "]"}], ",",
    0 z: K3 B( Y) j3 k' {9 W     RowBox[{"CM", "[",
    ! Y* J6 C1 Y, z+ a      RowBox[{"34", ",", "3"}], "]"}], ",", & R) w- R/ w" ~# }
         RowBox[{"CM", "[",
      T* o5 ^) V6 @8 Q- J1 Y! X- J2 J      RowBox[{"34", ",", "4"}], "]"}], ",", 0 x9 C% M/ `. u  d" c1 S
         RowBox[{"CM", "[", / W9 \2 T0 l% ?& \7 _/ v
          RowBox[{"34", ",", "5"}], "]"}], ",", ; w- r4 w- Y/ ]7 Z0 V3 k* W
         RowBox[{"CM", "[", ' i( e1 \* U/ E8 q
          RowBox[{"34", ",", "6"}], "]"}], ",", : c. ]. [4 W1 S& n
         RowBox[{"CM", "[",   b/ ?" B, t3 f, \7 O5 D
          RowBox[{"34", ",", "7"}], "]"}], ",",
    ( ]  `8 _5 E$ F& T     RowBox[{"CM", "[", # Q, X; @* o6 E# g) _
          RowBox[{"34", ",", "8"}], "]"}], ",",
    2 m; N) B2 q3 ^" @     RowBox[{"CM", "[", 6 j, C8 P" n+ S( q3 c; F9 d
          RowBox[{"34", ",", "9"}], "]"}]}], "}"}], ",",
    9 d! \* T$ x% E  c! G   RowBox[{"{",
    . N6 o/ p4 g- ^/ d+ s! w4 a    RowBox[{
    : m7 z3 R9 B+ ?% {4 D$ G     RowBox[{"CM", "[",
    ! k5 M5 o- X9 g4 Q# k3 y- X/ E      RowBox[{"35", ",", "1"}], "]"}], ",", + D. O, k# o( S0 f7 _, V) p6 u
         RowBox[{"CM", "[", ; W4 X6 U, q3 s. t& r. X. [, @2 L( j
          RowBox[{"35", ",", "2"}], "]"}], ",",
    ! G9 [% @& n: c% |     RowBox[{"CM", "[", & a5 J; F6 f: v8 B- W
          RowBox[{"35", ",", "3"}], "]"}], ",", 7 o! v7 e9 [, ~, X
         RowBox[{"CM", "[", 8 U1 k  i# U' E+ I% Q3 T+ |
          RowBox[{"35", ",", "4"}], "]"}], ",",
    5 R& F: Z* ~4 d' x- N     RowBox[{"CM", "[", 1 }5 t% B1 B) x1 Y( K9 ^3 X
          RowBox[{"35", ",", "5"}], "]"}], ",", - S' q- A* m9 l: f: R* @! O5 w
         RowBox[{"CM", "[",
    4 e  R% t, H$ s* F9 o& q      RowBox[{"35", ",", "6"}], "]"}], ",", : T6 e" w6 V1 ?1 z" d% r
         RowBox[{"CM", "[",
    , a( v6 Y6 a- N/ |- T, ~      RowBox[{"35", ",", "7"}], "]"}], ",", 7 J% x& d8 c3 Y+ s: ]( [" y6 R: A7 W
         RowBox[{"CM", "[", * o# L2 I7 h: E/ u" Y8 B
          RowBox[{"35", ",", "8"}], "]"}], ",", % M) Z% S, \9 j) s8 Z
         RowBox[{"CM", "[", ! L: l8 x0 _( u
          RowBox[{"35", ",", "9"}], "]"}]}], "}"}], ",", * z* y# C/ E6 I0 k) W
       RowBox[{"{", $ H; ~% o+ C9 ]* G) S
        RowBox[{
    ' P  _2 d5 ^* R+ g) n! G     RowBox[{"CM", "[", * Q% a! K6 L! G7 [! \' s- k/ l
          RowBox[{"36", ",", "1"}], "]"}], ",", ; s& Y+ J1 S1 k( U8 p4 b  }
         RowBox[{"CM", "[", 8 n' F! U/ T. A% r* ?
          RowBox[{"36", ",", "2"}], "]"}], ",",
    & V/ B" e( }; `: E. Y: q     RowBox[{"CM", "[", ' u+ J2 |& k: D, M6 f
          RowBox[{"36", ",", "3"}], "]"}], ",", . e$ x7 V$ j1 R
         RowBox[{"CM", "[", - P4 x& j7 S6 s- b
          RowBox[{"36", ",", "4"}], "]"}], ",",
    ' F$ ^; [$ K9 F  I' O, O     RowBox[{"CM", "[",
    3 i& x+ a' V$ O" m      RowBox[{"36", ",", "5"}], "]"}], ",",
    ' @+ b1 Y# p0 E( R: A     RowBox[{"CM", "[", 2 x  R' d' V* t2 Y" m7 H/ l+ L
          RowBox[{"36", ",", "6"}], "]"}], ",", ; O: k; r% _- |6 V8 `4 H9 p/ K# G
         RowBox[{"CM", "[", 1 v, k, j( s1 f+ u+ e1 ^8 P" V
          RowBox[{"36", ",", "7"}], "]"}], ",", 5 ], Y* R# W, L5 R* V/ e' e$ F/ u
         RowBox[{"CM", "[",
    0 \5 D- S5 Z( s) j- |      RowBox[{"36", ",", "8"}], "]"}], ",", ' P8 K) ^" E+ @. o
         RowBox[{"CM", "[", + r' {/ g$ t, v; X: l+ |& s" v' G0 Y
          RowBox[{"36", ",", "9"}], "]"}]}], "}"}], ",",
    5 Y/ w: `  m1 A9 B- G) I# f   RowBox[{"{",
    : P+ P' ~3 H" I# r8 `8 I' H) \    RowBox[{( a& w+ ^1 b* o9 |$ U3 l' ^5 @
         RowBox[{"CM", "[",
    ( `* S( L' Q0 M( |      RowBox[{"37", ",", "1"}], "]"}], ",", + s2 F+ N% k2 V- t9 k6 M
         RowBox[{"CM", "[", 9 w6 e) @; X! r0 ^
          RowBox[{"37", ",", "2"}], "]"}], ",",
    ' }; X; r: f, F     RowBox[{"CM", "[",
    ( a6 }" @8 G4 X1 [/ J1 U      RowBox[{"37", ",", "3"}], "]"}], ",", - @  b1 L  A8 G3 {7 j
         RowBox[{"CM", "[", 1 r9 }, [8 l" W8 Z5 |9 [
          RowBox[{"37", ",", "4"}], "]"}], ",",
    + n4 ?! w! G: W: u, U+ V4 B     RowBox[{"CM", "[", ! `. e9 r, x7 k$ I
          RowBox[{"37", ",", "5"}], "]"}], ",", 4 {+ N) _4 c8 w! V  G) B, N/ L
         RowBox[{"CM", "[", ' l2 ^" c& s* _& v4 u
          RowBox[{"37", ",", "6"}], "]"}], ",", & c( y( y, I2 m3 n
         RowBox[{"CM", "[",
      o! v* D  x' t      RowBox[{"37", ",", "7"}], "]"}], ",",
    8 s0 U! P) E. K! @/ t, I     RowBox[{"CM", "[", 8 @! n" _; J. Q; J6 J& j
          RowBox[{"37", ",", "8"}], "]"}], ",", % O8 q, f4 G- G, ~8 F! o
         RowBox[{"CM", "[", 6 `' |! e* ?9 ]2 S
          RowBox[{"37", ",", "9"}], "]"}]}], "}"}], ",",
    $ i; |! ]+ c' j: k0 h4 t  e! N   RowBox[{"{",
    0 E, ~; O4 S' A. H8 C    RowBox[{- v! T8 s7 {5 o# x
         RowBox[{"CM", "[",   ?) }' t: a8 V
          RowBox[{"38", ",", "1"}], "]"}], ",", + A0 O- T; F+ \  Z: n2 @3 c
         RowBox[{"CM", "[", 2 q+ M( x" u/ P; k3 i" v
          RowBox[{"38", ",", "2"}], "]"}], ",", 9 d  `" p' H& }3 D4 j1 Y
         RowBox[{"CM", "[",
    : c- [9 A- k5 \* m      RowBox[{"38", ",", "3"}], "]"}], ",",
    # u8 {' I. c2 y4 \1 t" M/ k     RowBox[{"CM", "[",
    % ?) l4 S4 H, B. y      RowBox[{"38", ",", "4"}], "]"}], ",",
    / s# ?- D" E( l6 R" K% k     RowBox[{"CM", "[", , Q" l! A$ q* J
          RowBox[{"38", ",", "5"}], "]"}], ",", : |, H# D& w* _9 _0 t5 m
         RowBox[{"CM", "[", * c) c* U4 B( d2 g' p
          RowBox[{"38", ",", "6"}], "]"}], ",", $ E5 s/ K  ~9 ~9 n; c/ @
         RowBox[{"CM", "[",
    - X2 M4 S$ W6 b$ l      RowBox[{"38", ",", "7"}], "]"}], ",",
    7 P# o2 Q7 G3 B: B5 B     RowBox[{"CM", "[", 9 a% j+ j& H( W: a, P4 C# r
          RowBox[{"38", ",", "8"}], "]"}], ",",
    # ~5 i: P2 m) R     RowBox[{"CM", "[",
    2 w; d* W" m- U( N# S+ p      RowBox[{"38", ",", "9"}], "]"}]}], "}"}], ",", 4 e, d) _! b4 P# ^( M9 B- E( e
       RowBox[{"{",
    8 z- `( x% K  J) B' X9 T$ Y% t4 f% B, T    RowBox[{
    : m: `* O* ]( ~     RowBox[{"CM", "[", 6 V* F/ X0 i8 q1 n
          RowBox[{"39", ",", "1"}], "]"}], ",", % N6 C- i' z# l( r6 o
         RowBox[{"CM", "[",
    + M6 A) s- J6 ^, C9 X      RowBox[{"39", ",", "2"}], "]"}], ",", " N' ~; V3 J1 i! g: n" {& C$ X
         RowBox[{"CM", "[",   ?3 r3 `- A  ?  \
          RowBox[{"39", ",", "3"}], "]"}], ",",
    + }3 V% v4 z, ~" x     RowBox[{"CM", "[", 1 p5 G- O1 p5 Q7 {$ e2 j
          RowBox[{"39", ",", "4"}], "]"}], ",",
    - K7 y* m$ ^1 A: `2 x9 r$ y     RowBox[{"CM", "[", : i/ P. l8 U& j; F5 V0 o4 Q
          RowBox[{"39", ",", "5"}], "]"}], ",",
    1 p$ b. m& C3 H" |2 N     RowBox[{"CM", "[",
    9 B) i( N  }7 a      RowBox[{"39", ",", "6"}], "]"}], ",", 5 W# ?; p4 I8 ?3 T" ]1 o1 p
         RowBox[{"CM", "[",
    & m  d* Z; R5 j* k( X* l% u      RowBox[{"39", ",", "7"}], "]"}], ",",
    1 U* b6 }5 z- A3 r' y. X     RowBox[{"CM", "[", ) ?9 {$ S% U4 J+ t2 v# {
          RowBox[{"39", ",", "8"}], "]"}], ",", 9 F* ^) m3 u5 B9 T: {) j/ D
         RowBox[{"CM", "[",
    - T7 Y3 [$ m* ]% T      RowBox[{"39", ",", "9"}], "]"}]}], "}"}], ",",
    ' F5 Z+ n1 g1 M5 B0 [  ~   RowBox[{"{", ' y9 ^1 M" b- d4 ~+ b6 k: \2 ~  J
        RowBox[{
    3 Q; n# f2 u! Z, o& a8 Z/ d     RowBox[{"CM", "[",
    , T, D; a& s* q. W      RowBox[{"40", ",", "1"}], "]"}], ",",
    1 i4 c/ |' Z; Y4 P. U     RowBox[{"CM", "[", ( q, V8 U, j. g% J, S& a
          RowBox[{"40", ",", "2"}], "]"}], ",",
    # x+ m* V* n# F; \% U! S" z# m& b4 V     RowBox[{"CM", "[",
    : ~5 p: r6 g8 g9 s' o9 `; R      RowBox[{"40", ",", "3"}], "]"}], ",",
    + |/ A( j: m5 p" a# v$ C" U) Z4 m$ V! U     RowBox[{"CM", "[",
    9 n4 o' h2 @  D# k$ ~      RowBox[{"40", ",", "4"}], "]"}], ",",
    7 s* Z4 Q$ ]0 q0 {( X$ R, I3 ^     RowBox[{"CM", "[",
    . h: E( Z& V- q" Q. f* t& V      RowBox[{"40", ",", "5"}], "]"}], ",", - N- R, ~. J" v( I  R
         RowBox[{"CM", "[",
    2 ]0 O4 r+ X5 V. |      RowBox[{"40", ",", "6"}], "]"}], ",",
    # w$ `  J& @: f# F$ W9 ~     RowBox[{"CM", "[", 2 G" o5 n3 }% w+ `" U
          RowBox[{"40", ",", "7"}], "]"}], ",",   ]3 |8 H8 ?+ z6 D; d. L
         RowBox[{"CM", "[",
    # D0 X2 o+ |! }      RowBox[{"40", ",", "8"}], "]"}], ",", $ U% `8 [- }; z
         RowBox[{"CM", "[",
    % j: w* T! f% C6 ?/ t+ i      RowBox[{"40", ",", "9"}], "]"}]}], "}"}], ",", + u( @5 m! X$ H1 W/ U) {& x
       RowBox[{"{",
    - U: K% m8 q( X/ m( r7 Y7 x# q1 `    RowBox[{
    ! w9 `( d$ p. p3 c3 A! E) ]     RowBox[{"CM", "[", - k+ ~+ a. z2 B
          RowBox[{"41", ",", "1"}], "]"}], ",", 3 C/ F4 Y3 s6 Q
         RowBox[{"CM", "[", ( x7 ]! z$ I8 f3 e4 O
          RowBox[{"41", ",", "2"}], "]"}], ",", $ f& P# p: a5 J3 [; s7 r- k
         RowBox[{"CM", "[",
    ' b+ {7 o. {/ q- ^      RowBox[{"41", ",", "3"}], "]"}], ",", ; t5 k$ n9 r* \. d, z
         RowBox[{"CM", "[", 3 M0 V+ n% K* [" ]
          RowBox[{"41", ",", "4"}], "]"}], ",",
    ' h: K7 }- K  i! O     RowBox[{"CM", "[", ' m' X( T3 l8 D2 \2 r& T" i  o
          RowBox[{"41", ",", "5"}], "]"}], ",", 3 G2 G* y  N/ ^
         RowBox[{"CM", "[", " o* y9 p+ T( z
          RowBox[{"41", ",", "6"}], "]"}], ",",
    ! ~4 y' A8 W& J  u" Y( C; O     RowBox[{"CM", "[", 9 t6 V& E+ u. M# l1 G2 H' I# N
          RowBox[{"41", ",", "7"}], "]"}], ",", 6 u! b* h' _! ^1 I- K( g: g3 |
         RowBox[{"CM", "[", 4 _9 c$ y1 m- M$ U+ T- p; H; M
          RowBox[{"41", ",", "8"}], "]"}], ",", " a% U. w# ]8 v: r, i- W0 s4 f1 e
         RowBox[{"CM", "[", 3 _  Y+ k- B% I( T' a% `
          RowBox[{"41", ",", "9"}], "]"}]}], "}"}], ",",
    ; P& \) Z- p, J' i6 V   RowBox[{"{", 1 C* U3 s0 I4 [9 k
        RowBox[{5 [1 q! n" Y/ o; f' g( W1 \  v
         RowBox[{"CM", "[",
    ) o7 r) {" o3 f8 [      RowBox[{"42", ",", "1"}], "]"}], ",",
    9 P* t5 y8 ^0 S6 |2 |: L+ h  T2 n     RowBox[{"CM", "[",
    " Q6 t) o9 t% {  F+ N      RowBox[{"42", ",", "2"}], "]"}], ",", ' Y7 ?, G7 C/ u' h
         RowBox[{"CM", "[", ; T; y  s6 X* ~5 r4 x1 l- N9 U# v4 G( m
          RowBox[{"42", ",", "3"}], "]"}], ",", ; d5 W: M7 e& U& R- m
         RowBox[{"CM", "[", ; ?# O- J- O+ ^' Y  H) K9 ?4 n* g
          RowBox[{"42", ",", "4"}], "]"}], ",",
    # d  z5 d# T1 _% @" M/ @& ]     RowBox[{"CM", "[", 0 U5 J+ L" b% I* M2 u, I$ K" O5 u8 r6 Y
          RowBox[{"42", ",", "5"}], "]"}], ",",
    ' I8 W7 M) z* `& j% A     RowBox[{"CM", "[", 5 z$ p$ q: L( X9 t
          RowBox[{"42", ",", "6"}], "]"}], ",",
    % b4 N' t% x8 p' v( g5 t     RowBox[{"CM", "[",
    ! @; Y$ E* K; u( J- g( [9 f1 f      RowBox[{"42", ",", "7"}], "]"}], ",", # d$ c  H' Q& D; D
         RowBox[{"CM", "[", . r9 @0 b0 \+ H1 L; B2 [) w
          RowBox[{"42", ",", "8"}], "]"}], ",", * C' h- n8 O- q/ S% B: Z7 _3 b+ r
         RowBox[{"CM", "[",
    9 ^! Y( n: _8 j! U3 N      RowBox[{"42", ",", "9"}], "]"}]}], "}"}], ",",
    1 ?' @! z+ ~; I" m) v   RowBox[{"{",
    $ Y' B) Y' c8 M* q0 m, _8 Z; k. j    RowBox[{9 V0 K* E" \: V
         RowBox[{"CM", "[",
    1 p1 x+ @* t) ]/ }      RowBox[{"43", ",", "1"}], "]"}], ",", 8 l, D% t- J1 q8 Z/ w
         RowBox[{"CM", "[", 0 n& d( R0 ]  I0 N' U$ K
          RowBox[{"43", ",", "2"}], "]"}], ",",
    4 H" {; U' }' E/ r$ ~5 g% R3 m$ |4 {     RowBox[{"CM", "[",
    : u' Y8 A; Z2 b8 H( c      RowBox[{"43", ",", "3"}], "]"}], ",",
    9 P6 _( l+ I) o     RowBox[{"CM", "[",
    9 b$ ], {; u4 R      RowBox[{"43", ",", "4"}], "]"}], ",",
    % ~% U  E- `4 A0 K/ p     RowBox[{"CM", "[",
    0 h. x& t. Z1 }( @8 `. p      RowBox[{"43", ",", "5"}], "]"}], ",", 0 Z1 `) B7 Z4 m2 \7 K5 o
         RowBox[{"CM", "[", " Z, P3 [5 a; {8 v; j6 l
          RowBox[{"43", ",", "6"}], "]"}], ",", 5 N; a5 C  j6 J5 w
         RowBox[{"CM", "[", % G2 [/ ]+ n2 E: s
          RowBox[{"43", ",", "7"}], "]"}], ",",
    2 h- L# f1 [/ c7 E     RowBox[{"CM", "[", $ Q( @- r5 n/ z: J
          RowBox[{"43", ",", "8"}], "]"}], ",",
    1 c3 A% C+ f( T7 F* r  Q1 p     RowBox[{"CM", "[", 0 P6 {- h& s0 i4 e5 y7 Z. R
          RowBox[{"43", ",", "9"}], "]"}]}], "}"}], ",",
    ) L2 I5 d* L7 c0 e$ H. Y5 T4 W+ k" g   RowBox[{"{", * K; M% `, _% K! T  n" P
        RowBox[{
    ) J! y- \) n$ P) ^# p     RowBox[{"CM", "[", ) f8 N) O0 U: s) d
          RowBox[{"44", ",", "1"}], "]"}], ",",
    , ]! U8 l6 H; J5 e# c     RowBox[{"CM", "[", % q+ Z! r' N3 s1 O. f6 l4 N
          RowBox[{"44", ",", "2"}], "]"}], ",",
    7 v0 c; K2 _% f4 T) {! P     RowBox[{"CM", "[",
    9 M4 D6 V4 A+ j9 `; f      RowBox[{"44", ",", "3"}], "]"}], ",",
    8 F, y7 A, Z/ }  F$ n; N% ~4 i     RowBox[{"CM", "[", ' P' K3 W4 ~1 P& |
          RowBox[{"44", ",", "4"}], "]"}], ",",
    * u+ L, s! F) k6 w) K% ^; N. e     RowBox[{"CM", "[",
    . ?* i4 E4 v5 M7 K0 k      RowBox[{"44", ",", "5"}], "]"}], ",", ; q  e" J& M. F
         RowBox[{"CM", "[",
    / r( `  M; i; n* I2 ^: @4 @4 |" i      RowBox[{"44", ",", "6"}], "]"}], ",",
    ! j) v* V: T, |5 N     RowBox[{"CM", "[",
    1 S1 W2 G" k) H* ?- K      RowBox[{"44", ",", "7"}], "]"}], ",",
    . w! k  i3 R% `6 }8 w     RowBox[{"CM", "[",
    3 [3 c; j: h( s3 q0 k. q      RowBox[{"44", ",", "8"}], "]"}], ",",   L! @2 F  A: ]3 ?3 p% g
         RowBox[{"CM", "[", " W3 [1 a" X5 }( v
          RowBox[{"44", ",", "9"}], "]"}]}], "}"}], ",",
    ' J" L6 ?. \$ z" b   RowBox[{"{",
    2 J& C8 S0 @' p2 u" x    RowBox[{( b# Q& V" z  S$ Q0 N
         RowBox[{"CM", "[",
    ' _* d+ i( p8 e0 Z- A. t      RowBox[{"45", ",", "1"}], "]"}], ",", # ?  P% E( S. e2 @
         RowBox[{"CM", "[", ! D/ F0 Y* S/ |
          RowBox[{"45", ",", "2"}], "]"}], ",",
    & K# N- F! o- y# e% u- Y0 @     RowBox[{"CM", "[",
    $ R# G  Q$ v1 H      RowBox[{"45", ",", "3"}], "]"}], ",",
    , }, U9 l9 v, X, R$ v     RowBox[{"CM", "[", 5 b/ T3 }4 m1 {
          RowBox[{"45", ",", "4"}], "]"}], ",",
    / v& C/ k/ |  p8 |0 c; Q, K     RowBox[{"CM", "[", + G+ d' Z2 ]9 _/ H& O0 P2 r2 f- h
          RowBox[{"45", ",", "5"}], "]"}], ",",
    8 Z/ r* L7 F6 ]* P5 m- j5 N     RowBox[{"CM", "[", 9 _- U, b3 h  m
          RowBox[{"45", ",", "6"}], "]"}], ",",
    / A- b3 i3 }* G$ Y     RowBox[{"CM", "[",
    7 U+ |9 c' O$ @2 K) i9 [1 f      RowBox[{"45", ",", "7"}], "]"}], ",", & D2 k% o5 U, t$ D
         RowBox[{"CM", "[", 9 k; @3 O. v) R  G" B
          RowBox[{"45", ",", "8"}], "]"}], ",", , D8 p) X, d! E0 j9 {1 U
         RowBox[{"CM", "[",
      @; R  ^$ q% Y' ^! C) f      RowBox[{"45", ",", "9"}], "]"}]}], "}"}], ",",
    # O$ k$ \1 o7 h0 C1 N   RowBox[{"{",
    # o1 l9 H* ?. l3 c* D    RowBox[{+ @4 Y+ Z' M: q# B2 [
         RowBox[{"CM", "[", $ k% [& R( V6 x9 u% D0 }+ `0 Z
          RowBox[{"46", ",", "1"}], "]"}], ",", 7 Z! N1 Q/ B  \, H) J+ V" J0 u
         RowBox[{"CM", "[",
    ( g) G" ]$ q0 ~, A      RowBox[{"46", ",", "2"}], "]"}], ",",   r9 l" _. P6 ~9 h5 I% }
         RowBox[{"CM", "[", 9 d8 M$ [* I2 o/ ]& ?6 I( K+ W
          RowBox[{"46", ",", "3"}], "]"}], ",", ) L) c6 r, M* j! ~
         RowBox[{"CM", "[", 6 _; ?: y* o+ v6 d
          RowBox[{"46", ",", "4"}], "]"}], ",", 4 i' F' v$ |- r4 O, N/ j+ X
         RowBox[{"CM", "[",
    " F" Z) q. e. L  k+ Y4 _      RowBox[{"46", ",", "5"}], "]"}], ",",
    8 J" h( ]7 B0 _* F: w+ O     RowBox[{"CM", "[",
    $ R- b8 R- k6 }# l) O* K: U      RowBox[{"46", ",", "6"}], "]"}], ",", 4 k5 Z% b2 h6 e% a
         RowBox[{"CM", "[",
    4 u5 c8 D/ ^3 b% `; X      RowBox[{"46", ",", "7"}], "]"}], ",",
    . ~! Z" y) Y3 Q* E4 g     RowBox[{"CM", "[", 0 q# j/ W! p; d3 w: K& X
          RowBox[{"46", ",", "8"}], "]"}], ",",
    ( c# a" O2 N1 b( E     RowBox[{"CM", "[", 9 b4 p/ I* t  q
          RowBox[{"46", ",", "9"}], "]"}]}], "}"}], ",", 3 Y  P9 x2 I/ T, {$ I) j( F
       RowBox[{"{", 9 O! J4 A6 Y: e& N# x. D+ q
        RowBox[{1 E/ Z  S- V8 ]' u) i( d/ J
         RowBox[{"CM", "[", 8 f4 L2 v3 l+ M* F* ~
          RowBox[{"47", ",", "1"}], "]"}], ",",
    0 |6 m8 T. B9 c5 q% S6 I. i5 P  w     RowBox[{"CM", "[",
    : e0 K- D$ J' W      RowBox[{"47", ",", "2"}], "]"}], ",", 9 s4 F7 R$ K, F# c5 t( ]
         RowBox[{"CM", "[", + u+ i7 q3 ]- r5 a8 ~" v
          RowBox[{"47", ",", "3"}], "]"}], ",",
    + s9 [. W& n. ?$ G) }- K  _. d     RowBox[{"CM", "[", & |7 u2 n8 W  f% @" w7 n
          RowBox[{"47", ",", "4"}], "]"}], ",",
      j1 n6 z9 ]9 o+ J, `( H     RowBox[{"CM", "[",
    ; @" {8 B" F  F0 F( g7 H" U      RowBox[{"47", ",", "5"}], "]"}], ",",
    / n6 ~7 G  _" [     RowBox[{"CM", "[", - f) D/ G) _$ O) p
          RowBox[{"47", ",", "6"}], "]"}], ",",
    4 h. ?- z) c: y* O1 u* V     RowBox[{"CM", "[", 0 F( y# T9 M& I0 O! ~7 V0 I
          RowBox[{"47", ",", "7"}], "]"}], ",", 5 K6 q) E$ G( k9 y
         RowBox[{"CM", "[", 8 p# o8 S+ b* V* h8 L: G' D
          RowBox[{"47", ",", "8"}], "]"}], ",",
    - R- f( D& z8 e% [( F, l     RowBox[{"CM", "[", 7 V+ Q6 j" C; g) Q8 m
          RowBox[{"47", ",", "9"}], "]"}]}], "}"}], ",", $ O3 F" i6 h! q: q; x  m
       RowBox[{"{", ) p# o$ A9 g, v% t
        RowBox[{
    ! \9 Z# \3 l/ j  |8 K! Z     RowBox[{"CM", "[", 6 C, ~5 u% f9 R& \% h% c* u
          RowBox[{"48", ",", "1"}], "]"}], ",", 4 Q9 `7 U  {4 y5 @+ V
         RowBox[{"CM", "[",
    8 O5 S7 G- R1 X- X      RowBox[{"48", ",", "2"}], "]"}], ",",
    8 ?' M& O" G  m& o+ x5 s1 l5 C     RowBox[{"CM", "[",
    ' X& ~2 ?! ^3 J2 {/ G" `      RowBox[{"48", ",", "3"}], "]"}], ",",
    / G2 O7 g8 J) H" L. e: J     RowBox[{"CM", "[", : J) p& z6 |6 K( p$ [3 F# I# e
          RowBox[{"48", ",", "4"}], "]"}], ",", * d9 T( f4 ?# M  @
         RowBox[{"CM", "[", 4 p- h& D; [; U. F, }( r
          RowBox[{"48", ",", "5"}], "]"}], ",",
    2 l3 N- R5 B5 `+ o     RowBox[{"CM", "[",
    : k; U$ g* M  T$ G; T      RowBox[{"48", ",", "6"}], "]"}], ",",
    # e, Y: v, I  t; U9 y     RowBox[{"CM", "[",
    % [' j7 D8 o1 o1 e" f      RowBox[{"48", ",", "7"}], "]"}], ",", 3 ?5 ?1 P7 P" T' D# c. \) c
         RowBox[{"CM", "[", 7 S3 j3 ]3 N- a" g/ e/ ?7 L
          RowBox[{"48", ",", "8"}], "]"}], ",",
    - ?5 W; f/ F& B& f( d' W7 J     RowBox[{"CM", "[",
    ! S/ P- l; a! }9 g      RowBox[{"48", ",", "9"}], "]"}]}], "}"}], ",",
    * }9 L' g. n, J; i' E) t/ b   RowBox[{"{", 8 g3 N' A2 o9 u2 l8 J& t, i
        RowBox[{
    7 G2 ?7 X) K, l, I$ _; j+ J     RowBox[{"CM", "[",
    ( O" l4 Q$ b- m9 P1 q      RowBox[{"49", ",", "1"}], "]"}], ",",
    4 G# G  v& [" o8 E2 E     RowBox[{"CM", "[",
    , J+ I1 h- E8 r) K/ ^- M      RowBox[{"49", ",", "2"}], "]"}], ",", - K( o- h2 o6 g1 X+ X' B. _' V
         RowBox[{"CM", "[", " i4 g# r) e8 {9 \/ x. {
          RowBox[{"49", ",", "3"}], "]"}], ",",
    & W) P4 ~) S* x8 ^     RowBox[{"CM", "[", : w$ A, ~5 |8 z
          RowBox[{"49", ",", "4"}], "]"}], ",",
    2 c3 H! V, w3 K: [! q( Z8 r. o     RowBox[{"CM", "[", ( B0 _! ~  }1 z5 E! U  Z+ [" V
          RowBox[{"49", ",", "5"}], "]"}], ",", ; o% A: l- L& c4 ^# T- C5 |1 ~$ A
         RowBox[{"CM", "[",
    0 A* U( I% {( [# R. W" k6 }      RowBox[{"49", ",", "6"}], "]"}], ",", , l& x3 K& O* S) P5 d
         RowBox[{"CM", "[", + z/ W( V  r3 j9 {" A" q
          RowBox[{"49", ",", "7"}], "]"}], ",",
    - ^' x7 `+ [4 E6 C$ H3 \     RowBox[{"CM", "[",
    . c* I1 K9 q8 i; b( e  `8 F      RowBox[{"49", ",", "8"}], "]"}], ",",
      P- a" L+ Z: q2 d+ k     RowBox[{"CM", "[", : @, e/ P8 c! F) `; D1 A8 M5 L
          RowBox[{"49", ",", "9"}], "]"}]}], "}"}], ",", 0 a; u) V# m5 f; l: e
       RowBox[{"{",
    ; m# E9 r" w- G# E" [! G    RowBox[{
    7 U- A7 ?9 u! \+ h$ u; }     RowBox[{"CM", "[",
    ; G0 }3 U( X' I$ \* }, v      RowBox[{"50", ",", "1"}], "]"}], ",", 1 k: w) H# S5 N, G& p2 ^* o
         RowBox[{"CM", "[",
      b0 u3 j* P, M9 l9 \/ Q      RowBox[{"50", ",", "2"}], "]"}], ",",   `) T; g6 A3 L- O5 k0 q
         RowBox[{"CM", "[",
    7 y4 X& y+ `- }$ V& s$ }# J# @      RowBox[{"50", ",", "3"}], "]"}], ",",
    - C( O3 Y. V' T$ o3 _, I& f     RowBox[{"CM", "[", ) L3 L7 l( B) z6 M
          RowBox[{"50", ",", "4"}], "]"}], ",", : X2 r' j9 `$ T/ w. n
         RowBox[{"CM", "[", 8 c9 n( k! Y) f, `' P- O
          RowBox[{"50", ",", "5"}], "]"}], ",", / T" K/ R6 g% g/ Y9 r  H0 S4 f2 L1 Z
         RowBox[{"CM", "[",
    9 B0 [# A5 c6 ~( f      RowBox[{"50", ",", "6"}], "]"}], ",", ! l" E) v. s2 Q  s7 M' S
         RowBox[{"CM", "[",
    ( h% J4 e; f+ \$ B( u% n      RowBox[{"50", ",", "7"}], "]"}], ",", 6 A- B; R) M0 C( |# _0 T* R
         RowBox[{"CM", "[",   n) m+ i0 L8 {: e0 Q5 w
          RowBox[{"50", ",", "8"}], "]"}], ",", ! \+ Z. ?/ G$ m' ^& R
         RowBox[{"CM", "[", / `  r8 g* A# K  X
          RowBox[{"50", ",", "9"}], "]"}]}], "}"}], ",",
    % B# Q+ A' j) `/ H& K4 m   RowBox[{"{", + P8 {( e: B; W2 L5 u
        RowBox[{
    2 D" }: z' z6 Q: Z/ m& T! ?     RowBox[{"CM", "[",
    # M0 ~6 T3 \6 x      RowBox[{"51", ",", "1"}], "]"}], ",", * m! ]% k3 T' `( d& L; s6 X
         RowBox[{"CM", "[",
    0 \3 n2 a% J1 x& f      RowBox[{"51", ",", "2"}], "]"}], ",", / V* |2 ^. R) |( ^- Q2 Y  ^
         RowBox[{"CM", "[", ! G! C: l6 N& @& K
          RowBox[{"51", ",", "3"}], "]"}], ",", ' L" H6 M2 m4 ]* r
         RowBox[{"CM", "[",
    # u2 p5 ^3 k/ l6 m; d" U      RowBox[{"51", ",", "4"}], "]"}], ",", ) u' u. m8 T2 W' C( _0 \/ Z# m
         RowBox[{"CM", "[", 1 G% z6 V! e$ J( p5 h3 n* _+ ^
          RowBox[{"51", ",", "5"}], "]"}], ",",
    # [6 Z* w4 p% \( W. M     RowBox[{"CM", "[", # P$ p# [( [: q. L
          RowBox[{"51", ",", "6"}], "]"}], ",",
    0 }' b- P, }& k/ U8 t" Z     RowBox[{"CM", "[", + _& e# {/ Q* L  F1 o# t% t" u1 m  ]
          RowBox[{"51", ",", "7"}], "]"}], ",", ( R! ^/ e& A; A- i* Y* b
         RowBox[{"CM", "[",
    ( Q+ e+ x  N7 j6 A7 k; A, g      RowBox[{"51", ",", "8"}], "]"}], ",",
    1 B* a- g( b& ?5 X     RowBox[{"CM", "[",
    % r5 d  M( W2 H6 m8 B0 c6 G8 y" g2 A) b      RowBox[{"51", ",", "9"}], "]"}]}], "}"}], ",",
    4 e8 ]; `5 A0 [4 W   RowBox[{"{",
    + h! L: @7 H  J    RowBox[{% c& {! j5 o3 @' j
         RowBox[{"CM", "[", 5 e0 g0 a1 b8 b. ]
          RowBox[{"52", ",", "1"}], "]"}], ",",
    ! c6 u9 V/ O; q- B     RowBox[{"CM", "[", - u# R5 f' H, N' c
          RowBox[{"52", ",", "2"}], "]"}], ",",
    : i7 K; `* \$ {' I8 `     RowBox[{"CM", "[",   t- G  t- N7 ], V
          RowBox[{"52", ",", "3"}], "]"}], ",", 8 `. Q2 W( E1 Q& v* ?
         RowBox[{"CM", "[", : o9 r( M% N8 a' e6 n
          RowBox[{"52", ",", "4"}], "]"}], ",", ' P5 R0 t9 D" x( n
         RowBox[{"CM", "[",
    * A: E% |. s& [  U$ q* m& s1 n      RowBox[{"52", ",", "5"}], "]"}], ",", ' @: F! @6 x7 }, f2 Z
         RowBox[{"CM", "[",
    ' ~6 d0 ]0 g! o+ {# K+ M: F      RowBox[{"52", ",", "6"}], "]"}], ",",
      J0 W4 K$ E4 E9 t" \! B     RowBox[{"CM", "[",
    ; c7 s6 s1 y* y1 y; c5 F( m( ?      RowBox[{"52", ",", "7"}], "]"}], ",",
    : @6 ^# i' h5 K' C! X     RowBox[{"CM", "[", - H: J' X- J9 D0 e8 l4 d$ Z
          RowBox[{"52", ",", "8"}], "]"}], ",", ) e, C; T! c& e# m- F' Y5 `
         RowBox[{"CM", "[", & w  g+ X0 X0 Z3 z  H
          RowBox[{"52", ",", "9"}], "]"}]}], "}"}], ",", ! L4 @3 K4 b% v0 f- r
       RowBox[{"{", 7 D! c7 W! F9 J8 X! ]* X' Q  t
        RowBox[{
    ; j2 `( U3 [* a     RowBox[{"CM", "[", 7 \3 V4 W' t( G9 o7 ^
          RowBox[{"53", ",", "1"}], "]"}], ",",
    4 s3 \9 H2 t' z/ I/ `. {% x- K     RowBox[{"CM", "[",
    # m0 z- U% F: @  g, d' C1 ^      RowBox[{"53", ",", "2"}], "]"}], ",", 0 W3 O7 K) j/ X; u
         RowBox[{"CM", "[",
    $ f. K) ~- q9 `( t" t      RowBox[{"53", ",", "3"}], "]"}], ",", . g$ L) ~) [/ j" `0 l" g1 G* [; s6 g
         RowBox[{"CM", "[",
    9 T" n2 [3 l; }      RowBox[{"53", ",", "4"}], "]"}], ",", - I/ W/ a1 l( E) \0 @
         RowBox[{"CM", "[",
    * y# [$ ~! ]/ a" Q$ d      RowBox[{"53", ",", "5"}], "]"}], ",", 1 ?; A; \- ]& P6 f: H
         RowBox[{"CM", "[", / r! Q+ o" G$ D) o( [: H2 N. x9 T
          RowBox[{"53", ",", "6"}], "]"}], ",",
    4 G) R* p2 U9 V+ k- y7 Y1 b1 o     RowBox[{"CM", "[",
    + w% p% q+ a; [/ x- f/ P% F      RowBox[{"53", ",", "7"}], "]"}], ",",
    ! _) o# I1 h0 s  [! ^7 Z     RowBox[{"CM", "[", 5 r  [, N; D0 _) M
          RowBox[{"53", ",", "8"}], "]"}], ",",
    ' W* V% S4 a3 a* ~9 d& F! h     RowBox[{"CM", "[",
    : I4 S  X* F* ^' i' n9 b* Z  x      RowBox[{"53", ",", "9"}], "]"}]}], "}"}], ",",
    ' h0 C" g9 i% J8 k8 p   RowBox[{"{", 6 }: C- a" D- d& B. Y) @
        RowBox[{9 i% T% u4 o/ h9 d# K& H
         RowBox[{"CM", "[",
    ' P; d8 D$ h! J5 V" y* w2 P6 O2 H      RowBox[{"54", ",", "1"}], "]"}], ",", - J/ c7 y3 k& w0 u0 E1 B2 p
         RowBox[{"CM", "[", 7 C/ F2 u# }6 H, S, k4 V: f' }
          RowBox[{"54", ",", "2"}], "]"}], ",", ) _2 G! {6 T% K0 V6 Y/ y
         RowBox[{"CM", "[", & O3 A7 P: c* }; \8 ~
          RowBox[{"54", ",", "3"}], "]"}], ",", 9 w6 Y, s- o/ V2 e; [
         RowBox[{"CM", "[",
    $ v* F7 U: m: b. ?      RowBox[{"54", ",", "4"}], "]"}], ",",
    1 u# w$ \+ X) C8 Q' n$ `. g     RowBox[{"CM", "[",
    ) ?' H& n0 u7 ^. j/ n      RowBox[{"54", ",", "5"}], "]"}], ",",
    6 O6 Q% X" Q% q8 J$ t( z& V     RowBox[{"CM", "[", , z9 Z3 p; Y$ W, @+ C
          RowBox[{"54", ",", "6"}], "]"}], ",",
    * f( m& S3 H* n2 J( E; T     RowBox[{"CM", "[", * W# I3 h& v/ s. a9 \( i* d
          RowBox[{"54", ",", "7"}], "]"}], ",",
    5 u7 J% \. q) I1 }5 s8 O5 y1 o     RowBox[{"CM", "[", 6 t, O  j& g! H+ l
          RowBox[{"54", ",", "8"}], "]"}], ",",
    0 e7 \3 n) B) U, o2 w& J" {     RowBox[{"CM", "[", $ T  D9 `- d" j" @  Y) i8 E0 |
          RowBox[{"54", ",", "9"}], "]"}]}], "}"}], ",", 0 u' ]* M$ [9 i+ P& K3 Y( q
       RowBox[{"{", + a+ {4 y! [9 k$ Z
        RowBox[{
    3 ~( _1 X; w- x     RowBox[{"CM", "[",
    ) T0 _/ B6 ~  e/ o6 ?: h) N      RowBox[{"55", ",", "1"}], "]"}], ",", - j6 _2 p0 i, }. n8 j
         RowBox[{"CM", "[", : T/ Q$ S: F# M+ i
          RowBox[{"55", ",", "2"}], "]"}], ",", ) q' ?4 m: }6 S; j  [
         RowBox[{"CM", "[",
    5 ~2 D" Y; k6 j0 {      RowBox[{"55", ",", "3"}], "]"}], ",",
    " J+ }4 f9 U% F2 ]/ P$ n. \     RowBox[{"CM", "[",
    6 |! e5 t+ Y5 T$ @3 y2 Y      RowBox[{"55", ",", "4"}], "]"}], ",",
    # b( ]* b2 A+ h" u. `) ^3 @3 _     RowBox[{"CM", "[", % i! n! _- \$ K/ ~! i
          RowBox[{"55", ",", "5"}], "]"}], ",", ' L( C" ?2 |; O  ^. j
         RowBox[{"CM", "[", - u" ]8 J5 w6 u- q* f
          RowBox[{"55", ",", "6"}], "]"}], ",", . x5 V$ m; O  _% C3 ?8 S
         RowBox[{"CM", "[", # f2 V' J; W. M5 _3 V" p: X# A" b* ?
          RowBox[{"55", ",", "7"}], "]"}], ",", : K; ^6 W+ e% y. F
         RowBox[{"CM", "[",
    9 a5 j6 P8 b4 X/ }( q8 H2 q      RowBox[{"55", ",", "8"}], "]"}], ",",
    4 v$ E6 M4 I. c# ~0 }8 f2 a     RowBox[{"CM", "[",
    . V( [- z9 Y0 O* p      RowBox[{"55", ",", "9"}], "]"}]}], "}"}], ",",
    0 c# f" d1 g% `  F7 d& T   RowBox[{"{", 4 Y; r7 w4 K- H
        RowBox[{; q; z% s8 s( l
         RowBox[{"CM", "[",
    # a4 Y9 B/ Q, \- p      RowBox[{"56", ",", "1"}], "]"}], ",",
    5 R+ q! J$ y2 ?, g4 T+ L     RowBox[{"CM", "[", 1 k$ Z2 u1 [% k/ V; Y2 U
          RowBox[{"56", ",", "2"}], "]"}], ",",
    7 J% y& y( R4 J, C     RowBox[{"CM", "[", 8 J+ B4 [1 A' _, l" C4 Z
          RowBox[{"56", ",", "3"}], "]"}], ",", - l- N9 q8 Y+ p# P: _+ R
         RowBox[{"CM", "[",
    # L* i: q  u& r      RowBox[{"56", ",", "4"}], "]"}], ",", 4 p7 j2 ^" {9 Y) X4 m1 [$ D: o
         RowBox[{"CM", "[",
    5 N* q" N/ q/ o1 Z, H+ ]      RowBox[{"56", ",", "5"}], "]"}], ",", , p0 W( ~8 q1 k
         RowBox[{"CM", "[", 4 N/ S$ u- s: `7 r* G
          RowBox[{"56", ",", "6"}], "]"}], ",",
    9 I4 O9 }" h& X2 Z     RowBox[{"CM", "[", # u  U; P/ D' m/ f+ \$ X
          RowBox[{"56", ",", "7"}], "]"}], ",", 4 V- V9 t' ~: k8 h
         RowBox[{"CM", "[", . @  e( U3 D. G6 Y
          RowBox[{"56", ",", "8"}], "]"}], ",",
    ; ?) z. k) X! E) }( L8 C( e5 l( o     RowBox[{"CM", "[",
    & e- y9 O/ c2 W3 n; M* ~      RowBox[{"56", ",", "9"}], "]"}]}], "}"}], ",",
    & C- D  q0 X5 r   RowBox[{"{", & I5 N: V' ]# i, o4 n; G. q
        RowBox[{+ z& a0 Q6 \; B% z2 {6 J8 |
         RowBox[{"CM", "[",
    % ]4 \1 W% ]! A% f8 O& t9 S      RowBox[{"57", ",", "1"}], "]"}], ",",
    7 p3 q3 z; h; V4 M) V6 B; v& I6 T) X: m     RowBox[{"CM", "[", 8 b( X# i( r. b5 ^
          RowBox[{"57", ",", "2"}], "]"}], ",",
      K+ v( D) E9 w+ }& k# R, {4 h     RowBox[{"CM", "[", / J& ?" c* ~) d( g5 L
          RowBox[{"57", ",", "3"}], "]"}], ",",
      I3 }- ^8 ~% [- p' `2 s% J     RowBox[{"CM", "[", * J9 P- S+ w( K8 W5 u
          RowBox[{"57", ",", "4"}], "]"}], ",", ! ~. P0 b/ \1 t7 c! K
         RowBox[{"CM", "[",
      C1 m: t* a# i; D7 u      RowBox[{"57", ",", "5"}], "]"}], ",",
    " H3 c8 I) f$ F) h& T) K- T0 w. X: C     RowBox[{"CM", "[", 5 x! S$ {* @; j/ I. H5 `/ s
          RowBox[{"57", ",", "6"}], "]"}], ",",
    # }: L9 K: q, \/ h/ t& h1 R+ s     RowBox[{"CM", "[",   K$ T2 v* H* I: u) _" f* _& A* c
          RowBox[{"57", ",", "7"}], "]"}], ",",
    4 ~/ o% S, m" w' ?     RowBox[{"CM", "[",
    8 Y5 M6 `; o" y& d3 H! b9 A      RowBox[{"57", ",", "8"}], "]"}], ",",
    3 D0 E# p2 E! b% H: B     RowBox[{"CM", "[", - {9 P' ]7 r. O1 ?6 h7 q! G3 p) ~
          RowBox[{"57", ",", "9"}], "]"}]}], "}"}], ",",
    ) F, y& X, |- {0 P; F4 {   RowBox[{"{", ( o1 I& f7 |( f/ w* M' D, S
        RowBox[{+ g* V1 ~4 v" g6 P' J
         RowBox[{"CM", "[", 6 D6 s0 O) }+ x( y8 I$ Y+ I0 ]
          RowBox[{"58", ",", "1"}], "]"}], ",", . _! V2 A4 N) j* G) n" v
         RowBox[{"CM", "[", 8 g9 ?8 I* a9 W: U9 \- g. B
          RowBox[{"58", ",", "2"}], "]"}], ",",
    " D2 r! J1 X$ }0 l  w# k& y* t     RowBox[{"CM", "[",
    - |/ i/ M. Q8 {5 t- B0 m      RowBox[{"58", ",", "3"}], "]"}], ",", 7 r- g  e4 S' k) ?% \# v
         RowBox[{"CM", "[",
    8 U0 A( N0 f% {8 v" v; Q$ u      RowBox[{"58", ",", "4"}], "]"}], ",", + p# X# C) k/ c' F" G
         RowBox[{"CM", "[",
    ! r1 U8 q9 N6 ~5 }5 |! b      RowBox[{"58", ",", "5"}], "]"}], ",", 6 e3 d: `1 C# j0 }/ n
         RowBox[{"CM", "[", 1 h2 T6 o6 P6 ]* q6 I
          RowBox[{"58", ",", "6"}], "]"}], ",",
    / b6 ~2 h$ [5 {" }' C     RowBox[{"CM", "[",
    1 t; v* \2 q8 }3 S7 v' h      RowBox[{"58", ",", "7"}], "]"}], ",",
    / e7 j. a# _& C. a) g# b     RowBox[{"CM", "[", : ~9 q% t1 `9 S1 ?, N3 X, @# }
          RowBox[{"58", ",", "8"}], "]"}], ",", / Y( Y; A4 g( V0 l& s" u
         RowBox[{"CM", "[",
    $ K6 C4 i) P+ G, H) T* [4 R      RowBox[{"58", ",", "9"}], "]"}]}], "}"}], ",",
    . m$ W3 i7 L7 B4 Y2 z   RowBox[{"{",
    3 B4 M6 C8 w8 r9 _+ K  U    RowBox[{8 U" }: c  b5 ]; O
         RowBox[{"CM", "[",
    + J5 W9 Y) N$ V, ~9 N  ]6 n/ Z9 c% H9 I5 |      RowBox[{"59", ",", "1"}], "]"}], ",",
    0 O) m! h# `( V+ Y     RowBox[{"CM", "[",
    * O/ o1 i2 N' J6 ~" q% ^$ j      RowBox[{"59", ",", "2"}], "]"}], ",", 0 f. B# Y# _2 t0 Y6 W% L: [
         RowBox[{"CM", "[", . {* G) j* p, z2 ~, z# ?  C! c2 Y
          RowBox[{"59", ",", "3"}], "]"}], ",",
    & D- P) s7 K+ g; e; w( Z3 b% d     RowBox[{"CM", "[",
    & R( K4 |9 H" c3 K! K) T) z: _  Y4 o      RowBox[{"59", ",", "4"}], "]"}], ",", % j0 x7 K; A* i/ M  c+ w9 x; J3 d7 t
         RowBox[{"CM", "[",
    ( s& n+ o7 f: P7 s; {7 L" u$ O      RowBox[{"59", ",", "5"}], "]"}], ",", ; `( Y% _& J% y% M! y
         RowBox[{"CM", "[", - F/ Q, d; j( g# |9 k1 n2 h
          RowBox[{"59", ",", "6"}], "]"}], ",", 6 S3 L6 E2 z' ~) P9 X2 N4 g: F6 \4 S
         RowBox[{"CM", "[", 2 Z* s, ?; w( j4 O1 r* s6 H% W
          RowBox[{"59", ",", "7"}], "]"}], ",", ! Y( P7 I& p# ?2 \8 v0 y
         RowBox[{"CM", "[", 4 X7 Z; m, [; o( N( h
          RowBox[{"59", ",", "8"}], "]"}], ",", # R/ ^5 D- ]' W' H' p% n, ^  T! u
         RowBox[{"CM", "[", 7 w, I- i5 T5 v7 r3 r% u7 p
          RowBox[{"59", ",", "9"}], "]"}]}], "}"}], ",", + u0 R2 M% r! p8 Q9 n* Y  w
       RowBox[{"{",
    ) P) O1 ~' p2 C6 {* z! U- a0 R- X    RowBox[{
    , D9 u8 c  S  ]/ @     RowBox[{"CM", "[",
    7 `( B' m5 Y5 a      RowBox[{"60", ",", "1"}], "]"}], ",",
    0 Q, c/ V+ T8 P5 Z% ]( m9 P     RowBox[{"CM", "[",
    . v+ c0 |! W2 D4 O6 T. l      RowBox[{"60", ",", "2"}], "]"}], ",",
    ! `$ A% U/ i" b# `# D( A     RowBox[{"CM", "[", 6 J4 K( g* S7 O! r* ~& h
          RowBox[{"60", ",", "3"}], "]"}], ",", 2 d( F! T  _7 ^' m: t+ R
         RowBox[{"CM", "[", * \! l$ d; s4 @1 V
          RowBox[{"60", ",", "4"}], "]"}], ",", 4 \8 o2 P: j2 _- A& \# {
         RowBox[{"CM", "[", ; s9 ]3 p& c9 n7 ?
          RowBox[{"60", ",", "5"}], "]"}], ",",
    4 M( b8 v% C9 ?9 X- r" I     RowBox[{"CM", "[", # o& [7 b+ o* x" u1 x% W
          RowBox[{"60", ",", "6"}], "]"}], ",", 2 C9 U3 n2 q* b/ }
         RowBox[{"CM", "[", ; v( N* _7 @; W6 A; I7 v; F+ K, V
          RowBox[{"60", ",", "7"}], "]"}], ",",
    , b* d: _2 s: j/ C/ ?  l9 ?& g     RowBox[{"CM", "[",
    6 p8 K0 m" S4 @8 \, U      RowBox[{"60", ",", "8"}], "]"}], ",",
    $ ]& P1 T0 p9 X/ I( k/ R     RowBox[{"CM", "[", 1 A7 n$ N' n' j- H, X
          RowBox[{"60", ",", "9"}], "]"}]}], "}"}], ",", 1 y) \( |8 I) b( h) _0 F$ ^# Z4 s
       RowBox[{"{", 3 T6 o! Z; U. {' J
        RowBox[{
    : D- R2 y" M- `' s2 R     RowBox[{"CM", "[",
    3 v& S  p" B3 D* H( d: y0 t" x      RowBox[{"61", ",", "1"}], "]"}], ",", 8 Y" e7 `8 i+ h5 P& f) }0 u  q
         RowBox[{"CM", "[",
    # [: c5 H, l8 |5 i2 @% A/ ?      RowBox[{"61", ",", "2"}], "]"}], ",", 0 O6 Y/ n7 S% A
         RowBox[{"CM", "[",
    % c8 p! O7 a' z% D0 t2 p      RowBox[{"61", ",", "3"}], "]"}], ",", / G, l/ @# T" Z. b" E0 H6 C0 {/ z
         RowBox[{"CM", "[",
    + S* \6 ~2 A: ?/ g; ^$ s4 e      RowBox[{"61", ",", "4"}], "]"}], ",", ( F4 G! n/ [: |' @: X# a9 @
         RowBox[{"CM", "[", 6 q; R" V( e5 P7 G% `3 P% D6 B
          RowBox[{"61", ",", "5"}], "]"}], ",",
    8 y; C- V; P/ ]6 A! Y/ @: R     RowBox[{"CM", "[",   V% q: t& C0 [3 J, U* E# i& C% a' J
          RowBox[{"61", ",", "6"}], "]"}], ",", 5 @/ V- l" j4 C  i8 U
         RowBox[{"CM", "[",
    9 {# `2 y1 ]+ G2 R. A) x      RowBox[{"61", ",", "7"}], "]"}], ",",
    " l5 v1 d' _! C5 \     RowBox[{"CM", "[",
    / M% l0 n# X4 B/ E; b8 t9 U      RowBox[{"61", ",", "8"}], "]"}], ",",
    & ^( X( c& M& R  l% ~$ G% x4 K     RowBox[{"CM", "[", . M: q- P9 I9 H7 B
          RowBox[{"61", ",", "9"}], "]"}]}], "}"}], ",", # r* R, q$ D: {- s
       RowBox[{"{",
    9 o  C& Z# @$ }7 l" o7 v    RowBox[{
    ' ?* L; T9 Y  j, T3 d, Q7 B" S' X     RowBox[{"CM", "[",
    ; w+ z4 {7 G- ^5 g% a# i" D      RowBox[{"62", ",", "1"}], "]"}], ",", / a: N% J6 F  W. U' `
         RowBox[{"CM", "[",   v: H" K( g/ U
          RowBox[{"62", ",", "2"}], "]"}], ",",
    * c) K( v: o8 p) L1 _. i- l     RowBox[{"CM", "[", , i& Y3 ?* p( \2 W( j# S
          RowBox[{"62", ",", "3"}], "]"}], ",",
    - F! b6 V, u2 F     RowBox[{"CM", "[", # O* g+ i- H, B. {+ g
          RowBox[{"62", ",", "4"}], "]"}], ",",
    9 w; l- M( {" r, s/ p  N2 K3 W     RowBox[{"CM", "[", 8 C% Y) B! z8 d8 y. \& a- l
          RowBox[{"62", ",", "5"}], "]"}], ",", , g1 e! z( n7 b! S' D$ |. t0 j
         RowBox[{"CM", "[",
    3 q' F. n. r& ~7 C9 O# T      RowBox[{"62", ",", "6"}], "]"}], ",", / Q1 I: F7 f, Z6 l
         RowBox[{"CM", "[", + u& E. T+ q) F! _5 o* }3 {5 q
          RowBox[{"62", ",", "7"}], "]"}], ",",
    # [/ p( Z0 d3 v" J# `5 r     RowBox[{"CM", "[", ( r8 C" w6 U& {1 _* Y
          RowBox[{"62", ",", "8"}], "]"}], ",",
    / y0 R" ~, C3 @. j" _/ @$ u! H     RowBox[{"CM", "[", $ Y" V) ]9 l: N0 }8 t1 H
          RowBox[{"62", ",", "9"}], "]"}]}], "}"}], ",", 6 ?# z: ]( r# }+ Z$ x
       RowBox[{"{",
    ; O7 q6 [0 W4 M; R" L    RowBox[{. j7 Z, g% p2 w$ u4 |- ~" t4 \
         RowBox[{"CM", "[", % L( O6 e4 F( ^8 M$ V
          RowBox[{"63", ",", "1"}], "]"}], ",", * @8 o1 W# _; Y' _3 n9 _% l1 B* u. m
         RowBox[{"CM", "[", * h* Z- x, W" @. b  G- \
          RowBox[{"63", ",", "2"}], "]"}], ",", " s" O3 O  r3 I$ K0 s
         RowBox[{"CM", "[",
    $ h/ z. p8 g* B; c# ?+ C      RowBox[{"63", ",", "3"}], "]"}], ",", : G  D+ @$ \' X6 V2 {* v2 p$ Z
         RowBox[{"CM", "[", ( v% a6 L9 C+ [3 c
          RowBox[{"63", ",", "4"}], "]"}], ",", # I0 c, G1 d5 l
         RowBox[{"CM", "[", 9 ?8 ?9 k0 d% Z' K$ x* Y' h* a- I
          RowBox[{"63", ",", "5"}], "]"}], ",", 1 j& H7 w3 i' p6 S: ]* c: j+ G% J
         RowBox[{"CM", "[",
    3 L, A  V/ ^1 `4 O, D      RowBox[{"63", ",", "6"}], "]"}], ",",
    ' S% f3 N) k+ B4 s) f0 g# h     RowBox[{"CM", "[",
      c3 \+ p  t) ?3 k/ I3 _7 X      RowBox[{"63", ",", "7"}], "]"}], ",",
    - o! c6 q/ v7 f, ]- r% X& D9 ]' O     RowBox[{"CM", "[",
      \1 C; A9 X) q' ?& S1 G0 [5 t      RowBox[{"63", ",", "8"}], "]"}], ",", - R4 V5 G% s. a* G
         RowBox[{"CM", "[",
    ' m, ?3 P3 v' \. {2 h      RowBox[{"63", ",", "9"}], "]"}]}], "}"}], ",",
    - d* ~4 j: P. ^+ i, b; k4 m0 e   RowBox[{"{", 6 ~% F: i& X5 P  n7 U
        RowBox[{
    8 Y$ L" O5 d: B# ^% z5 R6 J( _6 O     RowBox[{"CM", "[",
    . x# c3 l. \8 u' I* P  Z; E# y& r- H      RowBox[{"64", ",", "1"}], "]"}], ",", ; U: ?* x* M6 h
         RowBox[{"CM", "[", / R( ]& w9 @+ d+ u3 l
          RowBox[{"64", ",", "2"}], "]"}], ",",
    9 a; x" F9 u6 ^$ ^     RowBox[{"CM", "[",
    2 v. X3 @  ]' a! R' ^      RowBox[{"64", ",", "3"}], "]"}], ",", 4 Q! o( v4 j$ r% N2 O
         RowBox[{"CM", "[",
    % @- Z& k: e9 x2 H5 F/ L; y  {0 J  c      RowBox[{"64", ",", "4"}], "]"}], ",",
    2 e0 r, j$ Q7 p     RowBox[{"CM", "[",
    . r, R+ m& g' {, B4 P      RowBox[{"64", ",", "5"}], "]"}], ",",
    $ U- K3 t% ?/ `1 k% _& d     RowBox[{"CM", "[", : b1 }( H" Y& g  Q
          RowBox[{"64", ",", "6"}], "]"}], ",", ' E/ i1 Y+ p  N/ u' P, g9 `
         RowBox[{"CM", "[",
    7 }: ?" B! g$ ~      RowBox[{"64", ",", "7"}], "]"}], ",",
    1 m6 n0 N* d% N" e7 u; e     RowBox[{"CM", "[",
    4 }! C8 v+ W; b  D+ i9 y, X      RowBox[{"64", ",", "8"}], "]"}], ",", * H3 c1 k* A2 n9 e
         RowBox[{"CM", "[",
    & x( d/ ?8 n% M" d' F" [0 r) b      RowBox[{"64", ",", "9"}], "]"}]}], "}"}], ",",
    % S: A% I) L. d- v4 \4 Y. x1 `, X3 N6 X   RowBox[{"{",
    * a9 G( }: G" I  D+ V3 b    RowBox[{1 J+ O% J% _; F6 C6 o9 c8 P8 v: S5 Z$ a7 p
         RowBox[{"CM", "[", 2 c* A: e1 D' F0 X3 |( ?3 Y+ z6 P
          RowBox[{"65", ",", "1"}], "]"}], ",", 7 [3 L0 x* K$ k- q4 T
         RowBox[{"CM", "[", 6 D2 Y6 e* M5 K+ x. L
          RowBox[{"65", ",", "2"}], "]"}], ",", 8 \" D6 C/ G0 G, P& J
         RowBox[{"CM", "[", 8 x! p0 J1 z; Z0 r6 P; O: ~. E
          RowBox[{"65", ",", "3"}], "]"}], ",",
    ) P$ H0 `3 V: a4 @     RowBox[{"CM", "[", 2 ?% U. L2 z6 C" z3 S( H; F) f
          RowBox[{"65", ",", "4"}], "]"}], ",",
    , V2 o4 y! U' }" C* t4 b     RowBox[{"CM", "[", 0 \7 e1 g4 F. b) d7 V3 _: i
          RowBox[{"65", ",", "5"}], "]"}], ",", 3 z3 U" ~& Q+ g6 T
         RowBox[{"CM", "[",
    4 B# g! z: L( }! Y4 E5 F' w      RowBox[{"65", ",", "6"}], "]"}], ",",
    : `; F# V/ G8 U* C- J) ?5 h, s     RowBox[{"CM", "[", $ r* E8 a0 l, _9 r' E
          RowBox[{"65", ",", "7"}], "]"}], ",", + O2 H# ~4 V4 A0 J2 _! c- E1 h, ^
         RowBox[{"CM", "[",
    ! }; t; b$ ~; x1 p- O      RowBox[{"65", ",", "8"}], "]"}], ",", 6 U; w, q( Z8 z/ D4 l. m# Q  C: G- a
         RowBox[{"CM", "[", 8 x7 p) X9 x7 |1 D
          RowBox[{"65", ",", "9"}], "]"}]}], "}"}], ",", % y0 D$ N, U* X0 `4 z
       RowBox[{"{",
    ( Z( d1 T! v6 [  R3 f8 _5 z9 G% H    RowBox[{
    9 C1 D, C' K% s/ W" `% Y( w1 g0 e5 ^     RowBox[{"CM", "[",
    $ j9 N4 U3 |' b& |% x" X5 R      RowBox[{"66", ",", "1"}], "]"}], ",",
    . v3 B6 D$ i- k; G3 S     RowBox[{"CM", "[", 4 m' g% a% b5 L' d7 Q0 v
          RowBox[{"66", ",", "2"}], "]"}], ",",
    1 _! {8 ~$ o% z, M6 @     RowBox[{"CM", "[", 9 l! k& J" \) d, B" \" i
          RowBox[{"66", ",", "3"}], "]"}], ",",
    8 B  `0 Q( |% X* Q$ p+ a; s0 I% @6 [     RowBox[{"CM", "[", + p  M. Q+ d, `* B6 A7 g
          RowBox[{"66", ",", "4"}], "]"}], ",",
    5 H. r; t( M3 J7 i     RowBox[{"CM", "[", & r* {4 P( H4 g; J. w% U' J
          RowBox[{"66", ",", "5"}], "]"}], ",",
    # X9 e& O8 A! a' u3 v2 z     RowBox[{"CM", "[",
    ' x! l1 l8 J7 N; p& P) Y9 {      RowBox[{"66", ",", "6"}], "]"}], ",",
    1 }0 l& g/ i' O     RowBox[{"CM", "[", ! P8 q) g: I6 R  U8 R
          RowBox[{"66", ",", "7"}], "]"}], ",", 0 }9 T5 F, d" J* m
         RowBox[{"CM", "[", 0 a5 E# Z- X* o4 Z
          RowBox[{"66", ",", "8"}], "]"}], ",",
    ( L/ B# r& K, m; @, z+ |6 r# b     RowBox[{"CM", "[", / \5 F* P5 g( b( i- V9 W+ D7 ]
          RowBox[{"66", ",", "9"}], "]"}]}], "}"}], ",",
    + H) o' m3 J+ i3 a# s" O" n   RowBox[{"{",
    ! Y  H- ?( r4 G. K8 d1 g8 b% q0 S  [    RowBox[{
    3 \4 c, W; ?, G6 P5 i7 ?     RowBox[{"CM", "[",
    7 Z( J7 _8 I% D& X1 \      RowBox[{"67", ",", "1"}], "]"}], ",",
    8 Z! j& b4 E. ]8 o' e- j, l     RowBox[{"CM", "[", + X* T5 u$ e: @/ ]3 I
          RowBox[{"67", ",", "2"}], "]"}], ",", : ]! ?% B7 a& D/ z4 Y" [
         RowBox[{"CM", "[", , g+ z/ i. x+ Z6 [! {
          RowBox[{"67", ",", "3"}], "]"}], ",", 1 Q; y! \5 P, h& ]! c
         RowBox[{"CM", "[",
    # o% I& {/ h# |      RowBox[{"67", ",", "4"}], "]"}], ",", " O: s5 D, z$ M) Y% {
         RowBox[{"CM", "[", + S# A  J$ u1 [5 [& b8 Y  G
          RowBox[{"67", ",", "5"}], "]"}], ",", ) C, E& `) f  a% _
         RowBox[{"CM", "[",
    " o& m! Q( m, H& f! R- M      RowBox[{"67", ",", "6"}], "]"}], ",",
    + B& X. e  s4 E: S# u     RowBox[{"CM", "[", 0 |' J) [! s" x) Q6 U6 p
          RowBox[{"67", ",", "7"}], "]"}], ",",
    4 g7 {: Q0 \# W8 o7 Z     RowBox[{"CM", "[", : F1 N* Y: S8 B$ d. [( h# f
          RowBox[{"67", ",", "8"}], "]"}], ",", * \5 O0 _, f2 B. H/ b/ ?+ I
         RowBox[{"CM", "[", ! U1 h% u- O8 o* W, S1 m5 ^! g3 I
          RowBox[{"67", ",", "9"}], "]"}]}], "}"}], ",",
    " w: l( r: o* c8 X+ h# @; m4 p% x   RowBox[{"{", : G1 |" _  o$ J% N
        RowBox[{
    # l, O$ Q& t! @! `: O: I4 ?     RowBox[{"CM", "[",
    - B) ~' V  k5 C0 T6 u      RowBox[{"68", ",", "1"}], "]"}], ",", 5 c5 `- Z  v% d4 p  L+ R) r
         RowBox[{"CM", "[",
    ( N/ @% s! {  i2 @: x      RowBox[{"68", ",", "2"}], "]"}], ",",
    ) b7 Y+ l# k; {1 v: K( n& a- C- P3 k     RowBox[{"CM", "[", 7 P& A  ?! y! A6 X
          RowBox[{"68", ",", "3"}], "]"}], ",", 6 ^1 @% v& B* _
         RowBox[{"CM", "[", # Z8 D4 v2 r) W1 O, d
          RowBox[{"68", ",", "4"}], "]"}], ",", : f  l2 G+ ?7 ?& a0 Q
         RowBox[{"CM", "[", . X; x7 b7 k: R8 u, _$ p
          RowBox[{"68", ",", "5"}], "]"}], ",", 5 i* T  G4 M0 l; T% ]0 H/ @8 R
         RowBox[{"CM", "[", " B/ q8 b; ]# F$ u: J# J* c
          RowBox[{"68", ",", "6"}], "]"}], ",",
    ' y/ l- ^1 z. O- O! Y     RowBox[{"CM", "[",
    / T& v- I3 @6 h" |& y+ F      RowBox[{"68", ",", "7"}], "]"}], ",", 7 l/ m# k  o4 {5 y1 N
         RowBox[{"CM", "[", - x& d+ b8 d# F9 F& V
          RowBox[{"68", ",", "8"}], "]"}], ",",
    , C: o: o  K" l     RowBox[{"CM", "[", " y$ r# j1 i  ?! A7 _
          RowBox[{"68", ",", "9"}], "]"}]}], "}"}], ",",
    , g% k# _5 [. L7 }' F/ ?* X. _% s   RowBox[{"{",
    $ F  y: {2 A8 ^' a    RowBox[{+ l! `) ], |9 a, {/ F. t
         RowBox[{"CM", "[",
    + L" D# P, N! R, p8 b4 Q      RowBox[{"69", ",", "1"}], "]"}], ",",
    : ?8 Q  E& ~. S  H' w     RowBox[{"CM", "[",
    0 b1 w" [; e3 F9 L/ b      RowBox[{"69", ",", "2"}], "]"}], ",", 5 d! s. e% h3 g/ z! J* e, }) s% n
         RowBox[{"CM", "[", $ A8 i  ^) k3 R
          RowBox[{"69", ",", "3"}], "]"}], ",", ! d8 h  N! c% q# Y0 H
         RowBox[{"CM", "[", 7 p& g: {, Q  t+ Y5 \3 c
          RowBox[{"69", ",", "4"}], "]"}], ",",
    ( Y3 w; G* k: Z2 G" M9 F7 n     RowBox[{"CM", "[",
    / f) F- L2 m0 W4 V. d3 y2 z      RowBox[{"69", ",", "5"}], "]"}], ",",
    , s! H% o& I) S     RowBox[{"CM", "[", % j% w2 |) ?. W3 E! O) h- j
          RowBox[{"69", ",", "6"}], "]"}], ",", 0 c2 p% G6 g5 A  W$ B/ G( i
         RowBox[{"CM", "[",
    % J8 N9 L' U" h! B0 q      RowBox[{"69", ",", "7"}], "]"}], ",",
    % X2 p) c2 c* D2 m! l+ e3 H6 k     RowBox[{"CM", "[", , a: j/ Y$ I1 {8 f
          RowBox[{"69", ",", "8"}], "]"}], ",", " j% {' x: X1 Q, V  s$ m
         RowBox[{"CM", "[",
    & F% K- E% o. }, x* {, u6 k      RowBox[{"69", ",", "9"}], "]"}]}], "}"}], ",", % a/ s* I: j! ~7 W
       RowBox[{"{", + M3 V5 F9 X) \9 L' e- z5 V0 T4 i
        RowBox[{
    1 Q2 g" m. _: a     RowBox[{"CM", "[", 8 f6 n( Y0 B! \- s
          RowBox[{"70", ",", "1"}], "]"}], ",",
    + B3 _: C. t. p) h" Q' h2 L     RowBox[{"CM", "[",
    $ G8 j$ M' X: I0 e7 T      RowBox[{"70", ",", "2"}], "]"}], ",", 3 j! V7 m. i/ y7 _% N4 m' D
         RowBox[{"CM", "[", 4 L2 z' _) M) F
          RowBox[{"70", ",", "3"}], "]"}], ",",
    5 G' {$ `% N" ^     RowBox[{"CM", "[",
    7 k- z. s% K  _6 C" |. p6 N      RowBox[{"70", ",", "4"}], "]"}], ",",
    ; L6 u2 n7 ~0 {6 M# M" U6 H" M# Y     RowBox[{"CM", "[", 1 l3 u+ D0 |4 t& B" c- }6 g7 |
          RowBox[{"70", ",", "5"}], "]"}], ",", # @$ m6 i5 o5 R7 Z2 Y2 Z# c8 L
         RowBox[{"CM", "[", ; q0 y( Z3 h% P. ^
          RowBox[{"70", ",", "6"}], "]"}], ",", $ q+ F  y2 u6 a) J; o& Z0 X: q4 @( A
         RowBox[{"CM", "[", - ?9 m6 @. U6 A+ N
          RowBox[{"70", ",", "7"}], "]"}], ",",
    - j3 H* z0 h# B' d) b     RowBox[{"CM", "[",
    ' K1 _$ R3 _4 i) Z      RowBox[{"70", ",", "8"}], "]"}], ",", % q1 h& y/ e( w0 `6 [0 Y
         RowBox[{"CM", "[",
    % n% m! l& P1 J      RowBox[{"70", ",", "9"}], "]"}]}], "}"}], ",",
    6 N  E6 @) Z+ Z1 H   RowBox[{"{",
    ! S: @& ^% i% r2 {    RowBox[{+ A9 s1 F1 A2 J' E$ e% t+ L
         RowBox[{"CM", "[", , L( x7 J$ k" A2 a& w
          RowBox[{"71", ",", "1"}], "]"}], ",", % o$ j% v: H/ s+ E" U# Z
         RowBox[{"CM", "[", 6 r4 U; b9 `: I3 K2 ?# u  ^/ z5 X+ S
          RowBox[{"71", ",", "2"}], "]"}], ",",
    " Z6 F3 p: ?, f5 s" H     RowBox[{"CM", "[", ; a# U8 ]9 z( P2 t# L
          RowBox[{"71", ",", "3"}], "]"}], ",", ( t5 D* f4 s( {
         RowBox[{"CM", "[", 0 S, j$ M* G9 l* W
          RowBox[{"71", ",", "4"}], "]"}], ",",
    + Z& P; S* s$ l6 P5 D     RowBox[{"CM", "[", 9 U( C5 s: f6 P( k, U# ~: U
          RowBox[{"71", ",", "5"}], "]"}], ",", " r# \, ~# W6 w( d8 n$ S
         RowBox[{"CM", "[",
    3 W6 P6 A) \% x: v3 y$ ^      RowBox[{"71", ",", "6"}], "]"}], ",", . y$ j3 d& X7 A$ p- \
         RowBox[{"CM", "[", / o- w7 E* N& q' ~; j
          RowBox[{"71", ",", "7"}], "]"}], ",", ' G$ u4 ]* ?) ~
         RowBox[{"CM", "[",
    1 _+ m& t) n. p8 n      RowBox[{"71", ",", "8"}], "]"}], ",",   g" M" k1 U+ X3 u! O1 [! V2 W
         RowBox[{"CM", "[",
    1 D; z5 V. T! m. k8 R      RowBox[{"71", ",", "9"}], "]"}]}], "}"}], ",", / Q: s5 @9 q6 \( N2 h* \0 o# G
       RowBox[{"{", 8 I& l, ^' [, H; c
        RowBox[{
    ' _6 ~% o, x: g. c     RowBox[{"CM", "[", 7 M* B6 v$ z! j* {
          RowBox[{"72", ",", "1"}], "]"}], ",",
    - i0 p: U% I/ a- W7 i3 ]& o     RowBox[{"CM", "[",
    & X4 p) J6 T* Z3 x      RowBox[{"72", ",", "2"}], "]"}], ",", 0 O7 P$ w8 u8 C3 A- B( N$ Z% e6 x
         RowBox[{"CM", "[",
    % P! ?1 t4 Q: g      RowBox[{"72", ",", "3"}], "]"}], ",", * N% n# |7 E2 F$ G' |
         RowBox[{"CM", "[",
    # ^) \4 }* ~( b; l      RowBox[{"72", ",", "4"}], "]"}], ",",   n$ d. n, i# g3 {9 Q
         RowBox[{"CM", "[", # d# w# Z# u& Z: Q9 M" T
          RowBox[{"72", ",", "5"}], "]"}], ",",
    5 b; Z) L" D! s3 h! V7 f/ w     RowBox[{"CM", "[",
    4 S  U. ~: h7 n/ M  _, q' C      RowBox[{"72", ",", "6"}], "]"}], ",", 2 b/ B- ?! o- @1 ^* q
         RowBox[{"CM", "[",
    % O. Y" S; Q7 L7 `, [      RowBox[{"72", ",", "7"}], "]"}], ",", - l$ t, D% X7 G( ]$ W: T; C  ]8 J
         RowBox[{"CM", "[", 2 k$ z) s; H# w- D
          RowBox[{"72", ",", "8"}], "]"}], ",", # F2 c* `& a! Y! f4 l# m
         RowBox[{"CM", "[",
    " M$ }1 L5 c# d      RowBox[{"72", ",", "9"}], "]"}]}], "}"}], ",", 5 W8 `8 P, ^5 s: T
       RowBox[{"{",
    & t" i6 ?& H2 p9 X    RowBox[{4 \  F/ Z% V9 W% z9 N' S% d% C- Z
         RowBox[{"CM", "[",
    8 U7 r4 ^" ]+ d( l8 `      RowBox[{"73", ",", "1"}], "]"}], ",", 2 Q0 k0 s! X; D+ m/ @* d) Z2 L2 b
         RowBox[{"CM", "[",
    , f% h: `8 s. t, v      RowBox[{"73", ",", "2"}], "]"}], ",",
    3 M1 I; X: Y+ ?/ v4 J     RowBox[{"CM", "[", ! `# u5 ^2 f# K! x
          RowBox[{"73", ",", "3"}], "]"}], ",", ( C. |3 J: ?% h" S* X4 j
         RowBox[{"CM", "[",
    7 C0 Y3 N* h  x$ Y      RowBox[{"73", ",", "4"}], "]"}], ",",
    1 J( n/ |- G; K* O: b' Y0 M( q     RowBox[{"CM", "[",
    ' o; k5 q% |* M: r; c+ g' M' W/ F      RowBox[{"73", ",", "5"}], "]"}], ",",
    ; n( n/ X; a$ k, s     RowBox[{"CM", "[", # j9 [$ X9 _3 l$ \: J- j
          RowBox[{"73", ",", "6"}], "]"}], ",",
    6 H, q  ?0 T# A1 Y" Q' ~; o     RowBox[{"CM", "[", " q' ~# U4 A; B$ d
          RowBox[{"73", ",", "7"}], "]"}], ",", 6 X$ Q& H9 N( n& T- @
         RowBox[{"CM", "[", ' X6 z! h& x  t9 b
          RowBox[{"73", ",", "8"}], "]"}], ",",
    3 M: o- x/ G: z7 d3 a     RowBox[{"CM", "[", " \! x1 O/ ?* G8 ]5 I3 n
          RowBox[{"73", ",", "9"}], "]"}]}], "}"}], ",",
    5 ~- ^- L# ?7 k; q7 D% w, x# {   RowBox[{"{",
    9 E6 {, m5 R) }: B3 f0 K/ I    RowBox[{
    ( c- p! }: u: i) O2 C     RowBox[{"CM", "[",
    % m/ H0 b" S2 V, R      RowBox[{"74", ",", "1"}], "]"}], ",", ) g- n1 g9 z4 g9 W3 H. z% k3 u, K
         RowBox[{"CM", "[", % Y7 K) s. h0 y' {9 I5 ?8 k
          RowBox[{"74", ",", "2"}], "]"}], ",",
    " Y" Q/ \8 B; E0 w" n: T0 d     RowBox[{"CM", "[", 0 ~- M: w$ B, h/ n  s0 u9 ]
          RowBox[{"74", ",", "3"}], "]"}], ",",
    2 W4 n1 Z' c9 {) u& |     RowBox[{"CM", "[",
    & z( J- R, s! A( e1 V4 Y6 t      RowBox[{"74", ",", "4"}], "]"}], ",", 1 Q2 s4 U; Z+ p
         RowBox[{"CM", "[",
    2 V0 m! p2 r8 S, i+ n! h: P/ e6 I/ I8 x      RowBox[{"74", ",", "5"}], "]"}], ",", % ]1 U) j8 r. i  y
         RowBox[{"CM", "[",
    5 z* a; [6 U/ v( o% L7 b2 B      RowBox[{"74", ",", "6"}], "]"}], ",",
    4 \$ W! F3 J( M/ c0 i) \1 ~1 g! V     RowBox[{"CM", "[", ; W6 l+ p1 p) \1 h  L! g4 ^
          RowBox[{"74", ",", "7"}], "]"}], ",", ; B* w% A" h6 @: A
         RowBox[{"CM", "[", ' S" ~& w/ u) c$ I/ f" n4 `5 z% J
          RowBox[{"74", ",", "8"}], "]"}], ",", . F) ~4 l3 @; E7 O% N: N2 k4 J1 c
         RowBox[{"CM", "[",   Q) b/ m  u$ M  b
          RowBox[{"74", ",", "9"}], "]"}]}], "}"}], ",",
    " x6 @7 e" p& p4 F& W: u   RowBox[{"{",
    1 P6 P' O/ y2 C- t1 G' V- k# ^    RowBox[{
    : }# E7 X& l8 K/ E- J8 u1 R     RowBox[{"CM", "[",
    0 I! u, F/ p+ x* |5 w, J+ M$ e      RowBox[{"75", ",", "1"}], "]"}], ",",
    9 d& {6 O) H) q1 ^: l3 w     RowBox[{"CM", "[",
    1 y; p$ R6 y, d5 u. _      RowBox[{"75", ",", "2"}], "]"}], ",", $ j' J; C2 h6 z# U/ ^4 T
         RowBox[{"CM", "[", ) a/ Q) X- A; n5 q/ R. ?
          RowBox[{"75", ",", "3"}], "]"}], ",",
    8 s$ e  Y; t9 v     RowBox[{"CM", "[",
    ' E+ h4 F: @4 \" [      RowBox[{"75", ",", "4"}], "]"}], ",", 0 T- u0 ?. V2 H& e
         RowBox[{"CM", "[",
    2 d! D+ `, `* w% ]) g( A: ~- K      RowBox[{"75", ",", "5"}], "]"}], ",",
    : R' x2 r' ]6 m& U- e: B% I+ U     RowBox[{"CM", "[", 9 U0 q, c/ G( j1 B1 R+ P2 [
          RowBox[{"75", ",", "6"}], "]"}], ",", & S2 V1 U, A  }! Z
         RowBox[{"CM", "[", 9 m* l9 y, V, K4 }$ i- A
          RowBox[{"75", ",", "7"}], "]"}], ",", ; e  s5 T) Q. M
         RowBox[{"CM", "[", - A" ]1 A; j4 v- N
          RowBox[{"75", ",", "8"}], "]"}], ",",
    1 T0 p; O, w3 ~0 B! W     RowBox[{"CM", "[",
    1 p/ f. i" x; S      RowBox[{"75", ",", "9"}], "]"}]}], "}"}], ",",
    6 `' L& F( S9 G   RowBox[{"{",
    1 n" S2 s( s! f  o    RowBox[{7 }) \# J# a0 r3 w3 B
         RowBox[{"CM", "[",
    5 U8 K' ^9 B7 \      RowBox[{"76", ",", "1"}], "]"}], ",", * C0 f6 u6 d, T- p- ~
         RowBox[{"CM", "[", 8 {9 ^7 O  }. ?2 z. `& w& f! D8 ?
          RowBox[{"76", ",", "2"}], "]"}], ",", : F' m  _$ g: `0 X
         RowBox[{"CM", "[",
    & G; o1 b7 [% j8 W. S) [      RowBox[{"76", ",", "3"}], "]"}], ",",   ^$ U5 K# I7 n8 X4 O
         RowBox[{"CM", "[",
    # ~- v- u+ x0 a2 I+ T) J5 V      RowBox[{"76", ",", "4"}], "]"}], ",", 0 v' F: e$ j' A4 D
         RowBox[{"CM", "[", 7 ^' e  Y4 h' e/ t4 O+ u
          RowBox[{"76", ",", "5"}], "]"}], ",", 4 d) a2 |& j; l7 D0 ~4 D- O+ K1 N
         RowBox[{"CM", "[",
    , \1 x% |! v* h, L; W- f      RowBox[{"76", ",", "6"}], "]"}], ",",
    " I0 q' r5 k- Y2 R) @     RowBox[{"CM", "[", 1 t3 b7 e( G  k& J' M6 d( o
          RowBox[{"76", ",", "7"}], "]"}], ",", 0 K1 B( a9 o4 p6 h- j2 o! E
         RowBox[{"CM", "[",
    0 y& T( h" @2 u8 ?      RowBox[{"76", ",", "8"}], "]"}], ",", 9 v0 E3 N( R% p% |2 I7 ]4 P5 S
         RowBox[{"CM", "[",
    ( b  s, J: @$ ~1 t5 t      RowBox[{"76", ",", "9"}], "]"}]}], "}"}], ",", + U& L& d2 s9 S; e  @
       RowBox[{"{", 8 }0 b, K; P' |$ ^( b
        RowBox[{9 i4 E$ y) A) |/ \
         RowBox[{"CM", "[",
    ) [" K" t1 v" u) E$ h) u      RowBox[{"77", ",", "1"}], "]"}], ",", * G. j, N- G8 M8 c' x/ ~
         RowBox[{"CM", "[",
    6 y$ L' A6 n3 D( C# ]      RowBox[{"77", ",", "2"}], "]"}], ",",
    $ F3 _  l8 X9 H: ]* X. g     RowBox[{"CM", "[",
    ! u' w2 j# y) A! v5 |      RowBox[{"77", ",", "3"}], "]"}], ",",   ~0 s1 G# Q0 [( w, T$ U
         RowBox[{"CM", "[",
    % Z% \9 J* o9 v* r7 ]- ?" V% ^8 m6 _      RowBox[{"77", ",", "4"}], "]"}], ",",
    / N6 P! v8 q; ]; w     RowBox[{"CM", "[", / \- Q' I9 B3 `% Q
          RowBox[{"77", ",", "5"}], "]"}], ",", 1 S. |) L, ?7 s3 P/ Z4 A
         RowBox[{"CM", "[",
    9 @' I% C$ ?3 R7 m& k      RowBox[{"77", ",", "6"}], "]"}], ",",
    # m) [& A0 u+ |3 L3 w     RowBox[{"CM", "[", 9 q2 r4 U) R+ p% W' Z5 u/ C- ^* b
          RowBox[{"77", ",", "7"}], "]"}], ",", * j; ?& `* x* A8 Q; a) k
         RowBox[{"CM", "[", & }4 T6 N, i7 \) H
          RowBox[{"77", ",", "8"}], "]"}], ",",
      ?2 J4 o2 D+ c, r/ h5 d) \! m/ D6 X     RowBox[{"CM", "[",
    4 P) R* K2 m& b      RowBox[{"77", ",", "9"}], "]"}]}], "}"}], ",",
    9 S: E+ Y- O# {- h   RowBox[{"{", 9 ?& k( u  H' A4 T
        RowBox[{
    0 q8 G' c: n2 M- A* Q- D0 T     RowBox[{"CM", "[", 0 c9 h% n, r% ]' n' b" p
          RowBox[{"78", ",", "1"}], "]"}], ",",
    8 j- b; b# _+ H/ W0 r8 c     RowBox[{"CM", "[", 7 J9 p2 s  ^3 ~6 ~0 `
          RowBox[{"78", ",", "2"}], "]"}], ",", 2 d# ^9 ?3 `! F$ g! H+ d
         RowBox[{"CM", "[", " `. H& u$ c! m  q* v
          RowBox[{"78", ",", "3"}], "]"}], ",",
    0 R( o# {. E( g+ u* X" L: f1 y     RowBox[{"CM", "[", + V8 D4 x* Z/ Y$ @- Q
          RowBox[{"78", ",", "4"}], "]"}], ",", # v3 ?- ]" X2 X6 Z
         RowBox[{"CM", "[",
    4 l, h7 A5 P+ {9 S4 n1 x/ o0 D      RowBox[{"78", ",", "5"}], "]"}], ",",
    & ?  C9 I9 b1 m7 w$ I/ U  M8 s2 [     RowBox[{"CM", "[", ' z% s1 E4 }3 a% i
          RowBox[{"78", ",", "6"}], "]"}], ",",
    ' q0 V" r8 F3 X3 c* A     RowBox[{"CM", "[", , g& V) V( D5 }# j  @, s: W
          RowBox[{"78", ",", "7"}], "]"}], ",", 0 o1 d  S/ ~' v  B  ?
         RowBox[{"CM", "[", ; s4 f/ T# a9 R0 {
          RowBox[{"78", ",", "8"}], "]"}], ",", . f; n9 Q) [, K& R
         RowBox[{"CM", "[", ' B+ l& Z' J$ Q
          RowBox[{"78", ",", "9"}], "]"}]}], "}"}], ",",
      W$ j! ^' `& o  `   RowBox[{"{",
    * o: v, Y+ u, w    RowBox[{" D& u: i  P3 Q& R
         RowBox[{"CM", "[", 0 R3 l6 u% m5 h1 Z
          RowBox[{"79", ",", "1"}], "]"}], ",",
    : k$ T7 w( ?1 x+ v( r     RowBox[{"CM", "[",
      ?0 j. r- q1 s/ h      RowBox[{"79", ",", "2"}], "]"}], ",",
    6 Y$ [* d/ w3 P" Q) H     RowBox[{"CM", "[",
    ; Y& c* _' q1 Y9 L      RowBox[{"79", ",", "3"}], "]"}], ",",
    6 E6 W/ b0 L; Y4 w     RowBox[{"CM", "[",
    6 f9 G  i5 G( I2 y      RowBox[{"79", ",", "4"}], "]"}], ",",
    , s9 w; X6 [0 K3 B/ {9 [     RowBox[{"CM", "[",
    " T+ @/ r: @4 [, N, W! o# B# u      RowBox[{"79", ",", "5"}], "]"}], ",", 1 J# i, U4 N; t; P  C, ~, E. w* U
         RowBox[{"CM", "[", ; d% t: Z, M1 Q' i8 l  p
          RowBox[{"79", ",", "6"}], "]"}], ",", 0 M9 ~; ?7 H1 c2 D% T( r
         RowBox[{"CM", "[",
    + D  a$ f: x/ k' B      RowBox[{"79", ",", "7"}], "]"}], ",", # N5 c7 o9 u- Z/ V- I; Z
         RowBox[{"CM", "[",   u. P" j, g% A; r0 m5 e# N
          RowBox[{"79", ",", "8"}], "]"}], ",",
    ( m9 i+ }4 k. n9 n     RowBox[{"CM", "[", ; O1 n" u8 l* t7 _* `
          RowBox[{"79", ",", "9"}], "]"}]}], "}"}], ",",
    ! |0 R( n  J  H9 F2 P   RowBox[{"{",
    ) Z7 X  d7 {, l; a% L    RowBox[{& ~- x( k3 y' _# W! l7 b, J4 j
         RowBox[{"CM", "[", , I  E+ c' v1 y+ x
          RowBox[{"80", ",", "1"}], "]"}], ",",
    7 B# w) M2 H, y" z- |. ?8 F+ P     RowBox[{"CM", "[",
    6 s. P( k) `1 H$ C" w8 m      RowBox[{"80", ",", "2"}], "]"}], ",", 0 }- d$ E$ ]% Q& V8 H
         RowBox[{"CM", "[",
    , o' w" P  h/ [4 ~7 d3 `. A1 m( y      RowBox[{"80", ",", "3"}], "]"}], ",",
    3 u; f/ @' m8 L& l1 G     RowBox[{"CM", "[", 3 ?3 U3 _& [- ^3 |/ a
          RowBox[{"80", ",", "4"}], "]"}], ",",
    % J6 k- f. z9 Z6 U0 ^# L! W1 {/ K     RowBox[{"CM", "[",
    2 h: l5 ^3 g5 x( L1 j      RowBox[{"80", ",", "5"}], "]"}], ",",
    ! w1 Q3 _+ _; d" W     RowBox[{"CM", "[", 8 o% j5 ^0 Q: S5 @" I9 y' X
          RowBox[{"80", ",", "6"}], "]"}], ",",
    & H% Y0 Y, K9 e. {6 T     RowBox[{"CM", "[", $ b) S- u! @/ S2 w$ R( C8 X
          RowBox[{"80", ",", "7"}], "]"}], ",", / O9 _6 I4 e  R, P! a
         RowBox[{"CM", "[",
    ) j) z9 i" v' s! w- b      RowBox[{"80", ",", "8"}], "]"}], ",", . ]8 U6 r) q5 \) Y$ P
         RowBox[{"CM", "[", ! q1 k- J, n& |9 f* s- D4 j( U- Z
          RowBox[{"80", ",", "9"}], "]"}]}], "}"}]}], "}"}]], "Output",! m3 Y8 h  |" `) @
    CellChangeTimes->{3.577844244140625*^9, 3.57784429425*^9, 3.577847845125*^9, ' D3 ]6 K" r$ c8 |: E/ g
      3.57791322703125*^9, 3.577957088820712*^9, 3.5779605002346992`*^9,
    & {% `5 S1 d/ u- [, B  3.578012145828125*^9}]
    5 g7 d0 n4 C5 v: l}, Open  ]],
    1 Q, ~! ~7 L: I5 z6 j/ ^" M" b* B0 J. M! R" g1 K
    Cell[BoxData[
    4 W1 R% P4 x5 y& W5 ?1 p' t1 I RowBox[{"For", "[",
    5 f3 [* e. L5 u9 x9 u  RowBox[{; b; w; V$ `/ o- `: i% q
       RowBox[{"i", "=", "1"}], ",",
      l+ g) ^% v( \4 w7 z   RowBox[{"i", "\[LessEqual]", "9"}], ",", & O' y& M' x# X2 H
       RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    $ e7 ~) ^4 M8 @: A, P. t   RowBox[{"For", "[",
    , c) q6 G' A; S0 v# |# w    RowBox[{
    ! O! T; A# ?" q* b' w     RowBox[{"j", "=", "1"}], ",",
    ) l- l/ w/ B$ @9 b     RowBox[{"j", "\[LessEqual]", "80"}], ",",
    + x6 W) e1 U% c- w     RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", + M  k; k2 x1 g2 j# B5 ?
         RowBox[{
    / z- D1 [' O! i* H0 u3 h3 A- D' q- p4 U      RowBox[{* P3 V/ `8 t# x  E- [
           RowBox[{"CM", "[",
    " h$ S8 Y9 O& c        RowBox[{"j", ",", "i"}], "]"}], "=", "0.0"}], ";"}]}], / W2 Z7 K: L: P1 g8 H: B" X1 F
        "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]], "Input",3 i+ K, S8 r: c- s, A" Q4 T
    CellChangeTimes->{{3.5779132504375*^9, 3.577913285203125*^9}}],
    " g& l7 z" |: W; `1 M! _+ |8 v; V: M. [4 Q  f- V
    Cell[BoxData[
    ! x! V9 @+ T/ O. x1 { RowBox[{"For", "[",
    6 u( D8 L# ^( J5 S' e5 _  RowBox[{
    6 S" E& w9 D$ l   RowBox[{"i", "=", "1"}], ",",
    & g* k0 ?" O, ]) _3 Z/ \   RowBox[{"i", "\[LessEqual]", "9"}], ",", ! T  |- G5 ~3 b
       RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    / A" N- a2 a. R& ?   RowBox[{
    + _/ P; {- F2 p  J4 O8 E    RowBox[{1 M9 y% L( ^! Y# X! @7 n
         RowBox[{"CM", "[", 2 i( a# B) `( N* |7 `
          RowBox[{"1", ",", "i"}], "]"}], "=",
    4 X7 r4 h9 ^6 U, k! h( m     RowBox[{"Data", "[", 8 C2 t2 V% U! T  o- ^
          RowBox[{"[", ; k: \* L2 m2 R* W( w6 _$ R* Y
           RowBox[{"1", ",", "i"}], "]"}], "]"}]}], ";"}]}], % R; r1 c% U5 Q1 M- n
      "\[IndentingNewLine]", "]"}]], "Input",
    ; p& }9 |7 o$ o* m# D( ~" F& }/ L CellChangeTimes->{{3.577844179875*^9, 3.577844181703125*^9}, {
    9 P/ k! i6 {+ y   3.577844217765625*^9, 3.5778442320625*^9}, {3.57784429953125*^9,
    * Q; s/ \8 I$ G' ?. j+ {9 ?   3.577844347875*^9}, 3.57791328640625*^9, 3.57791338828125*^9,
    % B7 w; Z4 z9 w  h   3.57791344209375*^9, 3.5779588070933466`*^9}],& I8 D& P! p4 h) c. Q9 X$ k, ?
    ( a2 ?* C# G0 H# I: g+ s5 W
    Cell[CellGroupData[{
    * I$ z; v9 m0 \' U# I$ W: _3 a% F$ S# k4 ~- j8 y8 M
    Cell[BoxData[{
    ' q1 T$ }3 C4 g! e/ b* z2 @) D RowBox[{"r0", "=", "0.2"}], "\[IndentingNewLine]", / U% R8 }4 }' c; w: X, w" a2 {
    RowBox[{"M1", "=", "1"}]}], "Input",
    + y1 L0 {5 w( L1 }5 O5 K0 u) r CellChangeTimes->{{3.577844361578125*^9, 3.57784436678125*^9}, {7 N* U  u4 t4 a9 U2 c! h) I
       3.5778457908125*^9, 3.57784580253125*^9}, {3.57784602534375*^9, 8 D5 s6 L, R4 {7 [
       3.577846109453125*^9}, {3.57784617128125*^9, 3.57784619321875*^9}, {/ e5 K% M: t  @5 l* q+ D$ U
       3.577846583984375*^9, 3.577846620984375*^9}, {3.577846653203125*^9, 6 C7 s# M6 K- e  Q$ ~- C7 P
       3.577846691984375*^9}, {3.577846779953125*^9, 3.577846794921875*^9}, {% r# j7 z, I1 K' S
       3.5778470791875*^9, 3.577847088921875*^9}, 3.577847409671875*^9, {% v9 q3 e$ A2 v, `
       3.577847477203125*^9, 3.577847523203125*^9}, {3.577847586484375*^9, 7 G& t9 P0 j+ ~% D+ e
       3.577847600640625*^9}, {3.577847649140625*^9, 3.57784770196875*^9}, {0 g1 d2 [# g0 s0 \6 n& a3 a; i8 w
       3.57784774896875*^9, 3.57784776490625*^9}, 3.577847981546875*^9, {
      L2 j0 u, H- v6 |, W, H+ Y) }   3.577913312890625*^9, 3.577913360109375*^9}, {3.577919262828125*^9, : n0 {* Q9 n- C/ k
       3.5779193133125*^9}, 3.577919388484375*^9, 3.5779605095479155`*^9}],# ^# S* I$ Q, h) U4 c
    & N% u  R. o0 T: ~# c2 \
    Cell[BoxData["0.2`"], "Output",
    , v- e, P, x$ T: A! v CellChangeTimes->{
    % O( z3 |* B5 I" l% e! ~6 ]5 h  3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, ) N) Y* O+ J: R7 Z
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {- L5 ]4 j, G- U5 V( `* ~+ e0 B  p
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    % D1 j0 X! n' d5 i   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {- w8 I. @0 x8 d+ E5 y: i
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9, ' t% U0 e8 p  u0 Z6 h$ C
       3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {! ?1 a2 t6 N: P. M& I
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    $ X8 p) `( @! @( r/ ]% l   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    0 T: U4 ?/ W- G8 X. G; y   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9, / o' ^% h7 h5 h3 X6 `
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9, * |& ?6 h6 L& G
       3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9,
    9 j' ?; T; o/ a9 ^9 \   3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9,
    / Z, Z1 \' Z! k" V   3.577960510686717*^9, 3.578012149296875*^9}],  Y" I- X% g" J* @  m5 @

    2 N: _% c. {4 z# T2 cCell[BoxData["1"], "Output",1 g; @$ x" g, `' W. d2 z- y
    CellChangeTimes->{
    6 t% d; g6 {2 G: G) \  3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, " ^& V) @- D7 j4 k" s5 J7 l% F
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    ) x$ q& Y; h3 u+ y& r8 f0 X   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    2 t& w2 K5 O( U% o   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {5 L' T- l& r1 Z$ U) h$ N
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    - R: C( y  v! p   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    2 L% ^. T4 l" Q! [1 D   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9, " x7 R- [' x/ ^% ?" B; R( ?
       3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {* r: h+ k2 J1 n
       3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    ) M- n, f$ \$ U' q( Y   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9, , e) d9 P4 x% W3 b7 t
       3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, , h8 }3 P# h5 {/ Z7 q
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9,
    6 U# m: V2 t. i1 l   3.577960510686717*^9, 3.578012149296875*^9}]' i# h4 E. r0 r9 Z5 I5 l7 c
    }, Open  ]],6 u  Q7 j' B8 b: r! N6 A% H1 b
    ' p( V6 ?+ N, G4 \* q8 ^
    Cell[BoxData[
    & q. x: D4 W' M8 z2 ^  A" O- k RowBox[{"For", "[", ! a9 N+ H$ K6 s/ I4 o* A; l
      RowBox[{) |0 S) K9 ~* i- h: g0 z# O
       RowBox[{"k", "=", "2"}], ",", & ~! i/ F% Y5 h3 r( E* X" k# V) d! x
       RowBox[{"k", "\[LessEqual]", "60"}], ",",
    # W) I1 V  O# o: x$ p1 Q' R7 H   RowBox[{"k", "++"}], ",", * b) s3 ^1 H$ r  H! K3 C
       RowBox[{"{", "\[IndentingNewLine]", $ V- F) n( g; k
        RowBox[{
    ' e. g7 k- \& n1 F+ a1 Y2 B$ p5 u     RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]",
    . ~% M9 R( Z9 S$ f  p     RowBox[{"For", "[",
    7 v$ r: H: _3 w! S. e+ m- t; \      RowBox[{/ J6 e$ m  n$ h& P4 t
           RowBox[{"j", "=", "1"}], ",", 3 z* j& Z, ~0 U- d0 Y
           RowBox[{"j", "\[LessEqual]",
    5 H4 W4 Q: w9 i1 Y" s        RowBox[{"k", "-", "1"}]}], ",", ; A) l) w6 {- {# j+ f
           RowBox[{"j", "++"}], ",",
    $ Y5 {$ H' B) K% A2 ]* U' ^1 [       RowBox[{"{", "\[IndentingNewLine]", # R% V4 g; ^: u, b/ a
            RowBox[{8 u- M/ x" j2 h% a& g9 g( p
             RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]",
    . ]' r7 U: g+ Z) J0 m         RowBox[{"For", "[",
    % s2 w. T2 ?2 {7 n          RowBox[{% z& g: S+ ~3 B/ M* J
               RowBox[{"i", "=", "1"}], ",", 0 P+ L; j' I& J, S9 a, \+ o' |; x
               RowBox[{"i", "\[LessEqual]", "9"}], ",", . ~; `. w) g3 }4 o6 m
               RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", ) F: {9 L0 k, v! |0 i! R) Z
               RowBox[{
    $ Q' B5 K& c$ J7 ^) M$ k2 l$ L            RowBox[{"r1", "+=",
    7 q* e' H" s1 K1 x             RowBox[{
    6 W) W) f$ q; b+ q              RowBox[{"(", * ~8 H9 G$ E* K
                   RowBox[{) b# m1 k6 H3 Q+ S
                    RowBox[{"CM", "[", $ e( g  U' s, [  i1 L7 N* U
                     RowBox[{"j", ",", "i"}], "]"}], "-",
    - \) T6 _, U/ n: K6 s3 X4 s1 Z! X                RowBox[{"Data", "[",
    ; B: n' p! L& n6 l% @4 g                 RowBox[{"[", * Y' @2 d* `/ T/ C/ ~5 f' ^
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*", % ?1 l! [8 ^4 O% }7 X7 {
                  RowBox[{"(",
    * [* y3 o- u- k( i7 o+ F: n1 U               RowBox[{2 Y" F' N0 h4 L4 t
                    RowBox[{"CM", "[",
    4 i% r, I9 A0 q! s5 ]& e) Y8 @7 [                 RowBox[{"j", ",", "i"}], "]"}], "-",
    7 J, a, `+ }# Z$ S                RowBox[{"Data", "[", 2 ?' V2 X' {- f
                     RowBox[{"[",
    . w- N4 Y1 `. s$ h. X5 b                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],
    0 S# L2 f5 F; K- c! L0 j: I           "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", ; W; |* v" Q9 ]5 }& M  H
             RowBox[{"r1", "=",
    * K* w' Z6 @" f4 ^0 U! l          RowBox[{"Sqrt", "[",
    4 m, ?$ q0 q5 ~: F/ t           RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]",
    # j* S; ^' B  I( e0 y: y0 C         RowBox[{"If", "[", " ", " ^' l4 j6 S3 u  P0 C$ a/ ^
              RowBox[{7 y8 H% ?8 P/ r; D- P0 v
               RowBox[{"j", "\[Equal]", "1"}], ",", 2 @- \5 y' \  W) m' m2 Z
               RowBox[{"rmin", "=", "r1"}], ",",
    , I$ D7 z: l# \           RowBox[{"If", "[",
    6 ?# t  X! a$ y            RowBox[{
    % }8 t" b( I) X6 T& \* F             RowBox[{"r1", "<", "rmin"}], ",",
    - F$ D1 a" z9 G  O, C             RowBox[{"rmin", "=", "r1"}], ",",
    $ w2 x( l. c3 G             RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}], ) y+ f" |; q3 `- X3 v; P6 l
            "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";",
    + b7 @& q! v* q: m5 W7 k     "\[IndentingNewLine]", " {5 q$ h7 d8 t) f/ L/ z
         RowBox[{"If", "[", / C, G' l# B) _
          RowBox[{: B! w3 g: K* P8 Y- X7 I
           RowBox[{"rmin", ">", "r0"}], ",", * K; V8 w! w' J! f. }( s( j' b% b
           RowBox[{"{", "\[IndentingNewLine]",
    / J% w6 e' I3 J6 c5 q        RowBox[{: u  Q5 q0 K  D% g8 ]( ~* S
             RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]",
    : w: t& b9 d7 y  |, Z0 g& Y& Q         RowBox[{"For", "[", ) d/ R& Y1 C4 k8 b* U9 h
              RowBox[{
    8 d, q- F# m* j, J           RowBox[{"i1", "=", "1"}], ",",
    2 k, ^( x" \$ j           RowBox[{"i1", "\[LessEqual]", "9"}], ",", 5 ~( Q  _* T' i9 x
               RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]",
    % w6 |8 I2 L2 T( p           RowBox[{
    7 M9 E1 o: y6 S* V) G# K4 }            RowBox[{( k$ m$ A0 X. [& `
                 RowBox[{"CM", "[",
      ^! u. g2 h" F5 e! I+ X$ O* Q              RowBox[{"M1", ",", "i1"}], "]"}], "=",
    6 P/ u- \  B7 ?1 {             RowBox[{"Data", "[",
    ( \+ Q9 U; q. Y8 ?% M: o              RowBox[{"[", ! b& i& t- `7 E/ H, X+ P
                   RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}],
    , Q! K& a4 S$ h+ Z          "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",",
    " S  B) `% d( [9 H& b9 ?- ^4 N4 ~# Z       RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}], 1 Y( v. m% p+ z9 _) k  d
        "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",
    2 s" U4 m: ]% X" v5 g CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {
    / {$ J- h' g  ^. G* I- _1 S   3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9, 7 i; X* A) `7 L) M4 N
       3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {; ]: x2 z7 m# F
       3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9, 5 |, c, Z/ j. Y" ~! g/ |+ k, S- w
       3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {
    3 P- ]& h; u! f" |* G4 p   3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9,
    5 g3 \' T- i1 S   3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {
    ' E& y6 @7 T1 k8 c( j   3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9,
    5 g! p! R4 u, R  e$ K   3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {4 Y- ~) w' D4 c5 j
       3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9,
    2 Z6 T2 G- W6 l% P5 V   3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {
    : i" O8 V- o6 b! V! i: @4 K   3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9, 0 a; Q0 [  F8 y  T% A) P$ s0 H
       3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {, D) @+ V  I5 E; b
       3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9, 2 p3 F  o( c& Y. d( x+ h) [! F1 O
       3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {% l9 H/ b; T! c
       3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9, % m% j2 ?( s9 V4 H8 C
       3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9,
    5 T! q2 H% O6 f' p9 E   3.577958821991373*^9}}],
    * M% t4 F5 w, w# {! \; Z& E  z; C. J
    ' H7 o; x* Z  R; R3 ~, f) FCell[CellGroupData[{
    ; j) e1 O1 r5 |) B8 b3 r! ]0 T6 S
    Cell[BoxData["M1"], "Input",' i5 @$ n% S! T& y* m4 H8 H
    CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],
    8 B; l2 `# j, p' b' H! {3 ]2 ~7 Y! J/ I: N
    Cell[BoxData["21"], "Output",8 u' I7 q" D% A+ {2 U
    CellChangeTimes->{/ V5 `: F/ ?  e* V
      3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {! o/ o$ M5 |& M$ R0 Q8 N+ P% M6 F0 n+ a
       3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9, ) N% @4 y7 s( L" B$ o
       3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {9 f0 W  S2 K: a! F- a$ Y! o
       3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9,
    4 a! q$ S7 F- ?% S) J   3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {
    9 s" U3 P  J3 q% {/ S" a   3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9,
    9 K  I1 K# Y0 N% h   3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {5 l8 {" F8 h' C. S2 Q- J' }  k
       3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9,
    9 G& e) j4 y. I1 o/ B# T2 j   3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9,
    / T$ L" r* E! ^   3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9,
    1 |( w% c1 e" |9 `2 h1 g% ]7 L" O" \! F" h' _   3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9,
    + t: Q) `  }8 G5 V   3.577960515600726*^9, 3.5780121541875*^9}]
    , }  u  m- o  b2 O$ [& S; O! t}, Open  ]],7 P; d2 m' h( v# p6 ]4 t6 N

    9 p5 X- }. `( R- N& {Cell[BoxData[2 f. q3 F" L+ |' A0 y
    RowBox[{, d" C1 T7 J+ d: Q% F& l
      RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[", 1 _% I; D' a! `/ X( k( }  B- H3 Z
       RowBox[{"1", ",", "i"}], "]"}],
    + \" Z( _  B; ^  S3 w( j4 X3 v  RowBox[{"\:5230CM", "[",
    8 j! F/ c" _( s$ Z( D   RowBox[{"21", ",", "i"}], "]"}], $ x3 Q/ m/ N2 R) H3 W
      "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\
    ' A, G5 t3 u1 V' r. I0 q\:51fd\:6570u1\:5230u21"}]], "Input",
    ! [# z8 `6 t5 ~4 I/ a4 A9 N: q* G CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {
    4 S! |9 j+ S3 A1 w: G  3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9,
    2 O5 ?# ^6 v+ F, F: R( t1 {$ l( l3 H: c  3.577960526583145*^9}}],& i% j' K; }' L/ f$ O: V

    2 X3 f* g5 P; B; F* F8 _Cell[BoxData[
    2 J" i: ]) i6 c8 U' u7 j0 z RowBox[{"Clear", "[", "Delta", "]"}]], "Input",
    . l  E' X3 O1 ^4 ^3 i) H CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],- ]3 g$ {5 f6 Z* Y/ |1 d
    6 Z( R! r( i# E/ ?
    Cell[CellGroupData[{
    & x3 i: }- f, ~- w
    1 F6 k! y( B  wCell[BoxData[
    $ y! w+ y+ o6 f+ v$ j( ^. a7 s RowBox[{"Xa", "=", " d& V, `) G. W$ T
      RowBox[{"{",
      z; B  g, a! `8 k$ p   RowBox[{4 {4 s# h  e! w4 r( \$ [5 N3 {5 W& W+ [( E
       "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ! z- H1 j' {  x* j/ \5 y$ m+ a
        ",", "x8", ",", "x9"}], "}"}]}]], "Input",6 C  j3 G. H0 T7 x, T) |
    CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],
    6 A) p: O' |$ Z7 `& x/ C
    2 s4 `9 s# c7 J5 ~. v9 \Cell[BoxData[
    ; p( }4 |; j- v: G' B6 x$ ~' D RowBox[{"{",
    ! {2 I4 y0 O$ {* d  RowBox[{0 C& l! c) a2 }! U2 e
      "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",. w3 X2 F) P/ V
        "x8", ",", "x9"}], "}"}]], "Output",
    1 G# I4 i4 L9 n% ?# `: ~8 S- J CellChangeTimes->{9 H- Y6 Z3 C1 C! U
      3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9,
    , [* Q  a7 }! G5 h& N6 t   3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9, ' _9 E$ ]( @: e
       3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9, - B6 w1 g: W" X; w6 P: b
       3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, 8 B. B% a6 _% T" B6 [0 ]: k
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {& h% n+ w1 |4 d. P  t! j
       3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9,
    # _( |- R9 |4 K& M( k: D; _   3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    8 [) B" f' p0 k6 m, ~   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {% U% ]3 ?8 ~7 s2 o3 g8 @5 c
       3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {
    ) n1 Y( c6 c+ K7 L: a/ T/ G) t9 R   3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9,
    , d9 B7 [4 T4 Z$ {   3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9}, 0 S8 R* K' S7 f6 ~# `7 k7 i
       3.57801215725*^9}]
    0 ~0 i3 o& ^8 _0 K* W}, Open  ]],
    : R& w- C, v7 e! m% A& v
    9 f. o5 _9 }8 D6 l% z; aCell[CellGroupData[{8 V- E: K) l& |* x8 }. U( [
    7 x0 {3 q/ Z) c- p7 Z8 ~3 E# R
    Cell[BoxData[
    7 W; N- J# O0 G" y RowBox[{"Ca", "=",
    : ]9 S: k5 I- d, k  RowBox[{"{",
    + i! j: d0 C/ M% w4 }: m1 p   RowBox[{7 M, w) s2 @  Y8 W, q3 O/ Y- p' d
       "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7",
    ! s* S, ?' `. A1 O* X$ r- s2 j    ",", "c8", ",", "c9"}], "}"}]}]], "Input",' J/ [* ]6 c1 H9 n
    CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],  p4 Z& h9 G& ?/ l9 f
    7 ~! D9 N: U( K" l. ]' B! u
    Cell[BoxData[
    # r7 N$ B8 G; s0 f# B3 f RowBox[{"{", , j# P6 F! }* Q# ~$ j6 f/ ?% U
      RowBox[{% K3 x; r( q. k2 j
      "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ","," \# u# w4 N/ e" H* u1 K- T
        "c8", ",", "c9"}], "}"}]], "Output",6 J# K5 f$ x$ x) Q9 f5 ^
    CellChangeTimes->{
    8 ^% @: k, I3 x! E3 C+ v3 b  3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9, $ E- w: J9 T! o2 G- O6 o1 m
       3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9, 7 @3 E" [% F7 v- G
       3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9,
    ( `& j5 N3 m4 z  z, Z( O: ]( N7 U   3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {
    7 R+ T0 q3 t3 @2 I5 g( T2 d   3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9,
    / X  I  B" c( x7 z- ^: ~8 c8 q   3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9},
    3 h, z8 `, M& A/ F1 }0 @   3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9, 0 T8 i, _; w) q% i7 o9 @9 ^6 G
       3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9, - j5 f. X4 K$ z2 E- h7 c) |
       3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9}, 3 M4 W1 ^6 t% `
       3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {
    ' |2 {* D5 m, l7 J0 {) \* a# u' L   3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9,
    6 U/ F6 [$ k2 Y2 w$ c) i   3.577961904604212*^9}, 3.578012158671875*^9}]
    - V, q0 {3 Z2 B1 l, D}, Open  ]],$ i& V/ {  O5 G, o8 A
    4 b6 G7 A- @  z  A7 }! m' t/ p, u5 [% x
    Cell[BoxData[
    ( [' ?0 r8 ^4 p- l RowBox[{"For", "[",
    ! M: J) N3 j3 r" {  RowBox[{% _* Z0 q) I3 _
       RowBox[{"i", "=", "1"}], ",", ( E1 a+ U# D* J$ w* \1 i/ n
       RowBox[{"i", "\[LessEqual]", "9"}], ",", 3 b. i5 E% m& Q3 Y
       RowBox[{"i", "++"}], ",", ; ]% u2 ^4 y9 K% H
       RowBox[{1 N6 i9 y5 l* g6 P( q( K, t) ^
        RowBox[{"Ca", "[", ) l1 W* U' |+ e: N5 |0 v
         RowBox[{"[", "i", "]"}], "]"}], "=",
    8 ^* y  E9 {0 H/ V! `+ j9 |    RowBox[{"CM", "[", ' ]* V9 a& f1 t8 e$ d
         RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",7 s+ J& S, a. e3 o+ [
    CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9},
    , i1 V" C) v9 [% ^   3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9,
    6 g& d8 R1 H/ Y* L) l) }   3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9,
    ! L* z& ~. j) |# l' \8 G   3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9,
    & x, Z  u. s* H7 P$ V( J0 e6 O   3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9,
    / j) e' H- A6 W$ e   3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9, * p3 l: {$ N* _( p
       3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9,
    ' b2 r: R0 [1 Q: f2 _2 C* L1 J   3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9,
    0 ^- v6 C  G1 c; l   3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9, 3 e; f6 v! \! Z6 i" R
       3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9}, 3 b1 c% ]' x* T: c# q6 N2 J1 m
       3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {
    7 w. Z. t6 M1 L6 V   3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9, 0 `! [) e0 n& N0 J. p
       3.577961906897415*^9}, 3.578012176296875*^9}],& G* v& o' B$ D2 o

    * |3 R& L* E. E' ]# I0 nCell[CellGroupData[{; z* b, R  E8 G+ _# @4 }
    4 c  k5 q) s# v; ]2 Y5 n8 j! G4 j
    Cell[BoxData[
    - o0 Q, \; I3 W* V1 j RowBox[{
    7 Q) _8 V, H! x& c( b- g  RowBox[{"(", ) |. c6 |% W3 }. O8 k; E
       RowBox[{"Xa", "-", "Ca"}], ")"}], ".", . |, E8 I( S; o& v1 A9 m
      RowBox[{"(",
    . u$ c0 R) v6 E0 O+ }5 |( f   RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],
    : d+ t- _# w: l
    - G/ D& H9 x9 w4 B( I( DCell[BoxData[
    0 K9 M% E1 W. h0 u# e RowBox[{
    & G) l+ \& }) B* B3 L6 i  SuperscriptBox[4 q7 C& w4 S3 T
       RowBox[{"(",
    9 k* |" f6 |( E- C; p    RowBox[{& K; e8 v: H9 I& ^% C; f, ^& W6 ~
         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+", & a$ ]) X; u9 \0 L. d* [
      SuperscriptBox[
    # ~4 _# Y) a0 A& j0 b   RowBox[{"(",
    ( O/ q  y( y& m, Y' C/ ?    RowBox[{" p& {( y# ^% }7 J0 k, h5 ^: M/ f
         RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+",
    4 d* |# K! J! v  I8 e  SuperscriptBox[
    . z- z3 S1 C# \- ]2 @1 F   RowBox[{"(", 0 V2 s  {  i" |( T, T* ~/ `6 `
        RowBox[{# ?! i; x0 h4 y* u6 W- H
         RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+",
    1 q" k4 _& }3 e3 ^  SuperscriptBox[
    3 g+ r2 y$ A- c- y1 `2 z- Y' x   RowBox[{"(", , z2 i8 \! l7 |4 [2 S! p$ w
        RowBox[{
    3 j4 P0 g) }8 Z$ G$ [4 Z4 N     RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+", / K- z1 R9 ]* v9 p3 R( v
      SuperscriptBox[4 B1 o* S: y" c
       RowBox[{"(",
    ) V% o7 d9 }6 t. n( e    RowBox[{
    - X  h& l- f5 T: _3 n! h  D( ~9 D     RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+", $ d& D! y. ^, A
      SuperscriptBox[% C6 f+ c" k* M( }/ g
       RowBox[{"(",   G. l. C. ^  @
        RowBox[{
    8 Z! J/ T( Y; t0 h, W* _( M     RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+", ; e- u9 i! t1 i6 o$ W
      SuperscriptBox[3 Y# H: D' w$ [8 e5 B3 [
       RowBox[{"(", & V3 I9 ^7 a1 \  z0 g* V
        RowBox[{
    . |- y1 e" Y0 L+ [$ y     RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+",
    3 Q0 U: T+ l: Z  SuperscriptBox[" r; l, V" H' g0 L' G
       RowBox[{"(",
    * ~1 Z( k" y7 n    RowBox[{
    $ a* ]* o4 \* _, U2 V/ \1 g1 U! i     RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+",
    $ E2 z3 u4 n+ H: P8 r+ i# d) e, ]  SuperscriptBox[
    ( v! V# X! n4 c3 S# n   RowBox[{"(", + s% k) I) ^% a+ ~( }: |
        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",
      x; O" T2 @5 g4 y* e, L9 @# N- [ CellChangeTimes->{
    4 W4 ]) P% m6 t7 ]; L( {8 r  3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9},
    5 i& [# o6 Q5 x- a! N* [% Z   3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9,
    / a3 c9 ?. B- T* q& d2 P4 o5 _   3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9, ! H9 U. J6 s$ r9 d
       3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9, " u' n2 S) ^$ l7 n
       3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9},
    + B  J0 c$ I  k2 M% r   3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9,
    1 d, p/ o% |2 G5 k   3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {/ x6 p" @8 v5 C
       3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9,
    4 v3 O7 i3 [* W) M4 u5 T, ]   3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {
    0 _/ P2 B4 g5 i% b2 ]3 i4 }   3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {: Y* e5 s2 Q3 Q
       3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9, # s! _0 k  h# S, B$ N
       3.5779618537169228`*^9}, {3.5779618846049767`*^9, & \( V# @. a0 o
       3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]
    5 q8 F& J7 K1 |}, Open  ]],# D$ V/ [" o$ |. Q; t

    ' q  |9 k' r: SCell[CellGroupData[{0 i+ o7 k0 H9 Z* [3 W

    ! r0 W$ M" }) O  t( N8 y8 f  T* ]Cell[BoxData[
    . o/ J7 V  Y. k. L) d RowBox[{( D1 W& Z9 q  ^7 T5 o
      RowBox[{"Ca", "[", * F' }" G1 ]8 _& O! E( B
       RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",
    9 g, h7 @$ o( _, B0 u3 v8 y4 S CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9,
      J( F! F2 l( ?* O  3.5779616465173616`*^9}],
    6 k$ A- |' u8 J% Z- i) }. |" ]
    : D) D9 d2 ~$ j; P, nCell[BoxData["0"], "Output",
    * d( p3 v4 F, M3 P& O7 b9 T- S CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9, : ^0 \# s' w$ F9 X
      3.5779616484049644`*^9}]8 P! J" d& i  `+ J
    }, Open  ]],
    ' u4 Z" \$ ?: q9 K4 w
    : }! D' G8 Y" N( NCell[CellGroupData[{
    7 o: z5 D  X4 Q# v" M1 T- C$ ?
    % D6 }" R6 V* a: V$ _3 y6 sCell[BoxData[
    & _' z" b3 Q( O: d* ?7 \$ ^& B8 B, _ RowBox[{; X4 |3 k; w7 k; ~$ Q! E/ O: [
      RowBox[{"Ca", "[", # L! \+ V, {: x6 t. d8 _8 }
       RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",% C1 @9 d6 [3 F7 H& \7 N
    CellChangeTimes->{3.577957376235614*^9}],
    7 f. T0 H( ?& [; f2 V1 k- U# O7 v0 t3 ]# G
    Cell[BoxData["0"], "Output",$ u( E7 x# n& \0 t' N
    CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]
    ( D7 J4 \. r5 @' f- P7 b1 J; Z/ p}, Open  ]],- m% P2 ]6 c* y9 b
    5 k& c+ A: _$ b+ o
    Cell[CellGroupData[{
    , b& C4 `( H0 j; Z; x4 r: f8 J/ W2 z. Z5 Z0 P
    Cell[BoxData[
    0 S7 ^0 U+ r' L4 n( S* _( u RowBox[{
      N7 s5 e6 c. g  RowBox[{"Ca", "[",
    $ D- y/ p6 F: q: }3 ?. A+ `   RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",
    5 ^; g9 R6 F( O. s CellChangeTimes->{3.5779573112927003`*^9}],
    9 Z' b" f" M, V. Y
    ! k, p/ }7 g, P. ]. o8 pCell[BoxData["0"], "Output",( X  u% r9 D5 H6 A) p; p3 ^
    CellChangeTimes->{6 j/ s! h5 K: \2 X$ E2 s8 c
      3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9,
    , |* g, C1 g6 I" R* G   3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9, . `9 c$ U9 [# v+ J; i$ w
       3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9}, 8 C1 Z' R9 _3 I6 D0 _) o/ C
       3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9,
    / y& ~7 j! S! E. V   3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9}, 3 R$ }2 D- Q" d$ G. q0 f; Z
       3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]. x! W* m, v4 ^! \2 a
    }, Open  ]],
    $ m* L' I( ^* `6 r4 F  C
    : P9 b$ i( K, OCell[CellGroupData[{$ v" i9 v3 y% l2 z% U- `- B+ G

    3 g7 K$ Y% P7 R- H  {0 E9 L; P7 @Cell[BoxData[
      v, ]7 \/ j( F9 D, ^! m RowBox[{# i0 y4 d! k, ^3 ~
      RowBox[{"Ca", "[",
    , T' T/ G- z3 }+ g, r   RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",$ k) g! G0 p, P: z$ d9 d+ X1 |% e  S
    CellChangeTimes->{3.577921461734375*^9}],% u; a' R1 x7 ~: @8 V: X: z
    8 y. t. R8 g/ P' ]6 v: C: s
    Cell[BoxData["0"], "Output",
    1 g0 z6 h. r1 F5 [1 b9 d6 } CellChangeTimes->{
    1 }; F) C& Z. h9 R$ L1 T' W) x  3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9,
    + G" L/ c. f6 F$ g: j' w8 a* D   3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9},
    3 U7 ^7 M: z8 c" q   3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9, 4 Q: R% |, v8 s4 T' m3 j
       3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9, ( Q" w( |( _: O" d" J: o
       3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]' |: K: s+ c4 R3 M4 m9 ]6 P2 d3 _/ W
    }, Open  ]],2 O1 u; |* }1 y3 |* b1 p
    4 q# Y* U- T/ P
    Cell[CellGroupData[{
    8 z; r& |+ F* j( ]; H/ H3 [
    . ?4 k2 J3 E/ h- K- @0 yCell[BoxData[1 @. ]& E. w! I. M- E" f2 b$ O
    RowBox[{1 D' G8 U' F; D! P9 I1 P
      RowBox[{"Ca", "[",
    5 t; d% J1 F6 z2 i7 _   RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",- V. U6 Y3 m* n" b; A3 ~! a( P  f% W
    CellChangeTimes->{3.577957303118286*^9}],9 W+ r) J5 X1 Z

    % K* h  K7 I* l/ r/ l# gCell[BoxData["0"], "Output",
    4 r2 @2 }  H+ ~2 k CellChangeTimes->{0 `: i& h2 b& }9 V" s
      3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {' T- @2 f) u) d( D1 O4 F) r" K
       3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9,
    / H4 h3 [7 F5 D, I+ W5 \$ B   3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9, ) p5 i' @9 v+ ~
       3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9, - ~5 |  b* ^6 t5 I
       3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9, , U& l6 i9 V4 v# g
       3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {
    : z3 j4 C  X! F- S( h9 i( N6 M   3.577961889378585*^9, 3.577961912965826*^9}}]  g; i6 Q2 k1 L2 c% v* H. V# z: R& u
    }, Open  ]],. L, p0 `2 @8 T2 ~9 Q! A! H
    3 S  g% V! A1 Q8 c! h
    Cell[CellGroupData[{
    : Y# o2 o, _9 p. |/ f* G' T: i; p9 I$ j9 C
    Cell[BoxData[
    + V1 B6 Y' j) {# {7 D# n RowBox[{
    / ^5 J- @# e0 t3 ~  RowBox[{"Ca", "[",
    5 @5 `% M, N; R; D1 O. d, U1 d   RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",
    % T) R  \. n7 S4 w& K5 j CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {4 f6 ~5 E! L" s
      3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9, : z4 P2 ~7 ?7 C
      3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {( E8 H- Y. U% y; q4 @5 P7 D+ E5 b
      3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9,
    4 V# u6 B& m% o7 \2 H  3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {8 @& Q- v( w7 y) Q$ i
      3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9,
    : Y* z7 C! s7 Y) n$ k4 i- o5 |  3.577921435703125*^9}}],! S6 y* Q% H! J$ c
    9 q  f) ~' ^2 G3 k6 Y9 }! C4 \
    Cell[BoxData["0"], "Output",+ ?5 E! ^. ^* S3 O* z6 t8 o) ~
    CellChangeTimes->{: r& O5 i' }, J0 F. h; C! K0 H
      3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {$ |/ @% {' X/ l% e# ~
       3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9,
    . U' o$ B+ f5 Z1 b: _  f/ F' ?+ d   3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {
    + K5 ?( a' E! y. P8 Y% U   3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9, & A2 X2 [7 @% D3 i- u! f3 ^/ I: f
       3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {
    5 b% j* c6 m1 P( J- D" i" n- c   3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9, 4 h3 ^/ p3 a& q3 J3 Q5 t/ O2 X: e9 L! N
       3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9, + U$ p, b4 q6 F7 M2 H8 u
       3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9, % P# D, \8 X4 c: b3 n4 i- R& B
       3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {
    + Y/ Z( ?* N! d! s8 V   3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9,
    5 ]) {& @) l6 j# S   3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {. [2 C! F$ C3 x$ t: s
       3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9, 1 Q9 j& f9 A3 p: g5 C
       3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]  ]6 Y2 w5 s( i* P/ _( P
    }, Open  ]],
    6 O% T; l( I/ w0 N* M- L* T4 u$ i# H1 Q4 l' u
    Cell[CellGroupData[{1 y1 }9 u" C; @0 {: l
    ! n: Z, X7 p7 J- ~/ s2 {
    Cell[BoxData[, Y" B: c5 \. {, d
    RowBox[{"Delta1", "=", $ E) B1 T4 _9 F
      RowBox[{) W% {5 q, v+ O1 T. C% @
       SubsuperscriptBox["\[Integral]", . Y& b: f9 R4 j# M* [
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    $ Q6 n2 q3 A/ S9 b* c   RowBox[{
    5 p  k; q# L. H    SubsuperscriptBox["\[Integral]", . ~3 ]! @- l* n, `
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], - o9 K; i/ n% p1 H7 ~
        RowBox[{
    6 u$ y8 G4 l/ W* O     SubsuperscriptBox["\[Integral]", " n7 X2 }0 m2 i1 X% A% q* s0 g
          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    + ?. _( Y: T$ P  T: G4 @5 J9 j     RowBox[{+ a- U+ ~) q0 z) @( a" n. n
          SubsuperscriptBox["\[Integral]",
    , D, k: Q& K1 o1 d& D4 s       RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 7 X, |) T! J# f) j& F) r
          RowBox[{
    5 o) |2 X! T: U; K& m* T       SubsuperscriptBox["\[Integral]",
    % ]7 [& t% q# i( j        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ' Z4 N, o, C! D  E' I
           RowBox[{
    " E# W; ^9 a% R  I) B' ^        SubsuperscriptBox["\[Integral]", 1 x# Y1 B% H6 a
             RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ( J: F6 q+ q$ G: @: {1 n: Z
            RowBox[{; @# w* D  M9 i7 Y: ?
             SubsuperscriptBox["\[Integral]", 4 a8 I% {5 N8 ?: G1 D
              RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], $ u* Z, ^8 N9 d4 f" U" J  X
             RowBox[{
    # z; j, q. q1 Z          SubsuperscriptBox["\[Integral]", - U) ~0 x9 l4 P$ O7 m  u
               RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    + F, A% q) h2 ~2 f# t          RowBox[{7 c  I  s7 q  C- d
               SubsuperscriptBox["\[Integral]", 9 R0 F* u9 }8 `3 @- e8 Q
                RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], . p7 r0 \! u+ D: T  C" L% t9 }
               RowBox[{
    ' [. u4 o8 ?- H. y1 }+ q            RowBox[{"Exp", "[", + H# T6 V6 v: g4 O, u5 M
                 RowBox[{
    2 O$ v. r' p* Z  V- E' w              RowBox[{9 t' F) Z5 b$ T3 L
                   RowBox[{"-", : v0 }5 `3 g5 a, P' X
                    RowBox[{
    $ `5 q* z  y6 a  j2 ^/ k  ?1 x                 RowBox[{"(", * [$ o7 U7 [4 {& o, Z. s6 P
                      RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 2 B) e9 N, a: I$ _/ g( W
                     RowBox[{"(", 9 M, R# n$ o+ }: E
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/",
    ! L) W0 I9 |$ a8 K- u              "Delta"}], "]"}],
    ; k- k/ O# o2 z            RowBox[{"\[DifferentialD]", "x1"}],
    , {6 T, j  B, t$ a            RowBox[{"\[DifferentialD]", "x2"}], 5 P  O8 q; h6 U+ s7 Q% j
                RowBox[{"\[DifferentialD]", "x3"}], * `$ Z) ~( [4 m1 D2 l, F0 `5 T
                RowBox[{"\[DifferentialD]", "x4"}],
    : X4 J& C# D" t            RowBox[{"\[DifferentialD]", "x5"}],
    ) T1 ~, X6 M, z/ T: C! {$ u2 j            RowBox[{"\[DifferentialD]", "x6"}],
    . g' h5 k; V% |  f8 T. Y, p            RowBox[{"\[DifferentialD]", "x7"}],
    6 T$ J" n7 \0 q8 [* \            RowBox[{"\[DifferentialD]", "x8"}], ) b: u5 [: A3 g" N
                RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input",. o2 M# u% O" g- p' A8 B
    CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {
    - B0 v3 D6 P$ l   3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9, " D" J+ Z, L% C3 }) H
       3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {
    ! }; g  z# F6 ?7 I9 @6 y   3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9,
    ) b8 x. m7 @4 q4 X   3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {# Z. [9 j2 k: N. f
       3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9, ) b) a7 B$ m- e1 t$ m
       3.577918964453125*^9}}],5 O$ z  m" S/ Z# s  C

    / R' j0 w) R: k7 p8 ]Cell[BoxData[
    ) Y* A; I2 U6 m+ s$ I RowBox[{"97.40909103400237`", " ",
    : U0 H4 C0 P8 f2 z4 B5 Z9 {( @  SuperscriptBox["Delta", "8"], " ", 9 D" e- e& p. u$ c& D9 a- }
      RowBox[{"If", "[", 7 E# V6 N, s( e8 t( }4 G! p
       RowBox[{
    : O2 o* \: y+ o    RowBox[{
      b0 x. p$ V' I7 [/ p2 `1 w     RowBox[{"Re", "[",
    5 v( G+ N3 K6 ~" K  a      SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",", 3 [! s. B* n2 d0 j6 ~  g# ~
        FractionBox[
    - `% I' J4 p( W- t7 g2 H! ~7 I/ s     RowBox[{"1.7724538509055159`", " ",
    ' j( E3 m( K  P( D- Z; O      SuperscriptBox["\[ExponentialE]",
    ; X) X. M* t4 M2 \0 g( o2 ]7 s1 I       FractionBox["1.1102230246251565`*^-16",
    & Z9 V( }% l  v/ c6 F% L        SuperscriptBox["Delta", "2"]]]}], 5 R) k  s! W. W) R/ ]- {: N4 O
         SqrtBox[
    / y7 l% D3 H. B1 |7 I      FractionBox["1",
    8 [2 n! j3 Y$ {0 w( S, z5 o       SuperscriptBox["Delta", "2"]]]], ",", 9 e$ G  n9 G' \% T, [! y# B! `
        RowBox[{"Integrate", "[",
      \- G9 ]3 Y9 u, w# [/ o     RowBox[{0 Z/ c/ J8 K0 {7 a) K
          SuperscriptBox["\[ExponentialE]",
    ! N+ A: m) O4 y3 U0 w       FractionBox[/ T7 |9 O5 e, P7 K9 C6 p. i( D
            RowBox[{"1.1102230246251565`*^-16", "-",
    4 N5 h/ d% c) J6 j2 n         RowBox[{"1.`", " ", + g# n9 g9 Z( v& z  I9 Q
              SuperscriptBox["x9", "2"]}]}], 2 d, i; d% Y6 ^3 C% D5 `2 A4 C
            SuperscriptBox["Delta", "2"]]], ",",
    ; ]/ p" f6 M( N7 L4 P      RowBox[{"{", + N" f$ o' Z6 |
           RowBox[{"x9", ",",
    & q* {$ @$ L: T0 C7 i3 G9 n0 f  D        RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", / f5 a; P; @/ i2 x2 a3 m8 M
          RowBox[{"Assumptions", "\[Rule]",
    " @6 c! l& s# S; @/ @       RowBox[{% g2 `; U. O* R! s8 Z. S: D
            RowBox[{"Re", "[", & W( t! w( {( q& H  U( \
             SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}],
      W/ d: L$ A5 ]! k- p9 U. H     "]"}]}], "]"}]}]], "Output",9 D0 H1 {2 D3 ?, u
    CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9, " M9 r4 i1 G% k5 n, C. W3 Z% `
      3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9, # n) H( C7 O3 y2 E. l
      3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9,
    ; |! W- ~* K0 f. L5 {  3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9, 1 _. e1 A9 f6 A  r$ U% _" ?
      3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9,
    9 l: y! z# b( E4 X5 P/ |  3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9,
    ( K" A9 t- W0 ~9 p+ B% S  3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]3 y! b. W6 o. g0 P; D! L% {5 ^
    }, Open  ]],  G2 D( l2 x: S, j4 S8 U# A# Y

    ' h0 S3 [- o+ ?5 f: HCell[CellGroupData[{6 @) @' w( b- ]$ m9 U

    : v2 p3 w; _$ Z# p  r5 YCell[BoxData[% N- h  U1 \, h" j7 c" q
    RowBox[{"Delta1", "=",
    8 m  o/ Z% m1 a+ N4 S- T  StyleBox[% K' n0 U6 Z3 y  ~+ i
       RowBox[{"97.40909103400237`", " ",
    $ Q/ g' V* {% d, f    SuperscriptBox["Delta", "8"], "  ",
    6 h0 G; f; j5 b8 x    FractionBox[
    , W, V6 t2 X0 D     RowBox[{"1.7724538509055159`", " ", 9 v- ]- a$ P, _) g; d
          SuperscriptBox["\[ExponentialE]",
    * [0 X& h8 q5 ^) v6 T6 e7 C0 N4 A       FractionBox["1.1102230246251565`*^-16",
    3 P0 [0 r" B$ U5 Z- M7 I        SuperscriptBox["Delta", "2"]]]}], / C" V8 D; x( i2 a9 x" W
         SqrtBox[- o9 b4 o: N$ ~- s9 V# n* N
          FractionBox["1",
    ! u0 ^3 Y# u( C  L( V       SuperscriptBox["Delta", "2"]]]]}],
    " ]; M! W' s. n0 p  g   FontWeight->"Plain"]}]], "Input",! Q: q9 c$ ?# H# W9 H3 I# k
    CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {
    ; p1 P- ~6 S3 A( h) p   3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9, 3 z' V, [3 E5 \% O5 Q* x0 R
       3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {
    ) ?/ V) s( O+ s3 O# {" Z   3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9,
    7 f1 N* j* F% W. M% A  G) |   3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9}, / J& i% n5 c5 U! ^- Z3 `* R
       3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],
    0 H  Z2 p9 @/ Z" R/ @. m& n7 }- b! }$ O, d7 L7 P1 d) ?! y
    Cell[BoxData[
    4 }3 p1 |) F- ?# a" g/ k FractionBox[  V! j9 @9 }/ i: o# H& d" X$ q4 Z$ i! }
      RowBox[{"172.65311851642346`", " ", 5 X0 b, I2 ^7 z% _% V
       SuperscriptBox["Delta", "8"], " ",
    " E) t8 k/ r% D) d5 ]+ k9 S   SuperscriptBox["\[ExponentialE]",
    . m2 A, ]# ^/ i, m+ Y    FractionBox["1.1102230246251565`*^-16", & U) f% t; T$ _5 J
         SuperscriptBox["Delta", "2"]]]}], & R  h3 f3 n0 X# ?
      SqrtBox[
    ) @4 Q1 K- x% j4 k) I% B   FractionBox["1", + F4 r4 p  b* @  j9 \- H; L0 d' B
        SuperscriptBox["Delta", "2"]]]]], "Output",7 j/ O' t7 ~9 S1 S9 R" h
    CellChangeTimes->{
    , G. S$ q3 o2 \9 T; k* @  3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9,
    8 R& j: y" V' h0 A   3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9,
    ( i7 P# u5 V0 Z   3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9,
    # B& ~3 D- M  d" ~& X4 C6 T2 k   3.578012166234375*^9}]8 N! ~0 l6 |$ L4 R2 {
    }, Open  ]],
      J3 ]& {' h& ~$ {" |* w8 O3 H5 }7 Q% m: W. v4 U
    Cell[CellGroupData[{" x$ @( |3 V- h, ]& f- N2 a, q4 \( P% k
    " b0 J& Y; y5 l% o
    Cell[BoxData[  i1 W  H3 N3 o, R" C; z8 Z- \' C
    RowBox[{"DeltaX", "=", 3 H) i. F2 E) c* ?0 H5 W
      RowBox[{"FindRoot", "[", . L& f: n* g0 k7 m' h
       RowBox[{
    9 \7 s+ E/ r7 l1 c6 l  H9 H    RowBox[{"Delta1", "\[Equal]", "1"}], ",",
    . O2 @3 u8 X9 i8 C3 G    RowBox[{"{", $ J; L, P, f4 V  n0 J( o0 ^) P) Y
         RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",, [8 k/ V6 @. {" e
    CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {
    ; t& W& c! J' D' C, j" V; G   3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9,
    5 X" h% X8 d$ [- b2 y   3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9,
    - M: c4 x7 g9 E3 q! J  `9 l   3.57791921584375*^9}}],
    7 i, L$ n2 b9 B1 o& c1 R$ l- {! E* C7 ^- d( R) z# v: V
    Cell[BoxData[  d7 d$ N( z) v+ z
    RowBox[{"{", . ?# a) q( N; a! s
      RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",5 g7 f4 o- a1 l( T8 F- u
    CellChangeTimes->{4 ]: a) D! R7 O+ U2 ?
      3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9}, ) S. Z# d: Z+ e, d
       3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9, 5 \2 ]1 X6 S$ S5 Z6 g- m
       3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9,
    . p4 [  Y' p0 m$ t# o: y% X- u5 y   3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9, , a/ {. s" J7 \3 ?7 m+ S
       3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {
    3 e* P" \1 F6 ~   3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9,
    ; k7 G7 H# u; i- J+ x) `   3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9, 5 C9 G/ L, |- ^  Q4 k
       3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9,
    % Y2 ?9 u; e& m6 i   3.57796070150625*^9, 3.578012167703125*^9}]
    # ^' J$ P2 X  {  Z! R4 X: Z: y}, Open  ]],
    ! B( o/ N1 {" I. z: [1 J! |
    . E3 c( U" j5 I2 YCell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\, g5 X; I* q) a: F0 i" s
    \:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",
    ' ~+ G& Y5 T+ T4 M/ l CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {
    6 M, h5 A) y# i2 P& m  3.577960705312657*^9, 3.577960707621461*^9}}],+ W' d! e$ d, R: [1 P% B- j

    ' b8 _4 x: ~+ x) G+ N2 DCell[CellGroupData[{
    % ^4 ]( ^0 P! X) _8 F- ^* ^' L' z) c( k
    Cell[BoxData[
    0 a0 N* ?" p. d RowBox[{"C1", "=", "Ca"}]], "Input",& E- W- f0 L# ^. B  O# o# u
    CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],# s. o' P/ k! W% @  w- Y

    - g2 L( u9 m: K' ]Cell[BoxData[6 m) H. m7 F# G6 v/ h8 g
    RowBox[{"{", : j; h$ z2 @* F$ ]3 \
      RowBox[{4 @6 h! d0 w' Z# s" V2 a0 \
      "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",", $ k3 S- H4 j+ U6 g5 Y
       "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", ' W5 h( }7 X4 R- o0 _
       "0.`"}], "}"}]], "Output",
    7 ~+ h$ ?3 [) w7 R CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9, 6 |$ _, b/ Z" k3 f9 v7 F! K0 h
      3.577960710273465*^9, 3.5780121855*^9}]
    ( P: D5 W. @1 X3 p. A9 S}, Open  ]],
    2 Q6 T+ F# A8 P2 G$ o0 l1 `+ W9 A0 A; U; M. Y3 l# s3 R) V2 H
    Cell[CellGroupData[{
    ( H- [, ^' Y6 P6 b1 |' F/ c" k* `6 M$ A4 O# O8 w. Y# u* T* A
    Cell[BoxData[
    3 V. m, r: s% J' i RowBox[{"u1", "=", # E1 E- H& H5 d% p9 J$ a
      RowBox[{
    4 p5 Q' T! t! C; }   RowBox[{"Exp", "[",
    " b! |9 A5 M% [8 p4 A5 m    RowBox[{  _7 H  K& L) M/ E+ {8 z/ P% o
         RowBox[{
    " L  D4 R. M& a; c, v      RowBox[{"-", % S( m" d7 d  T) _8 c
           RowBox[{
    " e; e3 z; M% F: W  _  p) U        RowBox[{"(", 5 {0 w7 }; v  N. h. o* E
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", % ?4 y" A( Z# N1 e( A
            RowBox[{"(",
    , _0 A# h) y- N! X         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    . P+ ~8 ~$ p! j6 e5 G2 C     "]"}], "/.", "DeltaX"}]}]], "Input",
    ) Z$ E7 {% _: r CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {
    + l- o4 E. H, _, b1 [. Q$ X   3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {
    0 R' r- c) K/ w8 A( h! D9 Y   3.577919193484375*^9, 3.5779192326875*^9}}],
    2 q, R1 f5 t9 G, Y5 L
    2 ~$ U- D/ l: y2 X3 rCell[BoxData[
    * r3 P* H. l; h0 \5 W) ~; S SuperscriptBox["\[ExponentialE]",
    - z1 a" f6 ]1 ~- w. l" Z; o2 {  RowBox[{"3.141592653589793`", " ", 7 Z6 B/ a) m" e  M+ s# s* M, i4 ?! P
       RowBox[{"(",
    2 L5 S$ z. q1 B2 W5 P* m    RowBox[{1 O# P0 z2 N# q3 c8 `& W4 W8 P
         RowBox[{"-",
    " R" g- }& M0 z" k9 d# K, A0 X1 `      SuperscriptBox[
    9 Y  M% b! w3 ~! \* `       RowBox[{"(", % O# z. Q1 X3 q) V! P
            RowBox[{
    + y9 i9 U9 J, ?7 O         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", : j+ s3 O+ _- e9 Q% M/ C
         SuperscriptBox[) z# x" H0 E6 o; n; d/ a# }6 u
          RowBox[{"(",
    / ]. o2 C) H# B4 c" R       RowBox[{/ @: P8 I. ]% J1 ?1 T; ]- |
            RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-",
    ( Y: F$ ~: U9 I6 r4 y     SuperscriptBox[
    5 _6 C# z' [. |- V" r) ]* f      RowBox[{"(", 2 V" W4 Y1 r" Z) Z, d- [
           RowBox[{
    - ^% x# ^0 E! f( |        RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    4 L7 _5 u. Z6 t5 I+ G. ~! @     SuperscriptBox[
    ! Y  v2 d- H# Q, v      RowBox[{"(",
    - U( c& Q4 R! q' J; B" ^% I) I       RowBox[{
    $ z+ S5 h5 ]5 H, j& f+ L        RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-",
    1 Z! y$ ]7 R: }     SuperscriptBox[; O# q; B1 k# B" [
          RowBox[{"(",
    0 f) S: x3 ?& g$ B& J       RowBox[{
    , Y. K+ Z1 s  r" c$ g        RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-", ( p# U8 N7 X' w2 a
         SuperscriptBox[( n- e# r( u# ?; _/ d6 W) G$ s
          RowBox[{"(", * K7 z4 o2 b- X: e/ P0 Q2 E/ i
           RowBox[{$ t! @5 X8 D2 ]' _$ n
            RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    7 P/ _1 A1 [2 Q$ p. m7 I$ B0 X     SuperscriptBox[
    + D0 j  B. c& f' b0 G      RowBox[{"(", ! S! q3 R6 F2 G9 s
           RowBox[{) E. o9 N* ~8 U+ ~+ T
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", : C9 M- S8 @, K
         SuperscriptBox[
    8 A) F$ e1 o3 ^+ M  a/ U, ~      RowBox[{"(",
    & e5 `9 i' A4 h* d) m       RowBox[{
    4 G: d+ T& n/ n+ ?+ L        RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    4 G" r6 b. u7 C4 b  g3 @     SuperscriptBox[
    & l; e' j  m- S2 _# |      RowBox[{"(", $ i+ q7 @) b1 w1 {; T
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
      ^" ^" i4 _  ]    ")"}]}]]], "Output",9 G: c& f6 k$ K6 Z  S
    CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9, 9 U( O# Z1 g; l! I1 T
      3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9,
    " v& R0 R* U+ X) s  3.578012187078125*^9}]
    : p5 R0 m  g- |7 p5 ?% r}, Open  ]],
    & @1 L5 |" [9 _4 a0 S3 K8 p
    2 R# s8 S# {. Q9 fCell[CellGroupData[{, o9 x% e9 f( Y/ |
    4 I# ~7 g- R0 J: Q/ ^- X8 j+ X
    Cell[BoxData[
      p% Y; U( J/ C! i! H( s3 C# ? RowBox[{"C2", "=", "Ca"}]], "Input",% l0 R' n5 V" ?2 S; o
    CellChangeTimes->{3.57792047321875*^9}],
    7 v. u# {; ]( Y* ~. F
      z% h5 i+ ?5 j3 X0 X  q/ }Cell[BoxData[$ [7 U# k% g, E& a, \: v) |( F
    RowBox[{"{",
    ) @) ]+ d8 t- M. I1 l. J6 }  RowBox[{
    ( [3 m: r6 Z$ ], k: S  "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
      l7 o. ^; z& w$ L; e4 x   "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}], : ]' q: h! {3 u, h  S! ~( F
      "}"}]], "Output",
    $ q! w5 b4 O: m) p. {# x! Y1 ? CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9,
    - V+ Y$ V" A: N+ r  3.5779607401163173`*^9, 3.578012204671875*^9}]
    1 f5 s7 Q4 A2 \3 a}, Open  ]],! T) L- O/ x* ]7 l

    8 l& m9 n4 I1 c4 q- s- t, gCell[CellGroupData[{
    5 A+ k+ y3 x8 J3 f$ t, a$ x3 C4 l" m" S! J& t; i4 i7 X
    Cell[BoxData[- ?) z& V- z+ Y( r
    RowBox[{"u2", "=",
    / E$ T4 u: {' _( h& I& E* o  RowBox[{
    9 |) b( Y6 r& i4 G7 f; v* b   RowBox[{"Exp", "[", ! A7 F% O' ^# y: p, ~, b
        RowBox[{
    7 y  }$ K3 n" s1 w9 h     RowBox[{
    8 \' {" M7 o$ y9 E' ?5 |; j# ~) B      RowBox[{"-",   S' ?4 c+ [9 L$ ?% W
           RowBox[{
    1 x  M; A9 T1 }, m( @        RowBox[{"(",
    ( I+ k, q0 [4 Y$ y         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    3 B4 M& U& c) q- ]0 J* f  A/ l  M        RowBox[{"(", ! R# X0 V; n+ n
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],, D# t" X5 T* H6 V# j2 d+ {
         "]"}], "/.", "DeltaX"}]}]], "Input",
      U' W7 ~* g, A- L; ]0 b4 U+ ~' y CellChangeTimes->{3.577920484109375*^9}],
    + f. u# A/ @3 y# F* g. Y6 `1 s/ x- }. l, L2 _1 K* s
    Cell[BoxData[0 {$ P. ^: Z: \& D" G! E, l8 e
    SuperscriptBox["\[ExponentialE]", 0 g  w+ r0 a  ?7 E1 r  \
      RowBox[{"3.141592653589793`", " ",   L4 Q$ R0 w4 J8 `/ ?) M  p* ~
       RowBox[{"(", 7 i8 t: g: |9 r* U* X  e) _
        RowBox[{
    ; Q' K/ k! {  m$ F  w& e     RowBox[{"-",
    . W% ?1 ?, Z( D      SuperscriptBox[
    ( \1 O  {7 i$ b$ m/ y+ X( a       RowBox[{"(",
    & k2 \: z+ c3 j0 T5 A: C7 Y        RowBox[{
    : r/ A4 L6 f) n5 G% c         RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    & H2 i6 S1 J7 K6 d( t  ^5 H! d* x" O     SuperscriptBox[) f8 T4 z; b* i  j3 y  s! {, c
          RowBox[{"(",
    : C9 W2 X$ J9 u2 l& `0 ^* z( j2 ]5 [       RowBox[{
    ) y7 q" o1 _7 `% u( v! r0 \        RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    ) E8 A% @, I' T' u2 x& a     SuperscriptBox[  x5 b5 N/ O& p  `/ ^6 {
          RowBox[{"(", + ^7 K9 p& {9 Q! p0 `
           RowBox[{- I: V; x2 T3 l, g# P
            RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", + q0 k: l1 \6 X) M7 K6 S3 P) W
         SuperscriptBox[
    5 D2 |" _' c; ]4 X" H      RowBox[{"(", 1 @. g3 W. |- _% \0 V
           RowBox[{( R# c& L  U0 D2 ^; y
            RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-",
    & j$ N. q, }4 c; W' d     SuperscriptBox[0 ]6 @) d6 A0 ?1 M' \
          RowBox[{"(",
    4 A% i9 u- E% I4 y( `" r. s       RowBox[{. n5 J2 j6 A1 {
            RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", 6 `) h3 X! ~- ]- v8 A$ Z& O2 T. V
         SuperscriptBox[1 f) m, _3 W/ l2 g& B" j5 I
          RowBox[{"(",
    0 k2 _1 [; F6 I; a8 w6 z/ e9 e       RowBox[{
    4 e6 m; }6 f. K        RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", ! S  N7 c0 ^. e. x
         SuperscriptBox[( {- F  g2 z+ ]! l
          RowBox[{"(", & x; g# f  E7 J, T5 d
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ( _+ z) o8 |8 ~- V% s9 g# S     SuperscriptBox[$ A$ Y: K7 l9 f& _
          RowBox[{"(",
    1 A% H% o/ I0 S7 s       RowBox[{+ N" d8 E5 @, B" F' l
            RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", % y6 M7 m, P: i& F0 S5 s
         SuperscriptBox[+ Y! e# `6 X- Y! n. u5 ~
          RowBox[{"(", 0 b* a( h2 b$ f2 C$ C7 J; h
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    4 S8 x) Z( O0 `+ f+ U    ")"}]}]]], "Output",
    0 P8 \# ^* z. Z; l CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9, ; I% q! H. O/ `4 ?& M5 y8 f
      3.5779607413955193`*^9, 3.578012205484375*^9}]
    - _0 n+ G  }- k$ a}, Open  ]],8 c) u  ?( C3 j2 }8 f
      e# T6 e/ ^+ h6 j$ \' I8 b( J
    Cell[CellGroupData[{' |( [. y( [( i4 ~0 }( k4 n3 V
    $ i. A: c& [* o
    Cell[BoxData[
    3 d* f0 ~1 {% L) s3 D6 r RowBox[{"C3", "=", "Ca"}]], "Input",
    & r% D! b/ z8 a6 Z CellChangeTimes->{3.57792064125*^9}],
    6 h/ n) t, L- }; d/ G" ^8 l& d' I" i1 I, {1 d( g0 d) T7 A0 p
    Cell[BoxData[" H$ o$ \4 i( g6 e  x0 d" u
    RowBox[{"{", 2 P+ V1 S+ Y, K  Y( i1 Z/ ~
      RowBox[{( F5 n) v. }* c) `( c% y
      "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",", , Y. p: M. T. F! [2 B
       "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}],
    ; a" n; N/ L$ p, b7 v9 S3 D. t, ]  "}"}]], "Output",! I3 M1 p4 J& j" A9 A
    CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9, 6 ]# Z6 \% x4 f
      3.5779607642027593`*^9, 3.5780122103125*^9}], \( f" S% q# e, Y& n7 S# t
    }, Open  ]],
    7 A* S$ u% j0 @" ]
    * ~( J  e) e" ^, m/ m0 `Cell[CellGroupData[{- e8 E5 j, z4 S7 u* x: j
    6 G- r( s$ a3 \! t6 n/ c" b
    Cell[BoxData[: i8 y4 T  {2 n- F, I+ A  M
    RowBox[{"u3", "=", " _( S( @  c- `0 [2 j" g* H
      RowBox[{
    7 a* W) u9 c) T' Y+ q5 f+ t   RowBox[{"Exp", "[",
    % M2 ~3 p6 p3 L    RowBox[{7 H$ _, j8 F7 f2 g+ N" c7 @" g
         RowBox[{( y2 |; {+ q+ C; }8 n2 z0 O
          RowBox[{"-",
    2 j6 X0 O* {) ?( I! }3 W% H       RowBox[{. ]6 s( Q' n+ g# N" T( }' v
            RowBox[{"(",
    " _7 p# s5 c8 q         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", % Z2 z* w* Z" m4 E$ X: y$ m  I# q9 b
            RowBox[{"(", / Z3 a3 l) N4 V3 k; O  O
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],+ y4 k7 d7 x7 w5 Z* [
         "]"}], "/.", "DeltaX"}]}]], "Input",5 V) S6 p& H9 b
    CellChangeTimes->{3.57792064921875*^9}],
    : V4 F4 r6 d5 L6 l8 r4 H7 [+ w( B5 S" w
    Cell[BoxData[
    + J! D! t& T7 I6 @+ w SuperscriptBox["\[ExponentialE]",
    * N3 S6 q9 ]5 {: x* y& C3 F: l: ~3 D  RowBox[{"3.141592653589793`", " ",
    & j3 a' f" Y9 T- v. f   RowBox[{"(",
    " |+ K* B% H2 A, o9 m! L4 F    RowBox[{  q9 C% ]2 q+ @! O
         RowBox[{"-",
    : \' \' T, D/ O8 j2 c      SuperscriptBox[3 v% v% N7 G& @! w
           RowBox[{"(", - f" u! E) c+ Q: I4 Z
            RowBox[{9 W6 @5 |) t+ ?  T* p0 i4 }- J( K
             RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-",
    7 U, O; `4 {0 B0 ], \     SuperscriptBox[
      w% `; c% a! G- \1 D      RowBox[{"(", 8 T  K4 F! l0 d% X# J  {
           RowBox[{, X2 N  ^4 w) A# I1 U
            RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-", 6 i3 d0 ^$ T& C1 ~0 f1 }' E
         SuperscriptBox[  l1 g2 Q$ A6 F4 x3 U+ U. q. K
          RowBox[{"(", $ @1 D" k4 y4 Q5 X
           RowBox[{5 s: c( h! I4 ~
            RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", " f8 Q2 g2 R4 x: M! V7 h0 E7 |
         SuperscriptBox[
    # y* y8 w9 a% N1 ~9 i" Q4 Y      RowBox[{"(", + G+ H& y3 m2 C* z: r* D
           RowBox[{2 d+ C$ u% P4 X+ s
            RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-",
    ( C) E( _+ n+ e7 u& @) C     SuperscriptBox[
    ; k8 U/ \6 I- @; Y      RowBox[{"(", 0 A5 k/ C; @& G
           RowBox[{
    9 o0 g. ^* M/ v5 S2 n0 R7 @        RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-",
    - M6 Y4 h# N" n8 L3 ]     SuperscriptBox[: J+ |. n7 B  t& g! Q3 V( I' `3 b3 c
          RowBox[{"(", ) a! ^! [5 v1 W& y" n, m
           RowBox[{! z: a: V% t3 n0 E' N
            RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    3 u  Z( X& m  O2 r% o     SuperscriptBox[* n. c5 K" M+ E, d) i9 \
          RowBox[{"(",
    % T6 z- H) e1 K# S+ }; f6 W       RowBox[{
    % j) c1 @: ^. M  w+ p; {! l        RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-", . k* v- @( {1 p2 o6 V) h# ^
         SuperscriptBox[
    * j4 D# k2 y7 i+ l0 E- X" L# @/ @( W1 s% g      RowBox[{"(",
    * W, H- i2 k) e' R' m0 i       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ! j9 w2 M/ w( _
         SuperscriptBox[
    1 z# |1 Z- e: B4 I      RowBox[{"(",
    + l, N4 ~  k4 L9 Y% p, V, {  ]       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ' U7 Y) k$ p* d% u% E
        ")"}]}]]], "Output",7 U6 H9 h- \* i+ K( F; k
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9, 6 m! D% Q1 n' \1 t% X* T, b
      3.5779607654819613`*^9, 3.578012211515625*^9}]% D* u' u; `, ~+ ^# P
    }, Open  ]],
    8 G$ e6 r# Q6 T& j' j, S
    ; v/ N4 k' V0 A6 s9 tCell[CellGroupData[{
    + U  t1 ~2 l6 c: ]+ L% K7 Y3 s% k4 r- h( M# j4 }8 k
    Cell[BoxData[
    + R- N4 G3 B6 f RowBox[{"C4", "=", "Ca"}]], "Input",
    ! o0 w, _5 A1 `) y CellChangeTimes->{3.5779207559375*^9}],
    ; N/ o/ t, N1 B( ?" F0 ?' q! q2 p( s7 [$ Z  `+ v. c
    Cell[BoxData[7 T4 Q7 e* X) c" Z! Y! x9 a
    RowBox[{"{", * h, [4 S: ]% |" |. M
      RowBox[{: B3 z- A; d. _/ x; X3 w" u5 w7 N
      "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",",
    4 {: b4 P- w0 K  c7 C. j6 t! e   "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}],
    # d  j  T6 |2 j- v+ Z  "}"}]], "Output",
    - X% H/ g0 r7 t/ Y& p; _ CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9,
    ! X% `9 \8 K% ^7 I, r) D  3.5779607861363974`*^9, 3.578012216171875*^9}]& B/ ]+ @0 `- U8 H  y7 |
    }, Open  ]],) R( ?/ V9 e" `( a; o' s$ D$ E$ |

    - @' Z" }& B3 U& h# ^0 E5 y# P+ M5 ZCell[CellGroupData[{0 |& g: i) h/ }: V
    3 e, m; U/ }2 f  Q
    Cell[BoxData[3 j8 F  m' r% V( x
    RowBox[{"u4", "=",   ~0 G: s" T: L( O) Y5 Q- q
      RowBox[{) k; l# P' l; z6 j- K( o: Y% s
       RowBox[{"Exp", "[", . \9 b- L" m0 l  l$ l9 D. S
        RowBox[{3 [9 C' y# ^& ~: o! ?9 Y) Z/ c: ~
         RowBox[{
    ; y9 k* s# P6 P# n6 @      RowBox[{"-", 0 n% x% Y  Z7 B. O
           RowBox[{
    ' R7 j) z: C+ c3 n$ M1 l        RowBox[{"(",
    ( r7 z! `3 Z" i+ Z         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    . p/ N9 b# l! P4 N. R1 t        RowBox[{"(",
    ; Z# t( h/ x/ W: b1 z! E% z! E' D         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    4 {* P9 z' _+ J     "]"}], "/.", "DeltaX"}]}]], "Input",
    , Q* h" F& G+ C CellChangeTimes->{3.57792076325*^9}],
    8 @7 S; b$ F" B; C
    % F& s9 g' V: T1 mCell[BoxData[
    - G  B: e0 @. ~" c SuperscriptBox["\[ExponentialE]",
    ' U* r. w$ W$ y1 G  {) o  RowBox[{"3.141592653589793`", " ",
    # J. [- P6 U$ j( g   RowBox[{"(",
    4 F# j# O0 r- x, Y" F    RowBox[{# _$ ~( r& @, w& a  l' r
         RowBox[{"-", ! X& i% r. W! I7 ~. Z: m0 W
          SuperscriptBox[4 h: J. H. V$ j
           RowBox[{"(",
    ) V( v' D7 C/ y; |% h; {' y) A! F        RowBox[{" Z/ L7 s' ^' d" r1 ]
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", / f% r2 ]) h9 m1 a; ]: M. F" r
         SuperscriptBox[2 L3 x8 }$ \0 z  ?/ N
          RowBox[{"(",
    1 C& o: o# \0 l. K: f5 v       RowBox[{& ~6 o2 w* a" k6 r3 G
            RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-", - m0 X" K* }' T; b4 c
         SuperscriptBox[
    * A& [: U* s! v6 F; C+ B! U' B' l      RowBox[{"(",
    , c/ X# h# Q3 J, f3 ?       RowBox[{' p. D& d+ T" B8 m2 Y$ F' [- X3 i
            RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", , ^5 Y' }* Z; c# a' t2 i
         SuperscriptBox[/ `( H4 Z8 B* w2 C
          RowBox[{"(", 8 j9 ^. e# I# n2 p1 L
           RowBox[{# K1 z  _9 g: g# M& o, k
            RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-",
    - B; J/ L9 J! ^& S8 |6 o     SuperscriptBox[) x' c/ Q, L" I# T, p& F
          RowBox[{"(",
    : h( u( ^, C. _0 V; ]       RowBox[{3 m8 x( O: j. {% e- P
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    2 \# U. @. u. M1 C) P& t     SuperscriptBox[
    . w# ?! S# E. }$ q      RowBox[{"(", 9 X( b/ Q/ ]' Y: A5 R6 W5 `1 l# _
           RowBox[{
      i, {- b' g! q7 L! E        RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", / g, K6 u. k& y% ?  w2 k$ _
         SuperscriptBox[
    ( _$ u8 e3 V; j2 @' m7 j6 Z# ]) w      RowBox[{"(", + Q  e. J$ z+ e: r" Y: P  t
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", " D% {8 ]3 V: F  D8 _' E% T5 o: j& l
         SuperscriptBox[4 J& O$ y  o/ u7 F" U* V
          RowBox[{"(", 9 }5 N$ |9 X5 F& L
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    " }$ z0 S5 b. v8 I0 A; T2 F     SuperscriptBox[
    8 ^' U' X  I4 C, j* K2 X! ?8 r      RowBox[{"(",
    / ^) k6 p# ^9 X1 c& [, ~# n       RowBox[{
    * S; W0 m5 M( i. o" N) }        RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], , c0 j+ o/ O5 |  T8 O
        ")"}]}]]], "Output",
    5 Q' K% r. g; v! ~; f CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9, 3 q" m9 [! `7 a0 T. @( w8 Z
      3.5779607873531995`*^9, 3.5780122169375*^9}]
    9 U& Q( j4 @1 s; h, ^, ^% h}, Open  ]],
    5 J( G! ^+ ?3 O1 E/ {" O* u1 h
    7 v& O; }+ [; Q" ~3 v* \; Q+ R( D3 u! zCell[CellGroupData[{7 W; R% W6 b% |# |6 Q5 s  u( ]$ K. f
    % u/ j, M- m' C3 E5 s6 H" D
    Cell[BoxData[& h, a) f6 f% k5 _1 \( u$ ]
    RowBox[{"C5", "=", "Ca"}]], "Input",7 G0 e! r# e2 L9 q" B# H. D
    CellChangeTimes->{3.577920860671875*^9}],
    8 ]% J- l9 [/ P7 s) S9 X6 n0 q# p$ l. ?8 A' h% G* L) N
    Cell[BoxData[
    5 Y3 y* ?, f) b% }- W% L  M4 C, S RowBox[{"{", 7 r$ k1 s- n. N  R
      RowBox[{
    7 i: Q  q* y  g, P% h' h( F( t  "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",",
    . a" J4 N9 _5 x8 M. v1 Z  u   "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}], " T. o7 Y% t+ `7 C9 E& k
      "}"}]], "Output",: G8 G* z6 w8 m2 I% b
    CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9,
    " Z0 u1 f! O  A- ^  3.5779608137328453`*^9, 3.5780122209375*^9}]* j) j4 R; m& b/ s
    }, Open  ]],
    6 h) Z- d$ A7 h
    - y/ l' r% c% _' h$ a* SCell[CellGroupData[{* [& {. F# P! B/ c) v
    5 x( \0 j0 Y+ W" v
    Cell[BoxData[
    . ^* i6 C; Z" }" c, \ RowBox[{"u5", "=",
    2 V- C( @9 R: M  RowBox[{2 G2 ^* J/ T6 Y) O7 ?
       RowBox[{"Exp", "[", " @5 \: I. x# q0 r( Q0 Z
        RowBox[{  B. W0 s' V9 [. f! [
         RowBox[{) N9 T. z  A1 S2 F. s
          RowBox[{"-",
    6 a4 u6 i3 U! O       RowBox[{9 Z) i# j" S5 C' [2 r
            RowBox[{"(",
    5 ~/ d1 [& V8 S& E         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ; M2 z$ V, b) H! z1 B! \
            RowBox[{"(", , o; a/ E# n# ]# T7 P
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],! j1 ^) X- X# V8 E3 N$ h
         "]"}], "/.", "DeltaX"}]}]], "Input",: M8 p' m; h9 A, r9 U
    CellChangeTimes->{3.577920869375*^9}],6 `2 P% D6 B& t; h. c) q1 F" h+ w

    6 H8 T$ x$ K1 b+ R3 U  j: k/ Q* B1 j3 cCell[BoxData[0 t0 ^1 f5 f6 x( D
    SuperscriptBox["\[ExponentialE]", : `9 r  t; L. z7 g9 K, r
      RowBox[{"3.141592653589793`", " ", ( E) v1 j  T7 F7 ~9 {
       RowBox[{"(", * A, |/ q( b8 U. S# V3 P0 m: v2 F* k6 I
        RowBox[{
    - k! E- o7 \: ?* j     RowBox[{"-", . @/ Z- l1 k* D) V: r
          SuperscriptBox[
    + _6 n9 b$ b+ ^7 q! s, k3 O7 e       RowBox[{"(", 9 s" o5 {  W/ \# d3 B$ ~( @
            RowBox[{8 j3 w8 i2 m8 q
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", . z6 G! A4 B% i& q- s
         SuperscriptBox[; d5 o0 X) A1 C4 R$ _
          RowBox[{"(",
    1 i1 c1 S& m6 [' k4 J1 o& W6 k       RowBox[{
    . a0 y2 b3 A6 m8 U* {        RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-", . W( G* [) ^. s" M+ ]% e
         SuperscriptBox[
    $ k  \: t; k* s2 g9 N! b& f      RowBox[{"(",
    ) M" L! R) p) Q1 c( W1 s       RowBox[{  d3 f# ^, ]5 p* P
            RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-", 5 \( @  F6 f. X1 ?. @+ w3 N7 O1 `
         SuperscriptBox[
    % `& G/ a* F- O0 U2 |      RowBox[{"(", : I3 O0 V9 C. X3 V
           RowBox[{
    7 _9 n4 N7 f9 U1 v4 f        RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    8 J, Z5 w9 H& o4 }     SuperscriptBox[% e9 G9 G, D- U" Q+ h, ?
          RowBox[{"(", * |- E7 I5 h, z
           RowBox[{8 n  y' p+ s' H5 H2 m
            RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-", * l' l/ h; T0 e2 w
         SuperscriptBox[& R) {& |# ^( b2 E9 Y
          RowBox[{"(",
    * e" i, n% E* Y# W( s. i. ~       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", , L# W* o- q+ H
         SuperscriptBox[
    , h: b- o. f( D6 K: p      RowBox[{"(",
    / w% d$ y# @+ H' p2 S% T       RowBox[{
    ' l$ F+ E, c7 S$ q        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", + B$ Q9 E* Q5 M( Q
         SuperscriptBox[* f$ r. D( l4 S1 v* J
          RowBox[{"(",
    ) _( V9 |* e: n2 ~; U9 j       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", " M4 C- h' n- k+ X! V3 I: ]5 j
         SuperscriptBox[
    1 C! F, X( @6 n6 ?2 z0 @0 b      RowBox[{"(", 2 c) R2 H! h; m  X7 ]! P4 n$ d
           RowBox[{
    # }1 d; x3 _5 o* ~        RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}],
    % ^1 `3 V1 I( y: ]. U    ")"}]}]]], "Output",
    & s# H* l, ^9 `3 A7 R, p CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9,
    . B. W0 C8 A/ l  3.577960815043248*^9, 3.578012221953125*^9}]
    1 |5 t/ c- ?+ x( R/ ?}, Open  ]],3 |+ L  e! L% D5 R

    5 T) L: K. p: ^4 E$ @0 LCell[CellGroupData[{
    ( J$ ^9 M7 ^( L% \9 F# {* M8 U% v# W; f( Y/ |
    Cell[BoxData[- O/ @: W+ O0 B& x( e
    RowBox[{"C6", "=", "Ca"}]], "Input",
    " F8 ]8 J* b/ ?2 F CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],: g5 W6 F+ k% d5 z( A# P
    . [/ v3 O0 K' b& @; X
    Cell[BoxData[/ b" U$ _" i9 F9 z
    RowBox[{"{",
    + y: C3 U9 Y+ [8 K* \# m0 ~  RowBox[{
      R, w9 `0 ]" m! s* X) L) y  "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",",
    , s) P( ?( m- W# d( Z* }   "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",", - L7 O* x5 ]* p% h  l3 A
       "0.494866`"}], "}"}]], "Output",
    # E7 |7 W, a# o8 c4 J$ F" l CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,
    & i3 J8 d9 t$ i; {7 l4 r" m, r   3.5779608373044868`*^9, 3.578012227359375*^9}]
    / P# C6 ~3 e9 i0 l9 F- A}, Open  ]],
    1 q# J2 Y! Z4 a9 K% e5 F
    ) b: r' J: T: a; [( C% `1 |' gCell[CellGroupData[{5 i9 e+ K0 k8 X* W7 K  z* s" H
    : x1 V" W& Z; n" L# Q4 r
    Cell[BoxData[
    4 J3 M6 H$ S! J6 k RowBox[{"u6", "=",
    % j+ o& i4 N% v$ v6 B1 e9 B  RowBox[{+ K" R% L. N( a& h" @/ r
       RowBox[{"Exp", "[",
    , B" d7 R% Y8 g; ]) r    RowBox[{2 \! }. j1 x2 B5 n: ^# ?  S5 ]
         RowBox[{" N8 q4 s4 L, O
          RowBox[{"-",
    / ]; \% C+ G3 D" X: e* a       RowBox[{4 D) a" f3 j. f3 x: B, }6 [
            RowBox[{"(",
    3 D* K) N# l" ]# J, a         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", " Y" c0 T4 V. B* H7 ~
            RowBox[{"(",
    1 z' Q% }0 ^8 _2 t! M         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ R( `0 c! N" z" J' C
         "]"}], "/.", "DeltaX"}]}]], "Input",
    & s# Q9 I. l2 t/ r' D+ V! h CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],
    2 |+ ~7 ]* f3 C. ]' I/ B
    + F+ O/ y: d  F. ZCell[BoxData[
    " @- x- s% I! v" ?" |2 A SuperscriptBox["\[ExponentialE]",
    9 C# n1 W0 f4 i; Z2 S+ `! j3 Q/ Z  RowBox[{"3.141592653589793`", " ",
    : P  Y* @9 |* u, O. p1 e   RowBox[{"(", ; {% @3 a  w% s: B2 F: X
        RowBox[{
    ) b- Y* ^. y& ^* M" F' e     RowBox[{"-",
    ) a, F5 D7 y/ e( g  N* [      SuperscriptBox[7 Q! r/ m3 g6 `; N3 Z" a7 g
           RowBox[{"(",
    5 y4 q0 J( i& @4 d& ~# r2 L        RowBox[{. v% u% v1 A! f$ x3 M5 u; Q. p$ Q
             RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-",
    - C) m- C6 r4 |9 b0 I4 I& w     SuperscriptBox[
    ' S3 j. p$ L8 N- z      RowBox[{"(", , d: B( s8 A7 t: P
           RowBox[{
    % R' B8 F4 h% M        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-", & x+ ^4 r$ [' O
         SuperscriptBox[( u/ \: B1 V! X5 |: z/ h6 B0 X* M- T
          RowBox[{"(", ! H7 f" i3 B4 T: q2 m
           RowBox[{- G( c1 ^* m1 y- h
            RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-", # O( C( ~9 K: x
         SuperscriptBox[
    1 f5 ?: X$ j( l5 S7 s' }' L/ P      RowBox[{"(",
    4 `- n3 P" s+ d* P7 x       RowBox[{. v# K  r5 A0 _, `. L
            RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-", 1 ]# [. \' V. @+ u# t1 ~6 w5 B
         SuperscriptBox[
    + b: u# |/ Z2 p+ _      RowBox[{"(",
    8 |- o3 z1 o8 w" T# ]/ N8 n5 h7 x       RowBox[{
    , A5 C' n+ [$ C5 r( Z8 ~        RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-",
    & N; }3 k0 A1 l# e' K* t, W     SuperscriptBox[
    % V) @2 V5 M5 S, n" z; I      RowBox[{"(",
    ) F* G2 i0 k% _7 V7 l9 e/ U% C       RowBox[{1 X" L+ i* {0 |7 m# Y; l4 x
            RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", ; Z3 n! m5 J* {
         SuperscriptBox[+ z. x0 m9 U5 J7 a6 j
          RowBox[{"(",
    ' t" A! Z1 W* K& i       RowBox[{
    $ m/ N% Z' H: [! n: C8 m        RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",
    ' ^* a- A: ~$ ~0 ^+ O* d     SuperscriptBox[8 H% Y5 j# x3 x, I' y
          RowBox[{"(", 7 s7 D% M9 _% t  b! S; o& ?$ r
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    0 H1 Y+ Z  e& i- h8 y     SuperscriptBox[
    1 e# _1 D, J" l; i9 W# ?, E9 ?      RowBox[{"(",
    ) F& n. W* b1 K4 j( F       RowBox[{3 J$ {& C6 \; ^, [+ l
            RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}],
    : D! I, g# e/ \' u    ")"}]}]]], "Output",0 k# q* V5 E1 f  c. D7 a3 G5 o: g) W
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    ! e3 y6 K$ f, ?, u3 m% P  3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]; [% A- s$ {6 h4 W0 e7 [
    }, Open  ]],
    1 H. I/ N7 p, f1 ~
    : h7 U1 `+ d' X* DCell[CellGroupData[{
    9 S+ j+ z6 h/ ^( |; ]  }3 t
    $ Z) s2 N1 J4 L* hCell[BoxData[7 E; l5 o3 v( D" s2 e0 l
    RowBox[{"C7", "=", "Ca"}]], "Input",! e/ a" ^( w; n) S: h
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, 1 V# b; W7 g3 {5 v+ m* K1 m2 ]
      3.577921316125*^9}],
    ( b2 W5 G2 E& n! ?; m  l3 T& K( U) r. ?$ w. y/ p
    Cell[BoxData[
    3 t7 F6 W  J7 D' n RowBox[{"{",
    $ R" K6 D6 f% @* L+ X" Q  RowBox[{
    ! k0 P  E/ k9 {% P  "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",", # _. Y% `- K' ]" i2 d" a; [
       "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}],
    ; E1 ^  U; _7 ^6 L! K/ x! i, i  "}"}]], "Output",) H3 _  F: c+ W9 ~
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    # I  P4 {2 f# H$ r8 T2 A5 W; a  3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]: |; m% P0 a. s6 D; W0 }
    }, Open  ]],
    & q. ^, r3 F$ n: r  Z# I
    ! f8 c2 H; u/ g$ v  C+ {/ D0 ?Cell[CellGroupData[{5 c( }$ T3 l3 \  }1 U
    4 H, ~  E  [4 u4 |. u- y: s
    Cell[BoxData[
    , v' g: _* v3 n0 \. O( P, C: E RowBox[{"u7", "=",
    7 v: G; M- j9 j8 D3 m- N" @  RowBox[{4 i9 ?# S$ `: O' O3 b+ T$ \$ E* e
       RowBox[{"Exp", "[", 4 e; q4 T0 p( h1 N3 |
        RowBox[{
    ( H) i4 ?" g# ^% g! N1 `     RowBox[{
    / F+ c( u# M7 p! x: E. J8 d      RowBox[{"-",
    9 L. N1 _9 h; ~  n8 `" [& g% B9 U       RowBox[{, Z0 Y$ Y2 g+ p# X0 ?0 A6 J
            RowBox[{"(", ! x& T6 @4 E" Y0 q% m# n
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ! V- t; Y1 t, S5 F0 g        RowBox[{"(",
    1 c* {0 J" _) e& A8 \$ M& L         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],. ~; ?# P/ ^6 {# t: f) ]
         "]"}], "/.", "DeltaX"}]}]], "Input",+ c% N* ~/ n- ]; ^( i+ ]
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, 4 f* l# H3 Z1 ^9 d! I
      3.57792132028125*^9}],, H( ?' F( p3 h4 G7 l' a) s/ z

    , l: }! o9 b5 j5 YCell[BoxData[
    5 U/ m9 ]4 r$ ?& l" F: q! M SuperscriptBox["\[ExponentialE]",
    # M! n& f* a* L  RowBox[{"3.141592653589793`", " ",   h  |+ Z) v( N' `4 h
       RowBox[{"(", 8 w: [, @* c: C6 `- `
        RowBox[{1 H& y( ~# R5 a; B
         RowBox[{"-",
      r7 h$ y! N$ \2 e+ _& s5 s( [      SuperscriptBox[
    ' t4 s' K. z3 c1 @  v/ g$ I       RowBox[{"(",
    % X' O3 U$ o3 V) P        RowBox[{# {8 X8 ^2 u" `9 Z' l$ T
             RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-", & r2 p4 @' d6 K' m* n0 ?  s
         SuperscriptBox[6 @: m2 N! U8 ?: o% F7 d8 V7 K% a
          RowBox[{"(", : a2 d: s& \9 D, C, S+ V& p
           RowBox[{
    " }5 t1 F0 C( [, F        RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-",
    $ a* F; j4 R+ B% G. g     SuperscriptBox[
    " h# c  |' G7 o1 w3 m      RowBox[{"(",
    3 t- c; T8 U$ d& \+ i( q: Y       RowBox[{4 Q8 @! ?# n7 o' @. C, i
            RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-", - b* E: v1 a/ r! z3 s
         SuperscriptBox[0 R/ b3 ?  u* s" U
          RowBox[{"(",
    - ?( W! f& \9 I7 h* `' U: Y3 O       RowBox[{) d7 Z2 g9 \. m+ w9 c$ G
            RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-", & x8 j% N$ r4 f- o
         SuperscriptBox[
    & ]" F7 p7 t- w1 r  t0 E6 }* }" `      RowBox[{"(", 3 I" G( Q1 P/ o6 x. `% ^
           RowBox[{
    7 V2 _9 Y( z  X  D  _* o/ a        RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-", ' C" h" s8 \, [" i
         SuperscriptBox[0 K  E/ _: @7 C% L
          RowBox[{"(",
    ( |, u- ?# r& [( w0 Q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ) y0 g; _: {8 R/ X# ^     SuperscriptBox[2 M6 e$ l. n# D2 u; `, c
          RowBox[{"(", 3 y4 w$ v2 S$ f6 \: ]$ {5 {4 q$ g
           RowBox[{
    ( |5 |2 r1 m; }+ m        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
      d! h9 f9 U& z3 Y+ s     SuperscriptBox[
    4 _4 {6 n, Y8 e4 S      RowBox[{"(", : A0 N% x: [4 Q1 F$ w& i8 S, N5 F
           RowBox[{
    , I; E  c7 l7 m  T        RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-", * T8 C: r0 ^' R* \9 C' d0 E5 W
         SuperscriptBox[
    - H8 E8 Y8 Q& ]  ?* S      RowBox[{"(",
    4 Z2 [( l9 v8 u  C* T4 e       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    2 w) T4 ]9 t+ `    ")"}]}]]], "Output",# w; L7 z; N' X8 C+ s
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, & P+ p. J/ z# Q: T, i
      3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9,
    % J8 `7 M& g4 U# z+ [  3.578012251359375*^9}]4 b* y! r+ v8 j- a2 ^' }
    }, Open  ]],
    5 m2 c6 T) z0 S9 R3 o& [: |
    & d2 J# L" j$ ~; c$ P$ c' t. PCell[CellGroupData[{
    & b9 }: `# F, i# v4 E( Z3 k2 n* W2 w
    Cell[BoxData[
    ! j; D1 _7 w( @9 C* v9 @ RowBox[{"C8", "=", "Ca"}]], "Input",, f' u& _2 V# R0 l
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    9 f/ y8 @* k6 {+ C  3.577921316125*^9, 3.57792141421875*^9}],$ v4 q" s  s4 d$ ?7 }

    % Z% Q; o  l  d+ @  F0 k+ U4 Q7 LCell[BoxData[/ p% V# B" f  ]9 b% B$ C' b
    RowBox[{"{", % a# R: K8 c& u" T6 k# J
      RowBox[{* s# \0 K. g, p9 a! e) M* _, S
      "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",", ( Z( x4 n& c+ k# O, L- L2 _
       "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}],
    & E. ?' c: b1 F  "}"}]], "Output",, L, o1 ~; z6 T+ y' c5 M% T
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, 2 L. M& s8 u7 H# H. R& g
      3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9, - g5 T- x, u1 ~
      3.578012260515625*^9}]# E7 _- w' F+ h" C" I
    }, Open  ]],
    2 Q- A- s8 _/ _
    % X+ _4 Q5 v$ o% c. [' [# jCell[CellGroupData[{
    , W5 z) k) i" m: i% _7 Y' U
    * }% B$ C: P5 B  O: OCell[BoxData[
    8 W3 `$ B. S) a: f" J, L' E3 x RowBox[{"u8", "=", ! H1 d- R0 m) M# m0 e4 P
      RowBox[{, ?3 B8 p+ G3 C4 z3 ]6 y" W
       RowBox[{"Exp", "[", ' {# h  ?- h" Z& \1 s
        RowBox[{
    ) y9 m' |2 c" G: u; Y& g8 u4 H     RowBox[{
    ; Y+ @, N, q* \0 V      RowBox[{"-",
    ; f* l% G% @$ V  p6 D+ B( h       RowBox[{
    / c1 `* {4 S, F! [2 S/ o        RowBox[{"(", - A' u  D4 u* s% C3 m9 d9 c
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", # N3 A/ d' U" i' P$ v5 h
            RowBox[{"(", - I8 x6 _) Y! X9 f
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],& O' l0 A& Q0 f( p5 V; o% P
         "]"}], "/.", "DeltaX"}]}]], "Input",. ?% L0 c0 e  ?5 h
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    5 H8 L, `5 A! a' s% o$ _. V  3.57792132028125*^9, 3.577921416921875*^9}],! W* |, }" Y% a5 L. U% A

    $ l+ {( Q, u2 f0 w1 h7 ECell[BoxData[
    & z1 _  t3 ?' \4 u: P! a# j2 `# R SuperscriptBox["\[ExponentialE]",
    % N, s1 c3 z( A; ^  RowBox[{"3.141592653589793`", " ",
    5 w- i# \, B! a! `. O: J; Z9 }   RowBox[{"(",
    7 W/ C# m4 ^' l- {1 a3 Q    RowBox[{2 _$ n8 {' k) ^: M# [9 U) j
         RowBox[{"-",
    0 [" a& T9 H# ?/ g. E7 N* P+ D      SuperscriptBox[; M1 ?7 Z/ M& |# F  _$ n# M6 }
           RowBox[{"(",
    ' w" o# \: G  ?0 i% q        RowBox[{
    + q, F  U) J4 e+ @4 t3 P/ z4 U* z         RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-", 0 Z: w$ w. v  b: Q& `9 L
         SuperscriptBox[3 p6 L' @' \) s+ J3 `3 A; C
          RowBox[{"(", 5 M; p' w" f  O
           RowBox[{$ M8 k; {' g$ f
            RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-", 1 A/ A* N& }6 W. B( `" M
         SuperscriptBox[3 P" C5 k# P) f% e  V/ J
          RowBox[{"(", 6 u  H2 c0 {" I0 e% Y
           RowBox[{
    : z! G8 p7 n1 Y- x) M: n  p        RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", $ n% t) P/ z9 R8 X/ j2 O" b
         SuperscriptBox[
    " R) ?; j. g) Y, j) Q      RowBox[{"(", # l( d2 y5 L. i9 `3 J( X
           RowBox[{
    # e" X9 k7 |/ @+ f        RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-", 2 N% H# V; {! l
         SuperscriptBox[% J# H( q4 c# P; q! w
          RowBox[{"(",
    4 z7 z+ w7 d& ^5 e       RowBox[{2 ?- m8 u% L& C& F5 z
            RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-",   I; A2 H( d8 U2 V, D7 G9 V1 y' |
         SuperscriptBox[4 f: o% d+ v/ `/ ^0 c( l
          RowBox[{"(", % O4 H1 G8 ^4 q4 g: y3 A3 |
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ! c$ F, R- \, O
         SuperscriptBox[/ G4 C4 I! w1 J; @4 l
          RowBox[{"(", , r' C; N4 A1 I9 N9 |) e
           RowBox[{. W$ Q  a, z1 ~: F/ F
            RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", / x6 B' u' d& s6 ?) Q) f
         SuperscriptBox[
    ! t5 d" N1 {* K1 \8 W) |7 K      RowBox[{"(",
    8 [; _' X+ b0 }' N* i: }+ z       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 1 Q+ A/ }! Z$ z2 B# d
         SuperscriptBox[
    : o$ x) i1 t  F% v8 U5 `      RowBox[{"(",
      ~% Y! t+ l; ?# c* e       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], + J. E( O  Q+ m, E3 c4 j7 c
        ")"}]}]]], "Output",# d1 ~: d: `9 Z& v
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, & I. }7 @2 W" B, f" n
      3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9,
    4 h: W) x2 B" Q, m# t  3.5779608945565863`*^9, 3.57801226165625*^9}]
    / v; }& E# f( X}, Open  ]]," T1 s! F* \$ q% ^' \2 |

    9 D: Q# t8 s% a. y# [8 v' L5 [Cell[CellGroupData[{. z# {0 ~0 c: Y2 W0 [" W3 W* H
    . u3 }# e1 O- b4 }& Y
    Cell[BoxData[
    8 }7 H$ d: P: z: T" w: K RowBox[{"C9", "=", "Ca"}]], "Input",
    + ]. L+ ]- o, S9 X: W! n2 ^: u7 l CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    / O3 ?; x) _) |- t* t. L$ z  3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],
      x9 u2 q" e- p( x4 O1 f) D0 y  P! E2 |0 N) S/ p8 v* c6 w" {/ y
    Cell[BoxData[( }0 N  M+ [3 B8 B- ^- H
    RowBox[{"{", : C0 }* o* L" ~  Q! Y, v9 s. j; s5 J2 U
      RowBox[{
    + R1 I( j. a, I7 Q5 D* m% F  "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", ) r' j. z8 w7 @
       "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}], - X, I8 r  w8 K9 K: n
      "}"}]], "Output",
    $ D( Z0 J1 u% H* x  i* |5 W CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    ( C( R/ Q- d) L0 U" E: T: V  3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9,
    ( @4 h* d# u2 j8 c! e8 a6 a6 |  3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9, " ~' A2 W% N6 {
      3.578012268234375*^9}]
    " u% f/ V+ g0 V8 O2 Q) L) t7 L/ B}, Open  ]],
    ! n3 y: }% K+ m( Q, L. |# t4 U5 \+ A
    Cell[CellGroupData[{6 h5 M1 |% E$ j4 P2 g1 ?
    ' `) l- U8 m' Z
    Cell[BoxData[
    5 ]! u! o0 R1 h+ c! y RowBox[{"u9", "=",
    $ Y% j4 ?/ A3 O5 F  RowBox[{- q  U4 y3 g" [. I2 K7 j' _
       RowBox[{"Exp", "[",
    ! c( h) n& |& D! S. [    RowBox[{- Z9 Q, J( K, ]4 q; _( t0 M: [
         RowBox[{
    0 m8 _8 D. z# |& u) f- M0 A  v4 ]      RowBox[{"-",
    3 S3 M. l4 {. L! U8 V       RowBox[{) F1 [( N! y  q( f' X
            RowBox[{"(", * g1 t, C. U& }/ ^/ [$ g
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    6 k5 q% A& R4 s9 K- b0 [* R' \7 [        RowBox[{"(",
    . ^+ ~- \8 x; Y4 [         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],; a  u+ Q6 p* p! {
         "]"}], "/.", "DeltaX"}]}]], "Input",& e+ y6 f, s- m  Q- ~" [
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, + r7 C# q4 b  L, R+ u8 O0 i
      3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],
    , p$ v- u- c+ P2 X1 n
    $ j$ D, M1 E# ^2 a  D( ACell[BoxData[
    ' }3 o' t: i7 z; H9 i& u% O9 V SuperscriptBox["\[ExponentialE]", 7 v8 y0 e' A! O/ p- d8 Y3 Q2 P" R
      RowBox[{"3.141592653589793`", " ", 8 H1 V, K& [6 P. `9 _+ G
       RowBox[{"(",
      S% B& P& S; V- q' x) @    RowBox[{2 C# L# F* p+ M9 S' A' A' ?# L) v
         RowBox[{"-",
    8 q) W1 l7 {4 ]. ~      SuperscriptBox[
    9 {$ n! e6 F4 M6 k* m, z       RowBox[{"(",
    # t) l8 J- `0 \        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-",
    , d* ]- n( k1 f     SuperscriptBox[
    . m% S$ c9 j" `, i; e# x      RowBox[{"(",
    9 k3 M/ J8 [8 g7 q       RowBox[{
    # T. z0 j  ]7 O7 ~' E, }+ T& D. c        RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-",
    " s2 y3 N7 g1 b6 O% H     SuperscriptBox[
    ; y+ ^' c; `& [, ~# e  Z+ s      RowBox[{"(",
    & j& H% `1 T: W) @       RowBox[{* k$ W4 ~2 z1 s! h8 X
            RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", 1 S: V" m. W; u3 e
         SuperscriptBox[2 A9 s: d; H( K6 M  C
          RowBox[{"(", 4 `' S  M; o" Y/ p1 l
           RowBox[{! \7 v$ ]6 P! F4 \% e6 x* M
            RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-",
    % O( R  c/ I+ W2 ]9 I     SuperscriptBox[( X0 g" O2 r7 X: u, a1 Y$ T) r. D
          RowBox[{"(",
    ; s8 a4 l; e& n& P: u, V       RowBox[{
    ( @' r: h) o6 o2 j, R        RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", / A7 M0 a* T4 P- d4 u
         SuperscriptBox[$ \1 g) X- d% j8 u# G- ?1 h3 ?4 J
          RowBox[{"(", ; p) P0 m4 ^" e1 Y" g
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", . J4 e# }  c- b% a0 F# h$ l
         SuperscriptBox[
      J5 U5 u9 }# B! c3 O, Z0 h& n% U      RowBox[{"(",
    ; J" ?0 M1 n9 n: p/ U6 L' G& r3 C       RowBox[{! J1 f; J; q* h9 I% ~
            RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-", & @5 R; b' N4 H
         SuperscriptBox[. y2 S0 E" E- W* d' @2 y- }
          RowBox[{"(",   {$ t% K5 d# {# \
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ( w7 x7 Z7 O3 ~
         SuperscriptBox[; N- k6 ]8 d2 a+ j6 m1 q3 F
          RowBox[{"(",
    / g. m3 l: a. ^6 P% ^2 J" N       RowBox[{
    7 {& N; r( L5 \: D' d6 ~        RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ! L6 y! }, ?1 ~& H# @
        ")"}]}]]], "Output",
    # n' a$ f3 p( w$ Q CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, # m% v3 h* t9 H' h
      3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9,
      Y0 W; ?( [1 X2 c  3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9,
    3 E6 Q, @# o  s: s" l& R2 A3 ~  3.577961530421959*^9, 3.578012269125*^9}]7 C, p; G" d4 \
    }, Open  ]],
    7 m% t- W$ `1 F% |( b9 }4 c
    3 M' K! [2 s: e$ c! [8 ^0 h# a) fCell[CellGroupData[{4 [6 [% l' \! z* d0 }; j) G
    3 h8 V! x; r- [  a: @6 j
    Cell[BoxData[{
    1 x- @1 G; `( g; L* f1 z& W8 Q RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]",   I% K" C: R, W2 x2 N
    RowBox[{"u10", "=",
    , s( q+ ?0 [$ `1 s/ g* V; o' Q2 p  RowBox[{1 C# p/ x- Y. B+ K8 v
       RowBox[{"Exp", "[", . H7 Z" N5 r$ G1 b- M- o
        RowBox[{
      _/ k: v7 D' D, x     RowBox[{
    * ~! F  x: @( R/ X5 G: |! d- r# X      RowBox[{"-",
    ) D8 d' j9 d5 j* v9 |) Y) V: S       RowBox[{
    2 R  h2 }8 K7 G( |7 J" D/ @2 R# T        RowBox[{"(", : l( R; T* d5 h6 E2 E
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", % @$ }' E0 l7 X0 z2 t
            RowBox[{"(",
    $ f: d. Z% L4 f- T) g7 V         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    % {" E$ w& S% F9 ]7 I1 q     "]"}], "/.", "DeltaX"}]}]}], "Input",
    & [5 p4 f; M/ i( o: I$ E CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],
    4 {% I+ s9 a0 h5 f- T9 x2 _. W$ m! l7 D4 }+ O& h+ a# g4 J8 q5 {
    Cell[BoxData[
    % m/ P1 {, @2 L* I0 ]+ e/ g& A RowBox[{"{", 6 J3 C" U6 I' @$ R/ \7 z6 f' t
      RowBox[{& z$ J; H! b3 v
      "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",",
    0 ]5 k: c) _2 Z   "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",
    : p4 y* b( ~) \) r" G' w5 c; [ CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],8 m2 ]3 a" z& U% T" G- N( o

      v& p9 B. ], W' ^Cell[BoxData[# l: r- j9 B) ]* E7 B% B! Q, x
    SuperscriptBox["\[ExponentialE]", 1 ?! L! \+ ]9 N; o. V. L
      RowBox[{"3.141592653589793`", " ",
    * X2 y, X, R' ~   RowBox[{"(", ! }) A5 K/ P3 a3 d# t
        RowBox[{
    ; R2 B* t0 s/ \% [     RowBox[{"-", $ A- j2 T) @! D: [6 b. p, p( e
          SuperscriptBox[' h8 O! D+ F" X
           RowBox[{"(", 7 g$ ^- j6 h/ ^
            RowBox[{
    , H+ c4 Q: W' h         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    , m5 M: P8 B* J% U2 q     SuperscriptBox[
    3 h- `& D6 \/ _. [5 }3 }      RowBox[{"(", $ q+ k0 j7 D6 u' F
           RowBox[{- `" `( k& X- |2 P! V/ e% V' U
            RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-",
    7 H) u, e* c6 m& p( a$ H     SuperscriptBox[8 ^0 ^. j5 d0 u0 f
          RowBox[{"(", " d" w: f4 I7 q: M( b, W* ?, C
           RowBox[{
    & |1 A: r# N$ n        RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    # w6 B9 {& U" [6 X     SuperscriptBox[3 w* g' V% Z  A
          RowBox[{"(",
    0 o! p- a% y" j6 e: C       RowBox[{% ?- M% _$ M) a
            RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-", 5 }4 c2 {  Z2 y* @0 h. ~  R
         SuperscriptBox[" T1 f1 q1 ?1 r: t( g
          RowBox[{"(", " `5 C: O( i% ~( G  q1 c
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-",
    ) ]! P) _, k% A; h3 p     SuperscriptBox[
    : @/ W* j3 h2 d$ M  Y      RowBox[{"(",
    + @9 M% x0 Y8 ~. f, K+ v: I       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", " r& q1 z5 c" k
         SuperscriptBox[
    2 A% s5 R" O9 O# A3 b! m+ K9 A3 V      RowBox[{"(",
    - m8 m+ V* ^. l. ^1 F* ?1 y) l       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", * B5 }, M! A: i+ e- C
         SuperscriptBox[0 V) T/ A0 l& z: A" I
          RowBox[{"(",
    7 \9 v- F; T! P/ Z' ?$ `       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 4 `0 a0 {2 f( o. {1 G) M  L" l( J
         SuperscriptBox[" c/ S  _5 }! B
          RowBox[{"(", : }/ A1 _; h$ K1 {6 I- t$ L: E" c
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ; d- i. _% k- s, K8 E% {    ")"}]}]]], "Output",
    ' G3 ]# I; q) T) \ CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]) `- l% b; z0 |( N
    }, Open  ]],5 `  J/ D4 _1 ^  l" j) {- B( C7 J
    & V+ p6 _, K( e' n+ I
    Cell[CellGroupData[{1 \4 ?$ G0 ~, V, s  c9 ]+ U
    " |$ M8 n, M0 A' G/ Z
    Cell[BoxData[{- Q0 _% N# W! e& F
    RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
    & M( O" {0 Z; _' }. s2 s" x; b RowBox[{"u11", "=", ( k/ D/ R# y" V. @3 m
      RowBox[{
    7 Q5 ^* u6 \* l! z   RowBox[{"Exp", "[", ! P6 T) |3 u( a( x) J
        RowBox[{/ t$ Y) \1 j4 J; k* F$ c7 J5 F
         RowBox[{
    0 v% H! l) ?: s9 f! v" u  q6 e      RowBox[{"-", 1 O0 G) X! B$ Q+ L  O
           RowBox[{, [  Z) Y: _: z
            RowBox[{"(",
    4 @9 z. r) p( U) }         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    , v* f% n( G1 T' ]3 M' N  {        RowBox[{"(",
    0 \6 m- p: f& i5 y) Z# L/ _         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],. r! n9 U4 O! V- n
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    8 u. j, E( n7 e5 N% v: {0 H# x CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
      b: @" Q% Y+ P$ i+ e. N+ ~% w  3.57796154237158*^9, 3.5779615434011817`*^9}}],
    . Z3 h+ J! c8 \7 g8 r' T6 Y5 @' l7 j- I" C6 x/ V4 K8 v9 i) C
    Cell[BoxData[, e5 Y: d+ W0 A3 l2 d
    RowBox[{"{",
    1 B1 A/ o4 |; [/ Y' q( S  RowBox[{$ N* I& Z+ J, m4 t
      "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",", , R0 T+ F2 w. @7 o: z! p# i3 K  [
       "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 5 h7 C8 Y9 o/ D* y$ G- J. g
      "}"}]], "Output",
    / q3 q" B5 S( Y& w% S* a3 D CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    6 M' i, T* A/ }" A- L/ _. p  3.57801228203125*^9}],- G& @2 K) i2 o6 [, ]
    4 @5 u/ Q( }$ {
    Cell[BoxData[  G# y$ }8 @2 Q- t5 s
    SuperscriptBox["\[ExponentialE]",
    " e% ^( j) n9 [/ m. @4 e9 g) j( {  RowBox[{"3.141592653589793`", " ", . g+ w3 k: o0 C- j3 [- E* B
       RowBox[{"(",
    # N& |3 {8 o4 |+ J    RowBox[{
    * X. A( {2 u9 z+ J1 k     RowBox[{"-",
    1 x7 n7 {" v) {  _. q7 M) ^* T      SuperscriptBox[
    ' d0 G+ w. |5 a9 p- U9 f) h, _" y. ^       RowBox[{"(", , E+ i! M5 u2 E0 X
            RowBox[{
    4 @4 N0 o; Q6 J7 Y         RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-",
    & M, y( t% T; P& Q# V     SuperscriptBox[& B9 n$ i3 Y& z) q8 D" f; a8 H
          RowBox[{"(",
    2 P* S! D$ E: F( q% V$ `       RowBox[{2 l+ [$ _3 n4 F$ s7 j3 L; s& Z
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-",
    * a8 z! p, X$ Z1 |* {     SuperscriptBox[: J! K' X2 s3 y3 h$ x9 k0 T0 b! l$ o
          RowBox[{"(",
    1 m# h* ?- y+ s. u+ Q/ l/ w0 n. h       RowBox[{
    4 a9 [& Z+ l( v$ M7 @2 p3 a4 R) E' }        RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    % i. r$ n; i) P7 ^/ f     SuperscriptBox[0 _2 x. \4 x. |- l: W  n
          RowBox[{"(",
    ' `7 A& ^* u" B/ X       RowBox[{# l' y5 r. B1 l9 d1 }& u
            RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-",
    0 L9 q: I9 A: W3 c     SuperscriptBox[  r# {# P0 y) J7 c# l
          RowBox[{"(",
    ) M( S. Y4 a/ U( ?5 N       RowBox[{6 k0 S3 n% W+ M7 y/ n
            RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-", 8 F" K$ W7 C( m8 U+ y
         SuperscriptBox[' P+ h0 Q3 I9 D  h: A
          RowBox[{"(", 1 X* P% _2 q( l9 x* Q8 D8 V  P7 ~
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ; r5 L) R6 Z  D: E. v, l6 I1 Z     SuperscriptBox[) J8 ~5 z" T! U2 g
          RowBox[{"(",
    # C7 c7 U. T( k, l6 ~; Y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    + i+ E, O" w( \2 Y! q7 f     SuperscriptBox[
    & g) j4 _  }4 H* o  b      RowBox[{"(", 2 I6 W; Z9 I% y, |2 d2 [8 \( d0 ^, B1 ]
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    , Z% q2 D5 {. d; Z4 k0 k     SuperscriptBox[
    % Y0 b6 D2 V" |- `      RowBox[{"(", 4 V$ v, Y8 i0 N
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],   s. D  W# O! R1 D% l5 B
        ")"}]}]]], "Output",
    1 a* b- T! w" c3 V' A CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, : C! Y$ @! C& m; y5 F+ h
      3.57801228203125*^9}]
    1 x& h/ D! K# c; S3 F* k}, Open  ]],! U% F) K) K+ W) |/ e5 i- \

    6 F7 T" C% x9 [7 S+ P. LCell[CellGroupData[{
    9 [1 p8 v* N* a. o7 A
    2 Q+ q/ i8 V/ |Cell[BoxData[{7 g( u& X$ ^9 V5 M; h
    RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]",
    ( v2 b) M5 O9 a( h' e RowBox[{"u12", "=", - e1 W9 T  S; |3 n% r3 Y, ?) p2 N! E' @
      RowBox[{3 ~8 b4 t+ W6 e) k. [! I6 ?# Y2 a! ^
       RowBox[{"Exp", "[", 9 d! C6 A$ w9 X$ T
        RowBox[{- E6 ]1 ^! d; E3 Q& t5 O
         RowBox[{  o* s% h; @+ K% j  b; V* v
          RowBox[{"-", ' u) |% @! @' g$ p* d+ N+ C- I1 C* U
           RowBox[{
    # g$ B3 J9 P% i8 V$ A& w        RowBox[{"(", ' m" }7 _" k) H& s
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + C) c9 p2 o) b+ M# d        RowBox[{"(", . F& t8 o' }. [. x) Z- Q, E
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],) W$ L4 ^$ H5 g6 c
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    4 D( u4 u$ K- [% W CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    ( }5 A, S" i8 R  Y$ F2 a  3.57796154237158*^9, 3.5779615576284065`*^9}}],
    . z& z' C% f- e6 D/ V( m" |. [8 u) @6 D" \& |* B" D( N
    Cell[BoxData[
    # e1 V) ~7 e, ~4 W- n8 i RowBox[{"{",
    & X) e, l1 M5 j) t1 ~7 j+ P  RowBox[{; u, |2 j- O0 L
      "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",",
    ( k. G8 @2 A- [  X+ e5 h( y   "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}], / q$ {: O+ P4 q" z* q
      "}"}]], "Output",
    # n" ?) k8 v: M0 h2 R6 c; E! _ CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}]," T" R2 \$ E6 M: i% a8 B( E6 t
    ! N/ w8 X$ f; @3 `, I1 p! o
    Cell[BoxData[1 R# f. y# n0 ~, p- T# n* ?! w
    SuperscriptBox["\[ExponentialE]",
    + U3 C) y/ {# O2 z+ F$ u0 n  RowBox[{"3.141592653589793`", " ", 6 D3 U5 c2 Y$ L- j* i2 G5 s- Z
       RowBox[{"(", ' K) L9 j1 E% I/ g* W9 O+ j6 M' U% S
        RowBox[{' i3 b9 V/ Y8 M6 Q0 V) h
         RowBox[{"-", , t& J6 ~" B. E2 [* d
          SuperscriptBox[
    4 ^  y% k7 ]% h' z3 _2 f       RowBox[{"(", 1 O* K1 F4 \" ]) K. u( @' E
            RowBox[{
    $ A/ [& c9 n7 T, q( a         RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-", " t" G' U0 b( V7 D3 L
         SuperscriptBox[- L5 n& f$ R) h  }& p* ?8 r! f
          RowBox[{"(",
    1 _. C: z' I) ^       RowBox[{$ m! E" A* V  Q& a( k. C' d
            RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-", 8 F! c; @: K) T& G( A7 A2 X
         SuperscriptBox[
    ' l) W# z3 @3 n/ R$ `! d      RowBox[{"(", ) j' e: `% y3 R9 t
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-",
    " c- N5 \, G+ p/ y( n" b) K1 w  f" n     SuperscriptBox[) d) U# M9 e, Z! ]
          RowBox[{"(", . o8 ~! K$ s8 G* }, g9 G' ?. K
           RowBox[{* T& L; n6 J* C8 Y) i7 t
            RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-",
    1 r9 n. ^/ V# E/ R% W" e8 k" P     SuperscriptBox[8 [7 e# X5 p! `, ?! T5 o! \# R: ~/ S
          RowBox[{"(", 7 F7 j; L% Y+ R& K
           RowBox[{* c; z7 }0 Q; ~" @
            RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-", 7 S7 J. d9 p3 t& x. M! K
         SuperscriptBox[( c; W5 x0 }( q- t3 m9 Y
          RowBox[{"(",
    ' U+ f8 G' h; k       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    * n; w/ M! j: S6 L     SuperscriptBox[/ Y& Q7 @2 `% w6 H3 c; q* L
          RowBox[{"(",
    5 Z/ O+ Q. X- n0 ^* D       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    1 `0 }( s7 d5 H4 c. Y0 [4 ~     SuperscriptBox[
    / o; B& Z& f4 F% F' b' ?7 |: T7 M4 m* h      RowBox[{"(", / y- D1 c7 P4 B+ Z4 {
           RowBox[{' r; y2 l+ }5 R, V" R* m# N
            RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
      f5 K) L( n9 u' E& f% W; s4 O     SuperscriptBox[
    5 M& e. S# t" h8 P3 b      RowBox[{"(", 3 v% Y7 _. B3 q
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ) [+ y+ D; I4 E, [1 m    ")"}]}]]], "Output",7 Q- F% ^3 Q4 ~! W9 K
    CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]
    2 d6 |* L+ [3 G. s" _% P9 e" P4 \}, Open  ]],
    ! P" m/ I& s$ g2 K5 f) v0 [( j
    % Z$ \5 D" {) J5 {! k0 wCell[CellGroupData[{
    ' ?- X) m7 t( \+ E% \/ i
    ) g- E$ X/ g- g2 fCell[BoxData[{
    2 |$ P0 W& [- h( }8 E5 Z RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]",
    ( I. w5 |# ]0 x( F4 R RowBox[{"u13", "=",
    6 ~" N4 K+ y$ b& d( _2 a! I  RowBox[{' O) s. e5 R/ b- {  g2 I
       RowBox[{"Exp", "[",
    8 C9 r* E/ \2 Q" Y    RowBox[{2 Z2 d6 _4 `- U( n1 D: w
         RowBox[{
    / D; r9 j4 j' c7 V6 r      RowBox[{"-", 7 d2 z1 G8 K( k1 s  v# W" j
           RowBox[{& v5 r7 x& O  d4 G+ J7 G+ Y0 t
            RowBox[{"(", 4 w5 I3 D( a# T2 I& B! z& u. c4 d
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", * g% ?5 Z/ H8 T
            RowBox[{"(",
    $ o/ H% c5 q* x0 \( ~$ @* `         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ) }, a2 U5 P; D: J' l; B     "]"}], "/.", "DeltaX"}]}]}], "Input",
    0 a% q$ w. b9 o6 { CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    . a4 X/ S* d4 ~8 n/ r; v  3.57796154237158*^9, 3.5779615599684105`*^9}}],
    : _: X: W* a8 v+ r- ^% O$ i2 w+ q- T) `' h6 o
    Cell[BoxData[; e5 j, \+ s4 t. l, W
    RowBox[{"{",
    ! G) T. f" d/ G% g( y* k" N  RowBox[{, W. V: g# y" P2 h+ o' X2 D
      "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",", ! Y4 c5 Y3 ]& L- ?
       "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}],   j: N0 f& k& _& C1 D0 \. V( C
      "}"}]], "Output",
    - @+ Z" h( Q" t+ G6 }* A CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],
    ! ^% P0 _5 w8 ?, }- L% D( j, ~* ?4 ~: p/ W
    Cell[BoxData[
    : t" }, v: B: m1 M, b$ l SuperscriptBox["\[ExponentialE]", ( z4 a5 T4 N9 f) A; F% j( l  j
      RowBox[{"3.141592653589793`", " ",
    8 A( Q% B" T/ F/ _/ t( `8 f3 Q& q   RowBox[{"(", " H" h. t+ ?* {$ ?+ A7 j
        RowBox[{
    - I& K7 \" @$ f) W$ ^% O& R     RowBox[{"-",
    9 L( f) `" s& {9 }" }      SuperscriptBox[  l' n: w) V: K+ N4 l, e
           RowBox[{"(", , J8 Y5 C, ^  E% H1 ?7 Y
            RowBox[{1 e5 b( Z3 _3 h& d. P$ f
             RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    4 @2 F( Z4 a5 J, K( m) B- r     SuperscriptBox[
    : l# s  |& B2 h' ~      RowBox[{"(",
    / ^7 i9 z2 t; h3 d       RowBox[{1 [* B* E8 L2 k
            RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-",
    : y3 R0 p6 ?+ l/ G     SuperscriptBox[3 A0 r) v- u$ S& c! E9 E1 ~* \
          RowBox[{"(",
    + H; P# h) {. R: Y+ I$ s       RowBox[{
    0 i* T5 i3 Z  E: p* Q        RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-",
    / i& ^2 j, T4 Z  p# A! `, I     SuperscriptBox[- ]0 |2 \* J( ^6 m' L( w
          RowBox[{"(",
    6 j0 ]; ]: Y% f" W       RowBox[{- G) V; w. A5 x, Z, @# r! K7 D
            RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-", ! t  R- B+ Z# P# w* u
         SuperscriptBox[
    - u9 _! M( H, S% m& a! {# w2 U      RowBox[{"(", + K( T+ f9 Q1 E& V3 P( ?9 Z1 j$ ~
           RowBox[{- w5 v+ Q' c& {1 ]/ p. ?
            RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-", - X& A7 Y0 f: C: c# V5 {7 v
         SuperscriptBox[
    ! T/ i4 L9 }  }4 @7 P      RowBox[{"(", " y" G2 [" i# q! G6 j: h
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 8 t) {" @' S9 r
         SuperscriptBox[
    + h+ J+ @$ N8 n! N3 N: k8 l- l3 M9 n      RowBox[{"(",
    ) S) `& P5 @3 U6 ?# W       RowBox[{
    $ U) w& e3 }, B, M+ _        RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",   P! O) q9 }7 n* \# N( I8 ?) {
         SuperscriptBox[
    2 A6 S: r5 B) D3 Z      RowBox[{"(", + L8 `' @) [- V# W( O* M& |
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", + E  h/ m5 ?- \
         SuperscriptBox[
    0 o8 C+ ]; V* z) m      RowBox[{"(",
    9 m8 D  U1 s2 l3 K  b" ^3 v       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    " \) f4 T; y# L    ")"}]}]]], "Output",$ Y5 a: D  v& R2 H) C# P6 d5 B4 L
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]7 D& Z' W$ Z+ ^# N4 \0 g
    }, Open  ]],
    % X9 g% }2 {% i. w. R1 ?9 p
    * B1 j0 D" P- x6 [0 P1 zCell[CellGroupData[{
    9 ]8 a5 B- @% W4 n" a$ }& _0 J! Z3 G' k5 E$ x
    Cell[BoxData[{
    * K) I' Y/ n. u" \  F& U' v RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]",
    + a6 I" c* q" Z RowBox[{"u14", "=",
    ! R1 k  E2 ~8 K& Y4 g  RowBox[{4 A: `$ ~/ p0 q: \
       RowBox[{"Exp", "[", / `( @0 Z* o) _, @9 f2 Q) p4 h; h" Z  }
        RowBox[{
    : P- e& \1 J5 @. \  h     RowBox[{$ P2 Q5 G/ Z& B0 a( V
          RowBox[{"-",
    7 a/ D4 A: R+ p' K* r! c7 \       RowBox[{
    5 ~; D" x: T# H, j4 A; `        RowBox[{"(", . m4 g. S$ x  K' T0 `' n& f
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    3 f, V" d) V6 e4 _# `' ?        RowBox[{"(",
    # i% m* Z0 i' d         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],0 x  x* F* V' K( h' {
         "]"}], "/.", "DeltaX"}]}]}], "Input",2 j% f0 s( \* w9 p
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    1 e% `9 L0 a! ^& S- }- h$ Q  3.57796154237158*^9, 3.5779615663176217`*^9}}],! V4 K( h8 Q( V) I/ k) c6 ]
    5 |. A: _, r* I% r9 d. ^# V! z
    Cell[BoxData[
    5 e/ x! b6 y1 s. b RowBox[{"{", . v5 u* E8 \/ N7 I* f
      RowBox[{- {% C6 E$ J! b; A
      "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",",
    9 Z# N( Z. T4 H" U* a" h$ q4 Z   "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], : l) O1 m' t  m9 [: Z# t# h
      "}"}]], "Output",9 `' X$ c/ M8 q2 H
    CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],6 i' |& z2 W6 k- L( U0 M# \
    $ |3 i* h+ c: W' m2 o% F) H6 Z
    Cell[BoxData[
    ' y, y$ C" w$ e% q0 b; @# V+ p SuperscriptBox["\[ExponentialE]",
    + q! p$ r/ M# x# @! ]& Q, r4 H  RowBox[{"3.141592653589793`", " ",
    ( B* h  F6 C. H3 j) F( d7 U   RowBox[{"(",
    ' I. f6 F5 n& R' Y) q8 o9 I' }2 \9 y    RowBox[{# L  K1 X: ?2 X3 a) |' A% c6 |
         RowBox[{"-", ; r* {4 K+ Y  A/ t6 _6 T& c
          SuperscriptBox[9 G! Z& Q+ {, ^3 f. p
           RowBox[{"(", ) Z& [5 I; I, d, j
            RowBox[{8 ^5 E9 H' b& n1 q! n' W% W
             RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ! I; B% A; n! z     SuperscriptBox[8 k  C0 W; c$ Q* K- N
          RowBox[{"(", 4 L: M9 F1 q$ d4 w- q+ ~
           RowBox[{
    $ ?; u! e8 e+ t( r        RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-", ! B0 C) i' i' n  b
         SuperscriptBox[* D- z+ C& y- \% \& T3 b) }
          RowBox[{"(",
      q" }0 [# [# i3 w- j       RowBox[{  t, n! B$ k5 I8 }$ O, |
            RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", 6 D# i$ G, ]$ i( k! z3 \+ p4 {) K7 l
         SuperscriptBox[
    9 ]0 ?/ ^4 U* J. f9 ^  J      RowBox[{"(",
    ) L# l# W( V& a( S. \       RowBox[{
    - |& w+ `  n- {" s        RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-",
    # n! z+ M4 }/ P/ r; r8 m1 V% x8 N# I- m9 v     SuperscriptBox[/ h! E' f$ B$ b0 u7 C6 Q
          RowBox[{"(", + P$ G. C% y- b0 j% Q$ T
           RowBox[{
    : V9 z3 z5 B+ X5 U0 s        RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-",
    ' r: T1 J5 d% ~7 P3 w8 o     SuperscriptBox[
    7 m1 X6 H4 V! y9 X, w0 G      RowBox[{"(",
    5 U+ \8 A* t$ H( k* @       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ( }& U. w( f' c     SuperscriptBox[6 M! P3 H# `) E  O
          RowBox[{"(", 6 ]; P8 q( H& j. ?6 P; J
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    & L3 y9 R# z5 X1 r6 Y2 [- E/ j- F     SuperscriptBox[
    : i& k( @' h, p# y! L! F; I% ?      RowBox[{"(", & K7 x  r$ {, a! ]1 ^/ c
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    : ^) O4 r/ _+ m% w. |8 x     SuperscriptBox[
    / n9 t& h$ a+ l3 X+ Q: v, O/ I/ A      RowBox[{"(",
    + o- A% i- U4 m1 y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    " l0 O$ F" q/ ]; q3 ~  L    ")"}]}]]], "Output",% L# t% I6 u, n/ O; z
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]: E4 }" t  N) M9 z0 }  n3 Q
    }, Open  ]],& g3 n) _4 I( t$ U
    % Q7 F. [' f/ R& |/ c
    Cell[CellGroupData[{+ j3 p, \: k- g0 d0 L5 j

    / v+ {1 b4 U/ a( Y2 J, `2 z8 g; DCell[BoxData[{0 B. o0 k* K4 s( S6 j
    RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]",
    / T6 ~* x2 \$ }' B9 ~+ N RowBox[{"u15", "=",
    # A. T# V, U" ~6 n! b  RowBox[{* [# _8 I8 W: a. g
       RowBox[{"Exp", "[", ; _1 l* J) H' M; e* u4 ?' A
        RowBox[{! s* |/ b6 V' F
         RowBox[{6 W" T0 Z+ t8 L$ x9 O
          RowBox[{"-", : D' Z, w# w. A0 U; }" u
           RowBox[{
    . w- E* V% {2 y; g        RowBox[{"(",
    6 ~5 w% ]8 n2 k3 d4 X5 m7 w" m         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    3 m* a$ ?# X. |1 y  m        RowBox[{"(", : H8 g/ N0 X3 [+ G# l
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    / U# g5 n2 O0 B7 p2 d5 }, p; b     "]"}], "/.", "DeltaX"}]}]}], "Input",
    $ I0 s9 O& i" M CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {$ Z! f: r0 i% K8 z; y4 [% w8 ~
      3.57796154237158*^9, 3.57796157098203*^9}}],- _! p4 A$ x7 k5 `" e) p8 A
    - ~  K, N2 a7 ~" J
    Cell[BoxData[# F! W" m# |. b  ~$ u3 `6 q' g
    RowBox[{"{", 8 l) x4 u: t) L9 t% @+ l4 b
      RowBox[{" V' G% t$ h5 Z9 ^
      "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
      i  l: L* V1 B: |$ W   "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}], 5 e/ |- Q. E4 A0 l
      "}"}]], "Output",
    * |6 `8 u' H7 B CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],
    2 u" O' ?% H+ T* k2 e- F  v. }% U( H- E8 J/ ?
    Cell[BoxData[! Q6 ~7 V  P+ [
    SuperscriptBox["\[ExponentialE]",
    4 D3 X; A  R" }; B& ]+ q  RowBox[{"3.141592653589793`", " ", - D0 y/ Q& I6 q& V# u  _3 p1 C
       RowBox[{"(",
    " H: H( X: M6 t) e    RowBox[{
    0 @3 [2 P6 `3 s2 B0 O. w     RowBox[{"-", * I- J  z/ S- g4 z" [' w
          SuperscriptBox[- j2 n" e! Q% J3 y
           RowBox[{"(",
    1 X7 I2 V6 c& x. g, l1 O6 Y        RowBox[{
    9 F* r5 ~6 R6 S; w0 z" U  I1 L$ v         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-", . c( y5 Q! h  h% Y9 A- m9 @
         SuperscriptBox[
    , E0 T) I* z! A- h! C3 b9 p      RowBox[{"(",   f8 _0 p8 Q: [" ~. z
           RowBox[{: S! J- @* O- X* h) G4 [+ g) [
            RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-", + {& r; b% {4 D2 z3 c5 A
         SuperscriptBox[
    ! T: n/ q8 ?4 d      RowBox[{"(", 7 @- T0 ~7 v/ e: A
           RowBox[{( j5 o$ v, f0 |% _+ s+ C0 f2 `
            RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", 8 B- ~" W. Q, k
         SuperscriptBox[+ D( {, A" ]+ o, s0 \' D9 C
          RowBox[{"(", , s: i6 N- g1 j/ u: T
           RowBox[{
    8 A# [. @- q: Z! q9 ^2 s        RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-", - G1 `$ M8 j. |- W2 {
         SuperscriptBox[, L3 [3 }* ?% u! ], a, B
          RowBox[{"(", 0 ^1 ~! ?6 i# \
           RowBox[{) ~0 [# p  P, R9 n5 n5 z* e0 y
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", + L& ?2 x, h& }$ O+ Y( z+ w& N( x
         SuperscriptBox[! r0 z2 j: D1 X- f. I* X- g
          RowBox[{"(", , g4 q6 z% i" z: z" z9 G3 S! o
           RowBox[{
    0 q5 }& U* k% H. c$ Y        RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
    ; G7 E1 d7 F; b5 g& V! y2 W" B' N0 h* O     SuperscriptBox[
    ' [1 y# j( t* h* n6 a) |      RowBox[{"(", % l% K6 M  s6 a/ R2 R5 F
           RowBox[{
    - u+ \- q* X& C, Z        RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
    : U6 i6 h5 J7 j     SuperscriptBox[
    0 i  {& B0 R9 L" y      RowBox[{"(", ( c9 I1 S# ?5 n0 l; A1 k6 w
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 0 T1 R- w) Q% N$ l, l- W3 z8 g
         SuperscriptBox[7 A  S; h5 X; G* N! a9 F
          RowBox[{"(",
    & e" p! Z$ O7 D$ F/ k+ c1 e       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 7 z6 _" M, e8 O/ F, e3 q
        ")"}]}]]], "Output",
      w% ~7 b6 m+ x! @! ^ CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]; E/ C' h+ M/ g, \5 H& V& F% N
    }, Open  ]],
    8 @) {% p  E; o1 b, ~, t+ n
    * g6 X) L# J) q! ACell[BoxData[# I1 e: t" }! U+ @
    RowBox[{"For", "[",
    4 l; q9 m- l+ i+ T$ \$ l  RowBox[{! z" Q' A& Z% G
       RowBox[{"i", "=", "1"}], ",",
    5 x3 e9 J+ l$ [- B, i   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    . L% H1 g9 F8 o9 U2 m  K; @- f   RowBox[{"i", "++"}], ",", & ]' B. V7 j2 ~* B( \
       RowBox[{! `; q/ T9 d, B
        RowBox[{"Ca", "[", & U( \. T) v* K6 r6 M
         RowBox[{"[", "i", "]"}], "]"}], "=", 3 X# Z3 d# J. ?; t1 ^  K# b2 Y# d
        RowBox[{"CM", "[",
    2 f1 O( X3 G& K$ ~     RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",* S3 [# A9 u; q8 \2 W- ]% Y1 a
    CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],
    2 D; s1 `* {' N  V# Y3 t: P7 g$ M! X4 I7 i
    Cell[CellGroupData[{
      N5 ^! n7 s' v0 e$ @4 F6 s$ ^3 x$ _' W! H5 \9 m0 I
    Cell[BoxData[{0 a, g8 |: S4 e. K( c' W! O" V: o
    RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]",
    8 d6 o4 K5 f: v9 r! d+ @1 q$ v RowBox[{"u16", "=", 0 E7 I/ g2 M5 @* M1 C/ j2 Q
      RowBox[{3 i6 p0 O. k8 t2 {9 P
       RowBox[{"Exp", "[", - D) H% t* U6 c1 [% Z5 P1 r
        RowBox[{
    2 V5 f$ j5 t$ q     RowBox[{
    / u0 ]: e6 I$ }, G      RowBox[{"-",
    ' t- d% t, z- P1 R5 K       RowBox[{
    " g' U: ~( A& F, q8 j$ F  H! c        RowBox[{"(",
    ! m. G/ [" ~/ w- n+ t* C. i- Q         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 1 M4 P0 \/ U: ~5 O) X( }
            RowBox[{"(", # b* m5 _+ G% j( @. L" v0 [& j
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    - s5 V9 V/ X. x; M3 h9 H  \+ W     "]"}], "/.", "DeltaX"}]}]}], "Input",
    0 q1 Y3 p; d( {" }- f' E CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    % n7 E% u* L- r  U3 s  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9,
    " d! A+ U; C( q5 w& W  3.5779615751004367`*^9}}],
    6 q0 a) d7 n: y! m5 N% f  g" q( [" r( o( d' O+ G0 z
    Cell[BoxData[
    3 p! n9 e! k0 x  @# ] RowBox[{"{", % ?) e$ ]& L" R( W' I! g
      RowBox[{0 T" `2 V) R2 q0 _
      "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",",
    " C' A6 b7 P) ]   "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], * j3 D0 g. ]# Z* U
      "}"}]], "Output",* I6 s- h+ F% v: S9 q
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],- J& u! Q4 }8 l- B( F& T6 P
    1 \* f3 W! ^7 a& l+ |- U, F# q6 X
    Cell[BoxData[. d4 r& B% b. S! G7 G/ x. ^, W
    SuperscriptBox["\[ExponentialE]",
    * r& L" r7 y, e0 S  RowBox[{"3.141592653589793`", " ", : ?4 P% }5 ^5 |
       RowBox[{"(",
    ) ~7 ~7 u  t) V4 v7 ~3 F( h    RowBox[{; I2 s( r$ W( T& T6 R5 K
         RowBox[{"-", - T( r+ m& d8 B, n0 |
          SuperscriptBox[
    4 ~9 V% F+ b0 b  D$ u       RowBox[{"(",   d& M6 f1 k' o4 a- ~+ L
            RowBox[{
    2 o) p* _: A+ ~         RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-", 6 ^/ |# {* K' z& D% u" y, j
         SuperscriptBox[6 s9 |* j  G( u' L" \
          RowBox[{"(",
    + l/ N1 Q3 n% o( {1 R- `       RowBox[{
    * M1 q: U! S: s- W        RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-",
    ! N9 V* K# y4 Z5 u3 z     SuperscriptBox[
    2 D( \# ?  |/ i9 D" U4 d  H      RowBox[{"(",
    ( o) E4 ?* v8 m: ]% ^) K       RowBox[{" c. ]; m! y1 U9 v
            RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", 4 y, d/ r% x  D6 t9 V$ k
         SuperscriptBox[
    7 s- Y( N  Z0 Q      RowBox[{"(",
    - S$ l3 H8 w% u% i" p% I       RowBox[{
    & c. D1 d8 Y* ]/ M8 ]        RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-", " q4 f9 U6 A2 O% R2 a' G6 @' v5 k' L
         SuperscriptBox[5 }3 Q( {0 ]% C, _5 ~( Q: m- ~
          RowBox[{"(",
    " W$ m" g; a$ J, D       RowBox[{/ i6 V+ O( l! `) b
            RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-", / ]. I. ^+ e; K( T
         SuperscriptBox[
    0 g. T  j2 K: ?6 q: e7 B      RowBox[{"(", 9 d- N: W* s! t% Z% y8 O0 N# B( t
           RowBox[{. Y: u  V, k8 L4 F: p: Q
            RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", 4 p  [4 S6 Y- [7 Y5 D% u
         SuperscriptBox[
    ; }% ^/ `1 c) }# C% R7 z( [      RowBox[{"(", 7 m7 D1 j6 {5 F, G7 j( x
           RowBox[{
    6 S9 s4 g' L* X, C  d+ f        RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-",
    ! O5 ~% Y3 O. o3 @; t3 `4 I. s' b     SuperscriptBox[
    : m% r  q, p% l      RowBox[{"(",
    7 T( [" P; Z$ D       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    & w/ ]; A1 w( E) Y1 U) L     SuperscriptBox[' U' _. `8 ^/ p& C
          RowBox[{"(",
    1 P& V7 p+ l: A6 X; r$ V       RowBox[{
      }6 b" _  u: g' W! D        RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",
    # H, W, j, A' [# [% u7 I CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]( t$ G& Y9 A, _% ^" h0 S
    }, Open  ]],
    9 Z  U) ]" [$ o# S' g9 Q4 |1 E5 e& c/ G' P
    Cell[CellGroupData[{/ B  A! C4 V- m/ I5 |9 |0 ]4 X

    ( ~  F. i6 j$ _2 n+ }9 |  WCell[BoxData[{. X+ k. ~/ i+ b! {
    RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]", 1 X4 Z: P' [' I/ k$ X+ u; C
    RowBox[{"u17", "=", : q8 t+ S" |3 m
      RowBox[{
    . l/ U" _# H2 r0 ^- z' u) Y   RowBox[{"Exp", "[", 4 Z9 m0 x# i/ G+ x6 v  s
        RowBox[{9 B. k& z- b- G7 K0 k
         RowBox[{
    5 ?! h. J+ O7 m, z      RowBox[{"-",
    ' O6 R! o6 w$ k: k6 r. a       RowBox[{0 w5 L8 I/ s3 R4 C. a
            RowBox[{"(", 5 R0 J0 ^# @; ~- h: o
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", + D( u) @! x( o8 W
            RowBox[{"(", * d. A+ n; r! k; X/ m
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],4 R$ w. ~. w* X+ E- @) D
         "]"}], "/.", "DeltaX"}]}]}], "Input",1 h/ l4 v" k, y0 h- m9 J+ K
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {" V) X  s( o; O+ q& Z9 O
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9, 9 L- U+ R4 {- @8 P
      3.577961578953644*^9}}],2 k- g1 G2 X9 W0 c& A! u3 C
    : t' c1 |! L. {5 u7 I  X% q) ?
    Cell[BoxData[
    ; N+ n3 N3 l' w1 T$ I+ v& j RowBox[{"{",
    3 U% r9 t, }- V' k. W7 v0 n  RowBox[{/ s, L1 W8 }- X6 G% `1 u9 I- N
      "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", ) T+ P% {% H4 {" p4 ?
       "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}], , t: k  N' r, U) [5 [2 ~/ U- x
      "}"}]], "Output",6 H8 q. x2 o' u5 y
    CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],' ~4 |/ W( Y6 m: s$ n* n9 b- f

    ; k& T- K$ D0 i0 a0 c1 b) @3 wCell[BoxData[
    ( a! I( w) G- P8 j3 ^ SuperscriptBox["\[ExponentialE]", . `; _4 H) a7 J8 B9 S# z& t
      RowBox[{"3.141592653589793`", " ",
    7 T( O) I7 e, c9 Z) i   RowBox[{"(", ( ~' Y3 R( S4 Y$ B( ~* X
        RowBox[{
    ) p4 h4 }" s( d7 W% L( U     RowBox[{"-",
    2 f: e- Q. ~: _# n- }4 y      SuperscriptBox[
    , z9 J3 e: I% ~; C  _       RowBox[{"(", 3 L" i5 H7 P9 a+ i0 w2 i9 Z
            RowBox[{
    ) b  g; j" @1 \" K8 N         RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ) h: a" H/ W" P8 O( M  Q     SuperscriptBox[
    : ^; Y* ^$ y7 U/ v! Y      RowBox[{"(", ' q) q  n4 {, c% M' n' ~
           RowBox[{; K4 y, l+ |0 W5 h5 i) s3 e4 W$ R
            RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-", 2 y1 r5 X/ B8 L# T' f
         SuperscriptBox[
    ( j* T, F4 j- X      RowBox[{"(",
    , l3 m. G) D# R8 V4 J       RowBox[{
    + s+ V0 C/ r4 z4 F        RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",
    & B8 K* F  a  f  J     SuperscriptBox[
    9 _7 c5 k1 t  K      RowBox[{"(",
    ; z0 A3 _2 C" y8 j8 G       RowBox[{$ ^8 ]6 H5 P! h% ^% p; J) ^% @$ S! [
            RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-",
    ( Z2 r; w# t. r& E/ o/ P     SuperscriptBox[+ X) x: @) o+ U5 h6 [4 S
          RowBox[{"(", ' ^4 o4 E2 K. s& E/ S' G4 O) \
           RowBox[{' ]* B' V4 w( p2 a& _7 k% S( ]
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    # h; |1 F4 b# j9 h' u  u3 u. }     SuperscriptBox[
    9 h  n7 S+ N4 \0 H5 o  u/ R      RowBox[{"(", % h. j2 J5 o5 |5 u' A$ X" c
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    9 }% S4 C6 v# k/ ~     SuperscriptBox[% E. c( J4 h6 v9 L* A% K, `" U
          RowBox[{"(",
    " \  |4 {# i; V  x+ P2 p& R       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
      d5 q# q& n1 u* p     SuperscriptBox[
    . L' R1 g; X9 w& O. m4 \- e      RowBox[{"(", . ^, P; r& s4 H
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", $ `, [" k6 |7 |
         SuperscriptBox[
    % b) |" q# u0 l      RowBox[{"(",
    : S) A$ M& O$ Q, Y" M       RowBox[{+ ]- a8 ]8 c- i: `  t) y, _" F- t
            RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}],
    2 I% K- |8 f0 v5 X    ")"}]}]]], "Output",
    . P& l2 @5 U! B CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]
    4 v  @' p! ^9 f, d}, Open  ]],
    * E! s( y- j% X, F7 v( R  O) i( A
    * A' ^& \0 i& o! Z+ L8 Y% `0 ^- u  j9 vCell[CellGroupData[{) Y# P* t8 T5 i* b' |

    " R* u- S( f, a- W. }" b! ECell[BoxData[{
    8 y# ?& ]1 ~) G) p$ X RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]",
    " C( h+ G# ?' k. ^( `. J, K RowBox[{"u18", "=", 7 @% g6 C( \4 b9 h" w9 u+ b
      RowBox[{
    ( W( h* I* T! \7 C8 x' p6 n   RowBox[{"Exp", "[",
    ( I6 O4 Y' n8 U  k) U    RowBox[{
    $ g" O9 k2 ?. L/ r     RowBox[{+ Y' g% G6 m# w* J, `
          RowBox[{"-",
    % L3 `9 ~% p* j- b/ _( a/ ~* i       RowBox[{
    ! [% V& ^2 z4 A; w& W( @- h        RowBox[{"(",
    3 J7 L( X1 p/ k/ h! }- r         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", - p; M/ C( r3 @3 v: d
            RowBox[{"(",
    + f4 W4 M) f/ v, Z         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],, w- A& ^. o2 k
         "]"}], "/.", "DeltaX"}]}]}], "Input",6 l  t- o% n7 i$ V* P
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {: q( I) j! {- M3 `3 l
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9,
    * F& s% V1 i: E2 @  3.5779615828848505`*^9}}],
    8 |6 s% @! |: ?2 q% C1 d
      m) J4 c4 Q  s5 g/ FCell[BoxData[
    3 r1 e/ D. U& r RowBox[{"{",
    9 p6 O- u* ^, A" X0 ?  RowBox[{& i+ t/ P0 A4 `
      "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",",
    / d, L1 Y3 n% B0 j! z/ d* l   "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    0 U3 S" W9 E( A" Z8 }8 B  "}"}]], "Output",/ i* m0 V: ~* c
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],+ X1 Z, `6 z0 }& j
    6 w* ^( B2 C: y% U* n) q
    Cell[BoxData[: n. M) Z: |9 x( }9 }
    SuperscriptBox["\[ExponentialE]", ) u: y1 c) C% O: J$ v
      RowBox[{"3.141592653589793`", " ", 3 P' T! y) p. x: [2 u
       RowBox[{"(",
    0 a+ g$ P: G3 N$ R7 b# t8 ]$ e- v: A    RowBox[{6 p: A, K/ O8 ~' _! ~5 y' I- d
         RowBox[{"-",
    : _: M; V; X" D9 I1 s2 m      SuperscriptBox[8 l6 i7 k3 W/ |7 k4 K4 R
           RowBox[{"(", # o6 _. O3 Y5 c3 N9 {, C7 `
            RowBox[{
    ! e& ?5 Z1 K0 M$ ]2 F' C         RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    + Z9 c# r3 ]2 G  n. P     SuperscriptBox[
    8 b% H% ^6 b4 d, R$ U; N1 G* ]2 P% s      RowBox[{"(",
    ! d8 F. S$ o4 Z2 P5 P       RowBox[{' K0 a# [! F* g' a3 m9 W2 n
            RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-", & @7 {6 I5 E  u: X- ^  N2 l
         SuperscriptBox[
    ' z- d: D" j/ E: V* R      RowBox[{"(",
    : z& d- C9 ]7 Q+ I5 n  l$ Q       RowBox[{% y5 X) E4 J& F' u
            RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", 8 ^  Y# M* w5 l, V3 x# @3 P
         SuperscriptBox[
    $ k. b8 @% w" F6 {      RowBox[{"(",
    9 }6 {, v: r$ B: V- l       RowBox[{
    6 @( _6 p, `  E. a7 u) W+ F        RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-", ' M) A& S" J- t$ o% z1 {& a
         SuperscriptBox[
    - `3 p  p( W: C' v2 i      RowBox[{"(",
    2 N; q* Q8 g" V# H: a       RowBox[{0 e* e- k. O- S% W* u6 _% C- B4 p
            RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", ! B( \* a2 U% h' l  l. f- I! F
         SuperscriptBox[
    % v  e7 w$ j) |      RowBox[{"(", 3 Q0 a$ s# s0 Y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ( P1 M' [& A( R; ?3 v4 v* P5 q
         SuperscriptBox[! @0 H# H2 U! C1 }6 R" |
          RowBox[{"(",
    / D5 e2 f* s& T  w3 m& m* C       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",   |9 W2 E' ?5 z8 c3 d
         SuperscriptBox[- z- Z( {# ^' |! W4 Y8 A9 Q8 R8 E
          RowBox[{"(",
    : B5 m/ S5 E. H* G$ j       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", , F/ c- V) F% I
         SuperscriptBox[
    % v3 e. R' E* x* r5 v      RowBox[{"(", 9 g4 a% ?+ o+ p/ r! d0 B
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 1 l1 A! ~4 ~: w) v. j& V; v
        ")"}]}]]], "Output",7 _6 q( C) A$ y, _3 M5 u; U3 s
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]$ B, m9 D! I- v. c7 }- L
    }, Open  ]],
    & y& C2 B! q2 v$ C7 e: \* i/ I7 J1 I3 G  W
    Cell[CellGroupData[{5 \& }+ R6 Y+ Y8 P5 J, w) e$ j; a
    . }$ Q5 a! ^. K% h; y
    Cell[BoxData[{& L8 C+ W. l9 G1 k  _1 o5 c
    RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]", , R" G# Z+ m4 R1 o& G* U
    RowBox[{"u19", "=", ' F5 j, U9 U) Q/ s# R2 z
      RowBox[{
    . s' L# O! r/ E2 B8 u   RowBox[{"Exp", "[", 3 q8 s& S) O' Y8 P
        RowBox[{
    0 x0 z& ?5 L* N9 I4 C8 p2 C     RowBox[{
    7 J! Z$ j5 x; t" Y  b, G( ^- y/ w$ ^8 A      RowBox[{"-", . d' [0 d* q' I$ f/ P" R
           RowBox[{
    1 _: V; h0 S2 Y& E7 ~: }        RowBox[{"(", / N9 k) Y% A3 D3 `
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    1 H, `  k9 y; H% T+ I0 d        RowBox[{"(", : J9 M, w  t* E! d; L! i
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    , B  E$ n& M  X# v  }* ]     "]"}], "/.", "DeltaX"}]}]}], "Input"," t0 J( J" ^* C# x, D7 k
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    / B  B2 @( \- C* w1 @& B: i  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9, ! o/ m- z0 S) E& d) E+ B) b
      3.577961588890861*^9}}],
    ' X9 ~1 L: k2 J) k( ]3 a' i; Y* M( p/ _- h/ W, d- u8 a
    Cell[BoxData[
    ) t  E/ T9 m0 i( ^0 M RowBox[{"{",
    ) A8 S6 E( d( C) H, V3 Q  RowBox[{
    3 B. z' ]- [" k: g& o: L  "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",",
    & \$ g0 X4 d* F" V7 J   "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}], 6 [& W: _4 H9 V; O5 ]
      "}"}]], "Output",
    " d( B! G. X# m0 T CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],; I  \2 c/ q7 C7 V4 r7 [

    7 u. O  T4 S3 O* y$ BCell[BoxData[6 v4 |; D" @+ }* W  `9 {
    SuperscriptBox["\[ExponentialE]", . h6 j( O" P% [0 m
      RowBox[{"3.141592653589793`", " ", / _" z7 h) `' j: x. u
       RowBox[{"(",
    & y6 M  u" m, O: t) f' t! N    RowBox[{% a: l% }" ]' |7 E' D1 p5 U1 C9 m
         RowBox[{"-", 8 H8 A" k+ p5 \# o$ q6 D
          SuperscriptBox[: L' B6 H$ \1 P/ X
           RowBox[{"(",
    + k2 U6 ?5 F, W# g0 [1 t+ W        RowBox[{! T+ T7 O" ^7 x4 _# e
             RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-", ' p8 s0 }% X- g, t# g
         SuperscriptBox[
    & F1 u" D% n$ D      RowBox[{"(",
    0 U, D% Q6 S6 z7 @2 {- Q! y       RowBox[{  r2 T5 m6 F* ?8 j- P& e* t
            RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-",
    5 `' Y+ s8 J0 c# a, X2 I* [$ G; `     SuperscriptBox[/ w$ g6 W, ~- X/ ~4 g: y5 s5 P
          RowBox[{"(",   g' J: v4 }) _: u" u/ C7 Y. G
           RowBox[{2 r7 K, H! T/ O# d4 z
            RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    ) z& f: x7 q: w; \/ @* g+ g     SuperscriptBox[7 |1 f- |- K0 }2 d  G
          RowBox[{"(", : i, X" d* Z) ?! p" y
           RowBox[{# l- J1 i' S# R+ h
            RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-",
    : Z$ E+ G' e( T" K; ^) m5 j8 |     SuperscriptBox[
    " f' Y5 K* S) T  C$ j: v& n& h      RowBox[{"(", ) a$ {( H# T# B! H
           RowBox[{8 d6 y1 [2 d' w4 C1 x' I9 B- \8 U
            RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-",
    - z# q" T1 [# a4 A! ~# F     SuperscriptBox[
    5 H; ?1 Q# q* x* R# P; L. y( `      RowBox[{"(", ' p9 R  ~# z$ W1 r. X# [! \% t' r
           RowBox[{
    + ~& n( U! V5 F5 |        RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", - o+ ^" q6 Q/ e# T
         SuperscriptBox[
    5 \; h; N6 m: ]4 Q      RowBox[{"(", " t3 C3 V0 @. ?9 A. `9 {+ }/ k$ Y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    6 ?% n6 B, x6 ^! }% w2 M     SuperscriptBox[
    . ~3 w+ |; ~7 \; Z      RowBox[{"(",
    8 U& e& J+ _! M% u! a' W! b# r* ]8 U       RowBox[{
    7 V* y& K; M/ w' o- v        RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-", 1 H  u: {' R7 b, S7 i
         SuperscriptBox[7 a  R, ^. x' @) D
          RowBox[{"(",
    ' i. n8 d; g6 g  a4 W! ^: G       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], * D/ z6 C. P  R0 _+ }
        ")"}]}]]], "Output",3 ^. E& P8 s4 h
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]
    8 s2 y0 _; l; ~9 J/ _}, Open  ]],( e7 x* T; E7 C/ }* J0 O! ?; J
    . q: I" X. t- O, ^9 a5 R
    Cell[CellGroupData[{
    * x' p' ]6 p0 j! Y  R0 x+ @% p# F5 Q6 ^: i
    Cell[BoxData[{1 S9 x8 H2 X, y& [) T9 h/ D
    RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]", % z1 O/ Y/ \  D6 f. F2 I
    RowBox[{"u20", "=",
    6 R2 {- e" _: ?* J+ L' ~+ i! Z  RowBox[{
    ! {+ Z# X7 _! J2 T" z1 S, H9 y   RowBox[{"Exp", "[",
    : |' J1 k/ g% O$ ^& _    RowBox[{4 e; V: i$ Q1 a' |+ }/ V
         RowBox[{/ ]* y# P# |) A6 k
          RowBox[{"-",
    . I7 R$ @8 L" C) x       RowBox[{3 P& F( M0 s- A( F# M9 k
            RowBox[{"(", 5 g/ m3 ?+ h& Z0 f7 a6 n8 }" n
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ! }" |% K$ H: u6 K        RowBox[{"(", ) G# E) K4 l6 ?$ t
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],2 a3 U+ S4 j/ m- ?8 R
         "]"}], "/.", "DeltaX"}]}]}], "Input",  o5 g0 a! h2 E( C
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    4 g8 g" f' ]! P. X/ T  a% J  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9,
    " w8 e- ~: c# C% M! f! Y% V7 W  3.57796159382047*^9}}],% S' o! r* u  ?" v7 `  t2 l* _
    & _+ i$ o% }' c) l
    Cell[BoxData[$ `. e+ w, E2 L+ G5 \6 C! L! _
    RowBox[{"{", . i1 n  ]7 q" x0 J
      RowBox[{# s4 r) p" l7 p, A0 @
      "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",",
    7 C1 N# {4 \3 r5 N) j   "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}],
    1 R3 k9 u/ h( d* Q/ c  "}"}]], "Output",
    + s; R  W: m  x# N CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],
    5 B/ _  K& g, H+ l( Y- Y+ T, l. q/ \% @7 ]3 |& m5 s! h
    Cell[BoxData[5 X! S# z4 n- A: D0 G- G
    SuperscriptBox["\[ExponentialE]",
    * v+ C1 w% m- U; T. }/ t' D0 \+ M; p5 u  RowBox[{"3.141592653589793`", " ", 9 n$ H* p8 r  O+ f" x6 d
       RowBox[{"(",
    " e! ]/ p; O) Q    RowBox[{
    " @. I4 Y/ O. b/ l7 g. D     RowBox[{"-", # f8 n$ ^$ ]/ W4 T+ _
          SuperscriptBox[
    ( ]- H' L  ^% t       RowBox[{"(", $ i1 ?: v$ O* V5 N$ t' V/ Y: K' v
            RowBox[{+ l- s; e( w* w. o) Z
             RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-", 2 ~5 A$ _3 B  i( W( e
         SuperscriptBox[
    % d; G5 F1 P) q& W6 X      RowBox[{"(",
    9 V5 o; S5 k  k6 d       RowBox[{
    , m7 b4 y  S" V4 B" {        RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-",
      H3 d' o+ h0 M1 d3 i4 X     SuperscriptBox[
      _5 n) F. F1 v- c  M      RowBox[{"(", 7 X2 Z" F% `- B8 ~) L# c
           RowBox[{
    $ G& B( O3 q6 _1 `. X        RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", . l/ I2 H$ J) @  g" m: ]
         SuperscriptBox[
      F& p. f; T, c. m) e4 T2 {      RowBox[{"(", 0 r, f3 x$ i: V. l& m
           RowBox[{. K$ O. ^& g. u/ M3 Y9 r; y% ^5 J* D3 P
            RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-",
    ! A, j7 K* \3 o& M' M$ W- j     SuperscriptBox[& \2 a8 W" r* L) t' e7 }
          RowBox[{"(",
    # T9 A# N, |8 J7 ]- r6 a+ K, s       RowBox[{( a2 a! C5 o) X6 C
            RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-",
    9 E/ V' ]/ z2 {9 F     SuperscriptBox[5 g5 \' E/ _: r+ u( e
          RowBox[{"(",
    # r, U+ Q7 y& I" q/ h5 I4 ~       RowBox[{6 A# P( W, \! s% H  k* B  v1 f
            RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", 2 U5 ]% T7 |$ A& l# J" K
         SuperscriptBox[
    / A4 s  E- G3 j/ c4 @  Z- o% g      RowBox[{"(",
    " A9 O. ?! j1 t$ C. Q3 N$ s       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    8 d9 V) j9 m4 I7 [) J! B     SuperscriptBox[
    - e& @& i* B' R3 ]' `. g# l      RowBox[{"(", ; d; T/ r3 C9 h  L) F0 p
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    $ R: }# p8 b) y- {5 W, W: P& c     SuperscriptBox[
    ( G1 w, ^6 `9 L- o      RowBox[{"(",
    : g8 k7 s: M7 I4 K* e       RowBox[{
    5 U: k4 m+ C2 R# m# y0 w/ @4 l' A        RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], , f. t% V" U: J7 {* M) }* d
        ")"}]}]]], "Output",' z6 w, M0 o" i
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]
    ; t6 J+ B1 @, V. V8 n: ^}, Open  ]],2 b  x' ~( t2 T

    ( }: Z$ V* |: ~# V+ ^- h4 wCell[CellGroupData[{
    9 G! M* P1 V9 [. V5 p
    ! s  ^& B6 i# w) j/ _; l* ~Cell[BoxData[{
    - ~0 }6 j% R' j5 a2 V RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]",
    # ?/ O9 O( Z5 o! J RowBox[{"u21", "=",
    8 a2 J4 p3 u+ }1 U0 T$ O+ p  RowBox[{2 ?% z) H+ E/ ~" ?6 e, w$ [
       RowBox[{"Exp", "[",   G% ?) y1 ^( t" U
        RowBox[{9 Q2 y( O1 {# {! |
         RowBox[{# S6 R) t% p' L4 Q* d
          RowBox[{"-", + S3 y- V# L3 k* A' d4 ^
           RowBox[{
    ) a& _/ c: M( B/ }1 a+ _        RowBox[{"(", " n' @+ }6 Q* E, f0 g' c! J
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", / s: c! ?: ]% E( q
            RowBox[{"(", 5 u( @9 O( ?; w7 y# P3 f# R, @* P* Z
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
      x: K8 u  g: `# b4 [     "]"}], "/.", "DeltaX"}]}]}], "Input",4 y% K% e' R) t
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    / u: G# W- a7 N  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9, % e6 v5 L4 ^; E6 w' {; w
      3.5779615991556787`*^9}}],
    + N& @8 I2 G6 b! y
    . P2 U) ]( f- w& Y8 R+ Q+ oCell[BoxData[
    $ t6 {, h4 t2 I. K+ G; } RowBox[{"{",
    # D* i& H, ?& V) A  RowBox[{
    ! s, C: |/ f0 K! K* ?  "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",", 4 E! S/ F0 ]: U+ X( G
       "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}],
    , t; {. n2 [3 {  h. @  "}"}]], "Output",
      O5 K) A. |) H6 _, |  T CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],5 l: i$ k8 [* g% F

    ) ^2 T' ?, t" q* q8 F. PCell[BoxData[( r2 n) ~4 L9 b4 p9 z8 g5 P
    SuperscriptBox["\[ExponentialE]", 7 @1 Z! j+ D! k$ F& A
      RowBox[{"3.141592653589793`", " ",
    . O/ ]- |0 |( o9 O3 i& @  k* v$ a   RowBox[{"(", / k' f0 q- X' V+ T9 t6 D2 l
        RowBox[{5 G1 N5 c: e& G( e. f1 G  n
         RowBox[{"-", 9 n% |6 O; K- d8 G, r
          SuperscriptBox[
    % x# J9 u7 }1 h# ~) D  |       RowBox[{"(",
    $ N/ w% n- n! }4 ?' J( T! g4 E2 c        RowBox[{! C6 m$ X2 r8 c( f+ c
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    & b# E6 J# I, F: q: s$ g) x     SuperscriptBox[- M8 t0 @! S* _" |, P& X
          RowBox[{"(",
    + k, d& a" l& F9 p8 `2 g$ D% T( S       RowBox[{
    5 D5 r. X: }& P& g; Y$ t        RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-", 7 W# ~! c' h! j# _$ P! x! ~
         SuperscriptBox[
    3 b: ^! V9 I4 b' D+ i' U% J- o      RowBox[{"(",
    & S, [3 R% n! x1 X       RowBox[{
    . K& v0 g  e- b5 W$ p        RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-",
    7 Q3 v# B1 F( O, ^6 V# Y0 G5 A     SuperscriptBox[1 d+ ?4 N- b% D4 V
          RowBox[{"(",
    ( l  F$ f( x; n5 U! I2 U) n       RowBox[{
    5 J. L: ]% w; I( J" ~( V! ~) n, P        RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-", 4 B7 E9 [7 ~$ Z5 h8 S! Z/ A
         SuperscriptBox[$ x8 V7 L6 l8 e/ K
          RowBox[{"(", # c( E7 Q$ k2 U0 `  T8 @
           RowBox[{7 d4 u- @6 P* ^
            RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-",
    8 y7 v9 W! P: F8 v4 {7 Y* l# y     SuperscriptBox[
    1 }7 P- b4 i5 D0 X+ S5 Z' C" y      RowBox[{"(", 3 n  L4 g1 ~( x" X0 B
           RowBox[{
    ; f+ |( m; D7 M0 L0 N! D        RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    % C8 [- O# _$ W: m  _6 K     SuperscriptBox[1 S' C  P% \8 l. A
          RowBox[{"(", $ `3 Z' H# E6 d$ B
           RowBox[{
    ( E  y/ F3 |+ W" _& }  ~5 C* R        RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",
    & j( Q6 k+ `, L' O  C- u: k     SuperscriptBox[
    & T# a6 `: h7 w( W0 M  F      RowBox[{"(",
    3 L) D; n5 h8 v       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    + ]7 _% Y& T  I6 n: O& D     SuperscriptBox[
    ! p. C* ]5 ?+ c9 @3 z3 z0 o  k      RowBox[{"(",
    7 ^- F2 D2 y0 D' L! J       RowBox[{5 _6 l% a9 p5 L& g2 ?
            RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}],
    $ u7 N5 X8 c5 r! i4 g( _, c    ")"}]}]]], "Output",
    ) W! l4 K  \6 {) O" Z) b5 i# B CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]" X$ m; t+ e) F6 Q
    }, Open  ]]," S4 x. t& ~' m
    7 x' \$ |# e  s6 y
    Cell[BoxData["\:62df\:5408wi"], "Input",
    * [$ T$ l- v. D7 v6 ? CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],
    1 W, `' q; m* v% f, Y
    $ S2 m" V" T' f; O# VCell[CellGroupData[{
    0 a8 ^+ V. r" X! B6 s* E
    % t% ?- ^, b& K# ACell[BoxData[2 T" h# K/ x: q+ G
    RowBox[{"y1a", "=",
    * ]9 A/ F- b7 {  N  RowBox[{"Table", "[",
    # l+ Y- A* C" B' R  Z1 g2 ]   RowBox[{"x", ",",
    - }: G& M: M& {! r: p# \* {" T1 W! W    RowBox[{"{", 8 n8 S: m* N$ Z0 _+ l, Z, m, ]5 Y
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    2 S* e! A1 F& T! E5 G CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {
    ( L: l- i; C' r, N- G( q  3.5779226649375*^9, 3.5779226810625*^9}}],7 v- k2 w" f$ t% c6 H* \

    8 i  M3 b+ \+ D3 ACell[BoxData[
    9 w, i' g4 k; I! s1 f RowBox[{"{",
    8 P1 ^: v% n# i3 _2 h; |" y  RowBox[{
    7 C& E4 |" q) {- j- Y% ^: c7 @- F: i  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . C4 E  E8 \1 D   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",! X' }% o  l) _7 p: N
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", $ e; R, }$ X% f" `
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
      B) B5 y( Y, f9 l   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    % p2 v& @2 J( {* |1 W4 p   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", & ?+ z, {, _8 R' _# C
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", + ]+ C! I! z4 q: w+ E
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    ! L& J+ P0 M) n   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}], 2 l3 R* X9 m0 T* f
      "}"}]], "Output",, o- W  j& s" I7 c. L
    CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9,
    : [8 E  C; T/ u0 y8 b$ X( Z! a) |3 _  3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]
    6 Q* {, e1 Q! A$ l7 i}, Open  ]],
    ( _# \) _! }# N' ?$ L
    ( e6 U' K! Y" L$ j( v! x5 {Cell[CellGroupData[{9 ?; O5 w4 I3 U& F
    , v) d% K; M; r* j5 _" o
    Cell[BoxData[
    ( P1 `4 a  U; C1 M5 G# @ RowBox[{"Data", "[",
    + B5 `( @! P2 V8 G$ T  RowBox[{"[",
    $ J8 Z7 S/ x! n: u) v   RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",
    * Y6 i  }. d! f- z0 @4 B CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {' r; A- j( h, Q' f7 w' @+ I! t1 y
       3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],
    , u) _! I' L1 ~7 ]0 X* v' R6 H8 W$ |" k; r0 e  \
    Cell[BoxData["0.899882`"], "Output",2 F; r1 i1 r# ~9 L
    CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9},
    ! [) S: [' f7 F$ ?/ B   3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9,   W9 N5 G* o; x% v. E& a4 o: V2 M
       3.577961929080654*^9, 3.5780123419375*^9}]0 G& `" r/ t; }5 Z0 B
    }, Open  ]],
      c- S( k/ M$ T8 j' ^- k/ i6 |) G9 }1 y: _" G
    Cell[BoxData[. U# c2 j" c% H1 P
    RowBox[{"For", "[", - A7 A& ]! \, E+ h* K& l
      RowBox[{$ p$ Y3 ^3 I, M4 H  u7 C/ i
       RowBox[{"i", "=", "1"}], ",",
    ( A3 v+ [! i4 P  Y  v' A8 r) j   RowBox[{"i", "\[LessEqual]", "60"}], ",", 5 K) b9 ]& z: ^- s2 {2 H  H6 F
       RowBox[{"i", "++"}], ",",
    " l- n. u/ V( t, y. {   RowBox[{, t9 S$ A3 r# Q6 \
        RowBox[{"y1a", "[", 0 S, S- a/ f9 j9 R: `
         RowBox[{"[", "i", "]"}], "]"}], "=",
    # E7 k* Q5 T3 O, u4 p    RowBox[{"Data", "[", $ Q5 T* A; ^) y$ |) k
         RowBox[{"[", 6 h0 R4 y1 m: }1 F- W# x
          RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",
    # x  N; x. D1 }5 F; ^+ y: b+ f CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    % Z+ B2 n  `3 W   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9, 7 T$ B3 |" ], V" n
       3.577922923203125*^9}, 3.5779588839702806`*^9}],1 D- o* H# y# @1 Q! I' B9 D. @. W

    * q  Z4 _* m2 ?3 W% u, A+ _) g! uCell[CellGroupData[{7 [+ n1 K7 E6 j6 x3 K2 _$ I, [

    3 j4 K0 A4 ^2 \' |& CCell[BoxData["y1a"], "Input",+ M; H9 \+ v& _
    CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],
    1 k- Z6 V$ o+ \9 R4 n9 h$ v+ B
    ' _4 K4 D4 l$ p3 I6 VCell[BoxData[
    # N: x" `* \7 P4 [$ K2 \; W RowBox[{"{", 1 x! N$ {$ H; o' l1 n
      RowBox[{/ o* @. R9 t6 e3 _2 q( g6 r& R* U/ T
      "0.277091`", ",", "0.220259`", ",", "0.899882`", ",", "0.265607`", ",", : F1 b; k# B4 }% s6 d2 m/ L6 |
       "0.642226`", ",", "0.306243`", ",", "0.186985`", ",", "0.175501`", ",", - n8 k/ m7 U) n* X
       "0.147821`", ",", "0.352768`", ",", "0.23881`", ",", "0.095701`", ",",
    + U) R. C- @' c" q   "0.162839`", ",", "0.335395`", ",", "0.160483`", ",", "0.398115`", ",", * H) u7 M! @9 r& x# G* u
       "0.157833`", ",", "0.315665`", ",", "0.492344`", ",", "0.638398`", ",",
    , U$ L- ?8 |7 u3 X, Q! G   "0.392521`", ",", "0.362191`", ",", "0.114252`", ",", "0.401355`", ",", 6 M9 @% \9 S0 N# t/ M( X
       "0.827444`", ",", "0.676973`", ",", "0.331272`", ",", "0.845701`", ",",
    . d' u6 S3 r5 M; j( c" o4 Z   "0.287102`", ",", "0.`", ",", "0.050059`", ",", "0.254122`", ",",
    ; X8 F# \! i' ?   "0.086867`", ",", "0.659894`", ",", "0.317138`", ",", "0.605124`", ",",
      y) U) L# h7 r! Q1 r  l   "0.32126`", ",", "0.595406`", ",", "0.555359`", ",", "0.333333`", ",",
    & N# l/ s# m, N2 R2 q4 {" F   "0.149588`", ",", "0.493522`", ",", "0.224676`", ",", "0.410188`", ",",
    + e1 M: w3 R1 F2 _) j6 n' f6 D! [   "0.668139`", ",", "0.102179`", ",", "0.380742`", ",", "0.319494`", ",",
    0 I- \- W5 t, O( Y, ^7 |* d   "0.031508`", ",", "0.292108`", ",", "0.329505`", ",", "0.337456`", ",",
    . I+ z8 m6 i2 N2 h- c4 T   "0.766784`", ",", "0.676678`", ",", "0.541519`", ",", "0.064488`", ",", , f, V6 ~7 ?! O* N# L! ?8 |
       "0.463192`", ",", "0.388398`", ",", "0.262367`", ",", "0.290931`"}], & h7 e" S, Q5 B7 p* t( ?
      "}"}]], "Output",9 d* d$ m% x7 m0 s2 C9 z' `- I2 W
    CellChangeTimes->{3.57792293246875*^9, 3.577957577756765*^9,
    / Y' P8 u1 f$ g. ?  3.577958888806289*^9, 3.5779619425902777`*^9, 3.5780123438125*^9}]/ n: t: x* J, _% @& T* r% P
    }, Open  ]],- Q7 M7 v( e8 R8 }( S
    2 @$ e# R. J( B' T( I. v  X
    Cell[CellGroupData[{0 e  d/ V6 [5 J
    + j2 ~; G" c6 f% N" F9 ~+ d) Y
    Cell[BoxData[7 Y& \. a; K. X2 n  s9 w! R  C
    RowBox[{"m60n21", "=", + J7 m5 |, @& B5 ~3 C9 Q8 G/ g
      RowBox[{"Table", "[",
      F1 N& Y( V3 H5 J) z   RowBox[{
    7 d3 R+ N. S6 i; O6 F    RowBox[{"Table", "[", / O/ N4 X9 C) a* y; o9 t
         RowBox[{"y", ",", # Y) \- R! I  X4 V! C. t4 f
          RowBox[{"{",
      g* P9 |. J9 T4 w9 c4 m       RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",", 3 R: l9 W' ]  z7 O+ t7 J0 m
        RowBox[{"{",
    3 o4 _* u  G/ Z( g     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",4 y$ o9 h' X9 e6 l& N
    CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {
    % ]. S. E: p( ]# ?2 i% e  3.577924052828125*^9, 3.577924101671875*^9}, {3.5779619669419203`*^9,
    8 A& S6 x9 ]  }1 K! V  3.5779619706547265`*^9}}],2 q2 H+ R" R, g5 q: r/ `5 e5 {
      H2 \& @6 |1 {8 @: X: k  c7 C4 |" V
    Cell[BoxData[0 {' \! U! _$ H5 p1 {( i
    RowBox[{"{",
      v& ^2 W9 s' B( o  RowBox[{% K4 M4 y/ ^7 W: b8 }9 M
       RowBox[{"{",
    % T* h& d- d! g; q2 ~5 y    RowBox[{
    3 U5 i2 G$ E9 F$ l# H6 }" ~1 Y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",: W% z) d' ]2 U8 \
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . p) @! F+ R( z$ r( M+ T
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
      I3 A5 H* w8 i     "}"}], ",",
    ; o& u6 k& ]* c. C8 g   RowBox[{"{",
    : k  X* w% T; i1 ?    RowBox[{
    0 g4 U' C( U7 q5 l$ v0 R& R/ I% h    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ O% v6 v+ B; Z* W
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * P3 w1 C* S$ C( |: w" U6 E( i
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],7 v5 L2 G; y- v; ]. G
         "}"}], ",", - \4 {1 A7 o& h& {5 Y& y3 Q( p% h+ J
       RowBox[{"{", 6 A$ _" ^# N! K( Y5 s
        RowBox[{$ N) ?  U% e# N+ I! u4 t
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",' J" R1 V1 I( w) u+ Q" b
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 }% q/ o' j' e; R( y
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 G6 N! S  O/ c) @( Y$ N3 w. i% R" s     "}"}], ",", ; r2 A& `% M1 Z: v" v/ c
       RowBox[{"{",
    : h( l1 K9 N+ A4 U    RowBox[{8 |- P7 @5 D6 E; b. L
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 y; C: B1 v" q% i$ m      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 ~, c2 }+ B# t. v! L0 w# u0 m  c     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],- s: y. f* H9 h
         "}"}], ",", " I* ?' _2 p  ~+ j$ F) A
       RowBox[{"{", 2 Y0 R; d" e( C+ h
        RowBox[{
    : S' |2 |* R5 j1 T( n    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",8 L- h/ t# r3 M3 I& t" ]* r
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % C$ }& H# Y+ t# j5 p, c     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 q0 u8 z8 `  c6 h+ W9 K     "}"}], ",",
    ! I' V6 k( x5 x8 j) K" K+ |4 s5 D) V   RowBox[{"{", 9 q2 P+ v" M' ]7 |9 |, R- K( a
        RowBox[{! T4 n: j3 c0 A% T  X
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : l* C7 N* ]# g5 \      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) G0 M0 o! p  e! n6 m3 n
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],7 J; g% c" `% U2 f8 w. I# F
         "}"}], ",",
    : v; S( k# L6 ?5 q; o   RowBox[{"{",
    9 K5 {7 h+ _! D1 q+ L    RowBox[{, R) M+ Z( o' K& d, M, l
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      l$ O* w1 D3 G! _  d      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 S3 W6 G1 V2 @! Q1 H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , t+ X& N" f* G8 j) f     "}"}], ",", 7 u$ E2 l& Y. R& W) E" O% e0 P
       RowBox[{"{", ; Z& _  c7 @# P" ~- Y# p
        RowBox[{
    ) D7 X" K8 E" I, X' Z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & Q7 p' k; L: I& a      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
      K7 a7 m7 W0 L* I- n3 y     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / i3 K& o2 h4 G6 V3 R( C5 M     "}"}], ",", & U7 |# e! c" A, G
       RowBox[{"{", $ s% Q) k. k- ^1 J; G9 W; `
        RowBox[{
    ; @. F5 T% I3 X& O' G    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' R% F5 R2 m1 E8 B      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    0 U8 h% {  B. {3 }/ b     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# }7 W( o6 X6 N/ S4 R: ~
         "}"}], ",",   Z( U) h/ k5 f" L
       RowBox[{"{",
    5 o3 S, K  o8 N( u) a/ e9 ~    RowBox[{
    * P: p8 [8 i. k% |    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ) S: j3 d( I9 e      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 1 t' I7 p6 a7 B! ~, c
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
      E, H* h  }0 Q! h     "}"}], ",",
    1 K; H$ _4 ]2 j6 S1 X5 y   RowBox[{"{",
    * T$ P# u6 \1 f! P4 k7 j6 u- k    RowBox[{
    % E* y  k( L0 _( C    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' o* F/ A9 J) }      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", & r4 e0 k8 o6 N6 Q- s2 G
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 z! V7 G6 i0 g! a
         "}"}], ",", * E0 ]0 v) J6 J7 P; ]  R# p3 l
       RowBox[{"{", ' I& o6 j$ |3 z( P) I+ ~
        RowBox[{! L1 C. }/ q, Q
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & Y( B8 }. c: v9 H9 d; D5 u$ Z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    0 [* t( J- E, U: q$ k/ X- T, P1 D* O     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 S; H4 t9 v- B( G3 {4 f2 N
         "}"}], ",",
    ) V  q; L/ t- a" x+ x7 K   RowBox[{"{", " ?9 G+ H+ R9 V. b5 i
        RowBox[{
    / d4 h  q4 B4 n# ^& t    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) Q5 p, k% V1 C. J: d! h7 H+ J
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' T* q0 O5 y" B5 @3 R     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, {* x! j+ i0 B: b+ W$ P. g
         "}"}], ",",
    * g2 y0 U8 l/ u+ Y( G  p( p   RowBox[{"{",
    1 r+ _3 E+ Z9 S2 ?    RowBox[{
    6 Y+ y- _( z, S- }1 |/ E    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",  w& S1 p; f+ ]; ^+ f; f
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / ?$ x& e5 s3 z' G/ W
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! M! p& Y& E- y     "}"}], ",",
    & u  K# D* s! z) R' Z1 D( l9 `   RowBox[{"{",
    7 W* O1 k" S7 N: b  N: x" ~    RowBox[{9 u! p5 x  }; P; ?$ `, s' T0 j3 N
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    1 g& o0 I. ?8 x' ]7 {      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! r3 Y/ }' ]& o. F# J' j; @3 m& ^  H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " E2 T4 ]& o- c     "}"}], ",",
    9 q* b. Q5 d3 ?1 R0 L# c/ d   RowBox[{"{",
    % x) e1 n( G  b" K+ U6 \    RowBox[{
    : g+ n+ t, {, S, g2 I# r9 g% n    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& x- ]( m0 v" h3 Q) g( s% ?$ i
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! v/ L& P6 \* c1 _0 g$ |2 S' B
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],* b% J$ ~9 w( k. K$ c
         "}"}], ",", ! U9 \- A; L5 D) {" K' Z- A8 N' r
       RowBox[{"{",
      o# _2 i: b; n4 E6 d0 I    RowBox[{
    " G* b( g. l! C' j4 y  @3 K5 O    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! ]& o5 @. p: F% e6 M      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( q; J) ]1 n% C* \0 K     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 u8 ?% Q7 J/ s7 r: X1 j  S# @     "}"}], ",", 8 s' C/ K' W% T& j+ I" f2 b
       RowBox[{"{",
    & _, r( u) j4 t3 W+ o    RowBox[{3 Q) d0 K- R2 z; R9 i; G
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& R5 c/ n: `+ p0 l5 H. g; ~
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # m9 U. P5 Y: v# @. |4 v& B     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ; I1 U% u& O  k' y0 w! M2 n: Q8 q     "}"}], ",", $ u% a9 n- S/ Y' \0 W# S
       RowBox[{"{",
    8 S; n6 d! _9 C! S( n    RowBox[{
    ) v; J( T: a! `- N5 K; I) i+ a    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ) C9 {3 J9 K7 j0 U, j- w  i      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    . `, R2 k: S3 z" C! U8 B+ k     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],9 [( o; D% j0 E! h
         "}"}], ",",
    5 l5 n4 n( p! V  o6 L! B1 K# S   RowBox[{"{", 8 G: A( h. Y# D2 [' b7 Y9 J
        RowBox[{
    / B" ]4 J" z8 A& s$ Q) X: P9 f    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' s6 F6 C. J0 [4 P% X8 H9 [      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # J7 t! Z6 M: T
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ g6 n( m2 |9 f" v9 q) U/ m
         "}"}], ",", 4 z3 D( f) R4 l; e3 R" _
       RowBox[{"{",
    6 @  G( K' m9 l5 T* m1 [9 l0 c$ X  s    RowBox[{9 L/ V% @7 `6 d
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," ]$ k2 `) w* j4 j' Z8 r
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( o9 k/ I4 f; a& Z3 h) q( G% F" b     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 W: M& A2 h: B* M) T     "}"}], ",", + H. |/ |$ E9 @0 r: C- L" e
       RowBox[{"{", 9 h8 C- |. d( \* L3 F: `, E
        RowBox[{6 \; A- i% Q3 r/ S2 l" |
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 t! @" b% p* B: l1 c$ g      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", & o5 Q% l: C* B8 e
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# [& D. ?+ A2 N# j, q
         "}"}], ",",
      h8 D" v' v9 v( c   RowBox[{"{", ( y- d: n! [: K; M) J
        RowBox[{
    ( g$ L! B! p6 s$ F. M    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - L1 {4 C' s7 u+ z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # A4 Q# b' X; z; d9 j; c$ h     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    - a" a# m  z. M' V     "}"}], ",",
    # |9 w& I/ Z- W  z& I) G" R   RowBox[{"{",
    & N" `7 S# o, x1 j' b    RowBox[{/ a+ K/ e, |. U" k
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 g" t; u  ?( }/ T
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", & _% c5 K6 m* ~$ F8 X" R
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],7 B' W$ h0 O; m4 [% S
         "}"}], ",", ) \! f6 m* v9 L5 b" L0 d
       RowBox[{"{",
    5 K# |7 T; s8 U6 R0 G+ G7 F    RowBox[{4 o- J' [8 O- ^& @
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 L  O7 N8 ~8 J& s, i
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 T5 ~3 t+ p+ p3 u% B4 X% ?     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],& x( \/ k9 o7 A1 D( h
         "}"}], ",",
    - c7 Y  p7 i; [   RowBox[{"{", & ^: j- G' u  \# K4 e4 q
        RowBox[{6 w  b7 F0 d% d8 V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    1 k8 v, K( F4 V* e1 i      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! q# U$ C7 H4 v$ g/ s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) z7 O; R5 C. |+ m' D8 @     "}"}], ",", 7 \6 `2 A9 I% Z8 E6 q+ _
       RowBox[{"{", / _1 r5 \+ l6 W) _" `
        RowBox[{! \' O& I6 w/ a
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & f4 b. t' ]) @7 O( t# g      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 g% W1 s9 S' a; a: U     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. B# {7 Y& v# v" m. `" A, B
         "}"}], ",",
    6 ?, `% n! k9 q( T, J& C+ i   RowBox[{"{",
    ! ^" C* }4 H' d* k3 l& x    RowBox[{+ }+ [; K- @3 M0 j
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 B0 p6 s* t( t      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 4 T3 u! z: a% @. l3 c9 _* x
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / S: N6 _) ?6 v" x! _( O$ U1 O, A     "}"}], ",",
    # k1 Z2 \/ F" R; x# p5 B3 W2 y   RowBox[{"{",
    ' _3 y, a: x: _3 _5 N2 m  @% ]* h    RowBox[{
    3 R* ~; A* P: t* D, l) W- _    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & ]" c, s& q3 V; l. u5 u% y& j* q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / o- E! g4 R0 e& v$ P; k     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    $ W0 y% R+ x1 m. Q( K     "}"}], ",", . i, _7 d  B8 \+ f
       RowBox[{"{",
    4 m( O8 t: P; z    RowBox[{% s; j- W/ q. X, E/ N' Y$ j- M
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",8 W- G* Q" z3 y+ i& B# p7 I+ l
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   e, `" p: z4 W; P, k% |) n% S
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) R$ t/ L+ D- W
         "}"}], ",", 6 w, z1 ]4 Y( n6 Z, n3 {" V; B
       RowBox[{"{", " K1 a& I* K* e# f7 V
        RowBox[{' H: g" h( [' o' {, B& T3 Z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 i/ q0 w: X5 @/ P% ~      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! N; U3 ]) \3 R2 g     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 t" z7 s' a4 r1 T
         "}"}], ",", ' X$ ]- B; h  v0 o" d- f
       RowBox[{"{",
    : F) o2 _- ~" I% y' J6 `3 f! r    RowBox[{
      A, X3 s# V5 P8 g6 F% }    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      f. A! M* j/ Q2 B3 G      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / I! x+ U, z+ P; p, V5 V
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],: G' J/ e( |+ ?
         "}"}], ",", 2 `" \" {8 i' y1 W
       RowBox[{"{", , P: C4 ^6 f. r, V
        RowBox[{+ N% J1 d/ K/ e: e2 Z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",1 D7 K. Q7 T+ b( R: Q/ p- H( ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " M" {* B. e7 ]* Q/ H+ ]6 ~4 A1 k; [; U0 a
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + R& J+ S! S. m% j4 G     "}"}], ",", & \* }  i( f" ^' X1 W; ?! _2 p) M+ n
       RowBox[{"{",
    . b& C3 h/ O" s; @& f2 a7 X0 [9 @8 c    RowBox[{
    " m5 [7 \8 |! U. Y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* F$ u1 x! w+ l) c" ?* z& n  S8 [
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + O" R' _7 K$ M
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " S4 u4 l, F8 X# j: F" A& F. r; P     "}"}], ",", ) n1 X7 K+ T* i2 t0 `7 x* K5 P; E
       RowBox[{"{", 1 z5 t3 O' |- ]) ~3 z% h6 e4 l
        RowBox[{" s; `& w0 l& T# F" V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      O' k: {. \, m" z+ e: i      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( ~5 Z/ ]) r- }6 U' g4 c& E& O     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & K0 I# Q) `# q4 D" i     "}"}], ",", # I( F8 u/ c2 F6 H
       RowBox[{"{",
    6 m* B: u5 N( |  x# R" f4 m6 f    RowBox[{2 R8 m, |6 i1 j* H* ^
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      a% A9 y; d* Y" ?3 T4 L      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 G. f6 z: n; f# w5 ?     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; G6 Z2 s$ c& m, H* A9 P% Z
         "}"}], ",", 4 o! t$ C& q" H0 h1 v0 u& e
       RowBox[{"{",
    9 E# |8 E; F" E+ ?) F    RowBox[{
      |3 V5 j  P6 I' m) V3 S    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    " ~+ ]; i" h# t3 F. `9 z2 f% }      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , W: R) l$ [& _7 l( A     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],  }' |, D0 N% M, Q, p" O
         "}"}], ",", ) j" Y8 ?* m) ]' c5 |1 {
       RowBox[{"{",
    & q) u2 I' C' a" B! d3 ]6 d    RowBox[{
    # K. G& }; C8 V8 B    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . H4 y* U9 }) M9 @) s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 I7 p7 _7 c& Z+ g4 ]     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( P# F& m+ Y, M* L& }2 Y1 C# O     "}"}], ",",
    $ p7 e7 f) A  X8 _2 `2 d   RowBox[{"{", 6 o4 _& I/ T) U' x
        RowBox[{" k/ u/ g6 d8 I& E7 k
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 I8 `* R' q  D% C! N, w& \! S- a      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    4 [4 g- ?; b+ s' h4 b* T& l     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / w" `. z% u. l, q9 @     "}"}], ",",
    1 a5 p- w4 O+ ^& z/ h1 ~- B6 C   RowBox[{"{",
    / Q. ~1 o! s0 c/ ^    RowBox[{
    6 O8 ^. \% P4 {    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / n8 S3 m7 C( ~% R+ D      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + G+ m+ f9 H1 b9 @
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , X0 g# H$ C4 e8 v* F     "}"}], ",", ; f5 E7 H" f* l0 A% y
       RowBox[{"{", * k4 s% U5 p7 H
        RowBox[{
    0 l4 F7 O" R% `8 p6 ^+ v    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    * v% h6 e! K! Q. P0 X5 l; W; e      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 a4 W$ T0 d* z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; H, h7 b9 f! K
         "}"}], ",", 3 m" }, z8 ]0 j9 @
       RowBox[{"{",
    + d8 L" G  M. H- a5 `3 U4 K: d& J    RowBox[{
    ( M: P2 {% |( c/ B3 v7 m% ~- Z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ( E3 x' P6 P! g1 R+ e      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    * C; p$ n0 w# s+ I! a% C- E6 V$ N     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ; R% W" S; z! v1 s3 m     "}"}], ",", 0 e6 `: \. B+ D6 e: t( N: ?
       RowBox[{"{", " g8 A( j5 r" n5 B: h
        RowBox[{- |6 y8 E9 ]9 \3 S- n
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . h, h) @$ @& G9 x9 ?      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! ]2 e$ R1 m3 d$ [0 q  d' t. @     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," y$ d+ X" I. A; {1 o2 L! `$ n
         "}"}], ",", ! V, ~6 K3 J) G, E% s% i
       RowBox[{"{",
    3 P" T; Q& d) S, _4 H' c    RowBox[{& c  u: z5 [. q0 k, G
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + c% n* d9 W# d, V- r4 s$ O      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", : n+ q* @" u- z4 x) s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! K$ E" Z& S  q9 {
         "}"}], ",",
    6 ]; \) J' Y1 z/ ~. {5 k! c   RowBox[{"{", 3 u3 `8 e! A2 [' t* p
        RowBox[{( m* [% {1 [: J# v  C: c
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",% [$ _- P7 J: i: |& o4 x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * \* S" f( ]: H- R- y1 n3 q" p
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) E$ g7 L! o/ A% D( e9 j1 J     "}"}], ",",   Q! B/ x8 o, U: L8 V) C9 @3 r' c% V
       RowBox[{"{",
    : l) N6 B4 f! p- l& A2 U7 j7 g    RowBox[{
    / _! Y" s1 W& A' ^    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 j" M1 V4 H+ i6 A* Z( X0 g
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # y" ?5 g3 t' B! f  \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( V7 M/ v6 N5 c: j! x3 F  `
         "}"}], ",",
    2 K% U5 ?2 [/ |9 P8 P6 k0 ^   RowBox[{"{",
    ! C0 ~4 f3 V, w. A% M    RowBox[{: b9 M9 t5 e. b- H2 O3 y0 S/ D8 p
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / r; V/ D" U1 K* A/ J% V5 z9 x      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) M5 f* a9 A6 C0 r$ L& T0 V     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! H9 f% R' R0 D+ Y8 M/ E" }
         "}"}], ",", 8 X) k; K5 w9 P$ D2 p3 R& B# F
       RowBox[{"{", & @& j- o: B4 I+ u
        RowBox[{
    ( a' D2 B$ B: ]    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",, l& F2 c9 k" ?: m5 P% [; w. f9 @
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 k& m2 f& V! R1 X" k' T     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],* }. o  @& n2 u
         "}"}], ",",
    1 N+ r; v( p9 t# O9 w* P) n   RowBox[{"{", & u3 h7 [: O' X; K( D
        RowBox[{3 I4 r( x9 F6 X, G
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ k- S  J. Y# ]5 v0 H4 p, V# Z
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . o; }" c6 _& L9 V3 H" P! L
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, ]7 G* H1 q$ t
         "}"}], ",", 4 F  O0 E- w# P
       RowBox[{"{", ; Q8 b7 @7 f) w2 j
        RowBox[{
    9 K3 K) p2 W0 t  W    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      ~0 y- A# c: P! [2 e      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 t$ y5 O) p4 w) x  f' `9 {     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],$ }$ i7 l. |3 r# S9 w& M) X  v
         "}"}], ",",
    1 j: }0 h! @, ^. V- m4 R$ ]1 f   RowBox[{"{", : J5 r5 m( L7 l0 c1 Z6 y2 L
        RowBox[{
    / |& T7 [; p& Z) r/ ]. i' n- O    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ d4 e) w) d; g" x) U/ e3 _
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! J# N% I6 y8 ~9 \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 ]6 t  r4 Y" T     "}"}], ",",
    0 H, I0 S& P# {5 u   RowBox[{"{",
    , v7 Q& v' S$ ^! M, d8 I( M    RowBox[{
    + Y: s7 G" }+ w* I    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ r1 K' p1 B. {! M
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! z' U5 l; D3 R1 t9 A5 k/ U
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! m- e% n; F# K     "}"}], ",", 7 s/ X! i6 U: [
       RowBox[{"{", 6 C4 u+ {" o4 M5 O7 n
        RowBox[{4 y3 J( i9 J% d1 x: C- B
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ S9 P4 `4 @5 \) `" \- n6 S
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # z" y1 [( O  M; J) x     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, d, X- l) f0 u! A
         "}"}], ",", $ k4 \) O% ~6 x+ u3 o- F
       RowBox[{"{",
    : o. S' _* d4 s  F9 O    RowBox[{* m; {% w9 V8 p( G7 v
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- F" {; d  Y  s" i# [
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", % d2 i6 K2 ]) V9 i
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( k  ?; |( R' W% }+ \0 Q
         "}"}], ",", 6 t4 W7 J6 Y- y$ R# f/ j3 W
       RowBox[{"{",
    3 M' i" w7 O' R& Z    RowBox[{
    + v1 W8 V4 y: m+ P4 x% e( {    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 Z$ B! [# p# y) l, m* D% {) l3 K! M
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; {0 E0 R1 G" k     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 ~, q1 w( C3 w8 y% W$ P
         "}"}], ",",
    : B0 R/ p. P$ i   RowBox[{"{", + N! @* T2 e1 d4 v$ V7 g
        RowBox[{
    7 ^1 Q' r/ L8 |) h6 d    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 m& |$ ^- o$ R9 {
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) Y" [& b& M, Q7 i  H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ; m/ H# o4 ^6 N/ o& a     "}"}], ",",
    # p6 z6 s2 j9 E, h- T3 d   RowBox[{"{", 7 U( ]" u+ T) V9 r, D
        RowBox[{  o% }0 K/ d3 v# G( G& K
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % u# e5 Z4 y( l: q: o      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' p) L, F2 U+ m" X! }# b1 b     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],: K( r5 }5 c% s/ j+ O& A) E
         "}"}], ",",
    0 c4 @6 G" S* P5 \   RowBox[{"{",
    3 u+ i# |  X2 H9 d/ f    RowBox[{5 [0 e. k# L7 k$ e
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' D* d0 L  o" f. ?0 H      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    $ j) s! i8 m& \+ W3 C2 q/ b     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],& r: X6 b& T+ C% h! p
         "}"}], ",",
    - `7 f( W* j' w8 u% F1 Q6 o   RowBox[{"{", 9 B+ e3 c3 x! ]
        RowBox[{# D7 m! t7 S( `3 X% \
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& h/ o" X) K* H$ ?: }
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 }; F( P0 x7 }9 Q
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],7 n  b/ T# X! f8 T+ Y+ [
         "}"}], ",",
    1 i- W* e$ I0 T7 \7 w/ z   RowBox[{"{",
    : X; h3 A% H$ @2 `6 r& a* \    RowBox[{
    " b+ l  ^- Z6 }+ u    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",# ~" }! q3 p. Z+ ]& `" C8 D0 }
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 z3 A# R" m3 g: R8 T1 j
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : P9 ~( V8 f4 @" i8 K$ w0 @6 k     "}"}]}], "}"}]], "Output",
    , D; [) J  V1 u- f CellChangeTimes->{
    5 h, B9 p, m3 T4 M* M* ?" I  3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9},
    7 E0 O& O! b: g: @7 o) N" c   3.577957579987569*^9, 3.577958891536294*^9, {3.5779619459910836`*^9, 4 f5 F( ?: h- \' M
       3.5779619748823338`*^9}, 3.578012345453125*^9}]
    $ c4 h: O1 x6 s/ v+ ~& Y9 ^}, Open  ]],; m7 B7 l) |: f8 D7 l
    7 b, r; u. U/ B: W6 b
    Cell[BoxData[
    ) V2 {8 U* f5 w; @2 @1 v6 G9 @ RowBox[{"For", "[",
    $ y; {' F& T# Y* V! ?2 Q$ i5 y  RowBox[{! l) E5 r4 ?9 M: U
       RowBox[{"i", "=", "1"}], ",",
    # D- [" O; j' D' e: o   RowBox[{"i", "\[LessEqual]", "60"}], ",", 7 p1 ~, P& R9 t( z
       RowBox[{"i", "++"}], ",", ' W; t$ ]2 ~$ c' B  b0 O
       RowBox[{"{", "\[IndentingNewLine]", $ Y9 [+ o( ~9 r% T# v7 d% |. s0 D
        RowBox[{9 n. F1 U" D$ d
         RowBox[{
    0 l/ t3 H, _/ E" A* q      RowBox[{"m60n21", "[", ( _; t, z3 }6 X0 |3 t' p0 q7 O
           RowBox[{"[",
    ' b* c- b- X6 n! v/ u% F( @  F        RowBox[{"i", ",", "1"}], "]"}], "]"}], "=",
    / s3 @" U9 U- x! x0 o+ ^      RowBox[{"u1", "/.",
    3 n2 J; Z3 k) `8 t4 F9 o       RowBox[{"{", 6 s# P( L2 F4 R* f
            RowBox[{3 E4 W$ i7 j" }
             RowBox[{"x1", "->",
    : }6 W" G8 x& e; Y4 D( R          RowBox[{"Data", "[", & M2 F8 G" C6 g8 A' Z' g
               RowBox[{"[",
    ! P2 {+ L5 l8 b! d& L) [9 X) c            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ; G) a1 B; T3 p4 g/ A: X) N- E
             RowBox[{"x2", "->",
    ( V$ W' d! s' s* I          RowBox[{"Data", "[",
    4 I' ]; u$ n; p& X           RowBox[{"[",   T) I- j( U3 E4 P5 k
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    ( P$ C8 a5 |' ]" w         RowBox[{"x3", "->",
    ' n5 v% {* ~" e! b/ _* d# ~& `          RowBox[{"Data", "[",
    ! Q4 L. s: s% L  q; l& e" X           RowBox[{"[", $ R/ W$ G& G$ w# h  z
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    4 U" W0 x3 b: v$ w& G+ a  W         RowBox[{"x4", "->",
    3 [/ G' x3 T# h& j- F          RowBox[{"Data", "[", : r. [. g0 a+ ]8 l! U. S: U9 Y4 H
               RowBox[{"[",
    $ S+ A8 t7 u$ H' ^9 D5 [            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", * B1 J! H( H5 ~( v" g
             RowBox[{"x5", "->", % h  R2 k6 g5 H( ]# E+ y4 M6 k# I
              RowBox[{"Data", "[",
    ; h1 @. E- G$ \+ n+ \7 V/ m4 b           RowBox[{"[",
    ! {% z- G& t* h. y, j/ M            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    ; @( X& d' E" A' ?         RowBox[{"x6", "->", 6 w  u6 T4 W" C1 U. q" y
              RowBox[{"Data", "[",
    " D8 f7 @3 z) n; L9 |           RowBox[{"[", " E7 e* M1 {% O7 j" f' X8 J6 b* Z
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    9 u2 j; d0 I# D: }         RowBox[{"x7", "->", * z' m2 L: b7 A( e+ D9 H# j+ F9 I
              RowBox[{"Data", "[",
      q* Q" g6 Z8 e           RowBox[{"[",
    . j9 P" K! Q% i. \2 ^7 X            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    8 i6 X6 o' t  _) N5 ?% b         RowBox[{"x8", "->",   k  z) g, c' Z, Y7 m- Z
              RowBox[{"Data", "[", % f; n! {7 f3 k. S+ S9 B6 `, n1 x0 ?
               RowBox[{"[", " U$ a4 N$ A& u% {
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    $ w  ^/ ^. r  K/ _         RowBox[{"x9", "->", 5 a( h: `3 ^* l3 z: M' Q4 m
              RowBox[{"Data", "[",   C$ v: K/ k0 v% r6 c( r* v
               RowBox[{"[",
    9 i4 M% V  Y# W/ W# L' J            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", " X* r: e# Z: e
         "\[IndentingNewLine]",
    0 E2 F) r2 a# Y8 i2 a. ?     RowBox[{
    ! ?+ A0 D: F) X1 X! {4 u      RowBox[{"m60n21", "[",
    回复

    使用道具 举报

    琳123        

    1

    主题

    10

    听众

    296

    积分

    升级  98%

  • TA的每日心情
    开心
    2014-11-9 17:59

    • 签到天数: 75 天

    [LV.6]常住居民II

    自我介绍
    无

    群组: 英语科技论文写作实训

    群组: 数学建模培训课堂1

    群组: 第四届数学中国美赛实

    群组: 第一期sas基础实训课堂

    群组: 物联网工程师培训
    7#
    发表于 2013-8-24 13:13 |只看该作者 |招呼Ta 关注Ta
    涳夢 发表于 2013-7-30 20:31
    0 O1 t) s! d; M- t5 Y神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗
    ! \- p; ?& [* L/ z- _: }; L/ g  r
    (* Content-type: application/mathematica *), O+ J- I! \" n- r% D" _
    9 C8 `2 E; d! E1 v6 W' f
    (*** Wolfram Notebook File ***)
    & b1 J- b5 d1 m& ~. e) m8 i/ ^(* http://www.wolfram.com/nb *)3 B, o5 N- t. S  }$ V) E

    2 q* Z! v/ O$ u8 `: J" h& s(* CreatedBy='Mathematica 7.0' *); K! O' T& E5 e7 Q

    : `) E5 z, x+ ]# f: x(*CacheID: 234*)4 n/ Q: n! I( s2 [- ]1 r2 x
    (* Internal cache information:
    2 u( O. k# l5 s! F9 x% i/ n1 vNotebookFileLineBreakTest+ w3 p8 |3 B* C2 [  s# t
    NotebookFileLineBreakTest
    6 K9 t( T+ a& Z8 LNotebookDataPosition[       145,          7]0 b5 D, Y0 M6 f4 }" N
    NotebookDataLength[    423629,      11534]1 x% k5 n# v* U: Z9 w" O4 a
    NotebookOptionsPosition[    412607,      11173]: G4 v1 C* D; |5 ^
    NotebookOutlinePosition[    412953,      11188]
    / H: q( P- F$ g4 l: v1 _; tCellTagsIndexPosition[    412910,      11185]
    1 C9 a3 `. H( \0 ?, SWindowFrame->Normal*)1 T, V$ ^( B( ~2 n& `8 w

    - ^' z) g) e( G' ~, j- W0 K(* Beginning of Notebook Content *)
    ' |+ {) ^" r: `+ J  m4 X" YNotebook[{. @6 ~2 k. i& G% s" i8 q/ J, q
    ! k7 x, h8 S9 K0 M& B/ Y
    Cell[CellGroupData[{* Z) I/ F6 r/ |) n; ^1 |
    Cell[BoxData[
    ; H: ~" L2 x7 U& a RowBox[{"Data", "=",
    ! ]% ^8 _8 Q6 F" u/ j  RowBox[{"{", / c2 ?5 d2 \6 d5 e5 @4 ^% }1 _
       RowBox[{: B! F$ V/ y6 e
        RowBox[{"{",
    & n6 M& }! I4 R     RowBox[{
    - K- D. ^4 B) N# x# F8 J1 T     "0.304348", ",", "0.552818", ",", "0.330370", ",", "0.025823", ",", 4 I; |5 o0 v! c0 e9 y0 n0 I! A5 i
          "0.538462", ",", "0.752072", ",", "0.408943", ",", "0.504532", ",", # m# M) ~6 x7 f: j% d' z; L" S
          "0.000000", ",", "0.277091", ",", "0.873239"}], "}"}], ",", " ", * j' k/ s6 B! \. L! {: j: R
        RowBox[{"{",
    , \& O9 a9 b2 H( m% h) _     RowBox[{- y4 D; z! ~: C2 W7 x) q
         "0.565217", ",", "0.346857", ",", "0.393585", ",", "0.118785", ",",
    ' s3 k: W6 z( a" k& L5 t      "0.349650", ",", "0.370761", ",", "0.413008", ",", "0.502518", ",",
    4 ?6 U* @" v) ~8 H, J  _8 h7 k: W      "0.000000", ",", "0.220259", ",", "0.464789"}], "}"}], ",", " ", " b- k* h2 K" B( r
        RowBox[{"{", 2 c" F8 S: d/ {* Q3 G
         RowBox[{% W) _* t- j" |( t. k8 I% l- J
         "0.608696", ",", "0.339186", ",", "0.494300", ",", "0.099338", ",",
    ' `4 H- t1 Z8 t% ~5 z' _      "0.321678", ",", "0.375283", ",", "0.000000", ",", "0.505539", ",",   M& ]7 C. ?5 D
          "0.000000", ",", "0.899882", ",", "0.492958"}], "}"}], ",", " ",
    : Q; f0 W3 r" N    RowBox[{"{", . P. B+ V  p; q
         RowBox[{( a0 q- D4 q/ i! ^8 k, `8 O
         "0.521739", ",", "0.334022", ",", "0.355500", ",", "0.025156", ",", " n2 R8 P' |. ~
          "0.489510", ",", "0.376790", ",", "0.411382", ",", "0.000000", ",",
    5 @& S; J4 g9 h, v1 ]5 _8 t      "0.000000", ",", "0.265607", ",", "0.774648"}], "}"}], ",", " ", $ Q/ S- I( X' g0 w  |. {
        RowBox[{"{",
    % _1 x0 \( A' ^7 G' j& |     RowBox[{5 B6 y( ^6 o) `7 t6 r! F% w
         "0.565217", ",", "0.346931", ",", "0.218229", ",", "0.043639", ",",
    2 t( ]/ C) f1 D0 `      "0.503497", ",", "0.761115", ",", "0.415447", ",", "0.503525", ",",
    3 T8 [# @! L2 r* {* K- T      "0.000000", ",", "0.642226", ",", "0.380282"}], "}"}], ",", " ",
    3 Y$ P" b7 v8 r) {    RowBox[{"{", . ?" G' B& O" ^; u; b6 _$ g5 K
         RowBox[{' C% y( t9 a) w# i# ?6 a% @7 _
         "0.478261", ",", "0.293154", ",", "0.259368", ",", "0.026688", ",", 6 ~. y- O, m8 N7 a! r3 n
          "0.587413", ",", "0.755840", ",", "0.409756", ",", "0.498489", ",",
    ( q% n  ?% z+ m- t- V      "0.000000", ",", "0.306243", ",", "0.647887"}], "}"}], ",", " ",
    " Q! K+ u9 f2 u0 @4 ~    RowBox[{"{", ) \: j& t' S. C2 k6 C, l
         RowBox[{
    3 O- k5 F: T2 s4 _# C7 u% @     "0.347826", ",", "0.359693", ",", "0.614393", ",", "0.081521", ",",
    % P1 o& N7 P7 d; i$ `+ f4 @      "0.258741", ",", "0.367747", ",", "0.410569", ",", "0.499496", ",",
    ) P% `8 l( W( r& p" m  N      "0.000000", ",", "0.186985", ",", "0.563380"}], "}"}], ",", " ",
    * c8 }' q4 b7 F    RowBox[{"{", 3 T3 s4 x5 R+ f7 d
         RowBox[{' a# V; }7 `3 J% h3 f0 X3 w
         "0.565217", ",", "0.705518", ",", "0.510223", ",", "0.066892", ",",   W% C& S. m6 t# [# p1 j7 u- ?3 E
          "0.244755", ",", "0.748304", ",", "0.000000", ",", "0.000000", ",", 1 }* N2 {: m' r5 h/ \- g
          "0.243032", ",", "0.175501", ",", "0.295775"}], "}"}], ",", " ", . ]7 g4 L" C' G( e0 Y  L
        RowBox[{"{", ! \# R8 U; `' V/ X2 h* o
         RowBox[{
    % ~. B( v! _/ u" h$ L3 ~$ S& h     "0.565217", ",", "0.710460", ",", "0.649730", ",", "0.119897", ",",
    0 @9 w- q3 `% l      "0.468531", ",", "0.000000", ",", "0.636585", ",", "0.000000", ",",
    2 g' q4 L0 A. K8 _. o# J! }$ T! Z      "0.766748", ",", "0.147821", ",", "0.338028"}], "}"}], ",", " ",
    3 N: a, Y" N( [. H8 K( |' L3 \, `. O    RowBox[{"{",
    5 q8 {+ Q8 f' I/ @0 i& n4 P     RowBox[{7 g8 w: o+ w  O' i: V/ [9 A
         "0.565217", ",", "0.697772", ",", "0.171587", ",", "0.028566", ",", " m" K" u9 C+ n
          "0.363636", ",", "0.449887", ",", "0.408130", ",", "0.000000", ",", , t& `5 o% J* i" r( f6 p& s0 L
          "0.000000", ",", "0.352768", ",", "0.211268"}], "}"}], ",", " ", ' I. C# V" D( D# j% z- q
        RowBox[{"{",
    2 B1 S9 {5 y# ?1 j) y7 p0 p     RowBox[{
    6 t- N& A- F& S* Q     "0.282609", ",", "0.660888", ",", "0.460064", ",", "0.110334", ",", . y1 R; B1 f+ A) t6 h2 k
          "0.475524", ",", "0.000000", ",", "0.545528", ",", "0.000000", ",",
    + C" E& ^. e$ {/ C      "0.551100", ",", "0.238810", ",", "0.690141"}], "}"}], ",", " ", ; M- S8 [9 m5 [3 @! G' `3 H
        RowBox[{"{", , {$ H- S2 b: B- A
         RowBox[{
    $ X9 L9 A+ Y5 S8 Z) J. J" k( e     "0.130435", ",", "0.682724", ",", "0.258697", ",", "0.019299", ",",
    $ F& K3 |! Y3 |0 ^5 [) J      "0.510490", ",", "0.420497", ",", "0.535772", ",", "0.000000", ",",
    4 M& Y- A- s& X0 j) S      "0.494866", ",", "0.095701", ",", "0.436620"}], "}"}], ",", " ",
    9 D- ]; H9 J6 [4 v: Q    RowBox[{"{",   u" A& b* T3 c( t  H5 E7 y
         RowBox[{0 I( ^0 G. m. l$ L
         "0.347826", ",", "0.697772", ",", "0.108288", ",", "0.022413", ",",
      e8 C0 p9 R% a# a( P      "0.356643", ",", "0.247928", ",", "0.908130", ",", "0.000000", ",", - U- Y, h/ t2 b! c& W9 \2 b
          "0.383374", ",", "0.162839", ",", "0.000000"}], "}"}], ",", " ",
    ' j& W1 _" T5 r+ l    RowBox[{"{", 8 |9 z3 \! ~* f
         RowBox[{
    ( y, _/ [) Q$ [9 J* B6 s1 D     "0.695652", ",", "0.718280", ",", "0.339730", ",", "0.110285", ",", : W3 `6 ~' b1 b5 T9 }6 `: X
          "0.335664", ",", "0.000000", ",", "0.636585", ",", "0.780463", ",", 7 ]% R0 a6 b  Z7 v: @9 P" X
          "0.000000", ",", "0.335395", ",", "0.267606"}], "}"}], ",", " ", # @+ F& M: {9 W7 M# p. b
        RowBox[{"{",
    & x" ]3 X8 W" _& p: H+ K     RowBox[{
    # y' k! f% Z) b. |  H0 w# i     "0.652174", ",", "0.569711", ",", "0.414297", ",", "0.175398", ",",
    5 k+ T% e; A9 ~3 q: }% L% k0 e3 x; c      "0.167832", ",", "0.000000", ",", "0.544715", ",", "0.000000", ",",
      H7 E4 G  e: N      "0.000000", ",", "0.160483", ",", "0.211268"}], "}"}], ",", " ", 7 @+ z8 e5 Q6 b  U  o1 M( Q
        RowBox[{"{", 7 ^& N4 F" N; ^2 d! R; o7 `
         RowBox[{& K3 k: c# A/ L; J- z" J* L
         "0.000000", ",", "0.395544", ",", "0.027011", ",", "0.048087", ",",
    , M2 X# T. u' f" Z% l6 K      "0.496503", ",", "0.000000", ",", "0.452033", ",", "0.000000", ",", 2 h5 \+ A+ a& u9 d4 d) C4 I  E
          "0.278729", ",", "0.398115", ",", "0.408451"}], "}"}], ",", " ", ; d7 b$ d5 H4 c0 \7 Z' [1 K
        RowBox[{"{", ! ?3 s' F/ T% w5 }
         RowBox[{1 {) n' U$ t6 B0 G% h) C& T
         "0.608696", ",", "0.425199", ",", "0.012979", ",", "0.000000", ",",
    . f1 f6 d: X% P9 o! {      "0.482517", ",", "0.509420", ",", "0.406504", ",", "0.000000", ",", # T% E$ K) }. L5 X# L# z3 q
          "0.000000", ",", "0.157833", ",", "0.478873"}], "}"}], ",", " ", 9 ~) j5 e2 {2 B; j
        RowBox[{"{",
    1 m2 Y% I/ w0 K* G6 o     RowBox[{
    & [9 i+ `# ^1 N* G# w; A' L! B     "0.608696", ",", "0.577973", ",", "0.213587", ",", "0.030889", ",",
    & o+ Y0 i5 z0 b0 O: F0 U      "0.370629", ",", "0.000000", ",", "0.452846", ",", "0.000000", ",", 5 \6 E) L! Q2 |* \
          "0.000000", ",", "0.315665", ",", "0.380282"}], "}"}], ",", " ",
    ! e6 ^* O9 n2 ~/ G6 L    RowBox[{"{",
    1 g/ s( m* I8 R% l3 k, m$ K3 Z/ a     RowBox[{5 t* s9 S. f6 {+ A! r7 |
         "0.565217", ",", "0.572293", ",", "0.655012", ",", "0.281852", ",",
    7 R1 V4 Q) K& q% E/ J  S$ A" I4 d      "0.000000", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    , }6 d. N* W$ S+ D% g$ Y      "0.000000", ",", "0.492344", ",", "0.211268"}], "}"}], ",", " ", " A, D* J7 m* ~+ S
        RowBox[{"{",
    4 |& f3 L, _5 ?+ [$ t9 [     RowBox[{
    : S6 g! w- d( W     "0.130435", ",", "0.562039", ",", "0.331662", ",", "0.032643", ",", 2 d$ v- @0 b3 w. g
          "0.314685", ",", "0.414469", ",", "0.275610", ",", "0.000000", ",", . Q2 f" N7 j/ P  g" f* e
          "0.000000", ",", "0.638398", ",", "0.436620"}], "}"}], ",", " ", . u1 l7 T* F- M
        RowBox[{"{", % W6 u& B( ^: o, Q+ j0 i9 L" l
         RowBox[{) j% w. ?' y  x8 V9 W/ a
         "0.717391", ",", "0.736205", ",", "0.267704", ",", "0.036152", ",",
    . h" p4 |5 p; E/ ~/ P      "0.307692", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    ; `& ~" v1 O1 ]      "0.000000", ",", "0.392521", ",", "0.478873"}], "}"}], ",", " ", # B$ V1 ^8 T  f
        RowBox[{"{", : T6 J! Q8 M( A" g% K  J. \2 q
         RowBox[{" M/ M5 i) O4 Q
         "0.608696", ",", "0.769475", ",", "0.289283", ",", "0.022882", ",",
    * E; |( |. c" S( l( B3 U7 `      "0.321678", ",", "0.000000", ",", "0.274797", ",", "0.333333", ",",
    * Y! g7 y1 A! P% h/ @. s; \      "0.000000", ",", "0.362191", ",", "0.295775"}], "}"}], ",", " ", 1 H6 y; N8 w/ z( j
        RowBox[{"{",
    0 ^/ ^2 ^! i% A6 l4 p* l0 r: ?# n/ M" j     RowBox[{2 S! c" N* `" _4 y/ |/ i- U; K4 i
         "0.913043", ",", "0.170478", ",", "0.000000", ",", "0.012973", ",",
    * [4 z4 J* n# i5 z) N      "0.293706", ",", "0.000000", ",", "0.000000", ",", "0.672709", ",", 7 p1 M9 }: ?2 T  q+ F
          "0.000000", ",", "0.114252", ",", "0.028169"}], "}"}], ",", " ", ( ~; ?8 d% ?" k) c# L
        RowBox[{"{", " w. b- n6 S5 F" N( Z
         RowBox[{; I2 i, F6 \# f0 C; j* S
         "0.739130", ",", "0.193199", ",", "0.160584", ",", "0.037907", ",", 9 g6 [- B# p7 r  V; ~  q
          "0.461538", ",", "0.000000", ",", "0.684553", ",", "0.000000", ",", ) O: f1 z. b6 t! H2 t; S7 ]5 J
          "0.000000", ",", "0.401355", ",", "0.436620"}], "}"}], ",", " ",
    % j5 ~" ^( d" Q, G% U+ O    RowBox[{"{",
    ; E6 ~/ L- i/ s     RowBox[{& U2 d( v' z$ Q" _3 U3 l
         "0.826087", ",", "0.203969", ",", "0.234619", ",", "0.272240", ",",
    8 V7 g' r: ~. E) n0 n6 j      "0.265734", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 2 [6 W" @4 M3 ~! z; X
          "0.000000", ",", "0.827444", ",", "0.394366"}], "}"}], ",", " ", 7 Y2 p( ]/ w: x; w0 m" ]: @
        RowBox[{"{",
    3 `1 e5 y) y% g9 z& t     RowBox[{# Y* k1 k: D8 Q7 y
         "1.000000", ",", "0.199248", ",", "0.295044", ",", "0.041613", ",",
    4 z7 b. w; \$ G0 Y0 Q/ `/ Y- t      "0.209790", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 6 z9 ]1 E  H- M. t6 \( R1 P7 k, m. p
          "0.000000", ",", "0.676973", ",", "0.295775"}], "}"}], ",", " ",
    / \) H: ]. y5 x' n8 Y    RowBox[{"{",
    # f: n3 F/ e% \1 k6 C, z, W9 _     RowBox[{
    $ J) t2 H5 j% Y5 D/ w! j4 ]2 M     "0.869565", ",", "0.180363", ",", "0.243056", ",", "0.098349", ",",
    # n7 C; ~) J& S% U3 Z      "0.265734", ",", "0.503391", ",", "0.000000", ",", "0.000000", ",",
    5 i; i7 C' F8 q, e+ F8 v      "0.000000", ",", "0.331272", ",", "0.830986"}], "}"}], ",", " ", 5 G/ i0 A' l, |: a) O  @
        RowBox[{"{", - i  Q% s( ~  l  g, j
         RowBox[{
    ) s" D/ ^# [, ^4 G5 B" A     "0.695652", ",", "0.551785", ",", "0.326201", ",", "0.253608", ",",
    * w, ^3 Q) E  l% r* L; M) U) G      "0.195804", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    7 U7 B5 r6 R6 E  V0 [0 T      "0.000000", ",", "0.845701", ",", "0.169014"}], "}"}], ",", " ",
    2 f* b, I8 F! {4 [' a- n    RowBox[{"{", . T5 b) o0 k( U" z7 S, m' v0 ?/ ?
         RowBox[{
    % k3 O. ~" o7 R5 ]* g: a     "0.652174", ",", "0.572293", ",", "0.111511", ",", "0.035584", ",", 0 P1 G; A: K6 u7 `" C' z3 @3 u+ y
          "0.405594", ",", "0.249435", ",", "0.544715", ",", "0.000000", ",",
    $ n! p& X+ B- Y4 i% M      "0.000000", ",", "0.287102", ",", "0.366197"}], "}"}], ",", " ",
    % \) ]2 x+ B- l7 K) y9 f- h0 A- u    RowBox[{"{", ! R) y+ Y: b9 u2 S5 Q5 w/ @% g
         RowBox[{7 N9 Q: C& q/ f: U5 ?7 q
         "0.652174", ",", "0.562039", ",", "0.336155", ",", "0.014604", ",",
    : Z7 o  T) F2 ^- C( f+ f/ v      "0.174825", ",", "0.244160", ",", "0.000000", ",", "0.000000", ",",
    * V+ t- @% h& c  V      "0.000000", ",", "0.000000", ",", "0.309859"}], "}"}], ",", " ",
    . {8 X$ q4 V4 U; M$ W+ r+ T+ V, n    RowBox[{"{",
    0 I$ j4 @5 z9 M( P0 {; ~, T' p     RowBox[{) Y9 }7 m! f. T/ u# ^
         "0.565217", ",", "0.577383", ",", "0.155870", ",", "0.030963", ",", 7 _4 R* q* E& ]7 ?
          "0.258741", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 7 L* Z5 V- b' o5 {
          "0.000000", ",", "0.050059", ",", "0.352113"}], "}"}], ",", " ",
    6 G: }4 _0 Z! V1 @% `4 @; ?    RowBox[{"{",
      R+ D& {8 c" i     RowBox[{
    ; p% p3 R7 ?# a& Q7 Y2 _     "0.565217", ",", "0.613234", ",", "0.232956", ",", "0.053870", ",",
    0 k5 ~* B/ N' T9 @! `( u0 k      "0.230769", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    * K' ]% x$ ]' M& L# V, d' Y      "0.000000", ",", "0.254122", ",", "0.309859"}], "}"}], ",", " ", , ?3 k- A+ g0 U0 j9 n
        RowBox[{"{",
    & }" c) |* D/ w$ `+ {% c# L     RowBox[{
    2 F$ e4 B- o7 A% z% h     "0.565217", ",", "0.559531", ",", "0.493262", ",", "0.046209", ",",
    , V" n5 X4 r0 R% S- ^6 T      "0.293706", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 9 [. \  v$ ^2 A) T8 E) ^
          "0.000000", ",", "0.086867", ",", "0.774648"}], "}"}], ",", " ", 6 J; _0 b8 n+ s6 T
        RowBox[{"{", : I# w- |: F) k) k
         RowBox[{* ]/ ^! N* E  @# }
         "0.608696", ",", "0.569711", ",", "0.111932", ",", "0.013542", ",", ) _  g$ q1 G6 c  v* Z& E. ^9 m
          "0.335664", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 3 l( ?3 Q: Z! E5 B) N" L6 C
          "0.168704", ",", "0.659894", ",", "0.422535"}], "}"}], ",", " ", * p5 _- Q' {9 j4 {6 h
        RowBox[{"{",
    ( s: u2 _2 F: O: n     RowBox[{: N+ t+ ?. j1 k2 T
         "0.608696", ",", "0.564547", ",", "0.329844", ",", "0.202036", ",", 0 M; w9 Z" s' K7 {
          "0.510490", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", % h7 u7 n! a3 B7 Z- X; J
          "0.000000", ",", "0.317138", ",", "0.887324"}], "}"}], ",", " ",
    2 K5 R2 m4 @: o" }# d    RowBox[{"{",
    & ~7 J1 [- N" W; t9 ^: S, Y: `     RowBox[{
    " f( l  r' o  \  d0 J* S! ]" V     "0.521739", ",", "0.546695", ",", "0.165788", ",", "0.029431", ",", 4 T+ X" `/ r) g* x2 r7 _
          "0.510490", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", " s6 }+ W0 t6 h: h
          "0.000000", ",", "0.605124", ",", "0.887324"}], "}"}], ",", " ",
    - K( k; \+ u( ?: [! V    RowBox[{"{", 1 h( _4 m, D5 N  S! K' Q
         RowBox[{
    6 u5 b) d# o# J0 y7 t8 Q8 \     "0.521739", ",", "0.564178", ",", "0.400518", ",", "0.045023", ",",
    $ ^5 ]% c; u9 W0 Y8 u      "0.615385", ",", "0.368500", ",", "0.660163", ",", "0.301108", ",", / w; S2 g. y, P( O/ r
          "0.000000", ",", "0.321260", ",", "0.859155"}], "}"}], ",", " ",
    7 R0 f5 T0 q7 V    RowBox[{"{", / s" Z: i( x* K+ m/ d
         RowBox[{8 @0 E' U" o# h$ C2 i4 v* ?
         "0.413043", ",", "0.551859", ",", "0.544826", ",", "0.230503", ",",
    . V' U- {& v, e5 r2 r1 t      "0.244755", ",", "0.530520", ",", "0.819512", ",", "0.000000", ",",
    2 q$ b" \/ V4 K# |" R9 b. y      "0.000000", ",", "0.595406", ",", "0.239437"}], "}"}], ",", " ",
    : P; e9 e$ o/ w2 L& L    RowBox[{"{", - c% x1 o& ]; l0 \) T3 P4 b
         RowBox[{
    5 t' }- w3 J$ s     "0.652174", ",", "0.549277", ",", "0.257578", ",", "0.058688", ",",
    9 o( _" Y8 \. ]' c      "0.356643", ",", "0.000000", ",", "0.817886", ",", "0.000000", ",",
    / u0 K- D9 S/ U1 Y; @5 L      "0.000000", ",", "0.555359", ",", "0.295775"}], "}"}], ",", " ",
    % Z) K' z: ~8 a2 Y1 J0 z; L    RowBox[{"{", * W3 Q- J# @0 U" p2 ^- {) f
         RowBox[{
    6 w2 l7 [: C' o- B- n     "0.695652", ",", "0.549277", ",", "0.572308", ",", "0.082411", ",",
    , J% c) r1 U/ q) R      "0.461538", ",", "0.528259", ",", "0.819512", ",", "0.000000", ",", 9 C: g* V- f& ~  a: z% S
          "0.000000", ",", "0.333333", ",", "0.746479"}], "}"}], ",", " ", 3 G0 E0 T2 k" J4 n7 ?
        RowBox[{"{",
    ( g& t8 l$ a+ T9 G* v     RowBox[{
    # U7 J) t3 s+ O/ y8 E     "0.434783", ",", "0.551785", ",", "0.530346", ",", "0.151651", ",",
    3 |, s9 O) U- M5 T2 O. }8 P' ]& E      "0.790210", ",", "0.529013", ",", "0.409756", ",", "0.000000", ",", & P% E7 T, b# B8 r1 r" U
          "1.000000", ",", "0.149588", ",", "1.000000"}], "}"}], ",", " ", * j  W- Q% r: \; a9 o8 a
        RowBox[{"{", + m* _% Q) O( v) G
         RowBox[{
      n) Q: X& W$ l. r     "0.282609", ",", "0.531278", ",", "0.321428", ",", "0.228625", ",", & a' l% @1 z+ j) _* G
          "0.594406", ",", "0.530520", ",", "0.410569", ",", "0.000000", ",", ' A$ z  T' l- y5 q% E* a6 u
          "0.757457", ",", "0.493522", ",", "0.549296"}], "}"}], ",", " ",
    " s/ \( G4 L. z+ s- C7 v    RowBox[{"{",
    $ ^$ q# d+ J! j: U7 Z" h     RowBox[{
    ; c$ `; a0 }) }  ?- P7 L     "0.347826", ",", "0.705444", ",", "0.109343", ",", "0.072008", ",", 3 B9 t4 T7 ^2 \3 ]+ L" `7 r8 E
          "0.496503", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    ! M) [$ y- X7 u' J      "0.752567", ",", "0.224676", ",", "0.366197"}], "}"}], ",", " ", , ^3 l. V& X3 Y, F
        RowBox[{"{",
    : K% J7 N* P0 Y8 M     RowBox[{
    ! k2 s' O$ q! S4 w& J# p     "0.391304", ",", "0.705444", ",", "0.045908", ",", "0.073120", ",", . i3 \* Y7 t  o& S
          "0.622378", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",   @! x; s' F6 s$ o5 z/ k
          "0.496333", ",", "0.410188", ",", "0.549296"}], "}"}], ",", " ", : G4 L( w) d: c0 ^/ ^
        RowBox[{"{",   r8 a/ b4 @& U4 Z, W1 J
         RowBox[{; d" V- D- W' G, k7 R! m
         "0.282609", ",", "0.661921", ",", "0.344992", ",", "0.085178", ",", * t! l% H) x/ k2 C5 X. k- `
          "0.293706", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", * c# q9 k0 P7 T) j" }; J4 B- C
          "0.000000", ",", "0.668139", ",", "0.577465"}], "}"}], ",", " ",
    4 S- \5 N9 l2 s( K2 B; v    RowBox[{"{", 9 T) T0 x5 W& }* b
         RowBox[{
    * O; b) N6 z& F     "0.478261", ",", "0.661921", ",", "0.644209", ",", "0.077296", ",",
    1 [: z3 L, Y& |9 _      "0.412587", ",", "0.000000", ",", "0.413008", ",", "0.502518", ",",
      U; p* H) `4 C5 a- H      "0.000000", ",", "0.102179", ",", "0.690141"}], "}"}], ",", " ",
      K. G. a$ X  [# _  v3 i1 Z    RowBox[{"{",
    , ~+ o+ X% |0 V2 J& p% H     RowBox[{7 Y9 Q/ v: I8 B  @
         "0.173913", ",", "0.984656", ",", "0.420753", ",", "0.137022", ",", * D0 t, U, E7 q6 G2 s9 D( _) X3 Q
          "0.321678", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", / j' R: a  T: r# ]( ~- j+ [4 r
          "0.000000", ",", "0.380742", ",", "0.718310"}], "}"}], ",", " ",
    ) l7 G! ~: n8 K- g+ A    RowBox[{"{", 0 t" R8 k% ~* ^. G8 |4 J
         RowBox[{4 p& i2 q( G$ P" Y- R6 w$ d
         "0.500000", ",", "0.984656", ",", "0.288432", ",", "0.047692", ",", ( W+ r1 n0 @1 l* o& @0 E( @# n
          "0.279720", ",", "0.000000", ",", "0.821138", ",", "0.510574", ",", 8 U& B3 P  u1 C( W7 \! P: o
          "0.000000", ",", "0.319494", ",", "0.521127"}], "}"}], ",", " ",
    , m) [4 S' I/ S5 E  V    RowBox[{"{",
    / k! ]9 m9 Z0 p" Z, ^* v     RowBox[{7 S0 w/ \, x' T) G; {/ x* b
         "0.391304", ",", "1.000000", ",", "0.452931", ",", "0.150909", ",", ) V$ Q" b# w5 A+ v2 f
          "0.342657", ",", "0.370761", ",", "0.000000", ",", "0.509567", ",", & P. W9 G  S, E+ X, e) I
          "0.000000", ",", "0.031508", ",", "0.929577"}], "}"}], ",", " ",
    8 @& \0 J$ L% R% H0 @" |7 ?    RowBox[{"{", 7 h) y( O4 i8 i# @# p
         RowBox[{' g. u5 Z+ L5 i8 C# K! u! \) w
         "0.739130", ",", "0.774639", ",", "0.175120", ",", "0.036498", ",", 9 m; \5 K* K2 y, ~. X' c" [
          "0.391608", ",", "0.739261", ",", "0.408943", ",", "0.553877", ",",
    2 K" S6 Q" @8 O# J! E2 j      "0.000000", ",", "0.292108", ",", "0.521127"}], "}"}], ",", " ",
    # `5 O# x/ R4 o& `! C    RowBox[{"{", & {/ t& V, \; w
         RowBox[{3 h1 j) k5 {3 z$ M3 b0 Z" T# Z
         "0.586957", ",", "0.982074", ",", "0.158462", ",", "0.063902", ",",
    ; F& t0 F) n; J: x/ D1 E      "0.321678", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    ! F% s. U6 m' S1 n& L/ H      "0.000000", ",", "0.329505", ",", "0.338028"}], "}"}], ",", " ", - q$ j) ~6 P4 N" e
        RowBox[{"{",
    : i% ]3 t  Z; u7 y& ?  v6 a     RowBox[{
    1 n. z0 p  b' D4 d     "0.543478", ",", "0.982074", ",", "0.306872", ",", "0.041934", ",",
    * a% E! E% I5 ?, p5 P( K      "0.426573", ",", "0.380558", ",", "0.414634", ",", "0.506546", ",", , ^6 N/ V! K0 ]. H# r
          "0.000000", ",", "0.337456", ",", "0.380282"}], "}"}], ",", " ", 9 E* G$ D# Z  ^2 {# b
        RowBox[{"{",
    % T6 U9 ^6 \9 n0 o; f* V( u     RowBox[{5 u  A& i/ v! v* z/ G  Y* l
         "0.739130", ",", "0.997418", ",", "0.170143", ",", "0.058268", ",", 7 x- H, W+ s5 y) j6 |
          "0.538462", ",", "0.248681", ",", "0.000000", ",", "0.339376", ",", / ?, n0 C& `# c* n3 B% a4 X! I5 Q
          "0.000000", ",", "0.766784", ",", "0.676056"}], "}"}], ",", " ",
    7 b8 k, ]6 S& s; N/ I1 n3 E    RowBox[{"{",
    7 E' h0 F  K0 a* v0 k- ^4 {     RowBox[{2 f1 j+ z  w7 W% m* K" L) O
         "0.695652", ",", "0.700428", ",", "0.139361", ",", "0.182169", ",", ! C0 k1 h2 Q' e+ ^  J
          "0.412587", ",", "0.243406", ",", "0.000000", ",", "0.000000", ",",
    6 ^9 u0 F/ `& j: C) ]      "0.136919", ",", "0.676678", ",", "0.591549"}], "}"}], ",", " ",
    " N# z- l' V2 }# {7 }8 O    RowBox[{"{",
    " j$ j& \' q! `9 |: F& l6 I     RowBox[{# o& r+ R4 ]9 M( B( V' L0 L
         "0.782609", ",", "0.751623", ",", "0.177646", ",", "0.350845", ",", 4 D9 J. j; Q/ l5 U7 T$ Y& J
          "0.412587", ",", "0.502638", ",", "0.000000", ",", "0.000000", ",", ( y) v2 ]* t) E8 j. A( `1 n* S; \2 A
          "0.178973", ",", "0.541519", ",", "0.464789"}], "}"}], ",", " ",
    : |' p$ Z" J/ X: n    RowBox[{"{", 2 f! {- b2 E. v4 I0 o7 H' |
         RowBox[{% H" C: K$ ~6 Q4 P9 i5 r; `5 O# K9 j) H
         "0.652174", ",", "0.751623", ",", "0.355593", ",", "0.039883", ",",
    ; G" w5 @$ E4 S5 C! w5 c( f      "0.195804", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", & H0 j$ I2 J( r5 T
          "0.000000", ",", "0.064488", ",", "0.295775"}], "}"}], ",", " ",
    / i, u' Q; \" [) c    RowBox[{"{", : ?+ i+ x6 E# j
         RowBox[{& g6 c  o& z3 N5 K
         "0.521739", ",", "0.679847", ",", "0.152375", ",", "0.030048", ",",
    3 |9 f- T1 `( n" X. c; k+ O, Z      "0.363636", ",", "0.000000", ",", "0.271545", ",", "0.000000", ",", / L0 u4 f* e4 Z' g3 d
          "0.000000", ",", "0.463192", ",", "0.380282"}], "}"}], ",", " ", ' Z% i+ C) j% h
        RowBox[{"{", 2 J+ p: T+ [8 S& `3 Q
         RowBox[{
      [1 v4 q; K& e     "0.434783", ",", "0.728533", ",", "0.186830", ",", "0.129510", ",", 2 L# I* s0 s- z& U% ]3 _$ I. e5 k
          "0.195804", ",", "0.000000", ",", "0.269919", ",", "0.000000", ",", / x% X5 A; M) z# A' i+ Q! Y
          "0.326650", ",", "0.388398", ",", "0.211268"}], "}"}], ",", " ", : x+ y, g* h1 F8 e) [
        RowBox[{"{", 1 D3 ?' g6 C" x
         RowBox[{
      q- Y7 k" G- |* U$ m8 P" t" F     "0.608696", ",", "0.606152", ",", "0.158058", ",", "0.090170", ",", " ]9 p* n6 S, N9 f2 i9 G6 F: E  _: r4 X
          "1.000000", ",", "0.166541", ",", "0.278049", ",", "0.000000", ",",
    ! R5 v% b9 N4 u5 s4 ?! a      "0.236675", ",", "0.262367", ",", "0.253521"}], "}"}], ",", " ", 9 s: G% I. x1 N
        RowBox[{"{",
    1 ~+ c  B0 \' F# T     RowBox[{
    : c5 L; ~1 W+ M9 X) j     "0.608696", ",", "0.633742", ",", "0.322697", ",", "0.068597", ",",
    * N9 L' x. q  _5 ?; }5 W- G7 A" p  R) P      "0.328671", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",   P' [: N1 h  {% n" D7 a" W
          "0.287042", ",", "0.290931", ",", "0.281690"}], "}"}], ",", " ",
    9 ~/ O( S) J" p* y" i4 V; b, A    RowBox[{"{", + H. h" o! o2 }) B$ j  I7 F
         RowBox[{
    , ^4 X6 j$ P; C: O     "0.478261", ",", "0.539023", ",", "0.412108", ",", "0.107566", ",",
    4 q1 H, e. ?  J) V# m. p. |' Z, b      "0.237762", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", $ w2 }$ b. |1 D3 v6 x
          "0.000000", ",", "0.380742", ",", "0.507042"}], "}"}], ",", " ",
    , r' J# Z! U: l6 L7 m, g    RowBox[{"{", % n/ B3 A5 O6 R7 H/ X- D
         RowBox[{- v7 t2 S& [8 h
         "0.608696", ",", "0.551859", ",", "0.176821", ",", "0.076332", ",",
    7 @: G/ \/ ^- L/ F* K      "0.265734", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", ! F+ @+ W( s* p! v. J! Q' p
          "0.000000", ",", "0.429034", ",", "0.239437"}], "}"}], ",", " ", 7 P3 h# }, e2 \. W! f% o, E
        RowBox[{"{", . E2 h4 y/ [7 s7 j; Z; [% h
         RowBox[{
    & l& v0 a9 i+ ~! q* j* c0 r     "0.652174", ",", "0.551859", ",", "0.033549", ",", "0.018459", ",",
    ( K+ l  `' |% `      "0.573427", ",", "0.000000", ",", "0.553659", ",", "0.000000", ",", ' ~0 D) q' D6 s0 @. R
          "0.404890", ",", "0.193168", ",", "0.394366"}], "}"}], ",", " ",
    2 d8 R2 u4 }0 \) j    RowBox[{"{", 6 ^! o5 [6 N( C5 W$ R5 p
         RowBox[{% p# ]; R9 s# u- z# l" O
         "0.695652", ",", "0.595382", ",", "0.277493", ",", "0.100326", ",", 2 P% r$ {4 f) }0 V5 t
          "0.286713", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    ( ~& w1 [  n9 V) F      "0.000000", ",", "0.448763", ",", "0.338028"}], "}"}], ",", " ",
    5 E1 e: W9 H" a+ \* z! |! m; A, z, {    RowBox[{"{",
    4 t. X/ N5 h$ h# s     RowBox[{
    . U* n$ H, h: [7 t, L0 R     "0.565217", ",", "0.559531", ",", "0.422669", ",", "0.078111", ",", 1 j+ q% Y6 g* \' E8 @
          "0.286713", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",",
    3 |. m$ v* y5 ~$ E% v; _" h      "0.000000", ",", "0.442285", ",", "0.394366"}], "}"}], ",", " ", 3 u5 u% V; h6 I  O
        RowBox[{"{",
    3 {" I- I/ M/ Z! b! o& E5 F" J     RowBox[{9 f+ @/ A: Q* B& }
         "0.586957", ",", "0.398126", ",", "0.140619", ",", "0.069116", ",", , p  }% _1 {0 h- @) O$ |  N0 ?
          "0.461538", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", ; ~; x( ?0 q/ E5 V7 j
          "0.000000", ",", "0.575383", ",", "0.154930"}], "}"}], ",", " ",
    7 j, `( L5 A) \8 O    RowBox[{"{", ; r* ]+ ?, E/ R( v' o0 Q
         RowBox[{/ S5 m9 }" j2 _" X
         "0.695652", ",", "0.398126", ",", "0.019829", ",", "0.041366", ",",
    6 ]* x- C7 ~+ J* a: S6 |      "0.552448", ",", "0.244160", ",", "0.000000", ",", "0.000000", ",",
    & w1 r, I! o7 x' t( ~& |      "0.000000", ",", "0.515607", ",", "0.591549"}], "}"}], ",", " ",
    $ R; z) |/ {8 i' C    RowBox[{"{", 8 Q$ m6 s$ L9 f4 I
         RowBox[{/ @( C8 M2 ?) P+ S( `0 Q) b
         "0.695652", ",", "0.700354", ",", "0.422467", ",", "0.068128", ",", 8 _& Y& A- Z; b: c7 C) ^
          "0.209790", ",", "0.000000", ",", "0.000000", ",", "0.500504", ",", 7 F" N1 w9 o" ^' h% e4 O
          "0.000000", ",", "0.057715", ",", "0.408451"}], "}"}], ",", " ",
    ; B3 U$ @" P# A9 T& R+ d3 b    RowBox[{"{",
    ; i' u" V2 V* U  H3 }     RowBox[{" j' {, {. U$ Y# U6 t
         "0.521739", ",", "0.193125", ",", "0.210582", ",", "0.110433", ",",
    0 i, {( }- B4 s" `3 V. g      "0.447552", ",", "0.382065", ",", "0.413008", ",", "0.498489", ",", 9 x! G$ y" E( P- c* g* P
          "0.000000", ",", "0.174617", ",", "0.295775"}], "}"}], ",", " ", 1 u/ |3 Q& r9 U9 H" t) W
        RowBox[{"{", - x5 @2 J  @7 X( {$ _0 X9 z# ~
         RowBox[{
    $ }& |1 b: D% l9 E8 w# X  a0 ?/ X     "0.347826", ",", "0.063588", ",", "0.830527", ",", "1.000000", ",",
    6 N' y( o) f# T6 N" Q# g      "0.111888", ",", "0.000000", ",", "0.410569", ",", "0.000000", ",", : \8 G( L  I: `+ y
          "0.000000", ",", "0.667550", ",", "0.661972"}], "}"}], ",", " ",
    & t' `: V0 w- n0 J; e% @- G* `    RowBox[{"{", " J% u# |, F1 u- `3 D
         RowBox[{3 E/ h% r1 {3 _' D) i
         "0.521739", ",", "0.188109", ",", "1.000000", ",", "0.785485", ",", $ T4 [! `+ r) u
          "0.342657", ",", "0.373775", ",", "0.406504", ",", "1.000000", ",", 4 C5 E% a+ j( i  u- S; }' `
          "0.000000", ",", "0.371025", ",", "0.774648"}], "}"}], ",", " ", " N. a. N6 I- F& d
        RowBox[{"{",
    5 r+ N& d) o0 y2 K     RowBox[{+ b9 G$ f4 X  S9 Y
         "0.695652", ",", "0.188404", ",", "0.088836", ",", "0.059504", ",",
    3 K7 }. b) {, r/ _, h; Z" \      "0.706294", ",", "0.376790", ",", "0.000000", ",", "0.000000", ",", 7 F' ~/ R/ E+ w5 Q  M( T' [
          "0.000000", ",", "0.570966", ",", "0.746479"}], "}"}], ",", " ",
    ; {7 c, [  M( `0 q" m    RowBox[{"{", 8 q& B* w. F9 ?! P3 O, W
         RowBox[{
    6 {; n% {0 ~3 _8 B! @     "0.695652", ",", "0.057465", ",", "0.316316", ",", "0.151280", ",", 9 M* F4 r! C7 C8 \# g( [3 L
          "0.615385", ",", "0.371515", ",", "0.412195", ",", "0.500504", ",", % ^% V7 C8 J1 W% S) T" i
          "0.000000", ",", "0.468198", ",", "0.887324"}], "}"}], ",", " ",
      I! J& I) x3 Y" j+ Z# r- s    RowBox[{"{", 6 o: Q) g& @  Z9 ]( C+ y$ t. g
         RowBox[{# B1 K. j8 y7 F0 x
         "0.608696", ",", "0.011360", ",", "0.295586", ",", "0.113892", ",", 7 t9 B( C* Z, C2 f6 O1 }/ w
          "0.580420", ",", "0.746044", ",", "0.405691", ",", "0.501511", ",", / g8 h/ A4 U# V0 g* ?+ V) k
          "0.000000", ",", "0.414016", ",", "0.845070"}], "}"}], ",", " ",
    1 @& }" A8 J: M8 }    RowBox[{"{",
    " H# j4 [! C* ^5 y     RowBox[{
    $ g5 ~# a9 C% h0 K     "0.608696", ",", "0.364783", ",", "0.130582", ",", "0.020214", ",", $ _  m; e5 ~& ?7 ^3 _; R3 }. Q) g
          "0.356643", ",", "0.379804", ",", "0.000000", ",", "0.000000", ",", 5 }5 K  z6 B4 k+ t" g2 u( I
          "0.000000", ",", "0.186690", ",", "0.704225"}], "}"}], ",", " ", 0 c6 X+ @  Q# @9 {
        RowBox[{"{",
    5 R% V9 B9 x* X! y0 a  [     RowBox[{! w1 l2 u' h2 |5 l
         "0.608696", ",", "0.193199", ",", "0.112690", ",", "0.036152", ",", 5 V+ X  O' C! [* X( N) j3 l
          "0.636364", ",", "0.382065", ",", "0.409756", ",", "0.495468", ",",
    + Z/ J" w9 ^9 A      "0.000000", ",", "0.442874", ",", "0.760563"}], "}"}], ",", " ", 1 t6 w- Y, [* v# B5 g1 n
        RowBox[{"{", - [3 e9 H6 X2 r7 m& n8 f/ K4 Q
         RowBox[{
    ! n; ]2 Z+ L$ _* V3 Y0 ^; Q     "0.739130", ",", "0.328932", ",", "0.246779", ",", "0.126520", ",", , o  ~3 Y, T3 f/ @$ G
          "0.454545", ",", "0.000000", ",", "0.495122", ",", "0.000000", ",", 3 _+ j/ J# P5 J3 `
          "0.414181", ",", "0.686690", ",", "0.436620"}], "}"}], ",", " ", ; E, K5 X8 M' [& W: E
        RowBox[{"{",
    , s8 l" l8 [4 @  m     RowBox[{7 r/ ^5 q; p2 l9 ^: M) v
         "0.739130", ",", "0.341767", ",", "0.362090", ",", "0.183528", ",",
    - v$ ~5 l: n1 @7 s# f5 C; Y      "0.573427", ",", "0.413715", ",", "0.454472", ",", "0.661631", ",", 2 @' H$ p, n) ]1 ^8 @9 D$ q6 g
          "0.000000", ",", "0.244111", ",", "0.633803"}], "}"}], ",", " ",
    . Q) g/ D' N4 `/ K/ Y+ l$ p) e    RowBox[{"{", ( H9 Q' h6 x6 e
         RowBox[{3 X# h, I9 B* z/ @, N
         "0.695652", ",", "0.187076", ",", "0.279724", ",", "0.006252", ",",
    - S5 |8 f- d5 ]& i' d0 H2 \      "0.405594", ",", "0.418237", ",", "0.544715", ",", "0.000000", ",",
    5 H! u; U6 `. g* S6 w      "0.000000", ",", "1.000000", ",", "0.422535"}], "}"}], ",", " ",
    , n. K7 w; g. b2 `  X# o7 D    RowBox[{"{",
    % H2 C" W9 K4 z. y  D     RowBox[{" J3 n5 i8 Y$ o6 E1 ^
         "1.000000", ",", "0.333948", ",", "0.064750", ",", "0.065855", ",",
    , J& a' e0 t" r; J2 ?0 E- B: W' D- }      "0.342657", ",", "0.000000", ",", "0.408130", ",", "0.000000", ",", & B& z0 [7 G; G, K0 Z% x
          "0.000000", ",", "0.957892", ",", "0.295775"}], "}"}], ",", " ", , w- b8 p  d" `0 l
        RowBox[{"{",
    & T4 Y0 {7 V- D, |     RowBox[{
    7 B, Y0 [% G& _9 R/ N: d( B! s     "0.739130", ",", "0.305400", ",", "0.374567", ",", "0.132870", ",", $ I  Y6 p! }: D) a  W# ~
          "0.258741", ",", "0.834966", ",", "0.000000", ",", "0.000000", ",",
    4 B; Z4 `$ f0 i- k      "0.272861", ",", "0.266784", ",", "0.309859"}], "}"}], ",", " ",
    ( I+ P8 a) y0 {/ \0 x, s    RowBox[{"{",   H3 N' ^$ l/ O
         RowBox[{
    1 ~5 {. f& o7 o! k- \( k: |! t     "0.826087", ",", "0.151962", ",", "0.360280", ",", "0.221632", ",",
    " V% K7 }  [' ]/ p" \9 \4 ?      "0.447552", ",", "0.584778", ",", "0.457724", ",", "0.000000", ",",
    : y+ o0 @& d( A% g& b      "0.000000", ",", "0.826855", ",", "0.408451"}], "}"}], ",", " ",
    . j: v2 M/ f, q  a. [1 {% b' ~    RowBox[{"{", % z( P+ ?: R& b
         RowBox[{
    1 I6 F) s6 X# m* Z0 k; f6 n" n     "0.565217", ",", "0.047212", ",", "0.233154", ",", "0.121528", ",", % |$ D6 a. x$ i" Q2 {
          "0.314685", ",", "0.417483", ",", "0.546341", ",", "0.000000", ",",
    7 @+ U7 l) R- X; R. o" W' Z      "0.669438", ",", "0.341873", ",", "0.197183"}], "}"}], ",", " ",
    . p+ q) f9 I! D' F; [    RowBox[{"{", & X6 `' \! W9 `9 D# p$ `
         RowBox[{2 Y* u- Q8 V( F/ L: L
         "0.826087", ",", "0.034376", ",", "0.690349", ",", "0.512380", ",", 8 Z/ |2 H- \7 u  d5 v
          "0.685315", ",", "1.000000", ",", "1.000000", ",", "0.000000", ",", , W4 b. Z* t" O% o: {: |! t' R
          "0.556479", ",", "0.412544", ",", "0.732394"}], "}"}], ",", " ", ! l  T! |9 b% n. P2 S/ ?* Y7 T
        RowBox[{"{", & J+ g. C% z5 ^% ?# g# W
         RowBox[{
    7 _( E, l% p4 `/ R! i9 L: B7 |     "0.652174", ",", "0.000000", ",", "0.374417", ",", "0.188075", ",", 2 c' `6 q* L- s4 a! R+ ^) o
          "0.706294", ",", "0.498116", ",", "0.729268", ",", "0.000000", ",", % @2 }* H- p) p% S
          "0.454279", ",", "0.322144", ",", "0.802817"}], "}"}], ",", " ",   z& U* T' S4 ]7 u0 E" a7 U
        RowBox[{"{",
    4 x  A2 {' Q7 v$ w4 h7 m     RowBox[{  M0 c2 |' i/ J3 V) @
         "0.782609", ",", "0.180363", ",", "0.237142", ",", "0.054809", ",", ; q3 k& h, ]# U3 Y: v
          "0.629371", ",", "0.373775", ",", "0.247967", ",", "0.000000", ",",
    & ^1 j& {6 t; n* h( ?" m. e* ?9 d      "0.163814", ",", "0.370436", ",", "0.746479"}], "}"}], ",", " ",
    . [6 H0 d( q4 p, }    RowBox[{"{", # L1 K* }! T8 {) H
         RowBox[{4 @2 F# D( n; A  |& k: S
         "0.608696", ",", "0.169150", ",", "0.368148", ",", "0.393768", ",",
    % v- @2 k# G/ m5 F7 v      "0.440559", ",", "0.995479", ",", "0.545528", ",", "0.000000", ",",
    - W, L7 ]! O/ b" o+ W* Q+ z7 J      "0.565770", ",", "0.333039", ",", "0.380282"}], "}"}], ",", " ",
    $ A- B  w: l: o. v; V3 G; ^    RowBox[{"{",
    ! p1 v' S& l, l( l5 Y7 @: V. d% w     RowBox[{. j( U- a- @7 [- H: X& m4 l3 i; A
         "0.695652", ",", "0.390454", ",", "0.186683", ",", "0.039439", ",",
    / b8 {0 ?! |: Y/ z% f      "0.482517", ",", "0.497362", ",", "0.415447", ",", "0.508560", ",", # k, l# X( V( w- T2 p
          "0.000000", ",", "0.390754", ",", "0.563380"}], "}"}], ",", " ",
    * G3 G+ a* J" S% g) D    RowBox[{"{", . g  A8 [8 h6 V! v+ D
         RowBox[{- C' t( Q8 a; |' x7 o0 H
         "0.739130", ",", "0.428888", ",", "0.082728", ",", "0.070154", ",",
    # U, P! s* u& u- |2 c7 G      "0.279720", ",", "0.000000", ",", "0.000000", ",", "0.000000", ",", 2 e1 R2 Q  |6 t- j5 Z5 a2 t
          "0.000000", ",", "0.694935", ",", "0.323944"}], "}"}]}], & n7 P& i4 \6 V# `6 o" J7 k
       "}"}]}]], "Input",
    ) R9 A" o( t1 D$ y CellChangeTimes->{3.5779587825701036`*^9}],8 G1 U+ ]% h) T: Y5 H7 [4 x2 V

    / d1 q; |  U: T8 f' v3 jCell[BoxData[
    ( E/ i3 e/ F" m+ h. B RowBox[{"{",
    3 [9 c' U' a: O. h  RowBox[{! _- i5 g! P8 X/ z7 ?% l% G* V6 D4 [
       RowBox[{"{", 5 ~" |8 E& _+ ~* k
        RowBox[{
    " d+ F9 M+ i& n0 W7 G& {6 a    "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",",
    . A0 }8 b3 q9 G8 Y$ \) J     "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", 8 L# \$ O7 ~$ K, ~4 i3 f0 m& }" s
         "0.`", ",", "0.277091`", ",", "0.873239`"}], "}"}], ",",
    7 E' A: h6 o, D1 }! i" K; t& x3 H   RowBox[{"{", 2 f# w' A' q5 A; Z0 F
        RowBox[{
    " D1 J, i$ F7 b, K. t; k( R    "0.565217`", ",", "0.346857`", ",", "0.393585`", ",", "0.118785`", ",",
    * P$ j4 ], A% N; ]1 c     "0.34965`", ",", "0.370761`", ",", "0.413008`", ",", "0.502518`", ",",
    ; x7 I2 z8 {0 d& g     "0.`", ",", "0.220259`", ",", "0.464789`"}], "}"}], ",",
    ( e8 t- N: |2 E  S. g   RowBox[{"{",
    + d! @; P- q3 X( u/ F    RowBox[{0 [" q5 E' l4 o0 j, I
        "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    # ~6 W; @$ D" W7 @     "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`",
    8 W3 b* B4 \- Q6 W     ",", "0.899882`", ",", "0.492958`"}], "}"}], ",",
    ! o$ O3 T4 h% \9 d4 b$ @* F- n/ [) Q   RowBox[{"{",
    % d7 n) O" F8 @, r1 O" S    RowBox[{5 C0 g6 o9 d# V
        "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",", % y& X% Y5 q* _1 Q9 i
         "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`",
    % c7 K0 V! o$ [; ~, F3 K     ",", "0.265607`", ",", "0.774648`"}], "}"}], ",", - }& E) }' d% d6 }, E2 A: x
       RowBox[{"{",
    0 ?0 l5 t; L. f; ]3 p' R& `    RowBox[{( W2 E! v7 Y, ^1 S
        "0.565217`", ",", "0.346931`", ",", "0.218229`", ",", "0.043639`", ",",
    3 ?9 R& P/ A7 L: I& v/ h# r     "0.503497`", ",", "0.761115`", ",", "0.415447`", ",", "0.503525`", ",",
    % [, T; E4 h/ g     "0.`", ",", "0.642226`", ",", "0.380282`"}], "}"}], ",", $ @5 o; {* ^* e4 O
       RowBox[{"{", # I. K4 {# H6 [4 K8 e- E# u# u
        RowBox[{
    9 s5 I* a  u% Y& M% P0 P    "0.478261`", ",", "0.293154`", ",", "0.259368`", ",", "0.026688`", ",",
    ' j) U+ B7 H3 M     "0.587413`", ",", "0.75584`", ",", "0.409756`", ",", "0.498489`", ",",
    # {$ l+ T+ }# E$ M     "0.`", ",", "0.306243`", ",", "0.647887`"}], "}"}], ",",
    ' {7 @. R6 \( P/ X% ?( l! T   RowBox[{"{",
    / V, p6 i7 _/ i" _; S    RowBox[{" i; C9 C' n" p! A+ \
        "0.347826`", ",", "0.359693`", ",", "0.614393`", ",", "0.081521`", ",", " ~" d2 d. h  p! _: ^! h/ ]. S
         "0.258741`", ",", "0.367747`", ",", "0.410569`", ",", "0.499496`", ",",
    % z- c/ H; S( y4 n7 B) o/ E     "0.`", ",", "0.186985`", ",", "0.56338`"}], "}"}], ",",
    / s% R* \( P+ [   RowBox[{"{",
    * S+ l- @3 h1 W, y. [% @1 l    RowBox[{- ]2 a$ b" {" P1 }% n& P
        "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",", / R0 p3 Q* V6 s/ F
         "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`",
    , a0 V' A; f& V, }/ v- k     ",", "0.175501`", ",", "0.295775`"}], "}"}], ",", 6 D; e1 V. Q% i: D+ x& z
       RowBox[{"{", " }9 X( \$ {3 h% c
        RowBox[{+ h9 n1 _. x6 S/ {7 D
        "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",",
    6 L' _- p9 P# l$ X* r     "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`",
    9 S) G; L7 b- k8 X4 ?  s3 M4 b! z     ",", "0.147821`", ",", "0.338028`"}], "}"}], ",",
    2 j) z1 C5 I5 N8 t( s   RowBox[{"{",
    5 z6 [' ~+ n/ D" S    RowBox[{* G& F4 u/ D8 i& h* u6 q/ R" X
        "0.565217`", ",", "0.697772`", ",", "0.171587`", ",", "0.028566`", ",",
    0 l5 K" V  L( E& f2 O) o     "0.363636`", ",", "0.449887`", ",", "0.40813`", ",", "0.`", ",", "0.`",
    ; c) H, ~" y( }0 V& J     ",", "0.352768`", ",", "0.211268`"}], "}"}], ",", & F0 g$ j' {$ e
       RowBox[{"{", 0 M* K! C5 Z% H8 V
        RowBox[{
    - f3 J) k0 V8 F    "0.282609`", ",", "0.660888`", ",", "0.460064`", ",", "0.110334`", ",", ; R7 P$ _( P, _4 C2 I/ u' M$ g8 r
         "0.475524`", ",", "0.`", ",", "0.545528`", ",", "0.`", ",", "0.5511`", . ^% P6 H- J+ c+ ~- I% b$ O4 [
         ",", "0.23881`", ",", "0.690141`"}], "}"}], ",", / h0 j7 N  x, p- t4 k) q3 x
       RowBox[{"{", - k& u# f7 ]" f$ Q5 ^2 ~: w* g6 h
        RowBox[{
    # o- d1 K6 Q6 t2 b    "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",",
    ! p# ?9 p2 I& c) w     "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",",
    % S5 |) j; V- |( ]     "0.494866`", ",", "0.095701`", ",", "0.43662`"}], "}"}], ",",
    # ?3 }4 Y  G0 g$ n, `   RowBox[{"{",
    9 j" v8 o8 g" O/ n    RowBox[{9 H0 y, |2 j& s) x6 E; k1 l* e+ J
        "0.347826`", ",", "0.697772`", ",", "0.108288`", ",", "0.022413`", ",", 6 V5 V$ M' ~0 X
         "0.356643`", ",", "0.247928`", ",", "0.90813`", ",", "0.`", ",",
    : t" n( J2 S) a3 b     "0.383374`", ",", "0.162839`", ",", "0.`"}], "}"}], ",",
    3 {- ?7 t$ g7 N; R* O4 N   RowBox[{"{",
    : A, G; A" J+ D& I    RowBox[{
    5 ~. _8 l7 n) E    "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",", ) F' D/ Q# O& {, [
         "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`", 1 f& `6 `, v" L) ^
         ",", "0.335395`", ",", "0.267606`"}], "}"}], ",", 9 e; ]& p: t& E' A0 D# v1 d
       RowBox[{"{", - ]8 H- g9 e7 o* b, j, @: c
        RowBox[{
    ! K, L4 g4 x3 k! _6 H    "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",",
    5 L; L5 s( P$ Y2 X  d" o# M; {% @     "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`", ",", # a3 H" J. e0 ]$ R
         "0.160483`", ",", "0.211268`"}], "}"}], ",", 3 ]! a3 i# g% h; F# r8 u
       RowBox[{"{", 0 ]. M" V7 z8 _  d; X6 T
        RowBox[{' d8 D) _, ~. j  J) W, }/ m
        "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",",
    0 [4 O* @& J; N. N$ R! P     "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`",   w1 E+ G* a9 ]0 K. a: n
         ",", "0.398115`", ",", "0.408451`"}], "}"}], ",",
    ) Y6 d" Y4 j$ V( H8 ]; }   RowBox[{"{",
    9 I. Y7 _* y) V2 d. X9 M    RowBox[{
    ! o. P7 t5 }) G    "0.608696`", ",", "0.425199`", ",", "0.012979`", ",", "0.`", ",", + @7 Q7 Q0 x5 `, Z; i; W
         "0.482517`", ",", "0.50942`", ",", "0.406504`", ",", "0.`", ",", "0.`", 9 u, `8 N' u/ `/ t8 K) x, L  I, f
         ",", "0.157833`", ",", "0.478873`"}], "}"}], ",", 9 r( Y, W( \+ @# B! O
       RowBox[{"{",
    - J  o5 r1 z" w( Z# h0 R2 C3 D0 A. E& A! K3 i    RowBox[{+ ?8 [1 f4 d8 K3 X! ]
        "0.608696`", ",", "0.577973`", ",", "0.213587`", ",", "0.030889`", ",",
    / H' j& w9 Z/ t2 E/ s1 s     "0.370629`", ",", "0.`", ",", "0.452846`", ",", "0.`", ",", "0.`", ",",
    1 d( p6 I! G, A% p8 s+ h     "0.315665`", ",", "0.380282`"}], "}"}], ",", ! l& M" T$ B& g/ ^2 G
       RowBox[{"{",
    7 S9 ~0 v4 v& W8 |  z: f' G! {    RowBox[{
    0 B4 ?7 W# l; Q  o4 ~    "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",", + l9 v1 Q4 U- i! Q. e2 K1 S' t  y
         "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.492344`",
    6 s6 a: X: o( V- i     ",", "0.211268`"}], "}"}], ",", # U7 l( m; y6 ]  {" P7 E! R: S
       RowBox[{"{",   o$ N& O$ x' u, r
        RowBox[{
    " j$ _7 D# G* t    "0.130435`", ",", "0.562039`", ",", "0.331662`", ",", "0.032643`", ",",
    / H7 m- `# n" J* |     "0.314685`", ",", "0.414469`", ",", "0.27561`", ",", "0.`", ",", "0.`", + W( i! O, Z& h; _0 f" I: S
         ",", "0.638398`", ",", "0.43662`"}], "}"}], ",", ( i: D" c" U' r2 M# e
       RowBox[{"{", 4 T* M" I" F! U
        RowBox[{
    ) u1 T, K# X8 d+ [5 C1 `    "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",", 9 w# X  Y) p4 o, |5 `
         "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    ( s$ G1 x4 Z* p1 g' m2 u     "0.392521`", ",", "0.478873`"}], "}"}], ",",
    $ V0 k+ w$ P1 ?+ O. P8 s   RowBox[{"{", ( f5 |1 U) y. E
        RowBox[{
    2 ~/ n1 B1 d! b2 L, z    "0.608696`", ",", "0.769475`", ",", "0.289283`", ",", "0.022882`", ",",
    ! }% _  v# x0 K: z$ `     "0.321678`", ",", "0.`", ",", "0.274797`", ",", "0.333333`", ",", "0.`", ) Q& G4 g% G: X+ L
         ",", "0.362191`", ",", "0.295775`"}], "}"}], ",",
    ( _4 N9 A1 n  \4 v) }9 O   RowBox[{"{",   }- O; B! E0 \) K8 s
        RowBox[{
    ; U5 `: V3 W' F- r5 C8 B5 S    "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",",
    4 K9 p- ~5 b0 d% q     "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`", ",", : o4 o9 N/ X3 G" O
         "0.114252`", ",", "0.028169`"}], "}"}], ",", ) p+ ^) h# f, t& k6 o
       RowBox[{"{", ) E  t6 b' J# J9 ~4 p3 c
        RowBox[{% [# \- o2 H' b- s: t
        "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",",
    , R/ f# G' X# }5 y8 ~     "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`", ",",
    . d/ z% _& v  K8 `: L+ _     "0.401355`", ",", "0.43662`"}], "}"}], ",",
    ) F1 s& Q% }, v! P0 Q- B   RowBox[{"{",
    ' ~) g! c0 r! A4 J! U    RowBox[{0 A3 ]7 c* @& I* s6 P# x" }4 K
        "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",", . v  ?: z, S2 B1 E
         "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", + K' w2 U* U8 L3 f  _' F1 Y$ f
         "0.827444`", ",", "0.394366`"}], "}"}], ",",
    : t( V& X) Q2 X+ [$ K   RowBox[{"{", : v9 Z8 N1 j: D; x8 B! G
        RowBox[{9 r1 K' P2 h4 m" |# e' Q
        "1.`", ",", "0.199248`", ",", "0.295044`", ",", "0.041613`", ",", 8 h3 S4 G. ?' i
         "0.20979`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", , c- U. i+ H7 N
         "0.676973`", ",", "0.295775`"}], "}"}], ",", 8 a( Q  E$ X8 m/ P" p, A" y
       RowBox[{"{",
    ( J: a: m" b% \( ?" f( S/ i7 v6 s  J    RowBox[{
    3 D. x7 z) C, \3 L    "0.869565`", ",", "0.180363`", ",", "0.243056`", ",", "0.098349`", ",", 5 @0 d6 f) L! D1 V
         "0.265734`", ",", "0.503391`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
      ?, r0 ~4 R' A5 Q, L! x     "0.331272`", ",", "0.830986`"}], "}"}], ",", ; ]# F' Z+ o: |4 P6 o
       RowBox[{"{",
    5 U! ]) W# n; ]* d6 b    RowBox[{
    5 O* B4 n/ ?5 v' I" X9 A    "0.695652`", ",", "0.551785`", ",", "0.326201`", ",", "0.253608`", ",",
    . \) c3 w7 H, U5 R2 ?     "0.195804`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 3 l! g. M9 Y. r2 V& r) A* }
         "0.845701`", ",", "0.169014`"}], "}"}], ",", 6 s0 ~  G& H, I: J1 A
       RowBox[{"{", 3 Z2 _: R& o( t( X7 b
        RowBox[{3 f% d! ?& x! v# A+ t
        "0.652174`", ",", "0.572293`", ",", "0.111511`", ",", "0.035584`", ",",
    8 W% I7 f9 W6 O1 K     "0.405594`", ",", "0.249435`", ",", "0.544715`", ",", "0.`", ",", "0.`",
    5 h9 g9 \( ?: _( U5 t$ b4 p     ",", "0.287102`", ",", "0.366197`"}], "}"}], ",",
    / q  o7 K2 J& p  a* i+ s$ Y   RowBox[{"{", 8 O9 j# G6 e5 i) m! B
        RowBox[{
    8 G7 m) K8 t. j    "0.652174`", ",", "0.562039`", ",", "0.336155`", ",", "0.014604`", ",", 5 q2 v5 ~* a  U+ q
         "0.174825`", ",", "0.24416`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 6 T8 m4 ?- u0 P% @9 |* f
         "0.`", ",", "0.309859`"}], "}"}], ",", : [3 S: j4 l( K4 _
       RowBox[{"{",
    4 a5 \2 m( n2 W2 H7 j5 V    RowBox[{
    ) t& K: `! \4 L0 n0 u1 E/ G    "0.565217`", ",", "0.577383`", ",", "0.15587`", ",", "0.030963`", ",",
    ' ]% d# g+ ^3 b6 X; b     "0.258741`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 8 H6 f# H8 m! i7 {4 q% S# g
         "0.050059`", ",", "0.352113`"}], "}"}], ",", 9 m9 q; Z/ ^6 e  j# B% q
       RowBox[{"{", / {0 k6 P  H3 A& q
        RowBox[{
    6 G" `6 `& ~$ t9 s9 d' d% j    "0.565217`", ",", "0.613234`", ",", "0.232956`", ",", "0.05387`", ",", / {5 y! c) w3 s: K7 i
         "0.230769`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    8 A, n5 m6 d0 ]& c     "0.254122`", ",", "0.309859`"}], "}"}], ",",
    . M* [* v$ m7 _. q; S   RowBox[{"{", % T2 M5 O$ M. U* l
        RowBox[{
    ' b9 V! x5 d. E& z( `; p    "0.565217`", ",", "0.559531`", ",", "0.493262`", ",", "0.046209`", ",",
    2 P- _2 e5 Z4 [" h9 ?( B     "0.293706`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    ' j. V7 _# S; J3 X! D3 {     "0.086867`", ",", "0.774648`"}], "}"}], ",",
    , L; Q- K0 a7 W- p   RowBox[{"{", ; F1 @( L( w1 u
        RowBox[{
    " o: K8 S/ W/ ^4 \3 V& [5 D    "0.608696`", ",", "0.569711`", ",", "0.111932`", ",", "0.013542`", ",",
    * m- F7 Q9 i: L; D) T! w3 [" F     "0.335664`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.168704`", ",",
    1 e  G7 d) k4 P/ L     "0.659894`", ",", "0.422535`"}], "}"}], ",",
    : y# r& q, ?. z. W7 u  b   RowBox[{"{",
    % U$ y: \8 W3 S    RowBox[{
    2 n* ]5 f7 g3 y, G6 j+ L    "0.608696`", ",", "0.564547`", ",", "0.329844`", ",", "0.202036`", ",",
    4 M) p. Z2 Z1 ^) c+ Y& w0 D& S# A! G/ B     "0.51049`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 4 G+ e! a+ {  F: {' O4 j7 M
         "0.317138`", ",", "0.887324`"}], "}"}], ",",
    , E6 N2 F* n6 M   RowBox[{"{", . `# |$ E% X# u. w* n
        RowBox[{! u' D% W0 a" v3 A% `. g
        "0.521739`", ",", "0.546695`", ",", "0.165788`", ",", "0.029431`", ",", ' M2 S3 f+ a4 ?9 ]$ n3 e1 p; e
         "0.51049`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 4 [+ z1 y  Z- t* Q  c/ X
         "0.605124`", ",", "0.887324`"}], "}"}], ",",
    2 r$ C' D! f4 q+ K   RowBox[{"{",
    5 k- z! s8 D( V6 z$ }" Z2 B    RowBox[{
    / m& R; y2 D: v* ~: v/ C' \) t    "0.521739`", ",", "0.564178`", ",", "0.400518`", ",", "0.045023`", ",", - q' F6 f7 q2 }+ p! U
         "0.615385`", ",", "0.3685`", ",", "0.660163`", ",", "0.301108`", ",", 6 C, E4 I6 X0 @
         "0.`", ",", "0.32126`", ",", "0.859155`"}], "}"}], ",", $ e  J( }  ?8 ?) n4 d5 N$ l
       RowBox[{"{", 5 u- o% [% n$ Q3 D+ P8 a
        RowBox[{$ A8 Y7 F) E3 n& u1 o" m: |
        "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",", 4 g7 X( U; B6 N5 t; }  K
         "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`",
    ( ~9 V' x0 I% A: b" n     ",", "0.595406`", ",", "0.239437`"}], "}"}], ",",
    0 i6 g5 r" \7 N+ G5 B' M7 |   RowBox[{"{", 8 X1 T6 I+ @) ]7 k7 f3 k
        RowBox[{
    4 f# G' d% Q7 h3 k2 J    "0.652174`", ",", "0.549277`", ",", "0.257578`", ",", "0.058688`", ",",
    % f6 N3 M& [( I) ^/ a* \( X     "0.356643`", ",", "0.`", ",", "0.817886`", ",", "0.`", ",", "0.`", ",", - i1 @0 t6 h7 o" K* f+ u3 K
         "0.555359`", ",", "0.295775`"}], "}"}], ",",   ~) d3 O! F+ h+ y9 C/ E" q8 {
       RowBox[{"{", 4 s0 C/ |5 E' S; U, h
        RowBox[{
    - R1 N& l' r) p" w1 L/ L    "0.695652`", ",", "0.549277`", ",", "0.572308`", ",", "0.082411`", ",", * o7 K; D2 d# r0 h/ W7 \: u9 P7 X
         "0.461538`", ",", "0.528259`", ",", "0.819512`", ",", "0.`", ",", "0.`", 4 I$ W2 }' R& z' ~. `! I8 W) ]
         ",", "0.333333`", ",", "0.746479`"}], "}"}], ",",
    8 N& ?! v, |/ @: e$ `   RowBox[{"{", 6 D- g5 e, F$ n/ d% `% U
        RowBox[{
    + A! g5 V: Y/ M- _    "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",", 9 w# g* ~, c: k, W
         "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`", $ z6 P: F1 M6 {* e. A0 D/ h5 D
         ",", "0.149588`", ",", "1.`"}], "}"}], ",",
    0 L* r9 C/ a7 j) j' Z. f   RowBox[{"{", 9 E0 `5 \6 `3 v2 M6 v
        RowBox[{
    0 v' R/ i; b, h6 U# t. W    "0.282609`", ",", "0.531278`", ",", "0.321428`", ",", "0.228625`", ",", " ^6 q8 ?  V% i
         "0.594406`", ",", "0.53052`", ",", "0.410569`", ",", "0.`", ",", , q5 Q( x, N& b. j/ g# G
         "0.757457`", ",", "0.493522`", ",", "0.549296`"}], "}"}], ",", ( u2 E! [# N8 Y* N5 m
       RowBox[{"{",
    : e5 V& x6 S* f8 r    RowBox[{% E1 R& R; @9 v" }+ T# E4 f4 i$ M
        "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", . C5 c% h; Z5 k( v$ S, H2 s$ J5 N% n
         "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`", ",", 7 _; O% }- ~: @1 |/ y* R
         "0.224676`", ",", "0.366197`"}], "}"}], ",",
    + Z" T! L! V; h  G0 b0 C   RowBox[{"{", : F0 t9 A8 k: q& j
        RowBox[{
    , W4 ~) J( k  G$ O/ S7 u% [    "0.391304`", ",", "0.705444`", ",", "0.045908`", ",", "0.07312`", ",", + w7 ~2 t2 {& A# `1 s8 ?" [; U/ F
         "0.622378`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.496333`", ",",
    / l" u5 v8 ?9 @( ^+ ?& f1 S     "0.410188`", ",", "0.549296`"}], "}"}], ",",   B: O5 {. n8 G# x: R1 O
       RowBox[{"{", ! @- D! \0 e9 }# w) O+ I
        RowBox[{4 V* [* o1 c  ?5 v
        "0.282609`", ",", "0.661921`", ",", "0.344992`", ",", "0.085178`", ",", 7 V) O0 J3 ?7 N0 e, |
         "0.293706`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    6 o1 Y$ s( d5 [# C+ U     "0.668139`", ",", "0.577465`"}], "}"}], ",", , s. H: _) u+ V: p$ C/ E1 i
       RowBox[{"{", 7 V; D6 F; I- C  L& H7 c
        RowBox[{) f" c3 r' h2 O+ V2 X
        "0.478261`", ",", "0.661921`", ",", "0.644209`", ",", "0.077296`", ",",
    3 L, B) D: [* ~' A8 C" s     "0.412587`", ",", "0.`", ",", "0.413008`", ",", "0.502518`", ",", "0.`",
    5 S/ @0 J2 j# M, O: A     ",", "0.102179`", ",", "0.690141`"}], "}"}], ",", , X% V; z# d6 X
       RowBox[{"{",
    $ U# V! C% c+ s; N5 f" v( r# K    RowBox[{
    . B, @+ Q) w# e) S3 T, T1 j, c# S    "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",", / p* u) ]$ E3 R% ]& z
         "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", ( w* f6 u5 q+ k+ _8 m- w: ~
         "0.380742`", ",", "0.71831`"}], "}"}], ",", ( ?- Q  A. |' s; y5 V9 w4 K$ X4 i
       RowBox[{"{", ' I8 f3 k* s  N% E5 v% U, m
        RowBox[{
    0 g/ O' Q/ g/ z+ j( y0 p    "0.5`", ",", "0.984656`", ",", "0.288432`", ",", "0.047692`", ",", % L- e# e9 f& o9 t" F( _
         "0.27972`", ",", "0.`", ",", "0.821138`", ",", "0.510574`", ",", "0.`",
    2 U8 v! G" U  `6 W6 |/ w/ n     ",", "0.319494`", ",", "0.521127`"}], "}"}], ",", 5 a* X8 C3 T7 E
       RowBox[{"{",
    5 N% Z0 b# r5 D; H" s$ X) `    RowBox[{2 _! W7 V& f6 n; \6 `
        "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",", 8 N  y0 z, d- u; |  p* }
         "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`", + ]  a8 a, x' v# d* D( ~- M, D
         ",", "0.031508`", ",", "0.929577`"}], "}"}], ",", 8 k1 b7 c- x, y! p
       RowBox[{"{", % c; Y$ a- k" |6 S8 e; `
        RowBox[{
    / M+ s. M) |7 x( I3 y4 e    "0.73913`", ",", "0.774639`", ",", "0.17512`", ",", "0.036498`", ",", , T3 W! V5 P! y* P
         "0.391608`", ",", "0.739261`", ",", "0.408943`", ",", "0.553877`", ",", 7 V0 x3 G) {( W8 @) l- }2 |  e. Q
         "0.`", ",", "0.292108`", ",", "0.521127`"}], "}"}], ",",
    1 I+ c' z9 d- T& I3 j9 w! l   RowBox[{"{",
      y0 l" u8 [: N4 I4 Z. B, H    RowBox[{: g# q/ v* h8 n6 j
        "0.586957`", ",", "0.982074`", ",", "0.158462`", ",", "0.063902`", ",", 6 |7 W) F5 s! m% B3 [! E. A+ Z
         "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", : _  C& [% p+ z) a
         "0.329505`", ",", "0.338028`"}], "}"}], ",",
    6 A1 c! G' D4 I1 R( X: \. S   RowBox[{"{",
    - j" g, o& h1 j    RowBox[{8 x" n; q# g  O
        "0.543478`", ",", "0.982074`", ",", "0.306872`", ",", "0.041934`", ",",
      ~2 b* h( f' x- h/ i. ^; T# Y     "0.426573`", ",", "0.380558`", ",", "0.414634`", ",", "0.506546`", ",", % t3 g' v0 l/ @2 m* g3 v7 k6 `: [' X
         "0.`", ",", "0.337456`", ",", "0.380282`"}], "}"}], ",", - ~( p) l0 t0 ]- ^* ?
       RowBox[{"{", ( D! }6 e* E) s* G0 F  l; B
        RowBox[{$ i. y8 v& _+ {7 i
        "0.73913`", ",", "0.997418`", ",", "0.170143`", ",", "0.058268`", ",",
    + v: ], w) T+ Q& l3 `: P& x; ^     "0.538462`", ",", "0.248681`", ",", "0.`", ",", "0.339376`", ",", "0.`", ! D' ?4 E9 v6 C* K/ Q8 {5 [7 j3 X
         ",", "0.766784`", ",", "0.676056`"}], "}"}], ",",
    . E. I% m" K" W   RowBox[{"{", - k% W  L) f# K% O. T# F( Z
        RowBox[{1 p6 C5 [. p) i, S* X& _2 x6 z
        "0.695652`", ",", "0.700428`", ",", "0.139361`", ",", "0.182169`", ",", 4 v% \; y+ |6 A/ {3 V, `$ {
         "0.412587`", ",", "0.243406`", ",", "0.`", ",", "0.`", ",", "0.136919`",
    5 G# G) V, C* s1 k. C     ",", "0.676678`", ",", "0.591549`"}], "}"}], ",", $ n" I& A4 e' N: T, u$ |! W( Q% R
       RowBox[{"{", % D5 e- [8 d  z
        RowBox[{! w/ b8 V4 y& ]0 [6 I, L
        "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",", $ p$ g. l% S9 u  ?9 v% g
         "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`", 2 w" G1 H7 D- ]$ \. {
         ",", "0.541519`", ",", "0.464789`"}], "}"}], ",",
    ! ^9 ?% Y: A: j   RowBox[{"{",
    . v/ N: h- G9 R+ A    RowBox[{
    3 a% E3 B. M9 r" d    "0.652174`", ",", "0.751623`", ",", "0.355593`", ",", "0.039883`", ",", 2 @2 d5 D- k1 g  a
         "0.195804`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    # a/ X, }, \7 x+ e     "0.064488`", ",", "0.295775`"}], "}"}], ",",
    8 e/ u7 `+ f$ c: W$ k* _' R" `   RowBox[{"{", : }( s7 R6 i& t, f
        RowBox[{& T' @; S# @, q4 D' l/ P( s6 B7 G+ A/ t
        "0.521739`", ",", "0.679847`", ",", "0.152375`", ",", "0.030048`", ",", ; W5 i3 Z0 D4 f$ b# E
         "0.363636`", ",", "0.`", ",", "0.271545`", ",", "0.`", ",", "0.`", ",",
    & [# o7 H. h* L, \7 {3 W     "0.463192`", ",", "0.380282`"}], "}"}], ",",
    ; j5 \2 w& O8 a: F  n1 o   RowBox[{"{",
    + I* q0 z2 ?4 h    RowBox[{
    " s! o1 P- c4 q6 U+ ~    "0.434783`", ",", "0.728533`", ",", "0.18683`", ",", "0.12951`", ",",
    ( v8 V; }) U. y     "0.195804`", ",", "0.`", ",", "0.269919`", ",", "0.`", ",", "0.32665`", + c" n& x4 F: K) t- n' N
         ",", "0.388398`", ",", "0.211268`"}], "}"}], ",", 5 Z9 O' u& T- c4 X
       RowBox[{"{", / \& @% o, G5 K1 G/ F9 M  V2 Z
        RowBox[{
    , W5 {0 I1 q9 b' f( t  Y+ o    "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",", / H0 D  v, @. S6 g
         "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`", 6 _) z, a4 p* Y
         ",", "0.262367`", ",", "0.253521`"}], "}"}], ",",
    0 k, a2 C, R# W- x! Z   RowBox[{"{", . y) X2 g  _: u0 \- N& F, N( q2 \; V
        RowBox[{
    / S) G. {& [2 ~+ E4 A' e& \    "0.608696`", ",", "0.633742`", ",", "0.322697`", ",", "0.068597`", ",",
    ( Q" ~+ b' t) }: r     "0.328671`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.287042`", ",",
    8 g3 G  t2 q5 Z- s5 b5 Z6 p& h1 g. j' y     "0.290931`", ",", "0.28169`"}], "}"}], ",",
    - @8 Z- `1 Z' C: L/ L# b   RowBox[{"{", ' h- l3 O- Y$ u% a5 }' R/ W8 z
        RowBox[{
    4 @; u& t6 }6 `6 b3 s( d    "0.478261`", ",", "0.539023`", ",", "0.412108`", ",", "0.107566`", ",", " K5 Y7 Z5 M8 A1 @3 w
         "0.237762`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",   A/ \! X' E' `9 P7 M
         "0.380742`", ",", "0.507042`"}], "}"}], ",", - ?" K" ?- D( h( \
       RowBox[{"{", ; z' A9 d2 m/ \2 z" ?- R0 S- {9 J' u9 f
        RowBox[{& F+ J  E7 K3 E, v- v0 ~3 m
        "0.608696`", ",", "0.551859`", ",", "0.176821`", ",", "0.076332`", ",",
    , l4 i' i3 @7 M     "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", * C* T, Y8 H% h7 }1 P0 P( ~1 y
         "0.429034`", ",", "0.239437`"}], "}"}], ",",
    - U+ v& S+ d4 u' E. `   RowBox[{"{", 0 N! w7 }" W3 {3 l5 x% E. o5 O
        RowBox[{
    ( a5 [) p8 j0 R& @. \2 v    "0.652174`", ",", "0.551859`", ",", "0.033549`", ",", "0.018459`", ",", " l+ r7 T: v, s; i2 m& m7 H
         "0.573427`", ",", "0.`", ",", "0.553659`", ",", "0.`", ",", "0.40489`",
    ) i9 M. ^8 w- y8 ^) y     ",", "0.193168`", ",", "0.394366`"}], "}"}], ",",
    , Y4 W0 q9 H' }& G0 s7 t! x   RowBox[{"{",
    9 a: M) j- q2 n! @) F6 S    RowBox[{
      C) u+ ^' `: K/ o" P/ w    "0.695652`", ",", "0.595382`", ",", "0.277493`", ",", "0.100326`", ",", 6 v6 J/ B& k! r5 I2 r
         "0.286713`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    * Y; i3 ~8 ]/ Z% Q     "0.448763`", ",", "0.338028`"}], "}"}], ",",
    9 Z6 `) E' N( D" f* {   RowBox[{"{",
    9 ^  a1 }6 G$ ^# z: |    RowBox[{
    8 V# j' i& q6 o5 m+ D5 y: [% a    "0.565217`", ",", "0.559531`", ",", "0.422669`", ",", "0.078111`", ",",
    + @9 n- d9 ]- t     "0.286713`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 6 b& y2 u5 q  p+ z4 a3 a
         "0.442285`", ",", "0.394366`"}], "}"}], ",", + h3 ^: L. W' u% S  u/ E
       RowBox[{"{",
    ; T0 @; C0 k4 h# \% Q- E- _' \, L    RowBox[{
    / R' ~& [1 h0 u. ~, V7 V  k- Y1 S    "0.586957`", ",", "0.398126`", ",", "0.140619`", ",", "0.069116`", ",", 8 }, w0 h, ]7 l8 |  h9 B7 b7 O
         "0.461538`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    3 @: @1 X: z! S+ O0 v' B% w% o8 k     "0.575383`", ",", "0.15493`"}], "}"}], ",",
    ) `3 P/ f# W0 L8 c8 o- v% D/ A0 [! g   RowBox[{"{", " Y& c& H8 }1 S) K& ?
        RowBox[{
    0 Y/ a; N+ b4 o  X! Y3 o  ]    "0.695652`", ",", "0.398126`", ",", "0.019829`", ",", "0.041366`", ",",
    ( E' X1 b4 v5 H# o  l     "0.552448`", ",", "0.24416`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    % W; d# [; @8 A     "0.515607`", ",", "0.591549`"}], "}"}], ",",
    8 K6 @, A; ]/ t' h9 p  w  Z   RowBox[{"{",
    4 z! t3 B: D+ P    RowBox[{
    0 A+ }% d$ ~7 {5 Y2 w: @* M    "0.695652`", ",", "0.700354`", ",", "0.422467`", ",", "0.068128`", ",",
    2 [# d* `1 a# v: n7 x7 p. f     "0.20979`", ",", "0.`", ",", "0.`", ",", "0.500504`", ",", "0.`", ",", . l& w6 S* ?% c; s
         "0.057715`", ",", "0.408451`"}], "}"}], ",", $ x, U) p# [0 _/ R* E$ {+ {
       RowBox[{"{",
    & [8 X' i; T% \6 Q    RowBox[{
    . h- ?+ i1 V" y8 |- m0 {, u1 z& G    "0.521739`", ",", "0.193125`", ",", "0.210582`", ",", "0.110433`", ",", 6 Y# g- h: w, t  |  {
         "0.447552`", ",", "0.382065`", ",", "0.413008`", ",", "0.498489`", ",", , v1 K8 R; V, F7 [  J6 s/ S
         "0.`", ",", "0.174617`", ",", "0.295775`"}], "}"}], ",", " W  |" V! M& h) U0 Y3 J& J
       RowBox[{"{",
    8 \. |% {7 [1 E. b    RowBox[{
    7 L7 v$ N* U( n6 X  w! Q    "0.347826`", ",", "0.063588`", ",", "0.830527`", ",", "1.`", ",",
    3 ^4 |9 p1 r) u+ {     "0.111888`", ",", "0.`", ",", "0.410569`", ",", "0.`", ",", "0.`", ",", " Q0 }) ?  n5 z! n1 t
         "0.66755`", ",", "0.661972`"}], "}"}], ",", ! `1 W- Q: i$ \. o
       RowBox[{"{",
    * a1 }$ ]1 q, m0 N, K    RowBox[{
    ! O: X( ]' N" c# Z' z: G    "0.521739`", ",", "0.188109`", ",", "1.`", ",", "0.785485`", ",", 8 A4 K7 W$ Y, a  }( d
         "0.342657`", ",", "0.373775`", ",", "0.406504`", ",", "1.`", ",", "0.`", 1 k1 T  H. P* t4 q0 X2 A
         ",", "0.371025`", ",", "0.774648`"}], "}"}], ",", . ~4 E  y3 h# ~; W" \4 w
       RowBox[{"{",
    0 Q2 d, F, C; m$ v+ G    RowBox[{5 Z9 W; b, M7 H1 f+ V& m: |+ b
        "0.695652`", ",", "0.188404`", ",", "0.088836`", ",", "0.059504`", ",", 8 W/ _5 X5 u" `
         "0.706294`", ",", "0.37679`", ",", "0.`", ",", "0.`", ",", "0.`", ",",   Y: r( C* t9 s" }5 K
         "0.570966`", ",", "0.746479`"}], "}"}], ",",
    % O7 t% J4 i  n+ [% {   RowBox[{"{",
      V6 k- }0 c, L( R6 b    RowBox[{3 y+ w. R% P$ ^& ]9 D9 c; H
        "0.695652`", ",", "0.057465`", ",", "0.316316`", ",", "0.15128`", ",", 6 o( I  D$ a8 h  @) }, m
         "0.615385`", ",", "0.371515`", ",", "0.412195`", ",", "0.500504`", ",", , y- J( {8 v9 i
         "0.`", ",", "0.468198`", ",", "0.887324`"}], "}"}], ",",
    7 z% F- T6 Z) K1 h" }) ?   RowBox[{"{", $ E2 Z/ w7 W$ ~) z; \1 k
        RowBox[{  o" P3 U0 {7 D
        "0.608696`", ",", "0.01136`", ",", "0.295586`", ",", "0.113892`", ",",
    + S4 _' ?; n5 ]. b4 r     "0.58042`", ",", "0.746044`", ",", "0.405691`", ",", "0.501511`", ",", * Y$ ]( `* @1 G" l4 m7 _4 v, u2 h! o
         "0.`", ",", "0.414016`", ",", "0.84507`"}], "}"}], ",",
      J8 v7 P$ P* y: p) `$ O4 B# v   RowBox[{"{",
    " G. _4 o) U$ i2 S. {    RowBox[{
    8 y1 E. x/ Y0 E7 S    "0.608696`", ",", "0.364783`", ",", "0.130582`", ",", "0.020214`", ",",
    1 b; Y/ A, f7 x8 ]     "0.356643`", ",", "0.379804`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    + }( B; j/ m, V     "0.18669`", ",", "0.704225`"}], "}"}], ",",
    ( Y$ D7 \& g- s. H( n" x   RowBox[{"{", 6 E# U1 H3 e5 \5 Z
        RowBox[{% \: u: }$ K# c; a; p3 N: `
        "0.608696`", ",", "0.193199`", ",", "0.11269`", ",", "0.036152`", ",",
    - i) ^0 d3 S0 f# ?+ Y8 W- l     "0.636364`", ",", "0.382065`", ",", "0.409756`", ",", "0.495468`", ",",
    + R6 b2 E$ D/ I4 A! E+ v     "0.`", ",", "0.442874`", ",", "0.760563`"}], "}"}], ",",
    . l+ m# T& S3 N  o% }- \   RowBox[{"{", . D' ^) S/ t  n, J' P
        RowBox[{; j+ A) |; w. N# h, u/ d3 V5 m- \
        "0.73913`", ",", "0.328932`", ",", "0.246779`", ",", "0.12652`", ",",
    7 w: S: p9 W/ K  o9 b. h- V& `     "0.454545`", ",", "0.`", ",", "0.495122`", ",", "0.`", ",", "0.414181`", 9 M" r& z" ~5 J' j1 z
         ",", "0.68669`", ",", "0.43662`"}], "}"}], ",",
    ( ^8 C+ Q4 Q5 y6 ?   RowBox[{"{", 9 p9 U/ d- Q. O1 g# a* d
        RowBox[{
    6 D: s) Y* r; R- S( ~    "0.73913`", ",", "0.341767`", ",", "0.36209`", ",", "0.183528`", ",",
    ; I% ?$ S7 h$ v% e& I( E6 K# |     "0.573427`", ",", "0.413715`", ",", "0.454472`", ",", "0.661631`", ",",
    # C# p& S' `! o     "0.`", ",", "0.244111`", ",", "0.633803`"}], "}"}], ",",
    * I. A3 O7 X! ~1 I2 t; R8 C   RowBox[{"{",
    9 W0 @4 z8 i: S3 K0 c    RowBox[{
    % j3 S4 W( N/ b! \    "0.695652`", ",", "0.187076`", ",", "0.279724`", ",", "0.006252`", ",",
    5 L/ D0 X, [* P$ j9 m- w     "0.405594`", ",", "0.418237`", ",", "0.544715`", ",", "0.`", ",", "0.`", & E9 g9 }1 k* O
         ",", "1.`", ",", "0.422535`"}], "}"}], ",", 2 @) I% k8 z7 o4 |* G! c1 Y
       RowBox[{"{", 3 _& t+ T: E4 U+ y- t2 r. E
        RowBox[{/ u8 M' s+ z) h  I  J. m3 m
        "1.`", ",", "0.333948`", ",", "0.06475`", ",", "0.065855`", ",", ' M/ d8 \1 D/ m9 I; A
         "0.342657`", ",", "0.`", ",", "0.40813`", ",", "0.`", ",", "0.`", ",", + d3 |- J- V  Z
         "0.957892`", ",", "0.295775`"}], "}"}], ",", : k" q7 |. @3 Z( ~$ s( c9 @
       RowBox[{"{",
    ! A6 p% W" V% D- V& s0 D    RowBox[{
    . P& c# X( J3 ~" E8 ]1 Q    "0.73913`", ",", "0.3054`", ",", "0.374567`", ",", "0.13287`", ",", . X6 L0 ]  n6 J8 H, ?
         "0.258741`", ",", "0.834966`", ",", "0.`", ",", "0.`", ",", "0.272861`",
    3 `/ U& G( K0 M) K$ O- E8 u     ",", "0.266784`", ",", "0.309859`"}], "}"}], ",", 9 W8 d3 v( H3 Q* a8 r/ Q
       RowBox[{"{", + U& M3 c+ b: M9 F# ]: {6 D
        RowBox[{
    , N- O; d% u3 F1 M. _  k    "0.826087`", ",", "0.151962`", ",", "0.36028`", ",", "0.221632`", ",",
    / E2 u! y0 C. y9 `2 S6 \     "0.447552`", ",", "0.584778`", ",", "0.457724`", ",", "0.`", ",", "0.`", / L; S; U+ G) K, ^: C9 [# s) Y
         ",", "0.826855`", ",", "0.408451`"}], "}"}], ",", 1 L( v* o: P0 Y( `, m
       RowBox[{"{", ) O0 C5 N! d" [" Y
        RowBox[{
    / g( X2 c7 g* o    "0.565217`", ",", "0.047212`", ",", "0.233154`", ",", "0.121528`", ",", - I  e, ?* E$ \+ b6 {( u8 t
         "0.314685`", ",", "0.417483`", ",", "0.546341`", ",", "0.`", ",", , k0 c0 T4 f' S' Z# p" T* z
         "0.669438`", ",", "0.341873`", ",", "0.197183`"}], "}"}], ",",
    9 ?3 \; v. W. y. P* ?5 Q9 c# A   RowBox[{"{",
    % N! T$ S& }. R: x    RowBox[{
    8 }4 f# ^" X: f2 i+ x+ S    "0.826087`", ",", "0.034376`", ",", "0.690349`", ",", "0.51238`", ",", 6 S1 ^5 @% n* G7 l
         "0.685315`", ",", "1.`", ",", "1.`", ",", "0.`", ",", "0.556479`", ",",
    7 h, B6 D" i2 j     "0.412544`", ",", "0.732394`"}], "}"}], ",",
    % l- M1 v. U$ Z& R2 ?8 T; }   RowBox[{"{", . t% O- L+ W, p
        RowBox[{5 {6 Z" ^3 l' E" ?" D  C
        "0.652174`", ",", "0.`", ",", "0.374417`", ",", "0.188075`", ",", ! j" Y7 _/ _5 C7 L3 W. n/ l2 W( \
         "0.706294`", ",", "0.498116`", ",", "0.729268`", ",", "0.`", ",", / j3 i5 a0 Q4 ~3 D" I
         "0.454279`", ",", "0.322144`", ",", "0.802817`"}], "}"}], ",", ) ]3 }- E. D0 {. L( C1 E0 [
       RowBox[{"{",
    + r2 T: ^$ T. g, G9 C1 p: C    RowBox[{2 R0 r1 e% v1 x' x
        "0.782609`", ",", "0.180363`", ",", "0.237142`", ",", "0.054809`", ",",
    ' T0 t  D2 a8 F; h+ b* v     "0.629371`", ",", "0.373775`", ",", "0.247967`", ",", "0.`", ",", % X8 h2 f$ Z+ U
         "0.163814`", ",", "0.370436`", ",", "0.746479`"}], "}"}], ",", 7 O( n+ z1 r! ?% ?5 [; Y2 w
       RowBox[{"{", # _4 r5 J1 F/ B6 U
        RowBox[{
    / D- Z/ t* f6 s! m7 C    "0.608696`", ",", "0.16915`", ",", "0.368148`", ",", "0.393768`", ",", 1 R$ p+ j& o" @6 B: b: j  p
         "0.440559`", ",", "0.995479`", ",", "0.545528`", ",", "0.`", ",", # \/ v6 Y/ M) C0 {! h
         "0.56577`", ",", "0.333039`", ",", "0.380282`"}], "}"}], ",",
    2 `& I8 w, ^% m. B0 i+ u   RowBox[{"{",
    6 }3 D2 s/ u) A7 O/ R- U6 n7 U    RowBox[{9 g6 ~) H5 J3 h! L5 C2 C
        "0.695652`", ",", "0.390454`", ",", "0.186683`", ",", "0.039439`", ",",
    ' ~! s0 V0 }8 s' ?     "0.482517`", ",", "0.497362`", ",", "0.415447`", ",", "0.50856`", ",",
    % A- {  n9 f5 F1 H9 w0 D     "0.`", ",", "0.390754`", ",", "0.56338`"}], "}"}], ",",
    " g) h/ I- c1 [: E; o   RowBox[{"{",
    2 {7 u* S9 h, H8 r1 L5 h    RowBox[{: j/ k: Y6 n# G9 d. c( Y" I- I: r
        "0.73913`", ",", "0.428888`", ",", "0.082728`", ",", "0.070154`", ",",
    ' ?; Z9 O3 R1 [7 p" Q! h     "0.27972`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",",
    4 D. x5 K. o; M* ~" Z     "0.694935`", ",", "0.323944`"}], "}"}]}], "}"}]], "Output",  Q( P9 v0 f$ ?8 S8 v  c& |+ J/ M
    CellChangeTimes->{3.57795879182092*^9, 3.5779604974578943`*^9, , e) K9 X# |9 [
      3.57801214396875*^9}]% y0 b- e; Z  O1 j+ n( Z
    }, Open  ]],. V) f) m# j' P' [8 Y: b  R
    9 b: W1 o9 Q$ j4 B
    Cell[CellGroupData[{
    1 b4 C9 c7 s% _; w& ~# O+ e# b  H1 @+ V
    - o- Z( _# n) e  k7 k2 oCell[BoxData[
    4 y' O/ t8 c  b2 S% t RowBox[{"Array", "[",
    0 H# h8 G3 E, N8 J  RowBox[{"CM", ",", 6 p0 H1 O# f5 g' F  D
       RowBox[{"{", # t2 P+ r" U: V8 _8 j
        RowBox[{"80", ",", "9"}], "}"}]}], "]"}]], "Input",
    4 l4 f* ~' l# f; _# N CellChangeTimes->{{3.577844235859375*^9, 3.577844291953125*^9}}]," L/ _/ K; g% o
    ! ^+ i, u) e6 Q9 D9 u
    Cell[BoxData[. w7 ?& w$ O  Q# w# O
    RowBox[{"{",
    2 r9 d+ d+ D: ~, c  G% g6 U5 D4 K0 w. K4 D  RowBox[{8 i; k( [, }% d0 f3 k' O7 m4 Z
       RowBox[{"{", 6 k- n) I; E& `
        RowBox[{1 J2 F9 v( J8 x  j" y
         RowBox[{"CM", "[",
    ' b& Y5 X" L% l      RowBox[{"1", ",", "1"}], "]"}], ",", ! o$ i8 u) U1 U9 B
         RowBox[{"CM", "[",
    # P$ q3 N, U, t2 g+ U" P      RowBox[{"1", ",", "2"}], "]"}], ",",
    4 z! K( [* B9 l; A. ~1 ^8 z9 a; Q! B     RowBox[{"CM", "[",
    : e; x# S: K, e( F8 g- |# s% u      RowBox[{"1", ",", "3"}], "]"}], ",", 1 B* z0 B1 e' i( B3 g) I6 H
         RowBox[{"CM", "[",
    ( L( Y' g7 T+ _* j$ g. [) x      RowBox[{"1", ",", "4"}], "]"}], ",", 0 x/ k" F& G: ~9 {
         RowBox[{"CM", "[",
    2 Y' `. h- F; y* ^7 K* g2 N! A      RowBox[{"1", ",", "5"}], "]"}], ",",
    2 N3 Y! O1 v2 J0 Y- D* V8 M8 }) P9 I     RowBox[{"CM", "[",
    $ o3 _+ F3 ^9 ~/ x- C      RowBox[{"1", ",", "6"}], "]"}], ",", 7 X9 G3 R! q* Y: t$ [
         RowBox[{"CM", "[", 5 u3 v" X' v/ P- i# u! A, |: I
          RowBox[{"1", ",", "7"}], "]"}], ",", * o- U0 a' c" [# z: B8 ~
         RowBox[{"CM", "[", ! w1 u4 t2 Y4 J) S' y
          RowBox[{"1", ",", "8"}], "]"}], ",", * U3 |( w5 A& |
         RowBox[{"CM", "[", & L  A5 t+ c; Z, s# J
          RowBox[{"1", ",", "9"}], "]"}]}], "}"}], ",",
    ( a) n1 \7 ]6 d$ \2 b  ^6 u   RowBox[{"{",
    9 d% V. `6 G- X2 u; a    RowBox[{
    & c$ j, l% s6 M3 Y% A     RowBox[{"CM", "[", / \5 C( v3 G9 A8 I0 p- X
          RowBox[{"2", ",", "1"}], "]"}], ",",
    , s! }5 Y9 K) [+ a     RowBox[{"CM", "[", 2 e! J* ^5 A( J: l  J# q/ C( {' Z  O
          RowBox[{"2", ",", "2"}], "]"}], ",", & d1 x) U' l8 o
         RowBox[{"CM", "[",
    + l! z' S* O* v8 F* N4 X      RowBox[{"2", ",", "3"}], "]"}], ",", 4 z5 b5 }( h  z2 N  q) w, b
         RowBox[{"CM", "[", & S7 C9 k: T/ Z! R1 K6 D; y' E
          RowBox[{"2", ",", "4"}], "]"}], ",",
    - B- L8 |5 ]6 {8 {5 v2 ]( u" F     RowBox[{"CM", "[",
    - G5 u! R2 N% c" V- u4 Z% ]      RowBox[{"2", ",", "5"}], "]"}], ",", - ?& E, f+ ^* \1 Z) {* y9 ?: D4 X
         RowBox[{"CM", "[", * u- [5 v/ o2 i/ f
          RowBox[{"2", ",", "6"}], "]"}], ",", ! S: w3 f, {' M: X) L3 I9 u8 j1 s
         RowBox[{"CM", "[", 8 o1 h, D+ J# O4 T* i
          RowBox[{"2", ",", "7"}], "]"}], ",",
    : `1 B1 m. M) h) D* i+ c. O     RowBox[{"CM", "[", ' O" J# ^" D2 {/ c
          RowBox[{"2", ",", "8"}], "]"}], ",",
    ( j0 y$ w! t3 h% v" w; T, ~     RowBox[{"CM", "[", 1 b6 ]$ ~+ r1 L, s( I
          RowBox[{"2", ",", "9"}], "]"}]}], "}"}], ",",
    . O8 _+ p' q1 [   RowBox[{"{", - d4 ^  Q. t! M/ f# `7 U
        RowBox[{
    ; _% S- A" a5 Y+ p     RowBox[{"CM", "[", & ?+ X: q& ~& G( B9 `
          RowBox[{"3", ",", "1"}], "]"}], ",", " p# l: U& \- `3 S/ w, Z* H) O2 g; G
         RowBox[{"CM", "[",
    + ~- \0 v, K2 X$ g      RowBox[{"3", ",", "2"}], "]"}], ",",
    ! s* S% s. `& e5 S( W. ?     RowBox[{"CM", "[",
    2 k- N- I3 q$ X3 s7 L      RowBox[{"3", ",", "3"}], "]"}], ",", 2 A4 G' u; _! `" C; f+ U/ q
         RowBox[{"CM", "[",
    0 P/ N8 ]1 N+ v9 N$ B2 c# o2 a      RowBox[{"3", ",", "4"}], "]"}], ",",
    ; m# b) R& w& p4 {; ^! u+ w     RowBox[{"CM", "[", * M* R7 c8 G  c8 r# K  y' X, o  O! e
          RowBox[{"3", ",", "5"}], "]"}], ",",
    - ?& s$ C7 U" ]- r( d  Z8 W# z, P     RowBox[{"CM", "[", $ v) O. u! m5 @: v9 F/ L, s3 y
          RowBox[{"3", ",", "6"}], "]"}], ",",
      @, d' T+ u+ y" u/ T, ~- n     RowBox[{"CM", "[", 4 z' _- O3 B# A
          RowBox[{"3", ",", "7"}], "]"}], ",", ( k% p- V- ~3 ]0 P& [, V- {
         RowBox[{"CM", "[",
    & F6 e* V" \( k/ ^      RowBox[{"3", ",", "8"}], "]"}], ",",
    0 i5 ]/ {2 g0 [     RowBox[{"CM", "[",
    9 H: Q3 q# ]0 |. A! |# r9 ]; q* d      RowBox[{"3", ",", "9"}], "]"}]}], "}"}], ",",
    6 t& A0 ?: s2 u( u   RowBox[{"{",
    ) M. K9 V/ g0 o# f) @    RowBox[{6 J9 c3 _1 q2 `  a! Q
         RowBox[{"CM", "[",
    7 p/ a/ O& ?1 c0 l1 d  `; s$ J      RowBox[{"4", ",", "1"}], "]"}], ",",
    8 P$ _- }! |# Y4 V5 U9 L3 A9 f     RowBox[{"CM", "[", 0 s) X2 E+ o; M# ]( ]4 o) ^: n' q+ U
          RowBox[{"4", ",", "2"}], "]"}], ",",
    + x( q& h5 h1 s8 u( a  R- x     RowBox[{"CM", "[",
    ( x. T7 e$ w' ?+ `) B9 p      RowBox[{"4", ",", "3"}], "]"}], ",", - k3 N: E$ F5 f, v" u! V
         RowBox[{"CM", "[",
    9 ~4 N- h; h+ F( ^; [      RowBox[{"4", ",", "4"}], "]"}], ",", 1 T/ K6 X# V+ a  n, O, L: C2 {$ J
         RowBox[{"CM", "[",
    " I: I. S- {: P6 I      RowBox[{"4", ",", "5"}], "]"}], ",",
    ; T4 T. t$ ]4 m3 X- t: [     RowBox[{"CM", "[",
    9 r  ?: ]/ z* B# ~      RowBox[{"4", ",", "6"}], "]"}], ",", # O$ q9 k/ N' j# {0 o! s$ u; p) [
         RowBox[{"CM", "[",
    3 I/ I; ?5 q3 y4 I' ?      RowBox[{"4", ",", "7"}], "]"}], ",", 9 ]& b# V3 h" n+ P: j
         RowBox[{"CM", "[",
    ! `6 w0 @4 m7 f& y1 Y2 u3 v      RowBox[{"4", ",", "8"}], "]"}], ",", + z% ]8 U: N9 }+ I5 |, _3 O
         RowBox[{"CM", "[", / Q# a  e8 J# b, s- w6 @3 f
          RowBox[{"4", ",", "9"}], "]"}]}], "}"}], ",", 6 X  \5 I  \- q" p3 i
       RowBox[{"{",
    5 O0 J% C. z* ^' x    RowBox[{
    ' h) @: p" @' b7 V! f6 V3 H     RowBox[{"CM", "[", 1 \$ ?8 Z! C; p, I
          RowBox[{"5", ",", "1"}], "]"}], ",",
    7 F7 h* k( O7 ^$ o     RowBox[{"CM", "[",
    & {) F7 e: s! x  w      RowBox[{"5", ",", "2"}], "]"}], ",",
    7 b. ?( S7 M, Q     RowBox[{"CM", "[", - l+ t( x: O0 z. J( ~8 z1 x
          RowBox[{"5", ",", "3"}], "]"}], ",",
    2 ?. A& e2 a0 Q4 V1 {! _  D# h5 x     RowBox[{"CM", "[",
    - Q/ p' l$ H2 F+ N7 `      RowBox[{"5", ",", "4"}], "]"}], ",", & B3 m, Z; E6 k3 Z
         RowBox[{"CM", "[",
    " h* B4 [; S6 M4 ?2 _2 b7 k6 K5 F      RowBox[{"5", ",", "5"}], "]"}], ",",
    2 K; D: J! J8 c4 D/ @0 ~     RowBox[{"CM", "[", ! s: Z8 h) J# k5 ?
          RowBox[{"5", ",", "6"}], "]"}], ",",
    + Z. Q$ N- L# w- ]$ K! P# R     RowBox[{"CM", "[", ( }" b8 e6 b' N, [) ?, c0 c
          RowBox[{"5", ",", "7"}], "]"}], ",",
    0 l+ Y/ Q  N2 G6 g, s) K; V: |     RowBox[{"CM", "[", 4 ^% \) ?( F* e9 |
          RowBox[{"5", ",", "8"}], "]"}], ",",
    0 r9 N, P) J. F6 V1 n     RowBox[{"CM", "[",
    - M0 u7 ?3 a, Z9 G2 p+ a. A/ D, H1 n      RowBox[{"5", ",", "9"}], "]"}]}], "}"}], ",",
    ( K5 W, Y& B3 D" p) w   RowBox[{"{", + S+ v0 `6 `1 |& J- d7 G
        RowBox[{) l& P1 W/ Z2 y5 F1 m' g( j
         RowBox[{"CM", "[", % m% J6 f/ m3 C4 s( p
          RowBox[{"6", ",", "1"}], "]"}], ",", / |% K+ H; X# T, e2 `* ]
         RowBox[{"CM", "[", 7 c4 u1 b$ S9 i1 B) }' I( ]7 P
          RowBox[{"6", ",", "2"}], "]"}], ",",
    4 c3 y3 w; ^4 b     RowBox[{"CM", "[",
    1 d2 r2 S5 L; L" e# F8 {2 d      RowBox[{"6", ",", "3"}], "]"}], ",", 4 X3 X* X; D( y. y& `( R4 i
         RowBox[{"CM", "[",
    0 Q8 B6 h7 i0 l( ~+ n      RowBox[{"6", ",", "4"}], "]"}], ",", 5 M& ~/ J8 |" a+ ~
         RowBox[{"CM", "[",
    ! u& }- L8 g# ^; d! i8 ^      RowBox[{"6", ",", "5"}], "]"}], ",",
    ' f  J& k$ g! I# j$ H* |1 j4 A     RowBox[{"CM", "[",
    * K* n& h6 q( u3 x' l; v* e      RowBox[{"6", ",", "6"}], "]"}], ",",
    % N2 ?$ c4 _: A( D2 C6 }4 h9 ?     RowBox[{"CM", "[",
    ( s0 h' g! g8 }; d8 r* u      RowBox[{"6", ",", "7"}], "]"}], ",",
    ) ^9 ]4 e! B6 X# x6 h, C6 c: A* C* m     RowBox[{"CM", "[", - H; Z3 ?' p. J1 ^
          RowBox[{"6", ",", "8"}], "]"}], ",", , X% h5 k" I- v4 N  l4 d
         RowBox[{"CM", "[",
    ' M- t" M' i0 ]) d      RowBox[{"6", ",", "9"}], "]"}]}], "}"}], ",",
    5 @5 x* n/ k& y5 s# S   RowBox[{"{",
    6 Y+ N! g4 c( e( u2 B& ]& Q5 M" E    RowBox[{* S; C" ~1 t* m( n4 c- W5 H3 A( S
         RowBox[{"CM", "[",
    7 t' a- h7 f5 I, p3 Y6 |      RowBox[{"7", ",", "1"}], "]"}], ",",
    7 l3 C- s  d3 j+ a3 ]% R% O     RowBox[{"CM", "[", & W2 m* m3 N1 D) D3 R) z9 F: G$ H
          RowBox[{"7", ",", "2"}], "]"}], ",", 3 L" H2 K1 ?- Z) R+ a6 `0 z
         RowBox[{"CM", "[",   N1 e8 Y; `8 r& C
          RowBox[{"7", ",", "3"}], "]"}], ",", 0 @, `( \8 v5 b$ B( I4 v/ {
         RowBox[{"CM", "[", : K; N4 R( M5 |; |
          RowBox[{"7", ",", "4"}], "]"}], ",",
    / G& j) D/ w2 l+ v$ v/ y/ T4 M     RowBox[{"CM", "[", / Z7 j" n* X- }9 [
          RowBox[{"7", ",", "5"}], "]"}], ",",
    8 C/ N' u; ], b& ]# p+ r; m     RowBox[{"CM", "[",
    5 t$ q5 ^1 ]2 J4 [) R3 z/ I) _      RowBox[{"7", ",", "6"}], "]"}], ",",
    + D, L) H+ F3 q8 N  e5 l6 D0 E     RowBox[{"CM", "[",
    # M- R. w, Y4 u2 N. m      RowBox[{"7", ",", "7"}], "]"}], ",",
    $ j: c. }; o$ N; Y+ @) p     RowBox[{"CM", "[", ) A1 S5 O5 |# O# E" ]
          RowBox[{"7", ",", "8"}], "]"}], ",", 0 w# ^3 \2 |9 |1 e
         RowBox[{"CM", "[", % r1 A& }4 D! t+ }# |# x' |1 K
          RowBox[{"7", ",", "9"}], "]"}]}], "}"}], ",", . N( F6 K. |0 [/ D1 U
       RowBox[{"{",
    ; ^& A5 \* P8 o3 F    RowBox[{, n* m; U& p3 R0 n" |0 ~* u' F4 U. l
         RowBox[{"CM", "[",
    2 @  O9 X6 \0 z) f      RowBox[{"8", ",", "1"}], "]"}], ",", ) U; u# |) P) U9 s0 i% O0 l) ?
         RowBox[{"CM", "[", ( p. E7 {5 M9 W1 x6 N( W$ X
          RowBox[{"8", ",", "2"}], "]"}], ",",
    $ C9 Y7 D9 j, ^  F# K     RowBox[{"CM", "[", ! Q. Z* v" T  E; _: w. h$ j$ z4 U
          RowBox[{"8", ",", "3"}], "]"}], ",", & E) U4 A: e0 F5 c  O* v
         RowBox[{"CM", "[",
    . n4 D5 e) z1 X$ P9 Q      RowBox[{"8", ",", "4"}], "]"}], ",", ( `9 k3 x3 R, X1 B
         RowBox[{"CM", "[",
      {) z- x; Z/ @) L0 m/ ^8 e      RowBox[{"8", ",", "5"}], "]"}], ",",
    6 n. Q9 k5 o2 y( Y2 m     RowBox[{"CM", "[",
    4 q9 R# o9 T; h9 y' `      RowBox[{"8", ",", "6"}], "]"}], ",",
    $ [! I& i. _- u     RowBox[{"CM", "[",
    - A4 `: d/ F: Z  m4 S6 P      RowBox[{"8", ",", "7"}], "]"}], ",", $ ^/ |2 i7 c+ m2 r
         RowBox[{"CM", "[",
    2 v  d7 U: L3 H  G& l      RowBox[{"8", ",", "8"}], "]"}], ",", + L, H5 E9 N# S5 f, r
         RowBox[{"CM", "[", 3 v: i7 V  B( ^9 M8 k
          RowBox[{"8", ",", "9"}], "]"}]}], "}"}], ",",
    + v7 E8 n0 q6 q; P2 x   RowBox[{"{",
    2 `! s9 p( x: e2 @% F    RowBox[{
    $ T1 S) s, o0 W' f0 d) D0 _  l     RowBox[{"CM", "[", 8 w4 Y! H" w9 `- I. l$ x" [. c  e
          RowBox[{"9", ",", "1"}], "]"}], ",", / R* J' |$ E7 ~
         RowBox[{"CM", "[", : T) B. S. A0 U: ~
          RowBox[{"9", ",", "2"}], "]"}], ",",
    ( v6 k. \( g4 X6 ^     RowBox[{"CM", "[", 9 b# w7 E# f( e7 F1 l# R- k) c) B6 H
          RowBox[{"9", ",", "3"}], "]"}], ",",
    8 |1 o5 O- ^% x4 i: n# a     RowBox[{"CM", "[", " b: S: O, N  Q( |3 c- c* x( g2 Y. V4 W
          RowBox[{"9", ",", "4"}], "]"}], ",",
    5 }. P9 U8 ^% `6 _1 N) t) a; @' Z     RowBox[{"CM", "[",
    0 S; H/ }# i0 r( ?      RowBox[{"9", ",", "5"}], "]"}], ",", ; _3 B6 Y6 Y- R8 n
         RowBox[{"CM", "[", $ ]5 \& q/ h2 Q0 r
          RowBox[{"9", ",", "6"}], "]"}], ",", . F8 Y- O/ P5 Z; w; l: N; s
         RowBox[{"CM", "[",
    0 y  f1 V* ]# \, [      RowBox[{"9", ",", "7"}], "]"}], ",",
    ; i/ E2 A& G. p# K# s* @     RowBox[{"CM", "[",
    % V5 ~  @( M1 X      RowBox[{"9", ",", "8"}], "]"}], ",", " \0 V, @# X4 f. q
         RowBox[{"CM", "[",
    # c% U) ?; g" T. a, M      RowBox[{"9", ",", "9"}], "]"}]}], "}"}], ",", 9 f0 T8 A4 p* ~
       RowBox[{"{", 9 E' K7 J* T# ]9 h. ?' }. J
        RowBox[{6 F) X1 t. u5 d; w9 O) w
         RowBox[{"CM", "[", 2 @3 b& W8 [! ^, H
          RowBox[{"10", ",", "1"}], "]"}], ",",
    & E( z" m4 N6 }! l8 J     RowBox[{"CM", "[", + f  o+ p! O- S4 R
          RowBox[{"10", ",", "2"}], "]"}], ",", ! l$ V" {2 c; e. e$ b  E
         RowBox[{"CM", "[", 5 r+ p& T+ G8 L3 O) @+ O8 Z
          RowBox[{"10", ",", "3"}], "]"}], ",", / P2 q% R% w# A+ q" \9 X+ G3 c
         RowBox[{"CM", "[", 3 _& I% C, A7 Z) J% e. r, y
          RowBox[{"10", ",", "4"}], "]"}], ",",
    6 E! l, z$ j) T( e0 ]6 B- B     RowBox[{"CM", "[",
    " r+ z" w& F2 _8 A! }8 v' w      RowBox[{"10", ",", "5"}], "]"}], ",",
    " A7 [1 D: U; Z0 U  L6 S     RowBox[{"CM", "[",
    - H' V2 o; A  w1 N      RowBox[{"10", ",", "6"}], "]"}], ",",
    8 o$ {% a9 L% m* t/ W/ s& W/ w! Z% G5 p     RowBox[{"CM", "[",
    ! T) d, d0 U9 m- R& b! H1 m4 F      RowBox[{"10", ",", "7"}], "]"}], ",", 7 R0 h+ s9 G1 Z" d; t
         RowBox[{"CM", "[", 5 G, R2 r+ t' e% x
          RowBox[{"10", ",", "8"}], "]"}], ",",
    $ T; _% M# g! k6 _0 ]     RowBox[{"CM", "[",
    1 B" i1 t' {/ _$ ~  L      RowBox[{"10", ",", "9"}], "]"}]}], "}"}], ",",
    0 v9 A) r" D5 K1 P% F* ~' R  U   RowBox[{"{", " v) M+ A: T; V& u  X
        RowBox[{% c% r( [5 S9 |0 l& z$ Q
         RowBox[{"CM", "[",
    $ \' x( W, o& M9 O! }5 a0 W  {. q      RowBox[{"11", ",", "1"}], "]"}], ",",
    ) m+ B' h/ r* N4 F2 g0 g9 u1 x/ U+ b     RowBox[{"CM", "[", ' R# r  Z  b, i# ?
          RowBox[{"11", ",", "2"}], "]"}], ",", " t( c% R' l/ \' e5 e
         RowBox[{"CM", "[",
    " _$ p8 W- H5 V# H      RowBox[{"11", ",", "3"}], "]"}], ",", , t. p; M4 W9 J/ I% t
         RowBox[{"CM", "[",
    ) x5 G: J8 x4 O2 O0 Y0 j" j2 W5 i2 _1 n6 h      RowBox[{"11", ",", "4"}], "]"}], ",",
    9 l9 a8 T* J: q6 p+ \     RowBox[{"CM", "[", : z9 K9 u$ i' z, d& N4 i
          RowBox[{"11", ",", "5"}], "]"}], ",",
    4 O) g( z* [) ^     RowBox[{"CM", "[", 3 r5 C! u, u# R  {+ Y
          RowBox[{"11", ",", "6"}], "]"}], ",", 2 I  M/ Q' }! a% c% y
         RowBox[{"CM", "[",
    ) @: w3 d% b0 `$ a" l$ [" {      RowBox[{"11", ",", "7"}], "]"}], ",", ! v  U( W9 w& z0 Z
         RowBox[{"CM", "[", ! T1 |% }) T, i% f
          RowBox[{"11", ",", "8"}], "]"}], ",", 5 `( U( }( T- x. H" ^
         RowBox[{"CM", "[",
    ) ?9 Q9 j& w+ ^4 N$ g5 f      RowBox[{"11", ",", "9"}], "]"}]}], "}"}], ",",
    7 Q" `2 h9 d0 j+ ~   RowBox[{"{", # l( |7 T9 L; Q
        RowBox[{! y/ n6 _9 u) [6 N' N
         RowBox[{"CM", "[",
    2 a0 N8 G, N3 x/ b7 \5 E      RowBox[{"12", ",", "1"}], "]"}], ",",
    % x- F( N9 K$ j9 D1 o5 y     RowBox[{"CM", "[", ' r+ A% a: y% Z0 U4 R
          RowBox[{"12", ",", "2"}], "]"}], ",", 5 a/ p' j8 ?  `& Q
         RowBox[{"CM", "[",
    ( ~8 d2 `1 f" ~( ~0 {8 Q5 S      RowBox[{"12", ",", "3"}], "]"}], ",", $ ]  X) t5 e' Z
         RowBox[{"CM", "[",
      J& m& s7 t+ {/ S      RowBox[{"12", ",", "4"}], "]"}], ",",
    " ?7 u% o4 m: V+ r     RowBox[{"CM", "[",
    6 o9 o8 m( n/ K5 q# h9 `+ ?      RowBox[{"12", ",", "5"}], "]"}], ",", 1 l3 P& o  z; P+ |5 Q
         RowBox[{"CM", "[",
    ( t3 ~% [9 L2 I: I  {      RowBox[{"12", ",", "6"}], "]"}], ",",
    " K" k4 D6 M! w     RowBox[{"CM", "[",
    9 ]* [. b1 G+ x      RowBox[{"12", ",", "7"}], "]"}], ",",
    8 W9 z! r9 E' w+ I     RowBox[{"CM", "[", 6 G; ]/ m  ~; M5 d" O; s( j/ A
          RowBox[{"12", ",", "8"}], "]"}], ",", & U/ R( ?. J1 K! v
         RowBox[{"CM", "[",
    # @" q: Z1 k3 z2 i      RowBox[{"12", ",", "9"}], "]"}]}], "}"}], ",",
    - z; k5 c1 b0 H. @7 x2 Y   RowBox[{"{",
    3 x) @8 L( X7 B" |    RowBox[{' R, v4 R. U7 y# e) [$ N
         RowBox[{"CM", "[",
    " n& n) y+ z- `0 K6 D$ Z      RowBox[{"13", ",", "1"}], "]"}], ",", % R4 K  d. K* B; T, V* B
         RowBox[{"CM", "[",
    0 E/ b% O8 b# D- B6 G' Q% A. }      RowBox[{"13", ",", "2"}], "]"}], ",", 9 W, V: B8 }, z' F6 K
         RowBox[{"CM", "[", 6 r7 |& H" M; L0 Q" o! |
          RowBox[{"13", ",", "3"}], "]"}], ",",
    ' G5 J+ C* a8 u     RowBox[{"CM", "[",
    . T& N5 q+ h! n3 l5 ?9 A# R      RowBox[{"13", ",", "4"}], "]"}], ",",
    2 w. s9 n& w6 i1 B( [- G5 r& b' a9 y     RowBox[{"CM", "[", 4 h9 T9 A. M& j( j
          RowBox[{"13", ",", "5"}], "]"}], ",", & m* H) ^2 M" l( _" z! |
         RowBox[{"CM", "[", 1 X) {' O% B; b) k
          RowBox[{"13", ",", "6"}], "]"}], ",",
    ; c) B" d" H' i- M3 N" ?. `  D     RowBox[{"CM", "[", 7 C% \4 a) i/ k. V, w$ A4 A7 ]3 Y
          RowBox[{"13", ",", "7"}], "]"}], ",", # H7 a5 [; ^  O, l+ ?0 ~
         RowBox[{"CM", "[",
    / O7 p0 p5 X7 z: S+ Y7 ?      RowBox[{"13", ",", "8"}], "]"}], ",", 6 y! G# x) F5 y& U
         RowBox[{"CM", "[",
    7 x; L8 l  l8 G) M7 e& I- ?: f4 c      RowBox[{"13", ",", "9"}], "]"}]}], "}"}], ",", 8 ~1 d" |3 g. p' v  W" f! M
       RowBox[{"{",   N6 v7 }4 t, s5 j* z6 T2 B
        RowBox[{& l* }' [- n; f6 ~7 l6 g; r6 H
         RowBox[{"CM", "[",
    . D8 Y- h" ~4 F+ X" V$ h7 m  H- X& T      RowBox[{"14", ",", "1"}], "]"}], ",",
    ; [+ c; l1 }/ R8 l2 d     RowBox[{"CM", "[",   _8 i" ]( L4 H& k  l. Q/ B! \4 {. p
          RowBox[{"14", ",", "2"}], "]"}], ",", $ Q) \; B$ N  O
         RowBox[{"CM", "[", 9 f: O- H/ C# K7 }- S
          RowBox[{"14", ",", "3"}], "]"}], ",", ! `7 ?  o) y9 v+ T
         RowBox[{"CM", "[",
    ) b. w- R" f* t; ]  D- o) V      RowBox[{"14", ",", "4"}], "]"}], ",",
    . M# o- F5 s$ c5 d: L" o# Z) s     RowBox[{"CM", "[",
    1 n6 ^8 U+ _$ h! o- ~      RowBox[{"14", ",", "5"}], "]"}], ",", 0 J# h3 ~2 c6 R1 g  J9 A0 {& H" ?+ j
         RowBox[{"CM", "[", 1 _- M' s! H' h; _3 E! [' m
          RowBox[{"14", ",", "6"}], "]"}], ",",
    9 v1 a+ h9 u; S- o  V, L' b     RowBox[{"CM", "[",
    ( |: n& _. |) L. V/ q+ T      RowBox[{"14", ",", "7"}], "]"}], ",", - V4 s5 [# ^" r# b8 |; d5 f  L# i+ k
         RowBox[{"CM", "[",
    7 T5 J9 h: P$ O% F7 q0 U      RowBox[{"14", ",", "8"}], "]"}], ",", # ~8 o: E7 E8 D' B
         RowBox[{"CM", "[",
    ; D) `/ `6 J8 U      RowBox[{"14", ",", "9"}], "]"}]}], "}"}], ",",
    3 u8 Z# L/ |$ H* O: T   RowBox[{"{",
    8 G& v. u0 e# J; L% u( d2 p    RowBox[{4 M1 l  U9 p. Y, }7 o
         RowBox[{"CM", "[", ! v- _" B2 O5 L5 w) }
          RowBox[{"15", ",", "1"}], "]"}], ",", 9 ^) t/ e3 \# E( I
         RowBox[{"CM", "[", , w2 P' ~( \  A* K
          RowBox[{"15", ",", "2"}], "]"}], ",",
    5 b6 A; i' I# p7 X! n$ Q     RowBox[{"CM", "[", 7 E! C8 @6 [; g. C
          RowBox[{"15", ",", "3"}], "]"}], ",", : Y4 l* D  p7 q7 B" X4 H
         RowBox[{"CM", "[",
    0 a! r1 l: D& G% n      RowBox[{"15", ",", "4"}], "]"}], ",",
      z3 i$ f" C" W4 x2 h     RowBox[{"CM", "[",
    ( }2 R+ D* j. _1 q8 \5 U      RowBox[{"15", ",", "5"}], "]"}], ",",
    2 `/ i: [$ S" Y' ]' h3 K: L; U0 V     RowBox[{"CM", "[", / J8 a6 B# `' P4 ~: N1 F
          RowBox[{"15", ",", "6"}], "]"}], ",", ( Q" u2 N  o6 e/ k1 j1 f$ w5 ?
         RowBox[{"CM", "[",
    0 G- h' s* I0 B. i' A7 p2 B      RowBox[{"15", ",", "7"}], "]"}], ",",
    ' C0 K. f4 i/ v     RowBox[{"CM", "[",
    . k6 B1 F' x" k# z6 S4 b3 g      RowBox[{"15", ",", "8"}], "]"}], ",", / f% y7 f6 T- z% V+ E" y0 ~
         RowBox[{"CM", "[", - R5 d1 M0 F6 z! r$ W
          RowBox[{"15", ",", "9"}], "]"}]}], "}"}], ",", * y- F, P" ~6 A# W: H: P. y
       RowBox[{"{",
    7 }/ _: c4 P: s, M9 U. F" Y- b    RowBox[{7 e* ^/ D$ j# e$ k- ?6 C
         RowBox[{"CM", "[",
    + {7 A; K  F4 `( y8 l2 I3 |) ^      RowBox[{"16", ",", "1"}], "]"}], ",",
    ! X2 O5 g6 B) F+ X; B+ R) D     RowBox[{"CM", "[",
    & g8 V$ h$ ]# U; V      RowBox[{"16", ",", "2"}], "]"}], ",", 8 X! F; i& F% p% Y( _! z; N- G
         RowBox[{"CM", "[", 4 I) i4 X9 N5 a: c! K+ N6 [
          RowBox[{"16", ",", "3"}], "]"}], ",", # O; t  _4 D4 o( J: X
         RowBox[{"CM", "[", 9 }* r* w. ~6 R, @: V
          RowBox[{"16", ",", "4"}], "]"}], ",", 7 v2 I. ~; }; @6 x# o$ v4 ~) @
         RowBox[{"CM", "[", , G8 A; C/ B/ K7 P9 |- j$ `
          RowBox[{"16", ",", "5"}], "]"}], ",", : e$ i# B/ i( \; `) `
         RowBox[{"CM", "[",
    4 g" {4 t' d: o4 R: r5 H( \$ x      RowBox[{"16", ",", "6"}], "]"}], ",", , a% q/ M5 z1 _. c
         RowBox[{"CM", "[",
    % r( s0 H# s& H1 q  ?; s3 R" F; {      RowBox[{"16", ",", "7"}], "]"}], ",",
    . }! K  @) m* w; Q     RowBox[{"CM", "[", ' _! ]2 X- c% ~4 l$ M; C
          RowBox[{"16", ",", "8"}], "]"}], ",", 3 ~# }& c" s; {
         RowBox[{"CM", "[",
    8 t. Y- ~  s9 D" h' ~& g      RowBox[{"16", ",", "9"}], "]"}]}], "}"}], ",",
    ; C! V+ w: ]$ c  p   RowBox[{"{", 9 E2 a0 I1 h6 W" l; w+ a
        RowBox[{
    # A  h- b: ?. v) X     RowBox[{"CM", "[",
    # B7 U( W8 [% U      RowBox[{"17", ",", "1"}], "]"}], ",",
    3 z' G4 m1 W1 U6 o* r. c% h( o  X) k     RowBox[{"CM", "[", : f7 w- M" s1 y+ ^, M
          RowBox[{"17", ",", "2"}], "]"}], ",", $ H7 F$ Z- p; K1 K" x2 F
         RowBox[{"CM", "[",
    # V5 R; u/ J0 s$ _6 s) [' ]      RowBox[{"17", ",", "3"}], "]"}], ",", - p3 |4 \0 f' U9 s8 i8 H
         RowBox[{"CM", "[", 0 V& E* q/ K6 q, w
          RowBox[{"17", ",", "4"}], "]"}], ",",
    . u' R( Q( _; L; I     RowBox[{"CM", "[", ' I! e8 \: E+ m4 N: ^' x
          RowBox[{"17", ",", "5"}], "]"}], ",", , n0 J; h  E* Q3 p9 p% q; f
         RowBox[{"CM", "[", ' B. U0 n; G( y9 ~
          RowBox[{"17", ",", "6"}], "]"}], ",", ' C0 l7 E% w6 B% p9 H, u
         RowBox[{"CM", "[", 8 c1 E; O7 I( f5 c& {
          RowBox[{"17", ",", "7"}], "]"}], ",", $ W1 U; M! j! {; I! ]
         RowBox[{"CM", "[", 0 ?, @# B( @" i+ d0 Q8 E1 H- r
          RowBox[{"17", ",", "8"}], "]"}], ",",
    5 E( `, k  b& j     RowBox[{"CM", "[",
    % f0 Q) I6 @$ H      RowBox[{"17", ",", "9"}], "]"}]}], "}"}], ",", ' m' F( z# {3 ], c/ r5 Q
       RowBox[{"{", 6 {- a( f) E- U& W$ J; d- A
        RowBox[{  A- v, z* i/ b; D6 n& d3 ~1 ?1 v4 M! ^
         RowBox[{"CM", "[", % m6 {$ F  i& `& Z6 x! G
          RowBox[{"18", ",", "1"}], "]"}], ",", 6 I2 e: ~+ @! {: L0 T- R! y% `
         RowBox[{"CM", "[",
    9 u- p4 L! D$ @      RowBox[{"18", ",", "2"}], "]"}], ",",
    + t" V" V; B) f" H) X0 a" ]# D     RowBox[{"CM", "[",
    5 A, R! n! D# x9 s; x: S0 _9 a$ Y4 P      RowBox[{"18", ",", "3"}], "]"}], ",", : l9 _* I1 j2 Q
         RowBox[{"CM", "[", & I1 g0 d) a. M) n: g9 v; u1 o5 ^
          RowBox[{"18", ",", "4"}], "]"}], ",",
    7 t2 |6 u! d0 P8 [" P     RowBox[{"CM", "[",
    6 ?5 |! O2 K2 r' V9 w0 c$ a$ Y      RowBox[{"18", ",", "5"}], "]"}], ",",
    7 R/ j1 h$ O, J4 C, r9 s     RowBox[{"CM", "[", 1 c! }1 w$ h3 {1 ^
          RowBox[{"18", ",", "6"}], "]"}], ",", 2 p1 Z3 _1 u$ N& U
         RowBox[{"CM", "[", 8 m* i( [& A  ^( j) ]
          RowBox[{"18", ",", "7"}], "]"}], ",", 4 C, p7 t7 o+ h* ~
         RowBox[{"CM", "[",
    ! N5 \: h: U9 E+ S. `3 R% R5 Z      RowBox[{"18", ",", "8"}], "]"}], ",",
    0 C3 i: C' ?4 `7 S     RowBox[{"CM", "[",
    $ G) m# N) j& m& ?( r      RowBox[{"18", ",", "9"}], "]"}]}], "}"}], ",", : ]$ f( R& [; D/ E
       RowBox[{"{",
    $ O7 ^8 s: Y8 t" o    RowBox[{; ~1 r* t& [0 v
         RowBox[{"CM", "[", + X1 h) {  B8 o
          RowBox[{"19", ",", "1"}], "]"}], ",",
    7 }- o/ A5 p0 i5 x     RowBox[{"CM", "[",
    ) ^6 ~  o7 ^6 c5 A* F. f: L- }( o$ E      RowBox[{"19", ",", "2"}], "]"}], ",", 0 N, w1 }1 Z( X$ T# B, G
         RowBox[{"CM", "[",
    9 [' l2 k* J1 U+ d      RowBox[{"19", ",", "3"}], "]"}], ",", % p5 Z$ p' q/ F* ?" l7 M5 m
         RowBox[{"CM", "[",
    ; {( D4 U. _3 `0 D      RowBox[{"19", ",", "4"}], "]"}], ",", ; g# O% h0 D# z% J, a
         RowBox[{"CM", "[",
    ) o4 A  \* {3 S% u% Q      RowBox[{"19", ",", "5"}], "]"}], ",",
    / m& t% t" `9 M6 [# C( @% C     RowBox[{"CM", "[",
    : @3 V9 W8 G; r# Z      RowBox[{"19", ",", "6"}], "]"}], ",",
    1 W2 J9 {  T+ l/ _2 j7 n( a1 @     RowBox[{"CM", "[",
    2 Y5 O; X* b1 {" v; s      RowBox[{"19", ",", "7"}], "]"}], ",",
    # ?9 U! ^+ a) D% S9 I2 p     RowBox[{"CM", "[",
    , S; o+ q/ W# d2 ~% s      RowBox[{"19", ",", "8"}], "]"}], ",",
    $ r' I$ G* G# T: q     RowBox[{"CM", "[",
    8 }% S/ U/ X6 e( n      RowBox[{"19", ",", "9"}], "]"}]}], "}"}], ",",
    1 I0 O3 ]) x4 d2 G$ a   RowBox[{"{",
    " n2 ]! T# \5 ]+ l; }- d# o0 P9 f' _. ~0 X    RowBox[{( D* e0 r; y2 s' D; {
         RowBox[{"CM", "[", % [# X% s9 U, Z. m/ W9 n" T4 p
          RowBox[{"20", ",", "1"}], "]"}], ",",
    7 Z0 S6 ^% B% F     RowBox[{"CM", "[",
    : l) k& l/ X3 b. H5 t) ?      RowBox[{"20", ",", "2"}], "]"}], ",", 9 y0 z4 |5 A. ^2 M4 T
         RowBox[{"CM", "[",
    ) y4 d; _: A- e, y# ^9 z% i      RowBox[{"20", ",", "3"}], "]"}], ",", : E( W! ^! q  [* R% ^
         RowBox[{"CM", "[",
    ( f6 b  Y+ [; z* R6 ?- b      RowBox[{"20", ",", "4"}], "]"}], ",",
      ^0 H5 Z. [6 b. E     RowBox[{"CM", "[",
    , |( m8 S$ i3 p" N2 n      RowBox[{"20", ",", "5"}], "]"}], ",", " k; |; t0 _. p) h% x
         RowBox[{"CM", "[", 1 g4 t: T* M2 `4 d: h
          RowBox[{"20", ",", "6"}], "]"}], ",",
    # n0 R2 `0 @- Z: `     RowBox[{"CM", "[", 5 _9 h! V: {: F" t: H
          RowBox[{"20", ",", "7"}], "]"}], ",", 5 `( C- g8 ^- @
         RowBox[{"CM", "[",
    9 A. ~4 O: r2 v( O3 j% j      RowBox[{"20", ",", "8"}], "]"}], ",", + F1 s0 A& t( U# A; X; n
         RowBox[{"CM", "[",
    : L. z4 p9 V) S% c      RowBox[{"20", ",", "9"}], "]"}]}], "}"}], ",", 3 z1 p) H3 ?3 ?& h4 G( u' @0 [
       RowBox[{"{", ) g5 o, l2 R6 L, D9 }8 O6 d  @: O
        RowBox[{
    : v% B4 v- G' v& g/ {  c     RowBox[{"CM", "[", * e  M$ n* M+ }# ?2 E$ V4 I2 |
          RowBox[{"21", ",", "1"}], "]"}], ",", 3 y3 S7 F/ d' J: f  T( H4 v
         RowBox[{"CM", "[",
    5 u6 O4 d, k/ @8 ]      RowBox[{"21", ",", "2"}], "]"}], ",",
    / M4 o/ o. O) C: o2 q8 d7 {; q. j( i     RowBox[{"CM", "[", ( \9 o7 c5 ~$ r' e: d
          RowBox[{"21", ",", "3"}], "]"}], ",",
    5 U# P: G2 ~6 H* L     RowBox[{"CM", "[", - Z/ k: f* U8 P. m
          RowBox[{"21", ",", "4"}], "]"}], ",",
    . [1 K5 d* O8 t; f     RowBox[{"CM", "[", " k2 p2 H) r  B
          RowBox[{"21", ",", "5"}], "]"}], ",",
    1 c/ h  n' [0 ^     RowBox[{"CM", "[", # B2 e2 M7 z- W0 u) G
          RowBox[{"21", ",", "6"}], "]"}], ",",
    - e: u6 n$ {& p3 O. N0 z     RowBox[{"CM", "[", ! P6 s+ o  }' d& x
          RowBox[{"21", ",", "7"}], "]"}], ",", 8 u% |4 x* S& O8 [
         RowBox[{"CM", "[", 5 l. S/ e9 O3 X4 P6 [7 J  ]
          RowBox[{"21", ",", "8"}], "]"}], ",", 2 v2 e) p% c$ a- c/ [( _
         RowBox[{"CM", "[", # F5 |- h3 F: l8 z6 y
          RowBox[{"21", ",", "9"}], "]"}]}], "}"}], ",",
    6 L" C# H. Y$ J   RowBox[{"{", + a: s# V3 |4 z" f5 r
        RowBox[{+ U) Q/ m" D6 H1 K5 `/ i+ j
         RowBox[{"CM", "[", 3 f. c7 f% \7 J; X, H$ ~* F
          RowBox[{"22", ",", "1"}], "]"}], ",", : j3 d+ C7 `# ]- y1 ^
         RowBox[{"CM", "[", ! c( `/ {, \& H9 x( B" w; |
          RowBox[{"22", ",", "2"}], "]"}], ",",
    0 W7 v  `1 A: o1 s7 @* L5 Q; i     RowBox[{"CM", "[", 2 g" a% p# p: w0 J! ?$ b
          RowBox[{"22", ",", "3"}], "]"}], ",",
    4 S. Q: y9 k$ }2 D- D* H     RowBox[{"CM", "[", 2 ~4 [0 W3 Q$ J2 L2 n$ G
          RowBox[{"22", ",", "4"}], "]"}], ",", 8 S8 E  y! F" U0 ]/ S- v% Y
         RowBox[{"CM", "[",
    9 y4 q1 i) o! K$ K: y8 a( s8 C- P      RowBox[{"22", ",", "5"}], "]"}], ",", 0 x- A% h/ @3 R: h+ [
         RowBox[{"CM", "[", 9 X+ {) m7 c& `
          RowBox[{"22", ",", "6"}], "]"}], ",",
    1 x; b: b; H. N     RowBox[{"CM", "[", ' x" h& a4 U3 E, ^7 Q0 P
          RowBox[{"22", ",", "7"}], "]"}], ",",
    7 _3 ~) o# ~7 @; D5 o5 w     RowBox[{"CM", "[", . J7 L5 K( X' j! s4 B
          RowBox[{"22", ",", "8"}], "]"}], ",",
    ' M, R  l5 m, M) j, C     RowBox[{"CM", "[", + J( p  X0 c& o. ?2 [5 f
          RowBox[{"22", ",", "9"}], "]"}]}], "}"}], ",",
    2 r6 \/ `# f8 w0 Y' j   RowBox[{"{",
    1 @' d9 N2 g6 ^( I  c2 x: i    RowBox[{: F% q5 x- B! i7 U/ R
         RowBox[{"CM", "[",
    1 ?. a( m& o) J) J4 V      RowBox[{"23", ",", "1"}], "]"}], ",",
    / T" U% d2 G* _, L. c     RowBox[{"CM", "[",
    . E( t, N8 F4 M0 m) U      RowBox[{"23", ",", "2"}], "]"}], ",", - X! B6 e+ l0 n' E7 u2 z. o6 k& Z$ P
         RowBox[{"CM", "[",
    ' g* b0 U. H/ N$ W5 s5 p      RowBox[{"23", ",", "3"}], "]"}], ",", ( w0 Q( U' s6 \' Y
         RowBox[{"CM", "[", ' H" R+ b, }" y8 |( \+ f% C
          RowBox[{"23", ",", "4"}], "]"}], ",",
    ' D9 k7 t. d  [. z7 n$ |; p     RowBox[{"CM", "[",
    , [7 b' b1 _; V      RowBox[{"23", ",", "5"}], "]"}], ",", . {+ ^9 e0 N# ^+ v
         RowBox[{"CM", "[", 2 s. u) Q' W3 ^7 P3 d& _# G: i% i
          RowBox[{"23", ",", "6"}], "]"}], ",",
    - ~8 a* c( n+ z" I* e     RowBox[{"CM", "[",
    ( Y1 [, o  X& {1 n# B      RowBox[{"23", ",", "7"}], "]"}], ",",
    5 Z8 L8 ]; S( ]/ `( F     RowBox[{"CM", "[",
    / [) g+ E1 g* F: S) X  n      RowBox[{"23", ",", "8"}], "]"}], ",",
    / w8 p( V) y9 |! L0 Y  c     RowBox[{"CM", "[",
      g( |- D' X7 C! s' \+ a      RowBox[{"23", ",", "9"}], "]"}]}], "}"}], ",",
    1 [5 ?: S6 v% ^- h3 Y   RowBox[{"{", ; l) \( ~. q: {4 D# G9 ]
        RowBox[{8 D4 r$ O1 H- I2 s5 s6 b
         RowBox[{"CM", "[", 9 E! I3 `9 U$ v) C
          RowBox[{"24", ",", "1"}], "]"}], ",",
    / j# h( Y: f7 V; y7 B     RowBox[{"CM", "[", ( w$ |2 V+ P+ _  T
          RowBox[{"24", ",", "2"}], "]"}], ",", 3 d* |4 |1 z" |$ K9 h: u- x
         RowBox[{"CM", "[",
    6 x% V. p6 |" H" w7 y      RowBox[{"24", ",", "3"}], "]"}], ",", 7 L' i! n5 h' a
         RowBox[{"CM", "[", 8 f, K7 T( K- `$ }+ p
          RowBox[{"24", ",", "4"}], "]"}], ",",
    ! t; _1 Q' L% r% `+ \2 _     RowBox[{"CM", "[", : _+ u2 |2 a7 T- x" P$ ]
          RowBox[{"24", ",", "5"}], "]"}], ",",
      Y( n0 `7 o# P! j. c# h9 E     RowBox[{"CM", "[", , m! C8 A" ~$ X1 y' L
          RowBox[{"24", ",", "6"}], "]"}], ",", % ?+ K0 L5 `. C) _
         RowBox[{"CM", "[",
    1 p7 S, C/ L% B0 g6 n& B" W      RowBox[{"24", ",", "7"}], "]"}], ",",
    " r& O( C' @" f     RowBox[{"CM", "[",
    3 R) X5 W6 }$ X1 X7 _7 M! y) i' f3 q      RowBox[{"24", ",", "8"}], "]"}], ",",
    ( o! g: B2 o1 R     RowBox[{"CM", "[", 1 W6 }/ [- `; s: U
          RowBox[{"24", ",", "9"}], "]"}]}], "}"}], ",", / @6 X. V" `4 ?3 j
       RowBox[{"{", / I& Q5 F& W( a$ Q) c  R3 e& `
        RowBox[{
    7 {' Y8 {; p1 T  j" X! X3 m     RowBox[{"CM", "[",
    ) T& r0 R3 j* {1 H  Z# f      RowBox[{"25", ",", "1"}], "]"}], ",",
    0 P3 _1 e% s7 `. `6 N     RowBox[{"CM", "[", * O9 ]; w; I; b. y
          RowBox[{"25", ",", "2"}], "]"}], ",", # c% D. ^/ M- l  K& Q. Y! Y, q' Y  z
         RowBox[{"CM", "[", " ~4 r7 f: w  T( W9 ~
          RowBox[{"25", ",", "3"}], "]"}], ",", 4 \7 m  ?9 a" o5 [3 `8 r
         RowBox[{"CM", "[", ! S" U, \" [8 O) T' _- g
          RowBox[{"25", ",", "4"}], "]"}], ",",
    5 N& x, z' f. Z4 a2 _8 ]     RowBox[{"CM", "[",
    ! @# i3 ?& B' Y+ J7 _& w      RowBox[{"25", ",", "5"}], "]"}], ",",
    8 V# p1 W% x  ~: }$ q  h3 l     RowBox[{"CM", "[",
    7 K1 o: G) P2 `4 M" v3 [      RowBox[{"25", ",", "6"}], "]"}], ",", / r6 q) }$ `1 e
         RowBox[{"CM", "[",
    & c& B0 w, B& T+ ?( a      RowBox[{"25", ",", "7"}], "]"}], ",",
    4 d. R7 g/ \* p7 e# n     RowBox[{"CM", "[",
    6 I. w$ d/ ?0 n6 S6 `) f      RowBox[{"25", ",", "8"}], "]"}], ",",
    8 A1 m3 q3 [- r' [. ?     RowBox[{"CM", "[",
    5 B+ c! o: P+ s5 |  U+ Q' w- N      RowBox[{"25", ",", "9"}], "]"}]}], "}"}], ",",
    $ @8 k) D/ Z$ w% N3 y% q" A   RowBox[{"{", # |  m" I+ z+ \5 y/ r4 O$ l9 S
        RowBox[{0 k5 J7 i( C7 _$ q% y, F2 p
         RowBox[{"CM", "[",
    4 Z% l( c* n8 r$ h- B! I  `! c      RowBox[{"26", ",", "1"}], "]"}], ",", 0 @8 k; Q/ v; r7 {1 H* ]
         RowBox[{"CM", "[", 3 V1 W. n* n; L. S6 t* c" R# }! M
          RowBox[{"26", ",", "2"}], "]"}], ",", ) r+ c. t7 w9 x1 v$ U% v" u5 w8 j6 w
         RowBox[{"CM", "[",
    " Q5 q* w# a2 ^2 ?4 K1 I1 q) q      RowBox[{"26", ",", "3"}], "]"}], ",",
    - {7 E' S' I+ D7 @7 N     RowBox[{"CM", "[", , I/ }6 \  n2 J+ H' o2 I/ U
          RowBox[{"26", ",", "4"}], "]"}], ",",
    # W0 A. e, S& \* t0 K+ K3 P; P* i     RowBox[{"CM", "[", * `: M( u& P9 W1 |7 t/ `
          RowBox[{"26", ",", "5"}], "]"}], ",",
    : x' x& G3 b5 u& B& `; G$ b0 G! L     RowBox[{"CM", "[",
    & x5 i$ a$ W5 U7 w9 d      RowBox[{"26", ",", "6"}], "]"}], ",", 9 R0 n9 L4 T, H4 H4 l; G
         RowBox[{"CM", "[", ) E/ d, Y2 ~" h: u9 Y+ u
          RowBox[{"26", ",", "7"}], "]"}], ",",
    6 f5 y) @/ w  X$ u- U     RowBox[{"CM", "[", ' u4 w! Q  y6 `, c. I; r
          RowBox[{"26", ",", "8"}], "]"}], ",", " h0 F& D+ d0 W5 K) R0 A
         RowBox[{"CM", "[", * v) ]; t, J4 `/ n/ z1 T: K
          RowBox[{"26", ",", "9"}], "]"}]}], "}"}], ",",
    8 \/ j- ]9 j4 |   RowBox[{"{",
    ! X0 b* @$ i  n$ H# t2 t6 ^, A6 o    RowBox[{) P& w% _$ j' {- j0 b% R# y
         RowBox[{"CM", "[",
    8 X$ Z  k) |' R5 c      RowBox[{"27", ",", "1"}], "]"}], ",", . G  o0 w' W& j- b+ V- r! l
         RowBox[{"CM", "[",
      [  L0 {2 J5 D4 Z1 c* u$ }      RowBox[{"27", ",", "2"}], "]"}], ",", ( f1 T' Y# E* t
         RowBox[{"CM", "[",
    ! D0 @+ e3 q8 N7 e/ M% E      RowBox[{"27", ",", "3"}], "]"}], ",",
    0 _4 S1 i4 F0 S' F     RowBox[{"CM", "[", : E' m0 u. U  Z8 o/ [, j
          RowBox[{"27", ",", "4"}], "]"}], ",", % Z' K  ~3 x/ i. B
         RowBox[{"CM", "[",
    ) q' [6 n7 L% p  E2 y; C      RowBox[{"27", ",", "5"}], "]"}], ",",
    3 F/ @; [4 l2 G- i8 h& H! f     RowBox[{"CM", "[",
    ; u' H% d) h6 Q! N7 d" w' I( Z      RowBox[{"27", ",", "6"}], "]"}], ",", $ L3 V& q& K0 @3 }% k
         RowBox[{"CM", "[",
    ; L: y8 `" K! c1 X      RowBox[{"27", ",", "7"}], "]"}], ",",
    % i, D( v" `# g8 }0 L7 p! l     RowBox[{"CM", "[", % M! x1 x' r. @( u: J: M
          RowBox[{"27", ",", "8"}], "]"}], ",", / u8 x5 d& ~  Z1 z
         RowBox[{"CM", "[",
    * p9 d1 L4 ]' Y      RowBox[{"27", ",", "9"}], "]"}]}], "}"}], ",", 7 ?! C6 H! D9 ?' V  I
       RowBox[{"{",
    ' |& k2 v; q+ V7 c( S, u& c    RowBox[{/ m  Q/ f/ S3 e( F+ c* V* a
         RowBox[{"CM", "[",
    7 V! d- B. G9 [, w1 b" z- m4 T5 A* @      RowBox[{"28", ",", "1"}], "]"}], ",", , P& i; i! C# v8 s+ G6 ]
         RowBox[{"CM", "[",
    1 J" T2 c0 t' p* R      RowBox[{"28", ",", "2"}], "]"}], ",",
    $ l: {0 Q) S5 U2 W# k* K, W$ k$ Z     RowBox[{"CM", "[", 9 E* z8 D5 f5 [2 P* k$ z
          RowBox[{"28", ",", "3"}], "]"}], ",",
    & }. i5 G8 O+ r/ \0 ~$ E) A  h     RowBox[{"CM", "[", 9 [* t/ R# O" y& V2 x  W( M
          RowBox[{"28", ",", "4"}], "]"}], ",", 6 j/ c+ r: `3 _7 |8 O4 l% n
         RowBox[{"CM", "[",
    5 U  O/ d+ A$ e+ a2 e5 d; B2 ]      RowBox[{"28", ",", "5"}], "]"}], ",", # T. v3 R, I5 M6 O
         RowBox[{"CM", "[",
    % F' O8 @2 {% S8 \. k: J1 J      RowBox[{"28", ",", "6"}], "]"}], ",", " k2 p. l/ I8 l' H. w5 G
         RowBox[{"CM", "[",
    ) `2 ~, O; H( |2 n      RowBox[{"28", ",", "7"}], "]"}], ",", 4 `& Y9 e. D$ Y4 Q/ R8 k: y3 j
         RowBox[{"CM", "[",   D& P/ U- s. D# c
          RowBox[{"28", ",", "8"}], "]"}], ",", & f. u# X- Q! p
         RowBox[{"CM", "[",
    6 K7 t! X4 \. [7 Y      RowBox[{"28", ",", "9"}], "]"}]}], "}"}], ",",
    & y, ]5 n( O5 ~! X5 v) J1 I3 n   RowBox[{"{", . f6 L) t' Y9 b. F1 g; F7 _0 ~
        RowBox[{! A! b, O( W6 k7 k, g8 r' `( ~
         RowBox[{"CM", "[",
    4 U4 V& z& z5 ]* X      RowBox[{"29", ",", "1"}], "]"}], ",",
    # h: q0 W4 ]. W4 R/ W     RowBox[{"CM", "[",
    7 `6 w( d; m0 D9 C7 {6 W. e      RowBox[{"29", ",", "2"}], "]"}], ",", , L9 `1 v" N9 E- g: x
         RowBox[{"CM", "[", ( O% ^! D; p, ?# R
          RowBox[{"29", ",", "3"}], "]"}], ",", ; G+ l$ r' _! j! p1 I: o/ U5 ^
         RowBox[{"CM", "[",
    ; W+ \& \% v7 h: p9 `0 x      RowBox[{"29", ",", "4"}], "]"}], ",",
    - b/ v  M; D& [) k6 J% F# T     RowBox[{"CM", "[",
    * f; ?6 x9 o/ d0 u1 E      RowBox[{"29", ",", "5"}], "]"}], ",", ( ]9 c' p' H2 E& L$ c
         RowBox[{"CM", "[",
    ( i2 t, j3 O& ]) c/ }  }* H& I' j      RowBox[{"29", ",", "6"}], "]"}], ",",
    ) }% w7 t& l$ ]$ ^& T5 a# n     RowBox[{"CM", "[",
    1 u5 h- J' k! x2 Z1 C, ~' j% A      RowBox[{"29", ",", "7"}], "]"}], ",",
    " A. A* l( r2 y# B* w3 K( ]6 b     RowBox[{"CM", "[",
    4 M, s( }+ p3 u      RowBox[{"29", ",", "8"}], "]"}], ",",
    , M- D2 b5 R  u- C: f* i( e3 u( y     RowBox[{"CM", "[", 6 ?: y5 I% n9 d* B9 \5 Y1 o# j7 v$ {! P
          RowBox[{"29", ",", "9"}], "]"}]}], "}"}], ",",
    : S. E# ?  t+ j6 z: M   RowBox[{"{",
    5 K# q# I& I0 u3 F" p, C( i    RowBox[{4 J+ g' o$ C, u6 b7 q' a
         RowBox[{"CM", "[", + G$ M$ N% A1 C& N& k3 c% w
          RowBox[{"30", ",", "1"}], "]"}], ",", $ I- f3 ?' q2 b+ ~& D6 L$ W
         RowBox[{"CM", "[", & ~& Y* w$ z  m0 @8 B! y" {# E
          RowBox[{"30", ",", "2"}], "]"}], ",", ! v# q1 M2 t  i  s
         RowBox[{"CM", "[", + q+ ?6 \$ R' [( y# ~- V
          RowBox[{"30", ",", "3"}], "]"}], ",", * g( b# \6 j* {0 K* x4 y& R1 h
         RowBox[{"CM", "[",
    ; W8 t1 t4 V$ M: A, ~3 ?      RowBox[{"30", ",", "4"}], "]"}], ",",   c( J2 f3 v& j( o
         RowBox[{"CM", "[",
    7 L0 x: }# p6 Y4 V& x      RowBox[{"30", ",", "5"}], "]"}], ",", # g# @1 [* z; N& r
         RowBox[{"CM", "[",
    & a: V( }4 U' `1 e4 g9 y      RowBox[{"30", ",", "6"}], "]"}], ",", ! C6 k: |4 K7 ~/ s$ Y3 I
         RowBox[{"CM", "[",
    0 y7 h5 o0 ]) d- t- R. `      RowBox[{"30", ",", "7"}], "]"}], ",", 8 ?) R6 ?1 F! T- c, b
         RowBox[{"CM", "[",
    ( W( T! b: _: \9 T$ T' j      RowBox[{"30", ",", "8"}], "]"}], ",", . j( M1 l' y" G" o2 y
         RowBox[{"CM", "[", ! M$ x! H0 k" v3 v3 ^
          RowBox[{"30", ",", "9"}], "]"}]}], "}"}], ",",
    ; V* L" `& r) T0 s& K0 u% C   RowBox[{"{",
    ) Q/ B" m/ r3 _3 _0 A' G    RowBox[{
    & l2 T; Q) X  v8 u     RowBox[{"CM", "[",
    , Z. F# |6 v' `/ G& `0 H      RowBox[{"31", ",", "1"}], "]"}], ",",
    5 J6 j2 N& D9 `0 F$ H6 x8 k     RowBox[{"CM", "[",
    # S  ^+ @  Z+ [/ ]3 U7 S# s      RowBox[{"31", ",", "2"}], "]"}], ",", 7 o& q6 s* `& o
         RowBox[{"CM", "[", - |' }1 p  {, X' I
          RowBox[{"31", ",", "3"}], "]"}], ",",
    6 G. E9 ^1 @+ y' o: t) z: i/ O     RowBox[{"CM", "[",
      ^; [; g  a7 M) U      RowBox[{"31", ",", "4"}], "]"}], ",",
    3 B6 q4 @, t6 a% X' _     RowBox[{"CM", "[", ( M7 N# d/ j7 C, d; i; i
          RowBox[{"31", ",", "5"}], "]"}], ",", ( }5 `1 g- I) |5 z
         RowBox[{"CM", "[", : V: q7 b" P9 |
          RowBox[{"31", ",", "6"}], "]"}], ",", 9 h0 L1 R# Z+ g
         RowBox[{"CM", "[", 2 h5 j9 a& I4 l) k2 l, K
          RowBox[{"31", ",", "7"}], "]"}], ",",
    1 G' k0 O, U/ }- n! B     RowBox[{"CM", "[", 7 \9 S* v0 y* |" k( ]/ }4 q- n* _
          RowBox[{"31", ",", "8"}], "]"}], ",",
    3 b" O0 e' E/ p2 c0 X  w     RowBox[{"CM", "[", 4 U7 W2 P' I$ r. ^3 u  _
          RowBox[{"31", ",", "9"}], "]"}]}], "}"}], ",",
    ; ]: L% H6 [) b3 |6 s/ y   RowBox[{"{",   {( W1 `6 p+ T# D
        RowBox[{, \  y" N% U$ x: Y+ c6 T% Y
         RowBox[{"CM", "[",
    & L* d8 M7 m1 s6 Y      RowBox[{"32", ",", "1"}], "]"}], ",", 8 l" W( V" ]2 e/ N2 O) Q8 N
         RowBox[{"CM", "[",
    6 r: m: a7 e: \3 j4 X      RowBox[{"32", ",", "2"}], "]"}], ",",
    . R3 \) f% z  n( W     RowBox[{"CM", "[",
    ' C5 B3 [& E. Y+ }" M      RowBox[{"32", ",", "3"}], "]"}], ",",
    + Y( l- u0 i# z0 o: |0 ~     RowBox[{"CM", "[", / b5 T% x+ a5 g: F9 j4 @
          RowBox[{"32", ",", "4"}], "]"}], ",", 0 k  U( x* ^! x6 x+ \
         RowBox[{"CM", "[",
    5 V+ r* x( C: \3 }( l      RowBox[{"32", ",", "5"}], "]"}], ",",
    . Y+ n- U  I( V+ h! x2 a, t     RowBox[{"CM", "[",
    6 l5 l; a' Q9 V- `5 \      RowBox[{"32", ",", "6"}], "]"}], ",", ) \/ ?  ]) s+ l2 B4 y  J
         RowBox[{"CM", "[",
    ; ^) S5 F; A* V; Z" l3 y3 ?      RowBox[{"32", ",", "7"}], "]"}], ",", # Z$ P( L) |4 [. r$ w; m
         RowBox[{"CM", "[",
    5 M7 @4 p& R; P: Q3 Q! }" i      RowBox[{"32", ",", "8"}], "]"}], ",", 3 }4 A0 q% _3 ?  A  E1 Z
         RowBox[{"CM", "[",
    7 O  o- `4 J& B+ m- F7 v$ n      RowBox[{"32", ",", "9"}], "]"}]}], "}"}], ",",
      F" x( h. s$ D( S4 k   RowBox[{"{",
    $ Y7 J6 E6 x2 k8 G, ]7 a# E4 {" |3 i    RowBox[{
    ) q9 q6 o) a4 ]6 e% B( n     RowBox[{"CM", "[",
    : K3 l2 U, W' }      RowBox[{"33", ",", "1"}], "]"}], ",", + `+ c- |" |- s
         RowBox[{"CM", "[",
    1 N$ G+ Z2 K. v5 ~      RowBox[{"33", ",", "2"}], "]"}], ",", # t& Z( ]" Z1 Q+ V* O# g
         RowBox[{"CM", "[", - d# }" G) v7 U+ P% `. X( L
          RowBox[{"33", ",", "3"}], "]"}], ",", 8 U1 g3 F/ }2 r7 r5 z
         RowBox[{"CM", "[", - n0 g  `5 X; A* |  Y; V1 M+ R- ~2 H! U
          RowBox[{"33", ",", "4"}], "]"}], ",",
    8 }' ~2 g/ }5 r: f8 T1 |     RowBox[{"CM", "[", " W. k8 ]' ?' d1 C& j. t
          RowBox[{"33", ",", "5"}], "]"}], ",", # u+ |9 C( ~8 u3 T! E2 A9 x) Z/ R% h
         RowBox[{"CM", "[", " m+ ^7 V" M) C+ n. Q* C  f7 t" q3 E
          RowBox[{"33", ",", "6"}], "]"}], ",",
    2 Y/ I  Z' O! g9 l1 o' w     RowBox[{"CM", "[", ! o& n4 a/ ^& h
          RowBox[{"33", ",", "7"}], "]"}], ",",
    * Q6 o6 }2 @  B( @" _* u7 ~! p3 z" K     RowBox[{"CM", "[", " b: u5 G8 [% N! s* G% l9 @' W8 A
          RowBox[{"33", ",", "8"}], "]"}], ",", * x& `1 q0 P1 O' b
         RowBox[{"CM", "[", " k" P) B" ^" m- s% ]4 b
          RowBox[{"33", ",", "9"}], "]"}]}], "}"}], ",",
    : P( K! ]" x% ?4 c8 k: V8 f   RowBox[{"{", + \, I2 L  O4 l& o+ d* q
        RowBox[{
    + Y4 @/ E2 o( W. x6 k0 b3 ?     RowBox[{"CM", "[", 7 f" O- n$ f" G/ d- M- w9 A
          RowBox[{"34", ",", "1"}], "]"}], ",",
    : `* U: j0 T+ j4 P# a     RowBox[{"CM", "[", ' H9 c/ y" R' o+ O8 z, f$ }
          RowBox[{"34", ",", "2"}], "]"}], ",", " ^+ z9 [6 m: o( y! C$ V
         RowBox[{"CM", "[", 2 A: r: k& g, ~: g
          RowBox[{"34", ",", "3"}], "]"}], ",", & P) T2 ]! @! j. `
         RowBox[{"CM", "[",
    7 t( [9 @, k  b+ s! v1 J& p      RowBox[{"34", ",", "4"}], "]"}], ",", 4 T5 D0 E9 n9 V9 e. Y- F( ]
         RowBox[{"CM", "[",
    - l7 |, @- q7 I/ `% S      RowBox[{"34", ",", "5"}], "]"}], ",",
    $ z; A  p7 k" ?) S, t  M     RowBox[{"CM", "[", " V* p; r' ^# {: Z- `
          RowBox[{"34", ",", "6"}], "]"}], ",", / \# R. {. c1 x1 A2 [
         RowBox[{"CM", "[",
    % V" c2 o6 X; I8 `# W/ o& h      RowBox[{"34", ",", "7"}], "]"}], ",", 0 S9 W1 ^) g( {+ x% i
         RowBox[{"CM", "[",
    4 q, E1 c( [1 r) T8 J3 U* _: i& E/ w      RowBox[{"34", ",", "8"}], "]"}], ",", 7 C+ s/ s6 F3 d7 C: f! s/ H
         RowBox[{"CM", "[",
    : u1 n, X0 S6 v( z/ o( `% d      RowBox[{"34", ",", "9"}], "]"}]}], "}"}], ",",
    " a' H% F; C* {1 O: o   RowBox[{"{",
    0 l1 f' A9 w. b  Q4 f    RowBox[{
    ; j! B+ b$ {4 ?5 c     RowBox[{"CM", "[", : _/ M  L- F. |# L
          RowBox[{"35", ",", "1"}], "]"}], ",",
    , W( u. \  j' o3 r! O     RowBox[{"CM", "[",
    , O+ ^& n/ l% d: G' H      RowBox[{"35", ",", "2"}], "]"}], ",", * p& H8 {; `/ W8 l$ G1 D4 Y/ v& O
         RowBox[{"CM", "[",
    1 @" s) y0 I& B. V      RowBox[{"35", ",", "3"}], "]"}], ",",
    8 L3 ^9 C" n- w, R     RowBox[{"CM", "[", 4 b) G7 p, D: k1 s
          RowBox[{"35", ",", "4"}], "]"}], ",", , D3 i! B5 ~) l4 }6 A
         RowBox[{"CM", "[",
    / ]* q# h1 @9 @6 K      RowBox[{"35", ",", "5"}], "]"}], ",", ' `% I5 i8 U( h0 ^0 l* t4 s
         RowBox[{"CM", "[",
    / |9 N9 }; _6 d; j- }      RowBox[{"35", ",", "6"}], "]"}], ",",
      s+ l9 W) w% }8 M     RowBox[{"CM", "[", ) h0 m( [  W, _' D
          RowBox[{"35", ",", "7"}], "]"}], ",", 8 t2 ]& n8 l' {" Z3 G
         RowBox[{"CM", "[", 8 c- p0 w- f3 n0 C5 Q, [7 n- g: a
          RowBox[{"35", ",", "8"}], "]"}], ",",
    4 @* l1 E! _8 e) _* N     RowBox[{"CM", "[",
    0 n% x& c) J0 @6 z  W8 P2 O! Q+ ~; \      RowBox[{"35", ",", "9"}], "]"}]}], "}"}], ",", 4 W: S- B0 z* b. Q7 a8 V
       RowBox[{"{",
    " o& T$ d$ D# G( r* s    RowBox[{7 x' C; S5 ?' V5 W
         RowBox[{"CM", "[",
      V; U8 d1 Z, W; K- \      RowBox[{"36", ",", "1"}], "]"}], ",",
    - ~! H3 K/ n% N3 P8 Z. W; r     RowBox[{"CM", "[", 3 J" ]; P- j6 ~( f" c4 [
          RowBox[{"36", ",", "2"}], "]"}], ",",
    / j5 i3 z( M+ O! k+ m; M$ h     RowBox[{"CM", "[",
    ! _: r- N, e1 h4 e      RowBox[{"36", ",", "3"}], "]"}], ",",
    0 V5 G! s+ F7 q  z4 c4 ~, |     RowBox[{"CM", "[",
    $ j& L# t; A1 I+ x/ A      RowBox[{"36", ",", "4"}], "]"}], ",",
    9 l5 A5 q7 @9 O8 ~7 A' k3 T! e5 @     RowBox[{"CM", "[",
    & X, H- [, a  e+ i' t& d+ }      RowBox[{"36", ",", "5"}], "]"}], ",",
    - d4 t7 ^8 E" T     RowBox[{"CM", "[", ( V2 t6 z) p$ w2 T4 |/ q  A, }% d7 ?
          RowBox[{"36", ",", "6"}], "]"}], ",",
    , ^7 w+ c% g% f0 J     RowBox[{"CM", "[", ! N1 w1 j. _6 O: F% A0 T
          RowBox[{"36", ",", "7"}], "]"}], ",",
    % e- l- Y) }! S9 X& ^6 d* k     RowBox[{"CM", "[", $ P8 x6 T( P% H2 N4 r3 k
          RowBox[{"36", ",", "8"}], "]"}], ",", 8 R  |3 r: y  `, o
         RowBox[{"CM", "[",
    - K" `& s2 n" E$ `      RowBox[{"36", ",", "9"}], "]"}]}], "}"}], ",", 1 u9 q" J, C" w, `$ C+ F! g7 v1 f
       RowBox[{"{",
      U$ N4 p. R- U) ~3 m    RowBox[{
    , u  ]* W; g; J) ?# m& y- U8 a5 E9 t0 ^     RowBox[{"CM", "[",
    / C( n2 s. c0 ]      RowBox[{"37", ",", "1"}], "]"}], ",",
    2 D. |( X) @% X' z     RowBox[{"CM", "[",
    ( H& Z% b3 \- G7 [      RowBox[{"37", ",", "2"}], "]"}], ",", , D, C4 J3 h0 J+ S8 I
         RowBox[{"CM", "[",
    + K" _+ M6 X1 i# l- T9 [      RowBox[{"37", ",", "3"}], "]"}], ",", 8 g9 ?3 Y0 A$ O& }' ~! {/ [
         RowBox[{"CM", "[",
    9 N: g8 s( T0 D0 ^/ i& a# m      RowBox[{"37", ",", "4"}], "]"}], ",",
    ! \8 U7 n5 ^. s1 N5 A: o     RowBox[{"CM", "[",
    9 G5 d8 o0 G+ P2 [4 N* v      RowBox[{"37", ",", "5"}], "]"}], ",", % `0 a6 B# N! b* S9 }# Y
         RowBox[{"CM", "[", 1 K7 n4 ]3 X% h6 |6 u
          RowBox[{"37", ",", "6"}], "]"}], ",",
    ; K# n8 ^* n) f0 l. n     RowBox[{"CM", "[",
    ! K. R$ T" z# H" a      RowBox[{"37", ",", "7"}], "]"}], ",",
    / R2 l$ R' F7 A6 M, m6 h' n* Z     RowBox[{"CM", "[",
    3 E6 d) |( |1 |+ n& D      RowBox[{"37", ",", "8"}], "]"}], ",", ) d$ f2 F" z$ R8 p- p
         RowBox[{"CM", "[",
    + a7 K/ {8 Y# j$ D" H& u      RowBox[{"37", ",", "9"}], "]"}]}], "}"}], ",", 0 w, Q4 A; n2 o$ b- U, R! A" a
       RowBox[{"{",
    + }  ~9 |! q4 ]. n4 }) J    RowBox[{* i, ^' E" \9 ~( |4 D
         RowBox[{"CM", "[",
    " E1 Q5 i$ u6 b" _1 L. y( x      RowBox[{"38", ",", "1"}], "]"}], ",", ) \* q; ]# ^& k' r5 `. M1 e
         RowBox[{"CM", "[", ; q/ D) D+ H; r% Q
          RowBox[{"38", ",", "2"}], "]"}], ",",
    3 D' L. V3 S2 x7 Q; c$ {     RowBox[{"CM", "[",
    ; k' o& r7 Y" M. Y      RowBox[{"38", ",", "3"}], "]"}], ",",
    ; |) v6 S$ h  Y1 A     RowBox[{"CM", "[",
    & ~0 ^' u$ q2 R6 \      RowBox[{"38", ",", "4"}], "]"}], ",", ! ^8 N) h5 Q6 B7 @; L& T) v
         RowBox[{"CM", "[",
    4 b% m2 `; d- _* _. _1 O, v# W6 F3 f      RowBox[{"38", ",", "5"}], "]"}], ",",
    , ]' l- t2 \, P     RowBox[{"CM", "[",
    6 P2 @% O" T* f* F      RowBox[{"38", ",", "6"}], "]"}], ",",
    5 J! X* ?: E: G% ~1 K4 M     RowBox[{"CM", "[",
    2 C8 c2 z  g# [- d+ T1 B; j) H      RowBox[{"38", ",", "7"}], "]"}], ",",
    9 }9 ]0 m7 b; ^0 b: h3 R" M     RowBox[{"CM", "[", # l4 c0 f: q$ ^1 \( Z
          RowBox[{"38", ",", "8"}], "]"}], ",",
    0 A  A- v) D* }- x     RowBox[{"CM", "[", 4 C, G! w3 k6 x
          RowBox[{"38", ",", "9"}], "]"}]}], "}"}], ",",
    7 m7 J, A/ @7 Q, d  U& U+ Z( P   RowBox[{"{", 6 @* h$ x& a: `; L
        RowBox[{% Y- A0 X" @7 V& @: C+ }
         RowBox[{"CM", "[", 0 ]  L& ]- |1 A( r
          RowBox[{"39", ",", "1"}], "]"}], ",",
    % _- X/ b* Y, c) q# ~  }9 c1 L     RowBox[{"CM", "[", : B( b% i/ @& J, n( ^) l
          RowBox[{"39", ",", "2"}], "]"}], ",",
    8 g/ B. O) ]+ h/ i0 {8 q8 _- V     RowBox[{"CM", "[",
    2 M. a# ~- U  M, M! ^      RowBox[{"39", ",", "3"}], "]"}], ",", 2 n5 h) N, n5 `3 D  d
         RowBox[{"CM", "[",
    8 M* @( Q$ |7 X9 H" f+ n, b# @      RowBox[{"39", ",", "4"}], "]"}], ",", . u, p. O) D# f$ v" M, T& z# P
         RowBox[{"CM", "[", " H2 }, G0 M$ Y+ \& o
          RowBox[{"39", ",", "5"}], "]"}], ",", / t- U6 [' U/ R  e" D
         RowBox[{"CM", "[",
      d4 C* V$ a, `) |, I, u1 a9 ?      RowBox[{"39", ",", "6"}], "]"}], ",",
      ?0 ?6 b  Z" C% Z( I     RowBox[{"CM", "[", ! j" \7 d1 b' Q* |
          RowBox[{"39", ",", "7"}], "]"}], ",",
    2 O5 o% v% B: l; x" o     RowBox[{"CM", "[",
    % H5 n1 q' N$ B" \) ~- P, U      RowBox[{"39", ",", "8"}], "]"}], ",", ) h8 ?7 a4 E8 j  B
         RowBox[{"CM", "[", ( C! p' x& k# H5 W- V
          RowBox[{"39", ",", "9"}], "]"}]}], "}"}], ",", 7 Z( G8 [" C; @
       RowBox[{"{",
    / q% g" K1 }! K: \    RowBox[{
    9 o* Z+ K% v0 R" G. ]+ C     RowBox[{"CM", "[",
    6 r2 Z+ y1 A7 X" f- d/ p& C4 S$ X* P      RowBox[{"40", ",", "1"}], "]"}], ",",   _" d7 |6 Z( A
         RowBox[{"CM", "[", 0 V( ]$ o- V; H# A! b5 O
          RowBox[{"40", ",", "2"}], "]"}], ",",
    8 F( M, \1 \( C& c- _, e     RowBox[{"CM", "[",
    $ S1 C1 R" l: u/ W4 R6 ?6 D1 d/ R      RowBox[{"40", ",", "3"}], "]"}], ",", ! e6 p5 F# ]2 P3 _1 m# b- r
         RowBox[{"CM", "[",
    + R8 Z. m2 F; d% s$ d  H( O      RowBox[{"40", ",", "4"}], "]"}], ",",
    $ B/ }% |- p0 q     RowBox[{"CM", "[", ! o  W# e! d2 j7 I: o) I4 g
          RowBox[{"40", ",", "5"}], "]"}], ",",
    & \7 t9 w' C& L2 x  ], ?* l     RowBox[{"CM", "[",
    8 _1 a( T% X% t      RowBox[{"40", ",", "6"}], "]"}], ",",
    9 {. D1 r" T6 x1 T  h* h     RowBox[{"CM", "[",
    % v. r; ]. _, \! ~; @9 H2 I      RowBox[{"40", ",", "7"}], "]"}], ",",
    % t7 o) U. }# n* ~( E# S     RowBox[{"CM", "[", ! V0 f5 d! u3 T$ w& Q
          RowBox[{"40", ",", "8"}], "]"}], ",",
    : T' E! O  B+ @. r: v- v8 j2 M     RowBox[{"CM", "[", + K# B$ A1 A( o4 \5 X! j
          RowBox[{"40", ",", "9"}], "]"}]}], "}"}], ",", 2 `/ N3 g: x& C% Y( w$ E
       RowBox[{"{", + \' ]$ u1 Q& j* ~
        RowBox[{% g! s3 J8 ^! _, k7 n' O
         RowBox[{"CM", "[", 7 C/ H6 S) h! b0 q- k
          RowBox[{"41", ",", "1"}], "]"}], ",", " O5 i# z# R* z
         RowBox[{"CM", "[", . x  V# ~! M5 M2 ]8 n. x2 A
          RowBox[{"41", ",", "2"}], "]"}], ",",
    3 p" L3 b/ b# [. a     RowBox[{"CM", "[",
    : i! i* t5 b' l- `* y) N      RowBox[{"41", ",", "3"}], "]"}], ",",
    2 V2 t% m9 W, z; v; c2 p7 c     RowBox[{"CM", "[",
    , O' o) i) u" P5 g; ]      RowBox[{"41", ",", "4"}], "]"}], ",",
    $ [+ x+ e+ M& h- t     RowBox[{"CM", "[", ( q, @- o" D& ]! B, }
          RowBox[{"41", ",", "5"}], "]"}], ",",
    * `$ I7 O8 w2 s2 Z2 D) u" b  T9 d     RowBox[{"CM", "[", 2 S0 V3 J8 M5 ~( a2 j7 u
          RowBox[{"41", ",", "6"}], "]"}], ",",
    " j+ A2 y9 N9 g% ]3 V     RowBox[{"CM", "[", : _& I1 q) X8 E
          RowBox[{"41", ",", "7"}], "]"}], ",",
    0 m$ @( G  `, w8 |8 W     RowBox[{"CM", "[", / k# {, B. `/ Z3 P! E
          RowBox[{"41", ",", "8"}], "]"}], ",",
    & B# @* l( i- x0 q     RowBox[{"CM", "[",
    ; M$ ~1 [; m! g( y7 D      RowBox[{"41", ",", "9"}], "]"}]}], "}"}], ",",
      z2 N- Z8 S$ s9 n   RowBox[{"{",
    6 t+ n3 d* T; g5 O7 t( t1 l    RowBox[{' N" b# A- B. g, R
         RowBox[{"CM", "[", / ?4 L! _" F1 A* h! h2 `2 W- m
          RowBox[{"42", ",", "1"}], "]"}], ",", 5 @4 g) d) V5 h
         RowBox[{"CM", "[", # J, a" q- S$ \, c$ L4 \
          RowBox[{"42", ",", "2"}], "]"}], ",", * W) B- y. q+ ]# f  j
         RowBox[{"CM", "[", / \% F" ?+ j6 M
          RowBox[{"42", ",", "3"}], "]"}], ",",
    3 P/ e! x& k; @1 T+ r     RowBox[{"CM", "[",
    + b; Y0 Z! \& K9 b) b+ n& N) Q      RowBox[{"42", ",", "4"}], "]"}], ",",
    $ ]+ v2 d+ K$ G, y4 e- m     RowBox[{"CM", "[",
    ! s. Q$ _9 M' u      RowBox[{"42", ",", "5"}], "]"}], ",", ! m- p5 F: C. x; {3 t9 g: p
         RowBox[{"CM", "[", + s" i0 b; e# E/ T( S6 C" X
          RowBox[{"42", ",", "6"}], "]"}], ",", 0 W# i7 D* Y7 @! J
         RowBox[{"CM", "[", ; B( M$ V' r* k) J  ~3 ~: J: q
          RowBox[{"42", ",", "7"}], "]"}], ",", 6 K+ A4 Z7 K# W  L% f
         RowBox[{"CM", "[", ( O' u  {6 Z) C1 k# C
          RowBox[{"42", ",", "8"}], "]"}], ",",   u9 j1 O% `  I3 x6 U
         RowBox[{"CM", "[", # J! A4 o- L4 |7 F5 ?
          RowBox[{"42", ",", "9"}], "]"}]}], "}"}], ",", $ D" X  t3 j9 Z0 z
       RowBox[{"{",
    ! W" o+ [/ D3 Z  \! g* m" z    RowBox[{* b8 ^* z# M& V( D( `& F( D
         RowBox[{"CM", "[", & L8 w8 W$ u4 G9 S% I& h0 j/ {& f
          RowBox[{"43", ",", "1"}], "]"}], ",", * [- i2 F& T$ D( ~9 I+ }. p
         RowBox[{"CM", "[",
    & ^6 S3 f2 W6 m7 q5 I      RowBox[{"43", ",", "2"}], "]"}], ",", - m- D0 i+ R$ ]! F
         RowBox[{"CM", "[", % r. R! g+ u- h- {" M3 ]0 }: C
          RowBox[{"43", ",", "3"}], "]"}], ",", 4 {4 H% c# _! A7 _+ O7 f% j
         RowBox[{"CM", "[", 1 C2 e6 a! S4 @. Y) X3 G. c
          RowBox[{"43", ",", "4"}], "]"}], ",",
    + h7 B; I. s& @5 h  o4 V     RowBox[{"CM", "[", ; v$ }) p% F' B
          RowBox[{"43", ",", "5"}], "]"}], ",", 4 L) N# O/ a$ l$ n
         RowBox[{"CM", "[",
    - ^$ O( @( N$ b: @: C      RowBox[{"43", ",", "6"}], "]"}], ",",
    ( d2 C5 a9 Q% A: H! d7 w1 `     RowBox[{"CM", "[",
    4 s' U# J3 T+ P! z  o      RowBox[{"43", ",", "7"}], "]"}], ",", 3 p! I  g* Q* d
         RowBox[{"CM", "[",
    7 V1 F6 l) P! e( Y) w1 U+ b      RowBox[{"43", ",", "8"}], "]"}], ",",
    ; [5 h- B1 \( e; B     RowBox[{"CM", "[", 7 [0 B+ I# B4 l& C1 _3 _" e
          RowBox[{"43", ",", "9"}], "]"}]}], "}"}], ",", # _7 G) Q5 j5 e2 E( v* H& D6 h& L6 i
       RowBox[{"{", 0 F  s+ H8 q( E' i
        RowBox[{
    $ P) ]4 p4 ?0 u7 E% D+ A+ O     RowBox[{"CM", "[",
    # x& V3 S; o/ d, I. F1 V  f      RowBox[{"44", ",", "1"}], "]"}], ",", " t7 R. W7 E; a1 c  w% j4 a
         RowBox[{"CM", "[", # W1 Q% r4 |8 G2 |% x
          RowBox[{"44", ",", "2"}], "]"}], ",", 8 g& }3 ^  A# w* x
         RowBox[{"CM", "[", 2 ?, V. u) S, e& n
          RowBox[{"44", ",", "3"}], "]"}], ",", 9 v6 Q0 P6 P5 r, Z& G7 H! q
         RowBox[{"CM", "[", 4 @/ ^2 y( O; F* E
          RowBox[{"44", ",", "4"}], "]"}], ",",
    3 w# p+ W7 H8 e* ?% E4 X     RowBox[{"CM", "[", 6 ?8 W' F. ]& y4 u
          RowBox[{"44", ",", "5"}], "]"}], ",", " r; {- S, j; ]6 @- `1 }5 ~
         RowBox[{"CM", "[",
    7 P+ W, r! i, P) ^  `9 |0 \) i      RowBox[{"44", ",", "6"}], "]"}], ",",
      z( r* R$ k+ `1 @4 r. m     RowBox[{"CM", "[",
    # T6 U0 F, n' v0 Y      RowBox[{"44", ",", "7"}], "]"}], ",", 6 H4 A  ?0 {5 f5 M
         RowBox[{"CM", "[", % C4 @1 }7 b! p! m& T2 @: ^4 Y6 Y
          RowBox[{"44", ",", "8"}], "]"}], ",", 9 |9 b% R. J, {& Y; _* ~- q% }
         RowBox[{"CM", "[", 1 X8 P& y- J* |. G" t( r; |: m
          RowBox[{"44", ",", "9"}], "]"}]}], "}"}], ",",
    # A4 R  H8 L8 f% ~" K" g  k   RowBox[{"{",   h7 G( t+ p5 w0 p0 [: B
        RowBox[{
    ( j( r1 c3 ^0 g2 m) J     RowBox[{"CM", "[",
    5 V0 T4 g6 q. {      RowBox[{"45", ",", "1"}], "]"}], ",",
    * ]1 B; P+ P$ P3 j     RowBox[{"CM", "[", ! X. x5 l% g3 q
          RowBox[{"45", ",", "2"}], "]"}], ",",
    7 U( \# R! i6 c* f     RowBox[{"CM", "[", ( ~; J1 B$ ]& y, \2 C. Q) f
          RowBox[{"45", ",", "3"}], "]"}], ",", 0 p" z( U6 g; E" `
         RowBox[{"CM", "[",
    0 p) j0 J- J% D1 j# `5 k      RowBox[{"45", ",", "4"}], "]"}], ",",
    - S$ _' d: W, ]; u0 R     RowBox[{"CM", "[",
    9 P  z7 F0 Y& I1 ~+ `! A      RowBox[{"45", ",", "5"}], "]"}], ",", . w9 L. M8 }! ?" B" K# k
         RowBox[{"CM", "[", , Q$ V( O! d0 c2 v- t! F9 u
          RowBox[{"45", ",", "6"}], "]"}], ",",
    , P. ~) ]1 a" f/ |  u% z  g     RowBox[{"CM", "[", & z' e$ |$ t+ y' t! B
          RowBox[{"45", ",", "7"}], "]"}], ",", 2 \2 U  d% P: ?" M; n" b
         RowBox[{"CM", "[",
    ) `% H* W1 }7 t      RowBox[{"45", ",", "8"}], "]"}], ",", % d/ @7 q9 I! G! s6 t
         RowBox[{"CM", "[",
    1 j9 ?; N7 G+ F1 p3 d4 Z) e      RowBox[{"45", ",", "9"}], "]"}]}], "}"}], ",",
    # c( Y5 A1 p4 ]& ^   RowBox[{"{",
    ; p0 h2 J9 D) e: S9 ~    RowBox[{& s9 [# G* |0 O
         RowBox[{"CM", "[",
    # ^/ |# i+ `1 D8 C7 Z3 r" t      RowBox[{"46", ",", "1"}], "]"}], ",", 5 d2 U% z! G# L( C
         RowBox[{"CM", "[",
    ( [2 u: ^1 j/ O1 D% }      RowBox[{"46", ",", "2"}], "]"}], ",", # ~" v" v  O; ~% V# n+ ?
         RowBox[{"CM", "[", ( h/ O$ e5 U) v* i# Q
          RowBox[{"46", ",", "3"}], "]"}], ",",
    + I) x5 T5 @) J, g! s     RowBox[{"CM", "[", 7 d/ ~# {0 ~+ T
          RowBox[{"46", ",", "4"}], "]"}], ",", ' w2 W! R# B: A! l) W6 y8 }
         RowBox[{"CM", "[", ) k$ S) w& U4 ~. F. f+ X! v
          RowBox[{"46", ",", "5"}], "]"}], ",", 1 r" G0 X! L5 J4 L( v1 n$ h* y
         RowBox[{"CM", "[", 0 o7 B+ J0 C; @
          RowBox[{"46", ",", "6"}], "]"}], ",", & j- G% h, I! o  ]2 \
         RowBox[{"CM", "[", ! S& I; B9 L9 N/ I  K8 |) D- P9 X
          RowBox[{"46", ",", "7"}], "]"}], ",", ! A7 X9 w! V: q/ l0 p
         RowBox[{"CM", "[",
    5 j% x- l0 `; P7 R. Z2 R6 Q5 E% h      RowBox[{"46", ",", "8"}], "]"}], ",", : B1 ?! C8 r2 W7 O! {
         RowBox[{"CM", "[",
    3 i, m* q9 h* j: l5 ]$ V      RowBox[{"46", ",", "9"}], "]"}]}], "}"}], ",", 8 u1 Q! V! b4 h: w5 i' z2 Y8 L
       RowBox[{"{", ( g( ^& F' _" p) G/ p$ X( r4 W
        RowBox[{" ~& S6 ~! d) v/ D0 W3 I
         RowBox[{"CM", "[", % v) L- @6 O3 A5 w
          RowBox[{"47", ",", "1"}], "]"}], ",", ) l4 q6 R2 A7 }) [
         RowBox[{"CM", "[",
      W( }; f0 V3 k2 o3 I1 k, [5 I      RowBox[{"47", ",", "2"}], "]"}], ",",
    8 ?" E* I4 C8 B! t( K8 z     RowBox[{"CM", "[",
    % h( a2 _  M  M! j0 j      RowBox[{"47", ",", "3"}], "]"}], ",",
    * ]2 Y( k' c7 D     RowBox[{"CM", "[",
    - o9 S. }% Y0 k5 u3 v      RowBox[{"47", ",", "4"}], "]"}], ",",
    4 L* w4 H9 x9 ?/ _# K/ f$ h: g+ j     RowBox[{"CM", "[",
    0 X/ ^3 d2 a! ^  x- g      RowBox[{"47", ",", "5"}], "]"}], ",",   [% L9 A, e0 k" Q8 }2 o
         RowBox[{"CM", "[", 3 a$ k, o. M2 r& s, W. H' j
          RowBox[{"47", ",", "6"}], "]"}], ",",
    8 T8 H& r* [; k* Q     RowBox[{"CM", "[", , x: ^. v0 E& ?/ J: H. `
          RowBox[{"47", ",", "7"}], "]"}], ",", 8 T6 W) ?4 _& s" I: i8 K
         RowBox[{"CM", "[", . n9 z* i; s) @' O
          RowBox[{"47", ",", "8"}], "]"}], ",", 7 B) u8 H- u& A% R# Y9 U1 G+ S
         RowBox[{"CM", "[", , }4 K5 b' m5 p2 n& |
          RowBox[{"47", ",", "9"}], "]"}]}], "}"}], ",",
    . e5 X; i' F/ n4 x7 u4 a* F   RowBox[{"{",
    6 n5 m9 R5 A/ k, H# ?    RowBox[{
    4 Q" J; M  r( e0 R     RowBox[{"CM", "[", ( W0 y% G- k/ {: |
          RowBox[{"48", ",", "1"}], "]"}], ",", : |+ d/ R  `$ x7 I( h
         RowBox[{"CM", "[",
    ( F% \  m0 B4 A      RowBox[{"48", ",", "2"}], "]"}], ",",
    0 b8 j2 Z( M" j1 L  o9 m- y5 |     RowBox[{"CM", "[",
    ; K3 ~6 t% l0 I! P1 W1 c      RowBox[{"48", ",", "3"}], "]"}], ",", . T0 `! A( x- k! N7 Q$ Z+ {0 a1 @4 a
         RowBox[{"CM", "[",
    - S5 d" w' d! B. D  N( q7 d3 I      RowBox[{"48", ",", "4"}], "]"}], ",",
    ' Y) X; N# V$ s     RowBox[{"CM", "[", 2 z0 a) c" ?* W+ O4 z- d
          RowBox[{"48", ",", "5"}], "]"}], ",", 8 }- V. g, Y8 A
         RowBox[{"CM", "[", ( {- b9 X: _( y' k' ^  R
          RowBox[{"48", ",", "6"}], "]"}], ",",
    % R4 r8 N' f" m7 c( G* r     RowBox[{"CM", "[",
    . s$ m$ c5 n) \9 L) i- Z& _      RowBox[{"48", ",", "7"}], "]"}], ",", 4 k, p, q3 j1 ^, B  h" i) F+ V% S
         RowBox[{"CM", "[", 9 Y0 A: v8 V- E/ q* I
          RowBox[{"48", ",", "8"}], "]"}], ",",
    4 l& L2 o9 o0 d" j7 g     RowBox[{"CM", "[",
    + j3 d' S1 k% N0 z      RowBox[{"48", ",", "9"}], "]"}]}], "}"}], ",", # x+ F5 a4 r# s0 i2 \
       RowBox[{"{", 8 O0 O/ ]9 x+ [9 Y8 g# z' V
        RowBox[{
      y- W2 ?5 y- `/ p, _) [     RowBox[{"CM", "[", / k$ ^6 z/ ~  T' E0 u
          RowBox[{"49", ",", "1"}], "]"}], ",", 4 F' s& _; D' U  D$ l
         RowBox[{"CM", "[",
    & k$ \2 e4 E8 ]" Y) [& ~+ a4 M      RowBox[{"49", ",", "2"}], "]"}], ",", * i/ R, k  V' B" V! X4 }8 D8 E
         RowBox[{"CM", "[",
    + g5 g0 Y# W$ ~" w4 L- X      RowBox[{"49", ",", "3"}], "]"}], ",",
    0 ^) F' I, G& F  v  G     RowBox[{"CM", "[",
    8 b) p4 c: a7 j. J      RowBox[{"49", ",", "4"}], "]"}], ",",
    5 {, r! A: Z- u2 z+ i- h     RowBox[{"CM", "[",
    ! ]. U. V, L6 l- v" g      RowBox[{"49", ",", "5"}], "]"}], ",",
    4 d& Y/ `( U) P) A4 T: @     RowBox[{"CM", "[",
    7 ?/ F+ \3 I8 x1 \5 T. s3 P      RowBox[{"49", ",", "6"}], "]"}], ",",
    " y+ k5 r- T/ a" o     RowBox[{"CM", "[", # `: P! s/ B- |2 U8 Y4 t4 D
          RowBox[{"49", ",", "7"}], "]"}], ",",
    . ^! ^5 S, u0 F5 c) @9 j     RowBox[{"CM", "[",
    3 f5 Y9 {/ L# y* q  \: u6 S3 \      RowBox[{"49", ",", "8"}], "]"}], ",", 5 K* S% }2 ~- V3 C) Y, C
         RowBox[{"CM", "[",
    , j3 h+ a5 S8 [      RowBox[{"49", ",", "9"}], "]"}]}], "}"}], ",", % y3 e% g- @* x/ h2 H2 Q% h8 r
       RowBox[{"{", 2 ]+ w+ K, Z  ?* v
        RowBox[{
    0 B. R, \+ n& I8 z! o* }     RowBox[{"CM", "[", ' c- F* i: E2 {( D9 H
          RowBox[{"50", ",", "1"}], "]"}], ",",
    ! d1 g+ u! f2 J# p. V/ k     RowBox[{"CM", "[",   y. P9 a7 n" A! n; K5 F. q: v
          RowBox[{"50", ",", "2"}], "]"}], ",", * T0 u7 d) ]3 I3 _, @
         RowBox[{"CM", "[",
    # q4 e& x. |" Q* A/ V      RowBox[{"50", ",", "3"}], "]"}], ",", * g9 g/ J* t2 |" y2 Z- o
         RowBox[{"CM", "[", 7 u- @+ Y1 M0 F* e( e
          RowBox[{"50", ",", "4"}], "]"}], ",",
    # l6 r+ K1 X6 D7 d5 v     RowBox[{"CM", "[", , q( k' n2 }1 T
          RowBox[{"50", ",", "5"}], "]"}], ",",
    ) x- `! v; T, L* z% v     RowBox[{"CM", "[", - h$ |' `2 ]: H! V
          RowBox[{"50", ",", "6"}], "]"}], ",",
    / b8 u* W. h. x' i     RowBox[{"CM", "[",
    2 G$ B6 x6 }" M( `6 i) u) K+ B7 r) N      RowBox[{"50", ",", "7"}], "]"}], ",", " L+ }& F) Y4 E5 m
         RowBox[{"CM", "[", 1 W$ k, R3 I1 e! d4 a6 n
          RowBox[{"50", ",", "8"}], "]"}], ",", : ^4 c& v0 H/ O
         RowBox[{"CM", "[", 3 D4 K& c6 `. ~
          RowBox[{"50", ",", "9"}], "]"}]}], "}"}], ",",
    ! w8 J# U0 i) S$ U  Y3 w" y3 U   RowBox[{"{", 6 b8 V0 g/ i8 O( k5 q  X. }& i
        RowBox[{  @# d, d1 a. I  b; M6 e
         RowBox[{"CM", "[", , B7 x; U- {+ D8 D5 ]9 N
          RowBox[{"51", ",", "1"}], "]"}], ",", 1 R! C( P4 ~+ {
         RowBox[{"CM", "[",
    , B, u( g6 t$ l* d/ L, I      RowBox[{"51", ",", "2"}], "]"}], ",", $ z, n9 ~* _1 e1 e& F% k
         RowBox[{"CM", "[", 0 ]$ C5 O) p5 E9 W
          RowBox[{"51", ",", "3"}], "]"}], ",", : F$ _7 }3 O  B; y0 r0 G
         RowBox[{"CM", "[",   a0 Z: g1 ?, _
          RowBox[{"51", ",", "4"}], "]"}], ",",
    $ Q: }& e+ D9 w: A     RowBox[{"CM", "[",
    - N4 I2 @( c2 ^      RowBox[{"51", ",", "5"}], "]"}], ",",
    3 T3 v: Y1 d9 s% i' u     RowBox[{"CM", "[",
    ; r: E- f9 ?# w8 l      RowBox[{"51", ",", "6"}], "]"}], ",",
    5 u/ i" z0 g9 B  {% D2 n     RowBox[{"CM", "[",
    2 Y3 @+ {: A! C& l; o& J      RowBox[{"51", ",", "7"}], "]"}], ",", + N1 u+ t. D" D! ], C4 S
         RowBox[{"CM", "[",
    0 E3 ~* U( B, p% [3 u" e9 g" `      RowBox[{"51", ",", "8"}], "]"}], ",",
      P+ j' [, @* Y  X     RowBox[{"CM", "[",
    % ]& d1 h# E1 \+ U! i7 C      RowBox[{"51", ",", "9"}], "]"}]}], "}"}], ",",
      Z% P( s; p( X   RowBox[{"{",
    ' w& X/ M5 W9 p% `    RowBox[{8 A2 E0 `# b- n* c- @
         RowBox[{"CM", "[",
    ) O5 m2 c& m3 ?, I: M# s      RowBox[{"52", ",", "1"}], "]"}], ",", 0 G! u, H- g  i
         RowBox[{"CM", "[", $ A: t8 m3 v+ R
          RowBox[{"52", ",", "2"}], "]"}], ",",
    9 t/ A- H* K- m* m8 i  Q$ Q     RowBox[{"CM", "[",
    : E/ v4 O& E' t& x8 @      RowBox[{"52", ",", "3"}], "]"}], ",", + {9 H9 W: U. G0 ], N) G/ g1 s& T
         RowBox[{"CM", "[", # O$ \7 Z  O+ \. X$ _
          RowBox[{"52", ",", "4"}], "]"}], ",",
    5 U6 ?8 j  ~" T; k6 ]4 [. f) d     RowBox[{"CM", "[", 3 V7 {9 d6 Y" x: K$ D2 Y6 E
          RowBox[{"52", ",", "5"}], "]"}], ",", 0 x& ~  C* L9 c( u8 a* Y
         RowBox[{"CM", "[",
    1 Z: q( W) p) E0 C+ T3 A9 G7 v      RowBox[{"52", ",", "6"}], "]"}], ",", ' a0 \' @. \" d8 V" H
         RowBox[{"CM", "[",
    9 l# i4 A! e; h; M      RowBox[{"52", ",", "7"}], "]"}], ",",
    + T  ?' }  M! q5 U" O     RowBox[{"CM", "[", 0 p5 r% h! c  L. q9 u6 I0 [. C
          RowBox[{"52", ",", "8"}], "]"}], ",",
    " a; d) t/ X+ x" {     RowBox[{"CM", "[", 9 O& p. N- a; ?' ]
          RowBox[{"52", ",", "9"}], "]"}]}], "}"}], ",", ( M- ~9 U! K3 k8 J- y% g1 F: X: x
       RowBox[{"{",
    ) D. B$ _$ K7 @    RowBox[{$ `+ I8 P5 F4 a" y7 x; A3 N
         RowBox[{"CM", "[",
    ) n7 d2 |8 q% c5 _: T2 X/ Y      RowBox[{"53", ",", "1"}], "]"}], ",",
    $ d3 n; t; ~' l9 r9 L( P     RowBox[{"CM", "[", % j: [5 A% N0 ]" L; r( f
          RowBox[{"53", ",", "2"}], "]"}], ",", & {. ^2 u5 z! G7 {# k: |
         RowBox[{"CM", "[",
    9 r4 I- `0 M6 m' {9 v      RowBox[{"53", ",", "3"}], "]"}], ",", # X4 z6 O" a" {( i0 l$ t, o
         RowBox[{"CM", "[", 2 S' D. N; d& D" K
          RowBox[{"53", ",", "4"}], "]"}], ",",
    - W8 Y" y* L; x     RowBox[{"CM", "[",
    0 k! L8 b. D2 v* R& F& k: p      RowBox[{"53", ",", "5"}], "]"}], ",",
    " M7 a4 x8 `& n# T6 [4 I     RowBox[{"CM", "[", ) Z, @& I' d( X4 G
          RowBox[{"53", ",", "6"}], "]"}], ",", ( s4 x/ z3 ]& C8 v& h) T
         RowBox[{"CM", "[",
    " a# c; L4 d& Z; T& E      RowBox[{"53", ",", "7"}], "]"}], ",", . l- ]7 u3 o$ J' v3 j) o
         RowBox[{"CM", "[",
    - q  Q# F- X# P- i) E      RowBox[{"53", ",", "8"}], "]"}], ",",
    7 y3 L% E) m6 ]' y( Y( p     RowBox[{"CM", "[",
    4 Q" T3 F0 Q, p3 [      RowBox[{"53", ",", "9"}], "]"}]}], "}"}], ",", 2 G" ~. K1 q) t  f( L
       RowBox[{"{",
    5 w* @+ L& `  C0 ]2 [: |    RowBox[{
    8 _9 h6 I( T% {0 ~7 }" u* p( `     RowBox[{"CM", "[", 5 p4 e0 m$ o" S9 [$ ^6 W- p; L! H
          RowBox[{"54", ",", "1"}], "]"}], ",",
    - q- ^2 J2 c# W9 [2 U     RowBox[{"CM", "[", & T3 f) U# n# J+ |, g3 j
          RowBox[{"54", ",", "2"}], "]"}], ",",
    ! q2 f. J8 V" j! U* O" K; {     RowBox[{"CM", "[",
    7 U5 c, ?8 X4 b+ C+ M- s      RowBox[{"54", ",", "3"}], "]"}], ",",
    - o# z* Y# D7 O% \& E     RowBox[{"CM", "[", 1 F: U1 y  T, `* ?; P3 i9 I: Z0 M5 u
          RowBox[{"54", ",", "4"}], "]"}], ",", : a$ ~- n2 |( v. G
         RowBox[{"CM", "[", # e( B& x" y( d% L
          RowBox[{"54", ",", "5"}], "]"}], ",", 8 l9 A: t- o% p) A2 q7 E
         RowBox[{"CM", "[",
    , E- I  n* ^* v! Y0 w3 V      RowBox[{"54", ",", "6"}], "]"}], ",",
    , O4 F1 T7 q; F     RowBox[{"CM", "[",
    $ C- K7 V. s* N/ R+ n+ B% ^. l      RowBox[{"54", ",", "7"}], "]"}], ",", % t, [' \9 V3 j
         RowBox[{"CM", "[",
    2 o, O- b/ Q8 H  e( P      RowBox[{"54", ",", "8"}], "]"}], ",", 6 G7 Q/ I7 M; t! X
         RowBox[{"CM", "[",
    6 S" b1 S( i5 R2 C      RowBox[{"54", ",", "9"}], "]"}]}], "}"}], ",", 4 X3 n+ @* r- f3 Q
       RowBox[{"{", . d4 o2 j3 J  S6 b* J
        RowBox[{" c  I* N2 w9 g5 S; a+ D6 F
         RowBox[{"CM", "[",
    / N0 M/ z4 y; N7 q( s  x) Z! n      RowBox[{"55", ",", "1"}], "]"}], ",",
    6 n- |( y3 f$ h- v; @1 v     RowBox[{"CM", "[",
    ( `1 q/ g5 ?5 K  I      RowBox[{"55", ",", "2"}], "]"}], ",",
    , r2 h$ V3 r$ x6 v3 l# B  d  ^2 @     RowBox[{"CM", "[",   Y9 B' j2 N+ e1 W; |# v. {0 Z( R
          RowBox[{"55", ",", "3"}], "]"}], ",",
    : D6 J/ W" W$ |9 P6 o1 b     RowBox[{"CM", "[", ( Y9 N3 ^  s' P; I6 _
          RowBox[{"55", ",", "4"}], "]"}], ",",
    : p4 O' |( y- |) G( e     RowBox[{"CM", "[", 2 X8 \# y; M/ e8 a6 f7 `3 d/ c
          RowBox[{"55", ",", "5"}], "]"}], ",", % ^% F* X& x2 e& a3 Z, g$ h; A4 {- d
         RowBox[{"CM", "[",   A; ~3 h6 S2 v. Q
          RowBox[{"55", ",", "6"}], "]"}], ",", 5 N" N% _. K; q3 |8 X, e
         RowBox[{"CM", "[", - w+ W+ `3 U/ k
          RowBox[{"55", ",", "7"}], "]"}], ",", / F- T" f8 ^- d2 C) G
         RowBox[{"CM", "[", / Z1 [* [; t( }
          RowBox[{"55", ",", "8"}], "]"}], ",", / J- k4 t( N. N/ V8 u  x- b4 B9 e
         RowBox[{"CM", "[", # `  j( f  q8 [# F! m: @. ?6 Z* w% s
          RowBox[{"55", ",", "9"}], "]"}]}], "}"}], ",",
    ( w- V+ S  p, W0 A' T  Z* C   RowBox[{"{",   H' ^! A  y: I& U- v! z
        RowBox[{0 q- M% Z* \' A5 [- _8 g
         RowBox[{"CM", "[", - a6 T8 q8 O! x
          RowBox[{"56", ",", "1"}], "]"}], ",",
    - }. t: T. e' H% K     RowBox[{"CM", "[", : P) D/ D* i7 {
          RowBox[{"56", ",", "2"}], "]"}], ",", ) I. k* u8 l( w
         RowBox[{"CM", "[",
    4 p* v% s, d& v7 l      RowBox[{"56", ",", "3"}], "]"}], ",",
    1 @4 ^  Y* F" {/ G     RowBox[{"CM", "[", / F2 s. N8 L0 D& V1 E
          RowBox[{"56", ",", "4"}], "]"}], ",",
    4 _1 B5 W/ A  U5 Z, W( ^     RowBox[{"CM", "[",
    5 a. _8 @3 I/ e  @/ B" Z0 o2 t! n      RowBox[{"56", ",", "5"}], "]"}], ",", . i! U1 Q: ~6 v
         RowBox[{"CM", "[",
    # n; C3 v- F: t      RowBox[{"56", ",", "6"}], "]"}], ",", : K$ F  j; {( X7 y$ A$ ^; Q+ e
         RowBox[{"CM", "[",
    2 h- M, M6 T! d0 f      RowBox[{"56", ",", "7"}], "]"}], ",", * N1 I& H% E* R5 V' k9 h
         RowBox[{"CM", "[", : S- i: Y" M! v/ A7 L; [9 U# {
          RowBox[{"56", ",", "8"}], "]"}], ",",
    4 ~: k6 D8 e0 ^7 o  f6 _     RowBox[{"CM", "[",
    ! T, s1 X, R7 `; B      RowBox[{"56", ",", "9"}], "]"}]}], "}"}], ",", 2 S2 U6 |9 |2 V+ {3 V$ V
       RowBox[{"{", ( U( ^" Z7 R( c* S; I6 n; k2 @* L
        RowBox[{& l1 p( ]% ]9 Z3 y6 l/ P
         RowBox[{"CM", "[", 8 A# q9 Q) t' R: P7 \: ^
          RowBox[{"57", ",", "1"}], "]"}], ",",
    1 Z" s5 q2 X0 q# ^5 o     RowBox[{"CM", "[",
    8 g# l% U  ~( C0 ~* d# q      RowBox[{"57", ",", "2"}], "]"}], ",", 2 X+ h6 P6 B5 u
         RowBox[{"CM", "[", , M. Q1 _; v9 N( K, g( C7 w
          RowBox[{"57", ",", "3"}], "]"}], ",", & d. P( u0 R3 M0 n9 O' o% e( w
         RowBox[{"CM", "[",
    $ S; j; o  D; Q! W$ }, b. E      RowBox[{"57", ",", "4"}], "]"}], ",", ; X+ E4 ~  ^5 O
         RowBox[{"CM", "[",
    - O2 `+ S/ r; W1 K& e( ]- E      RowBox[{"57", ",", "5"}], "]"}], ",", 0 S8 U& A% R& d5 K0 m9 f. [
         RowBox[{"CM", "[", & \* ?% I( p" J7 c: x% V
          RowBox[{"57", ",", "6"}], "]"}], ",", 1 x% ?6 n0 y4 C# Y/ e4 G0 y
         RowBox[{"CM", "[",
    $ q. A% g7 L3 G      RowBox[{"57", ",", "7"}], "]"}], ",", 1 N9 A9 L$ G9 k/ B2 _& U
         RowBox[{"CM", "[", * Q9 w. e5 A7 M9 n4 D
          RowBox[{"57", ",", "8"}], "]"}], ",",
    - V* }* P9 e# Z0 z     RowBox[{"CM", "[", 1 `$ i& d, {% k! e
          RowBox[{"57", ",", "9"}], "]"}]}], "}"}], ",", % c; ]4 r# v5 j8 d
       RowBox[{"{", ' p, G" t6 G$ K8 q. X! W
        RowBox[{/ u, \1 ^7 `$ i% p& D7 R# ^
         RowBox[{"CM", "[", 3 O' b/ d! S# H7 s
          RowBox[{"58", ",", "1"}], "]"}], ",", 8 h6 p; ?9 C  j$ Q7 p1 I& U
         RowBox[{"CM", "[", 1 S! u4 Z: P# `$ @" G+ D% J% ]7 t9 g
          RowBox[{"58", ",", "2"}], "]"}], ",",
    / j+ m6 v$ \6 e/ F% Z* p     RowBox[{"CM", "[", / q9 A* R% F/ g) Z5 c5 V. L
          RowBox[{"58", ",", "3"}], "]"}], ",", 2 D* }: c, P% s! O2 I& I! O
         RowBox[{"CM", "[",
    , ]! S* M+ n2 c      RowBox[{"58", ",", "4"}], "]"}], ",", : Z: T# t0 M8 O" f
         RowBox[{"CM", "[",
    ( |5 S2 B$ q$ e# w8 ]" G      RowBox[{"58", ",", "5"}], "]"}], ",",
    ' ^& p5 k- V5 b% J7 I- m     RowBox[{"CM", "[",
    " L2 n' M$ v# D$ J      RowBox[{"58", ",", "6"}], "]"}], ",",
    7 ]7 Z4 l& {& q% e     RowBox[{"CM", "[", % @; _% v: k" G" j8 a+ Y4 e
          RowBox[{"58", ",", "7"}], "]"}], ",",
    - W3 E; \8 Z+ b4 X: M' \     RowBox[{"CM", "[", 7 u; i- q3 D. f" y
          RowBox[{"58", ",", "8"}], "]"}], ",", : z2 e- K5 D( E& `9 ?, v
         RowBox[{"CM", "[", ! m" {1 }( Q( f* O
          RowBox[{"58", ",", "9"}], "]"}]}], "}"}], ",",
    $ ^- G7 N6 O0 ], p3 {0 [   RowBox[{"{", 1 K6 E% M4 v6 a' C
        RowBox[{; F- {  d! T) T% U
         RowBox[{"CM", "[", 8 ?; }1 u: t3 {2 e
          RowBox[{"59", ",", "1"}], "]"}], ",",
    1 }6 e* s7 g" `6 b8 u$ @! P     RowBox[{"CM", "[",
    $ [. l6 k& g/ [- r      RowBox[{"59", ",", "2"}], "]"}], ",", ' d% S8 r6 Q) V% d. n
         RowBox[{"CM", "[",
    / ?$ i+ k1 V" M. p      RowBox[{"59", ",", "3"}], "]"}], ",", 8 G9 ^* w2 d; T( p* Z$ r
         RowBox[{"CM", "[",
    9 U* L/ f- ~9 H5 b4 m7 K0 G      RowBox[{"59", ",", "4"}], "]"}], ",", 7 P2 h! [, w, B+ v% n3 w+ }
         RowBox[{"CM", "[",
    5 t( A1 m1 x7 {/ ?5 B      RowBox[{"59", ",", "5"}], "]"}], ",", 8 _# B4 m; F: I- [% T1 x0 @
         RowBox[{"CM", "[", / l2 L# Q7 _5 H+ V
          RowBox[{"59", ",", "6"}], "]"}], ",",
    0 f& R" [" {3 }4 V# e     RowBox[{"CM", "[",
    ( A% N8 S/ }0 E* [. i      RowBox[{"59", ",", "7"}], "]"}], ",",
    5 F" H& d" e9 C* X     RowBox[{"CM", "[",
    ' r. @6 I/ }; B0 w      RowBox[{"59", ",", "8"}], "]"}], ",",   W* K: s- l' C( _3 b
         RowBox[{"CM", "[",
    9 e; U; u7 P; a      RowBox[{"59", ",", "9"}], "]"}]}], "}"}], ",", 7 z: t  H5 x. n4 K7 F! B8 Z- d
       RowBox[{"{", 5 `8 v  {% C1 L1 j$ j) I& m- _5 P
        RowBox[{  ?: M3 s$ E. w5 T
         RowBox[{"CM", "[",
    & s% n3 s' y2 y: h7 w. Y9 ^      RowBox[{"60", ",", "1"}], "]"}], ",",
    # T9 D7 q; {5 X9 b4 u, D* _     RowBox[{"CM", "[",
    ' \  u) K( D; N) P& y  X2 t  C, X      RowBox[{"60", ",", "2"}], "]"}], ",", ( ]% J" k* D5 r  a0 h/ G3 y
         RowBox[{"CM", "[", 3 Y" z% w* S' z: Y8 V5 F
          RowBox[{"60", ",", "3"}], "]"}], ",",   v0 V; ^0 E6 p6 M
         RowBox[{"CM", "[", 6 d/ N: t) _: u
          RowBox[{"60", ",", "4"}], "]"}], ",",
    4 L0 C4 W: [2 l' m7 S     RowBox[{"CM", "[",
    % h9 l) A  w& T: A      RowBox[{"60", ",", "5"}], "]"}], ",", - P. j: p% m- t: \% Z8 M% X
         RowBox[{"CM", "[",
    3 \% M) N0 U2 ^: @      RowBox[{"60", ",", "6"}], "]"}], ",",
    " A- R0 r! u0 l) f0 p' f' v; x1 Q     RowBox[{"CM", "[", 2 z2 c# l2 f7 L) G; H
          RowBox[{"60", ",", "7"}], "]"}], ",",
    ' T! S) c! S) s2 [8 n! w! x0 Z     RowBox[{"CM", "[", 1 e0 z7 B' Y9 Q1 B
          RowBox[{"60", ",", "8"}], "]"}], ",",
    ! l: k4 a$ X. h6 F     RowBox[{"CM", "[",
    0 |- t# ?; Q% R* ]8 y  x- H6 i      RowBox[{"60", ",", "9"}], "]"}]}], "}"}], ",",
    5 J' I* u; A4 z' E0 i/ ?2 R6 E   RowBox[{"{", 9 f/ u$ j. |4 Z! k5 ]# f% s
        RowBox[{( m6 k# ?* z/ P" U
         RowBox[{"CM", "[",
    # h1 D7 A! R/ I  q  G. K      RowBox[{"61", ",", "1"}], "]"}], ",",
    1 W, v) j( G+ {' o     RowBox[{"CM", "[",
    4 ?; f% R+ J  H  ~3 A. S3 q      RowBox[{"61", ",", "2"}], "]"}], ",",
    # F1 B3 j5 _! K! F" w  g+ K" ]     RowBox[{"CM", "[",
    " M* i7 c% D8 t$ y) M* x, M  k      RowBox[{"61", ",", "3"}], "]"}], ",",
    , Q$ n* H& F: U0 r     RowBox[{"CM", "[",
    - v3 [, p, f' U4 Q' g      RowBox[{"61", ",", "4"}], "]"}], ",",
    / ?$ A2 [6 y7 M( i. s  Z     RowBox[{"CM", "[", - d4 D; D: p% L& R) j" X, Z& g4 B$ T
          RowBox[{"61", ",", "5"}], "]"}], ",", 5 B1 I' ?8 M  ]7 s. b/ u* Z6 m
         RowBox[{"CM", "[", 3 D, H1 F# [7 l+ B0 @2 t  W
          RowBox[{"61", ",", "6"}], "]"}], ",", # Q$ |, {" e4 b; a6 k
         RowBox[{"CM", "[", . _) N% i- l/ g1 h& T
          RowBox[{"61", ",", "7"}], "]"}], ",",
    + X) Z0 R: g  R& }) l- _1 @     RowBox[{"CM", "[",
    3 }2 D& w3 Q: L; g- r      RowBox[{"61", ",", "8"}], "]"}], ",", ! Q, R+ Q4 }* n! \. V
         RowBox[{"CM", "[", 2 b1 Z8 f) m1 F  W
          RowBox[{"61", ",", "9"}], "]"}]}], "}"}], ",",
    ' G* b* G6 g$ s, G9 d9 M% T& `   RowBox[{"{", 3 }4 M! h6 R8 I/ `2 e( f. E
        RowBox[{
    & W6 n0 v. g+ {6 u! }$ e     RowBox[{"CM", "[", 0 U% B( \) R  N+ O
          RowBox[{"62", ",", "1"}], "]"}], ",",
    5 y2 z$ O3 U* J' l( T. c     RowBox[{"CM", "[", 8 x8 T) T4 R0 F" ~  I. S
          RowBox[{"62", ",", "2"}], "]"}], ",", - _+ _* [  r3 @, Z# S# r6 `
         RowBox[{"CM", "[",
    4 I0 x; F1 }  X- u3 t5 R7 B# g0 z      RowBox[{"62", ",", "3"}], "]"}], ",",
    - l; z) Z* o" P5 H2 b. D: {     RowBox[{"CM", "[", % M: K* h" |( P: T, v" v' P% @& y
          RowBox[{"62", ",", "4"}], "]"}], ",", ) X$ N1 |6 S/ Y3 v5 }
         RowBox[{"CM", "[",
    ) i2 \. x. I8 D- ~% n      RowBox[{"62", ",", "5"}], "]"}], ",", , |7 E( B3 h3 x6 J  [# U1 e$ t
         RowBox[{"CM", "[", $ ~. d- a- b+ M4 c7 ~
          RowBox[{"62", ",", "6"}], "]"}], ",",
    , q6 E& G+ }& R' G; g2 u+ t     RowBox[{"CM", "[",
    ( M* M  L  t2 X# [      RowBox[{"62", ",", "7"}], "]"}], ",", , e, Z* A' k# T3 N: Q  X- ~
         RowBox[{"CM", "[", 0 Q( I+ f+ S6 ?# y
          RowBox[{"62", ",", "8"}], "]"}], ",", , u2 o) ^4 \1 f& {6 ^) P9 d
         RowBox[{"CM", "[",
    0 O* t7 G& X/ q7 y6 ~      RowBox[{"62", ",", "9"}], "]"}]}], "}"}], ",",
    . `- c( N/ Y( w/ K. U+ i   RowBox[{"{", 7 s, r0 E  \2 W+ G2 Y, t$ X! O3 _
        RowBox[{* G6 E/ d( s0 S/ R: U( x% I; y1 q4 N
         RowBox[{"CM", "[",
    ! W& q0 b" d/ }7 c8 t      RowBox[{"63", ",", "1"}], "]"}], ",", 0 E1 [+ U, _. I% S! B6 ]% o
         RowBox[{"CM", "[", 8 `/ J  L  T' g( o+ S: Q3 ]
          RowBox[{"63", ",", "2"}], "]"}], ",", : P5 q" g, d. i$ B
         RowBox[{"CM", "[", ! g) J+ L" I( E2 z8 G. x  b
          RowBox[{"63", ",", "3"}], "]"}], ",",
    4 i4 h: N( i6 a     RowBox[{"CM", "[",
    9 r$ w4 u$ m/ W8 t$ s+ R8 }      RowBox[{"63", ",", "4"}], "]"}], ",",
    . k$ }4 z! E0 a; a- ?7 ]     RowBox[{"CM", "[", 7 x, g3 c9 |) M7 E' C
          RowBox[{"63", ",", "5"}], "]"}], ",",
    8 \! s; k' a3 \' R4 t3 c! j) [     RowBox[{"CM", "[",
    9 z' w6 Y6 U, ~4 s6 m      RowBox[{"63", ",", "6"}], "]"}], ",", % ~" p9 f) q9 l; E7 C
         RowBox[{"CM", "[",
    . s( j! {9 u+ @; j      RowBox[{"63", ",", "7"}], "]"}], ",",
    " S5 A3 ~) [* R7 i" [5 ]% T     RowBox[{"CM", "[", & u" x: j- m$ x4 V/ ^3 h
          RowBox[{"63", ",", "8"}], "]"}], ",", 9 u# X' b$ T* O5 y* ~
         RowBox[{"CM", "[",
    5 B  G, `3 L6 u7 S      RowBox[{"63", ",", "9"}], "]"}]}], "}"}], ",", 1 ?. ?1 c  X' k' F' q1 N
       RowBox[{"{",
    * _# A7 p) o4 u. i* M% M' y2 ?    RowBox[{3 e6 s: g# j7 k. f  x# E  X
         RowBox[{"CM", "[", 7 S  {4 ]7 r- J& K/ `+ G
          RowBox[{"64", ",", "1"}], "]"}], ",", 9 U0 A! ?' o3 F; I
         RowBox[{"CM", "[", 5 K1 G& k! S6 ^8 l
          RowBox[{"64", ",", "2"}], "]"}], ",", % v$ T- ^% l4 c5 j' I# u
         RowBox[{"CM", "[",
    & l& C% |: d( w      RowBox[{"64", ",", "3"}], "]"}], ",",
    + P8 n. |1 B8 h. Z$ s! ^     RowBox[{"CM", "[",
    ( `9 i1 j7 l; {8 I) ~6 p+ b, L      RowBox[{"64", ",", "4"}], "]"}], ",",
    2 v" a4 R. j  O" Q, n     RowBox[{"CM", "[", 6 V2 K" f$ u( q, x+ l9 s
          RowBox[{"64", ",", "5"}], "]"}], ",", 6 S8 \" F8 y9 R, p' }( N8 u
         RowBox[{"CM", "[", 8 n% _' f( ~, l. O" m3 ~! l6 H
          RowBox[{"64", ",", "6"}], "]"}], ",", 8 u: H7 k' H1 V1 R! \
         RowBox[{"CM", "[", 0 B0 o: d5 v8 h* q4 p
          RowBox[{"64", ",", "7"}], "]"}], ",",
    % w$ E. X4 }7 X; b     RowBox[{"CM", "[",
    $ V5 Z* {6 t4 r+ f7 Y4 l: K      RowBox[{"64", ",", "8"}], "]"}], ",",
    $ r" v/ U( W1 W3 c" D) _     RowBox[{"CM", "[", 6 T" I8 ]3 L* S( C4 _
          RowBox[{"64", ",", "9"}], "]"}]}], "}"}], ",",
    ) P' V9 s; r9 q& o: I   RowBox[{"{",
    . d' w% I/ i, s3 i: `    RowBox[{, Y1 a- z7 w2 Q! w5 Y* U# i2 B6 @
         RowBox[{"CM", "[",
    5 R/ k9 K# s/ r      RowBox[{"65", ",", "1"}], "]"}], ",", & H, J2 c4 {# V* ]$ m- h
         RowBox[{"CM", "[",
    ( s1 |& ?2 j. q) G      RowBox[{"65", ",", "2"}], "]"}], ",",
    * l0 V+ x( j* N: N& E) w0 O     RowBox[{"CM", "[",
    6 x& O$ W9 U# F" T3 S: X5 n, O0 Q# [' m      RowBox[{"65", ",", "3"}], "]"}], ",",
    , \  D8 @, U: i6 q- I" E- k3 z  |     RowBox[{"CM", "[", . Q/ f3 Y' i! m6 N0 b
          RowBox[{"65", ",", "4"}], "]"}], ",",   n4 c7 z2 P% V" R
         RowBox[{"CM", "[", 9 t/ b! x+ z4 k' M9 F1 c" _: A) ^
          RowBox[{"65", ",", "5"}], "]"}], ",",
    * e2 ^9 t+ i( R7 t* }% f     RowBox[{"CM", "[", , j) n6 }8 |' J! M$ @% ?' k) z
          RowBox[{"65", ",", "6"}], "]"}], ",",
    # }4 U# i/ j/ n     RowBox[{"CM", "[", & f5 y7 J/ o: y1 W' e% Q+ J: X
          RowBox[{"65", ",", "7"}], "]"}], ",", - B8 _1 C3 `  [9 A7 U7 @
         RowBox[{"CM", "[", 5 N4 _& |' X' |- P( T% U
          RowBox[{"65", ",", "8"}], "]"}], ",", : D6 \( Q  Y# ?% X
         RowBox[{"CM", "[",
    ( f" m* ?  p% o# N1 P5 |& @/ ?      RowBox[{"65", ",", "9"}], "]"}]}], "}"}], ",", / P2 o. o* l# w$ ~& \
       RowBox[{"{", $ S4 p/ o; [4 L! Y3 W8 `0 Y
        RowBox[{( W1 P" {1 V! \
         RowBox[{"CM", "[", . l* T7 q0 o4 P( q0 z) H! j
          RowBox[{"66", ",", "1"}], "]"}], ",",
    & \. U) P- D0 A4 g* F8 C0 b0 W     RowBox[{"CM", "[",
    1 ^6 D9 a" }4 _      RowBox[{"66", ",", "2"}], "]"}], ",",
    4 K+ }. D" i, b     RowBox[{"CM", "[", ) h5 D' {5 Y$ U; J( z7 h0 c
          RowBox[{"66", ",", "3"}], "]"}], ",", 3 R) X5 o$ f0 }; v7 L9 T
         RowBox[{"CM", "[",
    ( U% r% f+ b" p      RowBox[{"66", ",", "4"}], "]"}], ",",
    - p! k3 C1 m% B$ L0 k* Y     RowBox[{"CM", "[", 5 U* W3 q5 Y7 y3 x
          RowBox[{"66", ",", "5"}], "]"}], ",", : |" X5 h) ]) a/ |, j
         RowBox[{"CM", "[",
    % u. K& o% t" f7 @      RowBox[{"66", ",", "6"}], "]"}], ",", 9 _9 u  f4 n3 q% R; l
         RowBox[{"CM", "[", / A7 j) i0 V3 n
          RowBox[{"66", ",", "7"}], "]"}], ",", , k5 o! Y& ]& E& X- @$ V/ `
         RowBox[{"CM", "[", * y- p/ s0 M4 J
          RowBox[{"66", ",", "8"}], "]"}], ",", " y# e1 W# @7 T- w! I, q* d$ `5 H: Q
         RowBox[{"CM", "[",
    " ~6 @. s( T/ Q# G( Y! n      RowBox[{"66", ",", "9"}], "]"}]}], "}"}], ",",   t  x7 O" V1 L2 }0 N# L
       RowBox[{"{", ; y# H; v) A( J3 V9 U
        RowBox[{! {$ k+ {" \3 k* _, K8 g9 F: v+ f
         RowBox[{"CM", "[",
    ' c1 e. q  Y, [9 j      RowBox[{"67", ",", "1"}], "]"}], ",",
    # K3 z6 v+ Y5 Y. t     RowBox[{"CM", "[",
    2 d, A0 g( E4 e! H. ^% y% p/ r      RowBox[{"67", ",", "2"}], "]"}], ",",
    1 p- u; J  K) o     RowBox[{"CM", "[", / Q+ [& y# Z' l; @) g3 [1 T
          RowBox[{"67", ",", "3"}], "]"}], ",",
    & J, U$ M% D( o: d/ [' K3 {: g     RowBox[{"CM", "[",
    ' M' V4 U- M4 X0 D      RowBox[{"67", ",", "4"}], "]"}], ",",
    ; T% J& k' D# B4 {5 e% R0 R     RowBox[{"CM", "[", ) U0 e0 f7 w/ P- Z6 k! I
          RowBox[{"67", ",", "5"}], "]"}], ",",
    : r$ q7 U& k/ ^) u& E5 W     RowBox[{"CM", "[",
    ! T+ F; @2 i- i; \8 u' q" F      RowBox[{"67", ",", "6"}], "]"}], ",", 5 w, A% d. q7 r$ f* p# |
         RowBox[{"CM", "[",
    ' X" p9 C7 a0 `" }, ]' t+ w      RowBox[{"67", ",", "7"}], "]"}], ",",
    ' s4 A4 [+ E7 v* B! I; G! A     RowBox[{"CM", "[",
    0 H# @" I/ r, M* _      RowBox[{"67", ",", "8"}], "]"}], ",", ; c9 O/ M7 S: c2 {, ^" K3 o
         RowBox[{"CM", "[",
    4 x4 q% _/ b4 l3 d5 s- V      RowBox[{"67", ",", "9"}], "]"}]}], "}"}], ",",
    8 R/ c5 K1 i7 b( i- B* e" U   RowBox[{"{",
    ' P$ N: N* j7 s7 _& W: ~5 I    RowBox[{
    - w6 {- g. T1 G4 B     RowBox[{"CM", "[", 5 @6 B& g8 Y: n1 o; ]0 G3 ~- Q
          RowBox[{"68", ",", "1"}], "]"}], ",", - T" J: |0 {% w& N9 s  X. z+ |3 G
         RowBox[{"CM", "[",
    5 t2 a6 a* \4 v( H9 b9 E( K% q0 k      RowBox[{"68", ",", "2"}], "]"}], ",",
    1 c  v% [! _% w# ^5 P- e/ E     RowBox[{"CM", "[", $ |. Y* g7 F. C/ K1 _# S
          RowBox[{"68", ",", "3"}], "]"}], ",",
    4 u. C5 O9 }0 ?6 w5 Q     RowBox[{"CM", "[", 0 S+ N' v/ L7 {8 s
          RowBox[{"68", ",", "4"}], "]"}], ",", 4 `+ A7 [! W# w- h
         RowBox[{"CM", "[", 5 _2 e  `! b3 u" O  x4 x( j
          RowBox[{"68", ",", "5"}], "]"}], ",", 9 G* r# h4 @; j4 U" P
         RowBox[{"CM", "[",
    4 c! L7 u- S& s5 v  v      RowBox[{"68", ",", "6"}], "]"}], ",", ( B% v3 ?% B" \. |% E/ {: w
         RowBox[{"CM", "[", & D* V" ~; _' W% x1 s: L
          RowBox[{"68", ",", "7"}], "]"}], ",",
    # z/ H! Q, `% W- Y) ]1 B2 P     RowBox[{"CM", "[", 7 C) d& v8 s1 v" g# {7 s
          RowBox[{"68", ",", "8"}], "]"}], ",", " U! a1 b- L6 N
         RowBox[{"CM", "[",
    ; e/ D& j6 O4 @7 U, e' f% H      RowBox[{"68", ",", "9"}], "]"}]}], "}"}], ",", * B& F( i" Z( _' K
       RowBox[{"{", ; @+ g6 E) y. t- n! P. [4 z. t
        RowBox[{
    3 q" J- m) f, i     RowBox[{"CM", "[", & W( V( f6 Y5 d; R& k
          RowBox[{"69", ",", "1"}], "]"}], ",", * m. I1 R2 S" {8 j/ ~1 |* n- X' U/ a
         RowBox[{"CM", "[", - t  X+ n! q( D
          RowBox[{"69", ",", "2"}], "]"}], ",", 7 Q+ h. z4 K: E
         RowBox[{"CM", "[", ; M4 x3 o% C( ]
          RowBox[{"69", ",", "3"}], "]"}], ",",
    , I- v, K8 v% ?' D  W6 z% ~) Q     RowBox[{"CM", "[",
    / D1 C% F3 E$ A# z  |2 j8 V      RowBox[{"69", ",", "4"}], "]"}], ",",
    0 P7 B4 W" G# s8 \+ A9 C     RowBox[{"CM", "[",
    , K0 h+ L2 ?; U; s      RowBox[{"69", ",", "5"}], "]"}], ",", : Q: i2 ?3 h& ^! J8 y; O/ }
         RowBox[{"CM", "[", 4 r  A$ k  c) M/ {, Q1 w! S$ ]
          RowBox[{"69", ",", "6"}], "]"}], ",", ) c/ S: u( V4 j* B# i2 t
         RowBox[{"CM", "[",
    2 Q, h" X1 R: t/ ~. {      RowBox[{"69", ",", "7"}], "]"}], ",", 3 X" X# n1 e9 R8 Q
         RowBox[{"CM", "[",
    + }( _: O4 k! H9 C      RowBox[{"69", ",", "8"}], "]"}], ",", - g7 D+ z8 O7 x5 i4 p) D' q
         RowBox[{"CM", "[",
    & t0 D6 s5 z, F0 F4 e; H5 @* L      RowBox[{"69", ",", "9"}], "]"}]}], "}"}], ",", 1 E/ ^- j1 m# S9 ~
       RowBox[{"{", # E4 s' B: g$ L" C
        RowBox[{( m9 g/ y1 I" y; M
         RowBox[{"CM", "[", ! H6 W; i! W1 m% E
          RowBox[{"70", ",", "1"}], "]"}], ",",
    # W6 ?+ w) C0 }' C) s- T  k     RowBox[{"CM", "[",
    + h5 S" O: v2 c+ b9 L* c7 e      RowBox[{"70", ",", "2"}], "]"}], ",",
    - G$ L3 t$ ?9 x, z' n     RowBox[{"CM", "[",
    6 p* F6 m0 k% j% @6 h2 k( d7 D      RowBox[{"70", ",", "3"}], "]"}], ",", 6 ?6 O# J; S% j6 E  O; R' Q
         RowBox[{"CM", "[", 2 r/ G) O5 @  g( r3 V4 s& K
          RowBox[{"70", ",", "4"}], "]"}], ",", ) W  d5 N7 S) p- Y. `7 a
         RowBox[{"CM", "[", ) P7 [: U2 V' g" d
          RowBox[{"70", ",", "5"}], "]"}], ",",
    . R  {4 F5 `- Q! B9 m* k- C; G     RowBox[{"CM", "[",
    6 t: o6 u( l* J* @' F( l8 ~      RowBox[{"70", ",", "6"}], "]"}], ",", - R' U  F( e9 H( d( u9 v
         RowBox[{"CM", "[",
    9 y2 ?& l2 N& Z6 u9 B6 R      RowBox[{"70", ",", "7"}], "]"}], ",", - }3 L- J! @  Z1 \. U7 Y  e; d9 q
         RowBox[{"CM", "[", & R1 S: _) a. W+ ?
          RowBox[{"70", ",", "8"}], "]"}], ",",
    * A" q( h+ E* T  \; b% ?     RowBox[{"CM", "[", % u# ?4 t1 N7 j" E  y0 N
          RowBox[{"70", ",", "9"}], "]"}]}], "}"}], ",", # s! m; ?$ K/ w( ~. b. ^$ F7 G+ W# J/ a
       RowBox[{"{",
    ; p/ y0 c: n' C: O6 _6 e* {    RowBox[{! m# D% o4 S3 ?
         RowBox[{"CM", "[",
    8 z6 C, C3 c  v, l5 H. `: f- q      RowBox[{"71", ",", "1"}], "]"}], ",", , U* C8 Y, k" L; B4 ^! C
         RowBox[{"CM", "[", - H* d: D9 ?! y1 D0 O& w
          RowBox[{"71", ",", "2"}], "]"}], ",", ! ^" c4 a5 @/ T( a, {- T
         RowBox[{"CM", "[",
    & O1 l  F* C/ a2 m( B3 c      RowBox[{"71", ",", "3"}], "]"}], ",",   ]/ W3 U- f0 b( m  a
         RowBox[{"CM", "[", ) v% t: [$ K; j6 Y
          RowBox[{"71", ",", "4"}], "]"}], ",",
    : H8 I  V0 _5 _5 z( O! H% ^, _     RowBox[{"CM", "[",
    ' `, b' V4 i8 X. e* r      RowBox[{"71", ",", "5"}], "]"}], ",", ) W! D/ e# m5 ]
         RowBox[{"CM", "[", 7 g$ s; l5 M; @$ U% W
          RowBox[{"71", ",", "6"}], "]"}], ",", $ S: J, {, H3 \
         RowBox[{"CM", "[", 6 `0 T: c2 O# `5 m8 Z) D6 _
          RowBox[{"71", ",", "7"}], "]"}], ",", & r3 i* i1 K1 D! e/ X( J5 q
         RowBox[{"CM", "[", ! e; f. ]0 j" o2 d$ x
          RowBox[{"71", ",", "8"}], "]"}], ",",
    $ O! B( m9 C; C2 C, L     RowBox[{"CM", "[", 1 F# P* @8 _) m3 |
          RowBox[{"71", ",", "9"}], "]"}]}], "}"}], ",",   I; q1 g# l: N0 h+ a7 }
       RowBox[{"{",
    8 d. v6 Z/ x- |2 U6 ~" {    RowBox[{
    ' m2 |3 g7 |' {- j; g+ P     RowBox[{"CM", "[",
    ) ?7 d# w5 C/ v$ @) \      RowBox[{"72", ",", "1"}], "]"}], ",", $ a" D& Y& Q. z0 D3 t
         RowBox[{"CM", "[",
    2 H2 u$ t* c3 Q( }6 l      RowBox[{"72", ",", "2"}], "]"}], ",",
    % q, q# o7 j+ @# S, h" X0 B6 N     RowBox[{"CM", "[",
    7 ?9 {/ D. G( T! D9 c5 V      RowBox[{"72", ",", "3"}], "]"}], ",",
    $ D  `/ ~1 c! G/ p% x     RowBox[{"CM", "[", ! H: Q9 r$ w' N8 I3 B
          RowBox[{"72", ",", "4"}], "]"}], ",",
    5 M# k; D7 k; F+ G0 r, Z2 s# F     RowBox[{"CM", "[",
    : l0 f7 a3 H3 Q! V5 Z: R      RowBox[{"72", ",", "5"}], "]"}], ",",   j+ V& u6 G( `$ ^9 j8 y
         RowBox[{"CM", "[", . t' D( G9 v, i; ?0 A
          RowBox[{"72", ",", "6"}], "]"}], ",",   B2 ?3 G$ V+ J/ E! J" I( {) i: @
         RowBox[{"CM", "[", ' ]& a$ i1 N2 c2 v' E4 z/ z5 x
          RowBox[{"72", ",", "7"}], "]"}], ",",
    & }9 X. i7 m1 p     RowBox[{"CM", "[", " \# [: B7 K5 f6 \& B. T
          RowBox[{"72", ",", "8"}], "]"}], ",",   j) S1 T! \# \0 V" x
         RowBox[{"CM", "[", ' y) o' z$ Z$ h0 `- H
          RowBox[{"72", ",", "9"}], "]"}]}], "}"}], ",", # |5 [. _! v+ E, f
       RowBox[{"{", ; j7 l/ n% p+ {, \% N! [
        RowBox[{
    % a4 I6 L% s# E/ C     RowBox[{"CM", "[", 2 U1 _/ H0 R* q0 _! Y: T9 j4 Q
          RowBox[{"73", ",", "1"}], "]"}], ",", : S4 R! R4 _) c' S) V/ x
         RowBox[{"CM", "[", 8 d, T/ R3 {  j" c0 W! i& @: u5 _
          RowBox[{"73", ",", "2"}], "]"}], ",", , k! a; ^- F- n: N, V+ l0 M
         RowBox[{"CM", "[",
    ; ]& e+ V+ d4 C- A      RowBox[{"73", ",", "3"}], "]"}], ",", ) X. l- j0 E1 d7 L
         RowBox[{"CM", "[",
    2 h9 K/ Z, J! q1 V2 Q( R7 o      RowBox[{"73", ",", "4"}], "]"}], ",", - i! `( \! q% C* k% ^- A
         RowBox[{"CM", "[",
    5 {! I+ V) V# D/ T' t: z4 D" O% V      RowBox[{"73", ",", "5"}], "]"}], ",", - W2 r! [! O# Z% B
         RowBox[{"CM", "[",
    6 i: o3 P- t5 v/ @& G      RowBox[{"73", ",", "6"}], "]"}], ",", " O) r$ f: k2 }1 a- ^5 [
         RowBox[{"CM", "[",
    1 X/ y( x8 h2 W9 O  T7 n/ s/ O( b      RowBox[{"73", ",", "7"}], "]"}], ",",
    " ]( \) U) I3 `8 N# u" G     RowBox[{"CM", "[", 0 v5 n* u, N2 p( M* V# S. \
          RowBox[{"73", ",", "8"}], "]"}], ",",
    - C% O/ p& z& l9 \7 I$ w     RowBox[{"CM", "[", 0 i  e! e9 p" {  n
          RowBox[{"73", ",", "9"}], "]"}]}], "}"}], ",", 9 n0 M& c: q% a; y
       RowBox[{"{",
    * M8 j  J6 d8 ^1 o8 ^    RowBox[{
    9 n$ a- p1 q8 ^3 R4 F) e, J     RowBox[{"CM", "[",
    ( b+ @0 q/ y7 H" ~- p% |& C* k      RowBox[{"74", ",", "1"}], "]"}], ",",
    ; x  |6 G' @/ \- N4 |/ f+ H5 z5 N     RowBox[{"CM", "[", 7 C/ I5 o* Q; [# {- S
          RowBox[{"74", ",", "2"}], "]"}], ",",
    ) r" y2 d2 u1 j7 K- s) ^: D     RowBox[{"CM", "[",
    8 `1 {* R7 }: r: D      RowBox[{"74", ",", "3"}], "]"}], ",",
    9 o3 {6 G" S4 [" {8 l$ y) O; L" N     RowBox[{"CM", "[", 0 Z, T6 ^, O9 q8 H; z
          RowBox[{"74", ",", "4"}], "]"}], ",",
    ; |) `* _/ g2 z! B, u     RowBox[{"CM", "[", 8 s1 i# p/ u; f# A) S
          RowBox[{"74", ",", "5"}], "]"}], ",",
    - L. G2 U$ U, F& t: g' A5 J     RowBox[{"CM", "[", ) _5 S7 Z% G0 c% V) a
          RowBox[{"74", ",", "6"}], "]"}], ",", ' l& F' b* u0 h9 x2 [
         RowBox[{"CM", "[", + e4 U$ C! W6 C; Z4 q8 b$ \
          RowBox[{"74", ",", "7"}], "]"}], ",",
    0 h6 Z/ E2 t8 i     RowBox[{"CM", "[",
    1 @' y- `- K5 `* r: |: N& i* m      RowBox[{"74", ",", "8"}], "]"}], ",",
    3 Q  A+ s  H' n% V7 Z     RowBox[{"CM", "[", ; `6 _& m: y' @* b7 A
          RowBox[{"74", ",", "9"}], "]"}]}], "}"}], ",", $ P( ]; ~: i1 M/ f3 Z# f" p$ |
       RowBox[{"{",
    / d/ T9 ^5 P4 B. N5 P; V: r) ~1 m    RowBox[{4 s. Z( v# @) w1 h3 L; n% N+ C
         RowBox[{"CM", "[",
    ' t8 F9 @, m9 i& Q) G6 E: N      RowBox[{"75", ",", "1"}], "]"}], ",", 0 J( }  |% E. n! P  o
         RowBox[{"CM", "[",
    7 q5 Z0 E/ I3 S/ }( R2 z      RowBox[{"75", ",", "2"}], "]"}], ",",
    # L' L3 \" u. ]* |  m& B     RowBox[{"CM", "[", 5 D3 Z4 A: X/ Z: H! ~: @
          RowBox[{"75", ",", "3"}], "]"}], ",",
    . b; b3 I0 M/ n" c9 A( n     RowBox[{"CM", "[",
    : n# J* B! b% d" o/ N/ I      RowBox[{"75", ",", "4"}], "]"}], ",",
    ' U4 h) P# h: a: x5 o     RowBox[{"CM", "[",
    + U7 d3 q9 s; R- s$ S      RowBox[{"75", ",", "5"}], "]"}], ",",
    . l0 {! y3 ^- y* G+ Q0 C     RowBox[{"CM", "[",
    ( G- y  M+ M* H1 Y      RowBox[{"75", ",", "6"}], "]"}], ",",
    : x; M7 c1 d' d4 ]. H6 P, Q& w& u6 h2 @     RowBox[{"CM", "[", : F9 p) {. _4 Y- m1 J
          RowBox[{"75", ",", "7"}], "]"}], ",", ( `7 X3 Q7 J% V# ?, S( g2 R
         RowBox[{"CM", "[", 1 L* j# Q3 c1 v2 C( D) n. E9 k2 ?* [
          RowBox[{"75", ",", "8"}], "]"}], ",",
    # r* S! c& s3 P+ w& ]9 k     RowBox[{"CM", "[", 6 p, k. u2 f- y# B( x
          RowBox[{"75", ",", "9"}], "]"}]}], "}"}], ",",
    . R5 i( J9 A6 F+ O9 t7 D! X$ J+ ~   RowBox[{"{",
    6 l8 |2 H) {1 O7 j  U/ W. Q' V    RowBox[{, ~9 H6 i$ R/ N
         RowBox[{"CM", "[", - m3 R2 G& [6 z+ Z# O8 o$ c
          RowBox[{"76", ",", "1"}], "]"}], ",", 0 J: A- X3 A: }) X1 x( C" f3 c
         RowBox[{"CM", "[",
    ' `/ F( a/ m, ]* [! W6 R: F5 ~      RowBox[{"76", ",", "2"}], "]"}], ",",
    - D% B8 Y0 a: n     RowBox[{"CM", "[", ) M+ ?' E( y+ u9 O% T' C
          RowBox[{"76", ",", "3"}], "]"}], ",", 9 d, F( v$ q; R. k- t
         RowBox[{"CM", "[", 6 a( Y/ \4 h$ u- c  O( T
          RowBox[{"76", ",", "4"}], "]"}], ",",
    7 D/ N5 S( O; D& m# c8 N1 [! i9 v- L     RowBox[{"CM", "[",
    9 x0 R% T- ]& b. u5 J! L0 ]% Q      RowBox[{"76", ",", "5"}], "]"}], ",",
    $ c$ S4 g$ L9 g0 P. E' p" ]     RowBox[{"CM", "[",
    ' N1 ?& X% `$ t! R/ z, z8 e. M5 U      RowBox[{"76", ",", "6"}], "]"}], ",", - @7 P: H( F  n; P+ o- I6 K3 P
         RowBox[{"CM", "[", / m1 I% d: ^' @
          RowBox[{"76", ",", "7"}], "]"}], ",", ( u  u7 v3 N; N3 n9 D. x, h, \0 J
         RowBox[{"CM", "[", & j# u' U6 p( H5 o+ t8 M
          RowBox[{"76", ",", "8"}], "]"}], ",", % ^5 X7 ~  a  w1 @2 F: s7 [
         RowBox[{"CM", "[",
    ) y2 _8 H# [: h! W% T      RowBox[{"76", ",", "9"}], "]"}]}], "}"}], ",", 5 l: W5 t- N: e3 K0 r  a  F
       RowBox[{"{", ! R1 H4 e! g' z% y
        RowBox[{
    / h. [7 }0 F) A, P) [     RowBox[{"CM", "[",
    ' l% D6 Y8 D( e3 R      RowBox[{"77", ",", "1"}], "]"}], ",",
    ( G9 {! Z% b  g, p- G4 C+ A) V     RowBox[{"CM", "[", ! ?; B' @, U$ c$ z1 O
          RowBox[{"77", ",", "2"}], "]"}], ",",
    . {/ B& a# J3 A* D8 ~4 t     RowBox[{"CM", "[",
    ! \4 S' T# {$ Q% W/ I. }/ m      RowBox[{"77", ",", "3"}], "]"}], ",",
    ( D$ k$ h6 u) `     RowBox[{"CM", "[", % ~; E' l, O  P& D# a4 p7 @& a5 A" X3 h
          RowBox[{"77", ",", "4"}], "]"}], ",", - Q! K- W9 J" r7 g. G7 p
         RowBox[{"CM", "[",   K: y$ H5 L- B) ?4 B
          RowBox[{"77", ",", "5"}], "]"}], ",", 1 Z' |4 H" R: _1 y( k5 `
         RowBox[{"CM", "[", + L# c; r1 m  d  H! F3 g) ]! Y
          RowBox[{"77", ",", "6"}], "]"}], ",",
    ( p5 A3 S9 x# C) _& `     RowBox[{"CM", "[",
    5 L5 [! E) E8 f/ q      RowBox[{"77", ",", "7"}], "]"}], ",", 2 n8 E. P9 R, a
         RowBox[{"CM", "[", $ o6 _% J7 j0 A
          RowBox[{"77", ",", "8"}], "]"}], ",",
    - }% d* @8 J- P( x     RowBox[{"CM", "[", , a% S# h  h% N& Y1 _0 K
          RowBox[{"77", ",", "9"}], "]"}]}], "}"}], ",", 4 I: W/ ^$ x& ^9 V2 h
       RowBox[{"{",
    7 \4 _- A. g$ ^4 a. i    RowBox[{
    3 }' f( Q5 c1 v) n     RowBox[{"CM", "[",
    ; h) [2 G% e$ E& G1 [      RowBox[{"78", ",", "1"}], "]"}], ",", , f* j' |8 \' H
         RowBox[{"CM", "[", ' a' B2 V: s7 P8 P3 ^: v
          RowBox[{"78", ",", "2"}], "]"}], ",", % r; Z! d5 K9 I( N
         RowBox[{"CM", "[",
    5 Q2 F$ r* g( o+ ~      RowBox[{"78", ",", "3"}], "]"}], ",", - ^3 @* \" m( j
         RowBox[{"CM", "[",
    ( d2 N8 e3 l* c9 N3 E$ X      RowBox[{"78", ",", "4"}], "]"}], ",",
    1 Z& ]1 f" H. C- k. H7 t     RowBox[{"CM", "[",
    5 A  w3 L$ L& a0 Y: r      RowBox[{"78", ",", "5"}], "]"}], ",",
    # g1 d& t* R2 t  g1 r     RowBox[{"CM", "[",
    $ c0 F# y* G, \1 u3 k      RowBox[{"78", ",", "6"}], "]"}], ",",
    . H4 z5 M$ `: J     RowBox[{"CM", "[",
    * u# u* f! \$ r! k+ F4 m1 l      RowBox[{"78", ",", "7"}], "]"}], ",",
    5 X. ?& O+ j2 f4 K- D1 o3 f- O     RowBox[{"CM", "[", 2 ^% }5 c5 F% ]/ C* `0 x! ^
          RowBox[{"78", ",", "8"}], "]"}], ",",
    2 {* j0 S! e3 ?2 }1 ?+ c$ B8 k     RowBox[{"CM", "[", - I: |0 c  ^9 W! Z
          RowBox[{"78", ",", "9"}], "]"}]}], "}"}], ",",
    , f0 S/ R+ `/ P8 V) w   RowBox[{"{",
    & `8 q) `! h+ ^& W    RowBox[{
    * x3 M% O6 O' e4 j/ l& t     RowBox[{"CM", "[", * c* q8 Y8 ?* _% P3 ^! e
          RowBox[{"79", ",", "1"}], "]"}], ",",
    ' Z6 u0 a  [( Z! k! z( `2 ~; F     RowBox[{"CM", "[", . M! P0 m2 n0 S8 q5 y7 T, b& ^# L
          RowBox[{"79", ",", "2"}], "]"}], ",",
    & C. Q, Y3 D5 p8 ~     RowBox[{"CM", "[", " z2 y; j& A/ _9 F/ T
          RowBox[{"79", ",", "3"}], "]"}], ",",
    * ^4 b6 W2 I  ^! G# D     RowBox[{"CM", "[",
    % V  `. y$ {; h# X% f      RowBox[{"79", ",", "4"}], "]"}], ",",
    ( V( C9 g) o/ E  V( L     RowBox[{"CM", "[",
    % U. k" q  J6 l  Y/ B      RowBox[{"79", ",", "5"}], "]"}], ",",
    5 N0 y* ^4 f0 ~7 d2 E% g7 W2 ?     RowBox[{"CM", "[", % Y/ g9 k$ T' I- L! [! \8 B
          RowBox[{"79", ",", "6"}], "]"}], ",",
    - O* H2 h( F7 L7 A$ U     RowBox[{"CM", "[",
    . F$ W6 p( V& {: }% L5 f      RowBox[{"79", ",", "7"}], "]"}], ",",
    3 A. s) {: O$ u6 H1 y     RowBox[{"CM", "[",
    " q8 \3 Q7 B$ \: d1 j( [      RowBox[{"79", ",", "8"}], "]"}], ",",
      I9 k% g; t7 A" [     RowBox[{"CM", "[", 3 Y- l, h! p# z) i  l
          RowBox[{"79", ",", "9"}], "]"}]}], "}"}], ",", % h7 L$ Q  e% \& B
       RowBox[{"{", 0 S! i7 [  d. ^5 p( G; ?8 F0 k. P
        RowBox[{3 l. Q: I, N( E8 K
         RowBox[{"CM", "[",
    9 b( S3 h* W; X5 c2 z. J      RowBox[{"80", ",", "1"}], "]"}], ",", , J* D0 t+ ?0 L; j1 q
         RowBox[{"CM", "[",
    7 g) n3 i; F8 L+ K" L. F: y      RowBox[{"80", ",", "2"}], "]"}], ",", * r! j! h- W. N. p4 @4 h0 E
         RowBox[{"CM", "[",
    , C/ W" n$ [  T- h" K      RowBox[{"80", ",", "3"}], "]"}], ",", ) ?2 Z/ h/ v2 ~& @
         RowBox[{"CM", "[",
    9 n+ ^3 Z+ x0 W- \8 A8 _# v      RowBox[{"80", ",", "4"}], "]"}], ",", 3 m: b- {' G# I- m5 t
         RowBox[{"CM", "[", 0 v5 p" Z$ [! l& B
          RowBox[{"80", ",", "5"}], "]"}], ",", 6 W" `/ A/ _' X$ R' K) g
         RowBox[{"CM", "[", 3 a2 D5 ]0 @. D0 ?2 H
          RowBox[{"80", ",", "6"}], "]"}], ",",
    ) P4 t/ w  L/ [2 `# q% ?3 e  ^     RowBox[{"CM", "[",
    9 V3 p/ n. p5 Y0 Q8 a$ T" ~      RowBox[{"80", ",", "7"}], "]"}], ",",
    ) T! z$ g; n4 B6 c+ o9 }' L4 M# s7 Z     RowBox[{"CM", "[",
    2 t6 _8 T# K0 ?# A      RowBox[{"80", ",", "8"}], "]"}], ",", 5 }3 b8 b  f9 R( ^# Q
         RowBox[{"CM", "[", 8 p: y! K5 d- x, b+ h$ [
          RowBox[{"80", ",", "9"}], "]"}]}], "}"}]}], "}"}]], "Output",5 h  k- T2 X/ J, e& b& O' D) q
    CellChangeTimes->{3.577844244140625*^9, 3.57784429425*^9, 3.577847845125*^9, 2 D; V, p) o  U$ t6 ?/ g( U5 J
      3.57791322703125*^9, 3.577957088820712*^9, 3.5779605002346992`*^9,
    ; r* q3 _- H$ v! k' d  3.578012145828125*^9}]7 P# k% S5 q0 U, a5 G8 |, Z3 b
    }, Open  ]],
    $ V# L+ D" s) g
    & }! s/ h1 L* e7 {5 o/ T/ N# kCell[BoxData[
    % ?5 B' D3 o1 j- Z3 f3 x RowBox[{"For", "[",   j) h8 m- d2 x2 u
      RowBox[{
    3 X. C1 t& F! g3 d   RowBox[{"i", "=", "1"}], ",", # S9 U* T' {/ Z+ ]( o
       RowBox[{"i", "\[LessEqual]", "9"}], ",",
    6 j+ Q! z3 @& w- n! B   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    ! T. @: v7 v, w2 l( W3 Z   RowBox[{"For", "[",
    7 n/ A& o; M6 e% Y2 t# x2 H7 T    RowBox[{' A. k# ]- O9 {: U' E5 z
         RowBox[{"j", "=", "1"}], ",", ' e1 u% U% l8 S# H5 e$ k" p
         RowBox[{"j", "\[LessEqual]", "80"}], ",", 6 O7 c7 X; t1 Q" e. Q. L
         RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", 2 \9 N& c3 ~/ `& m( @, c. R
         RowBox[{& r; q4 J/ |- o1 i6 @4 K
          RowBox[{3 m1 A) V' |( a/ S. K: G
           RowBox[{"CM", "[", : R! W& ?0 @5 u
            RowBox[{"j", ",", "i"}], "]"}], "=", "0.0"}], ";"}]}],
    + j5 n* G% C* W' v1 U* S) R$ Z( A    "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]], "Input",
    4 }. ^. W# Q) m4 t0 L CellChangeTimes->{{3.5779132504375*^9, 3.577913285203125*^9}}],( P# L1 s( ~0 k* h6 A. D

    ' m  n. v( Z, g- GCell[BoxData[4 K6 R1 a6 j1 ]& q
    RowBox[{"For", "[",
    3 j" y5 U! s. k  RowBox[{
    # s$ w  Q3 ?2 R/ D5 K9 Q. H   RowBox[{"i", "=", "1"}], ",",
    # v8 K( o6 X# [4 y5 G8 ?   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    4 F7 G6 {% f" ?0 _; y   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", " q, f/ k/ Z0 t4 r8 }. i
       RowBox[{
    ) k! t( D# m0 f    RowBox[{
    + A; d( X' U  o9 A  @1 @( [( c     RowBox[{"CM", "[", ' X/ N& B3 }* S  y( l6 t# E3 i
          RowBox[{"1", ",", "i"}], "]"}], "=", 1 F; |5 X. B! Q; g4 A/ ^: ?3 S! w9 s
         RowBox[{"Data", "[",
    + ?. [- u) V' _! i6 |; k      RowBox[{"[", / y: h6 o! \( \, V; e% o* W
           RowBox[{"1", ",", "i"}], "]"}], "]"}]}], ";"}]}], 8 Y6 t- c7 D0 e# ^3 K% o9 q5 e
      "\[IndentingNewLine]", "]"}]], "Input",
    % A. `+ p5 I6 t0 w1 i8 P. W9 P CellChangeTimes->{{3.577844179875*^9, 3.577844181703125*^9}, {
    : v& V  Y! p% A+ v$ `0 u; c   3.577844217765625*^9, 3.5778442320625*^9}, {3.57784429953125*^9,
    $ X7 F( a, e4 B; A' c1 b- d8 l8 Q# P   3.577844347875*^9}, 3.57791328640625*^9, 3.57791338828125*^9,
    - g9 K) {3 C8 V8 y' d! S3 r   3.57791344209375*^9, 3.5779588070933466`*^9}],$ _- V' [8 @# u5 ^
    7 D! a% T1 P' l5 d/ V
    Cell[CellGroupData[{
    : s  B1 p: j6 o. |9 O& D% [
    ! u7 f: @. s4 c, ?! v( A0 m2 jCell[BoxData[{
    7 h2 c, ~- f5 R9 b RowBox[{"r0", "=", "0.2"}], "\[IndentingNewLine]",
    3 {. B/ F5 |" ?% o RowBox[{"M1", "=", "1"}]}], "Input",
    + g/ j6 o) D3 N$ T* Q9 Q CellChangeTimes->{{3.577844361578125*^9, 3.57784436678125*^9}, {
    8 V. k0 v' r' }: x9 \$ T   3.5778457908125*^9, 3.57784580253125*^9}, {3.57784602534375*^9,
    $ @7 p& R" v8 A$ m   3.577846109453125*^9}, {3.57784617128125*^9, 3.57784619321875*^9}, {: e: y5 J+ q+ u6 Y
       3.577846583984375*^9, 3.577846620984375*^9}, {3.577846653203125*^9, ! c1 x7 a2 g* Q0 C
       3.577846691984375*^9}, {3.577846779953125*^9, 3.577846794921875*^9}, {
    , A/ ~4 `- u  h% n7 e$ M   3.5778470791875*^9, 3.577847088921875*^9}, 3.577847409671875*^9, {
    " N8 Q8 }8 K8 O3 A# O' U' {8 {   3.577847477203125*^9, 3.577847523203125*^9}, {3.577847586484375*^9, 0 D9 P0 b7 z$ \% L
       3.577847600640625*^9}, {3.577847649140625*^9, 3.57784770196875*^9}, {
    9 T6 r& s7 P# f, i2 a- E! T; d   3.57784774896875*^9, 3.57784776490625*^9}, 3.577847981546875*^9, {9 |5 A1 `( n5 K! H2 E/ |3 T
       3.577913312890625*^9, 3.577913360109375*^9}, {3.577919262828125*^9,
      E( j3 C, p! u2 }8 X  ?   3.5779193133125*^9}, 3.577919388484375*^9, 3.5779605095479155`*^9}],$ H& f+ P* B3 l

    5 C% D) |3 c/ h3 Z" ZCell[BoxData["0.2`"], "Output",+ U5 {( ~9 V' D" Z+ ~
    CellChangeTimes->{
    8 K$ T) x0 m0 w; |  3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9,
    ' S; q+ {6 p& h8 L8 k' r4 [   3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    7 a/ m0 }8 ?. Q" z   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9, - J, g1 b) `7 w" m1 ?
       3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {
    ' K. n  _. B( c$ P2 p" `/ n! ^' h, Z   3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    ( ^9 }8 R9 Q  |' S   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    7 E6 v; s, y% a   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    - R; v$ U1 }2 t; u9 T- Z   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    8 d% W4 [1 S3 z( o$ J2 q   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    , ?  c# J% ?& f7 ^1 b   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    ) n) t( |( Q2 Q) A# l   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, ) ~- p8 D8 W3 ?- |: y6 |/ E- Q
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, - h/ m0 g& M2 ^/ j, a. X6 f, h
       3.577960510686717*^9, 3.578012149296875*^9}],
    ; b4 Q+ ^7 @8 I" s3 E% M1 \9 l+ ^; }# i5 D3 V( D$ C
    Cell[BoxData["1"], "Output",/ H% B7 O% i( c# I* [
    CellChangeTimes->{% x2 t1 P( h. b
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9,
    - E' |" k  H& q( R  p   3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    ) p0 ^6 M3 _3 o# b+ e: b% F$ y+ e5 N" \+ E   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    " a1 N9 Z6 X% v- k* Q4 ~" R* _4 K   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {) |5 q6 c% a7 ^3 ]8 R
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9, ( l0 d1 {4 P1 {3 Z3 m' P; \
       3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {. g4 o* A" G( |- N
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9, 1 K8 @5 l8 }9 c5 X8 g6 q% U
       3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {9 o3 g6 J5 u5 |7 A
       3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    8 M6 q1 ^; j' S) X" Q   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    7 k7 l2 d+ F: s5 y   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9,
    ) r  i$ t2 G. O. S% u   3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, 7 p3 y  h( N( T
       3.577960510686717*^9, 3.578012149296875*^9}]
    2 L; s4 ~/ g3 n}, Open  ]],
    4 g  r4 @$ E" B& @9 A0 m
    ' k1 c9 H* b6 C0 D1 a# Y1 n7 LCell[BoxData[
    ; `2 g) u4 {0 u, @; O4 E: C RowBox[{"For", "[",
    4 R- Y7 [1 f" _  n  RowBox[{: ~9 b# X5 x* h4 P7 z/ ?( x
       RowBox[{"k", "=", "2"}], ",", 2 ]4 H: G7 Y7 g$ d# }6 i. I
       RowBox[{"k", "\[LessEqual]", "60"}], ",",
    ; K% j5 E0 r4 x+ ~" z; [3 l. e   RowBox[{"k", "++"}], ",",
    + v% t9 ^/ ?. u0 m0 [( o   RowBox[{"{", "\[IndentingNewLine]",
      p% g9 m$ l, {7 \  Q2 B& t    RowBox[{
    + O0 ^& Y; ^& r% s: i+ ]* x) {     RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]",
    6 a* N- O7 S& H  F. [! t     RowBox[{"For", "[", * N+ c' v7 C9 M6 U- E! }3 `9 d, \
          RowBox[{
    1 ]7 @. t; I/ F  O$ @       RowBox[{"j", "=", "1"}], ",",
    7 d& q5 J+ j/ O1 w. P. ^: q       RowBox[{"j", "\[LessEqual]", 7 U1 w1 o- H' R8 x3 e# w9 `
            RowBox[{"k", "-", "1"}]}], ",", 9 {; A# m. ]( N/ g
           RowBox[{"j", "++"}], ",",
    ( \3 ~2 {( \. F2 H! b       RowBox[{"{", "\[IndentingNewLine]",
    " A; {6 r! d  F7 D4 G6 W$ _        RowBox[{* j8 J: r! b: f* d1 }: [
             RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]",
    & I  |: m4 x7 l) F( Y         RowBox[{"For", "[",
    ' b4 T5 `, T  A4 s. I; n          RowBox[{( L# x& R) ^& Z2 W
               RowBox[{"i", "=", "1"}], ",",   t% y3 w+ ]! P6 U7 S
               RowBox[{"i", "\[LessEqual]", "9"}], ",", . T6 r1 s( M8 P2 q  a2 o9 i
               RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    4 ^% @$ X; s: A; O( P" o           RowBox[{" I3 `, P: S& f3 J7 h+ x
                RowBox[{"r1", "+=", 7 c1 w1 y, {+ o* e4 _
                 RowBox[{
    7 D; Q1 n) C% E6 e              RowBox[{"(",
    " |/ W/ f" U" g               RowBox[{
    1 \  }6 x) c" U  g9 F                RowBox[{"CM", "[", 9 m& ~/ e( P0 I; n5 n1 h; `
                     RowBox[{"j", ",", "i"}], "]"}], "-", 7 f2 z- V$ C& i; u* D( z1 S
                    RowBox[{"Data", "[",
    : e* f( A5 w3 {5 ?+ E7 A1 q6 r                 RowBox[{"[",
    + C4 J- P+ M; h( [9 z& `5 @* z- S                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*",
    " a4 U' F& ^/ X& K              RowBox[{"(",
    + m- ^. L: X: u" }7 i               RowBox[{$ T& i# Q# i: D. T
                    RowBox[{"CM", "[", 9 ^. R. y# C- B, z+ o
                     RowBox[{"j", ",", "i"}], "]"}], "-",
    6 o; N! y6 u) R( |* t  @                RowBox[{"Data", "[", 3 R" L0 ]5 U. L, n0 d. a' O
                     RowBox[{"[",
    & G& H* g9 \. ~5 F3 W                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],
    ' o6 }7 K- K) q9 g- A( G           "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]",
    , d; w" S  i5 h4 P2 G& l         RowBox[{"r1", "=", % B3 {) e# _6 J
              RowBox[{"Sqrt", "[",
    ) i. O6 a( X5 _, l. \5 |/ `0 L6 @           RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]", / A( V4 X( D4 G8 n! c' u
             RowBox[{"If", "[", " ", . @8 B' R% ^, h/ ]7 P* @/ b, d
              RowBox[{
    , @4 R  @! K2 f7 \2 X' I           RowBox[{"j", "\[Equal]", "1"}], ",",
    / g3 r& ?/ a1 j: I: H           RowBox[{"rmin", "=", "r1"}], ",", & y  \0 [' t; A5 s
               RowBox[{"If", "[", - s: O9 `6 @+ w+ X6 p: o
                RowBox[{
    8 M6 _4 z* B6 }; {             RowBox[{"r1", "<", "rmin"}], ",",
    2 V# a4 q1 `. P0 N/ y             RowBox[{"rmin", "=", "r1"}], ",",
    / Q$ C8 n+ x' G: [) w& w5 E! @             RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}],
    7 S* m/ w1 b, ^        "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";",
    . U; Z5 b; A) `9 p9 N0 y     "\[IndentingNewLine]", * e, b) _7 [: |' @/ \* p9 Q* Y
         RowBox[{"If", "[",
    + z; \3 F* O1 q3 I  b. R/ b( H      RowBox[{! h2 V8 W- S( ?/ J+ R& h7 K: V+ \
           RowBox[{"rmin", ">", "r0"}], ",",
    0 s: K4 F0 O) v3 p# u1 }. \       RowBox[{"{", "\[IndentingNewLine]",
    & g6 }4 [' q# k- d, t! |8 e        RowBox[{! B/ G* X0 D+ F3 `
             RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]", 2 l: J& A' a% e, V
             RowBox[{"For", "[",
    % e) ]$ {3 k  x; Z1 v) X* q          RowBox[{
    3 ^; V- ]' d4 g- o, p  \& h# M           RowBox[{"i1", "=", "1"}], ",",
    ; v; d, U% ]# ^           RowBox[{"i1", "\[LessEqual]", "9"}], ",",
    * X4 s( Z- x6 }! h$ P7 K/ ^           RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]", ; D4 Q, V& m, O4 u- ]2 e
               RowBox[{
    1 O6 m5 A% r3 \. O2 r2 V            RowBox[{3 F4 t3 _) [0 g0 H, I  u2 z3 D
                 RowBox[{"CM", "[",
    $ U# c$ e. Q3 e7 k$ C( F              RowBox[{"M1", ",", "i1"}], "]"}], "=",
    ' e2 }: |3 C9 s$ Z4 U2 b; ?             RowBox[{"Data", "[",
    * J* m3 U1 R1 w* x* o7 g              RowBox[{"[",
    - o7 [8 b; i3 W1 u% K- d               RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}],
    : i0 x+ X* T; F" w          "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",",
      J" V9 x: V' X. M, u, G       RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}], " D8 v0 x6 L  L* b& X
        "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",9 F! W3 g% P# b
    CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {
    : ^# J8 A. D, T% n1 Q) \   3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9, 5 ^" y8 O) g" }8 r1 A' i  ?
       3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {+ A& R5 T& X4 ]  ]# E6 _# \# C
       3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9, - a' M5 @  c7 S* B0 L, U: X- L
       3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {
    # t) w/ B: z% g   3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9,
    ; ], M8 M4 j. n% A$ w   3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {  }% M/ r4 F3 W( H
       3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9,
    2 s5 P6 |4 t1 V5 c   3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {/ s* y, K2 E" Z3 U) ?, m
       3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9,
    8 G4 d) @1 m2 f8 k/ ^$ z   3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {$ E9 x& ]  Q# ^6 L
       3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9,
    ) T. u$ x5 o% X$ r9 g0 q   3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {
    ) C; T* g/ k) j/ f7 m; m   3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9,
    % `& N- M' n- P7 H   3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {
    4 l+ U2 j8 j' D8 e' a) r5 J   3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9, " Y& `0 ?0 t$ }
       3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9, ; A& @' T4 B# L2 d$ C* w% q! y
       3.577958821991373*^9}}],
    ( P" o# c5 f' ?( I4 a9 N0 n+ S$ F) Q" n# o
    Cell[CellGroupData[{4 w8 d# m. t8 \
    / I5 [4 q5 j, b* H  \; B) ~
    Cell[BoxData["M1"], "Input",
    # V: m2 J5 E5 R9 V3 ~* C* K0 r8 j; r CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],
    # k1 J" _( L0 |# e: n3 J. ]- x6 T# n0 M$ a+ y1 ~
    Cell[BoxData["21"], "Output",9 k  d: B* b& [8 w  R
    CellChangeTimes->{
    + I& c. T8 c4 D) K/ H% M  3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {
    : B: |1 R% J% ~% Z( y   3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9,
    $ P6 {& B% N8 n+ w1 _+ }7 \5 Z. A0 S   3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {
    . w) i. q2 k( _/ P( y  H0 V! M" s   3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9,
    0 m' n+ s$ `3 i) v, T/ v   3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {
    * Q, }5 R0 I2 |6 R7 F4 D# n/ I   3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9, - m& l. ]  x  {' }# O
       3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {
    # e  ^3 u4 [' G5 d% T( C- @   3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9,
    " g0 ?% {' Y* ^# H# h   3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9,
    # L* ]/ \' F2 _  r* ]0 @3 P% {   3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9, 8 I) s" C3 y/ L+ P4 e5 h
       3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9, 2 m9 U& t  c! h. F% Z4 h
       3.577960515600726*^9, 3.5780121541875*^9}]1 v8 Q% |$ A% A, G
    }, Open  ]],
    " e; W4 ]1 k3 v" z, p' s. h) I7 O3 i  X" ]) B% G! x) A* ?
    Cell[BoxData[$ l8 h) A, O4 ]+ f
    RowBox[{7 I) b1 d1 w6 ~! I; I/ c% C
      RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[",
    . \% o+ P0 L, L: P- p1 b   RowBox[{"1", ",", "i"}], "]"}],
    8 f/ ]7 T( j& u5 O7 D  z* x+ @' u  RowBox[{"\:5230CM", "[",
    . k/ w7 |4 @/ Q( M5 U   RowBox[{"21", ",", "i"}], "]"}], , g8 X' F5 D8 |' l) o" v  ~
      "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\/ J. T/ ?' [' X! f% H  H# E4 u+ x
    \:51fd\:6570u1\:5230u21"}]], "Input",
    : x) H/ T' R/ |. h) P* O4 l CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {
    . t6 v; _) J+ k8 i9 F- T8 e7 h  3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9,
    3 `; e7 {8 F: A; F+ W: M5 l  3.577960526583145*^9}}],- e4 M) X$ ^5 {6 T! F
    / @" z* |) x; X7 p5 {
    Cell[BoxData[: m& z6 W) P, f3 J7 d% t
    RowBox[{"Clear", "[", "Delta", "]"}]], "Input",, p- K9 [: |: h: V' w) o* L1 o
    CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],
    0 b9 `' y; N, f" B8 E. V: W7 l! H* N* O9 [& W) ]! I. Z4 L
    Cell[CellGroupData[{9 C& u) H6 `- Q: @! w* u

    4 z6 \2 I" h5 T8 O) n2 N& RCell[BoxData[
    6 D0 `" b- y, T% |. { RowBox[{"Xa", "=",
    * ^5 N) y1 u5 [' n  RowBox[{"{", ) a2 y4 D" u+ s0 h" o% E; N
       RowBox[{
    5 a3 o/ g  b" C9 c0 M' b3 N   "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ; u" I0 R$ I0 v* \! F& z1 o
        ",", "x8", ",", "x9"}], "}"}]}]], "Input",3 N- T7 d! A1 Y5 c( K4 ?% R/ U- @
    CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],
    " [& ?; Z; R" x" X3 G% e5 `. [% {- E6 T& a& C( U+ X
    Cell[BoxData[; n4 E7 }* T9 A) P% x9 f
    RowBox[{"{",
    : C& b1 f2 X2 D  RowBox[{. ?8 _; h6 n8 V+ s" E6 ~! t
      "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",
    2 M* E) h+ i1 e- q- L( i    "x8", ",", "x9"}], "}"}]], "Output",, \* j6 J) @7 m* e' m* r& _% \$ m
    CellChangeTimes->{
    + c- X: {. ~, X6 H9 z  3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9,
      P2 E* j' s$ `8 W   3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9, ! v; n" m, c. y( d% Z' P( R
       3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9, 4 N+ B. r% D; s
       3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, : o2 k& }- B! W' i, d' w7 U1 M
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {
      A5 D) N; q+ y* ~7 R8 Y8 \   3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9,
    8 O3 k9 H" v- z. ~2 V1 E9 L/ F   3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    / @2 B2 |8 u5 ^' w8 P) }   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {+ V$ w) `! j  W! T; W- ?* j
       3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {
    9 w  f& [2 a% q( }' y. Z" ^   3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9, 4 Y+ e+ T, Y/ K" D0 ~$ K* Z7 F4 T( `9 I
       3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9}, $ a4 e9 E3 c+ M6 l, }8 E1 J6 I
       3.57801215725*^9}]. B# j7 p% d0 H1 i  z0 H$ Q7 z4 z
    }, Open  ]],! w6 a7 R/ _  i' s- D. o, L

    3 u2 V5 F3 \  L' u/ O" ACell[CellGroupData[{7 P) B" [/ L' q7 U

    + b& z: R- |% a+ m  vCell[BoxData[1 \" S. {. |$ L% E
    RowBox[{"Ca", "=",
    $ X; A- H; P1 H2 ^  RowBox[{"{",
    3 @  S- z$ q% v# [% t) t3 c   RowBox[{; L5 U7 [$ t- ?0 S( ^# B( e
       "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7",
    % K5 ^- |% Z; \4 Y3 k# L& X8 l+ K9 |    ",", "c8", ",", "c9"}], "}"}]}]], "Input",
    # {' @& ?" z0 V CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],! r8 K/ _6 a; S( X, F% ^, [

    5 Y6 G7 D+ ~6 i: d' D7 vCell[BoxData[; F( o8 D& J' `! q% L9 r2 M
    RowBox[{"{", " R& |" |2 {7 w. g6 t
      RowBox[{1 d' r- c0 y+ p5 n
      "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",6 H! x! }- L+ Y$ W% G
        "c8", ",", "c9"}], "}"}]], "Output",
    / `( J7 o& t$ t- l* S1 y& K- W CellChangeTimes->{
    ; I# ?" z/ R  m2 [8 X3 |, \  S  3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9, % T% y( B$ j, N2 Z, C8 J
       3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9, # [; N; R4 ?7 O" @1 C$ N  O
       3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9, & X* X& f7 \: p2 K7 ]( Q) R  N: B
       3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {' S( w$ q7 J4 l) G* o% n$ V: _- O3 Q
       3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9, - Q+ s5 Z5 y7 p7 S' @5 a
       3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9},
    4 f" N3 ^( F. J  O: m) D0 L   3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9,
    6 X+ s; w- k7 s1 C8 [   3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9, 9 g4 I" g! L3 {  n
       3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9},
    6 {: T3 L: g1 U3 E! K0 Y   3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {
    3 c7 k0 \2 @: O+ w5 m8 L; Z   3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9,
      T- G* R4 u4 E! ]$ ]   3.577961904604212*^9}, 3.578012158671875*^9}]
    ' I6 X2 u0 n# j* G5 r; G}, Open  ]],) R, i1 c) \# c6 [0 ?; I
    ( w. M5 o  B0 U1 C2 j/ Z5 w
    Cell[BoxData[6 f5 K! x0 u* @+ ]8 J
    RowBox[{"For", "[",
    * W3 h9 {; J) L0 h  a9 o  RowBox[{( q2 y8 @- A( v( F, Y. R- b, m
       RowBox[{"i", "=", "1"}], ",", ) G- C; N; _# ]% ]- T/ ?
       RowBox[{"i", "\[LessEqual]", "9"}], ",",
    $ z) H  {9 g( ~   RowBox[{"i", "++"}], ",", 6 c# g6 Q# E7 t: F. ]
       RowBox[{$ t  V6 }% [# q+ O# n0 m  @
        RowBox[{"Ca", "[",
    7 F  H3 ]$ C: ^) {$ z     RowBox[{"[", "i", "]"}], "]"}], "=", 2 m8 j$ r5 m: P3 I7 `2 v/ l
        RowBox[{"CM", "[",
    9 z4 O* k' C' [2 U) O     RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",  k3 ~  e9 a% C
    CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9}, - Q* `6 I' p1 S0 e1 I5 U
       3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9, - Q" A, o7 Y& }: g# r$ l8 V$ K
       3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9,
    , A% i* ^' |6 v$ m- s   3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9, $ B. Y& j* T; c$ }5 _
       3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9,
    7 Y; J! }1 s0 M5 H8 t; H. v; u   3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9, 6 T! V, J1 L3 |, O
       3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9,
    ; |7 `& n. p2 y9 ]7 s   3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9, * c! _; b4 E8 M0 [
       3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9, ( n2 ~2 b9 K; R$ a4 u8 w
       3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9}, 5 z* _1 R% ^( X/ }# ?$ ]
       3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {, M4 I# C* c$ U+ I) s! T5 {
       3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9, 2 N% n# s+ x, e+ `9 `/ k9 V" L
       3.577961906897415*^9}, 3.578012176296875*^9}],
    # Y( q2 w! n8 L3 h8 |7 ]4 m& l6 A, ?
    Cell[CellGroupData[{9 [* v4 [+ @' T8 h8 H5 v* A- c

    + [8 T" F; p4 @: l$ `5 [Cell[BoxData[" J- }5 x$ h, g9 L8 K
    RowBox[{7 l, L7 S* B+ K5 G1 Y
      RowBox[{"(",
    ' B/ U1 }7 T  e7 q- a   RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    0 }4 f7 f$ Q5 p  p, T. M/ u, \0 w$ Y  RowBox[{"(", ! d2 ]7 t8 ]7 N( ^* I, T
       RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],# _. p( l) t9 [0 O* z5 y8 K
    1 s3 f, V. W9 _* [
    Cell[BoxData[
    0 j! _/ @7 F7 R1 ~! B RowBox[{) F' X  b4 n  @6 h3 Q0 ~* U6 y
      SuperscriptBox[* a; Q' e* |! U; U; ]; z
       RowBox[{"(",
    9 p* n2 [' f7 Z; w. `, w    RowBox[{3 _$ _3 G6 X, `, w/ M
         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+",
      s7 m- `. d) x8 f6 E- ?  SuperscriptBox[& P% P1 B4 h! q) t1 x" I2 q8 O
       RowBox[{"(",
    * w: X7 G3 |& T9 R, g9 H9 i/ Z' ~    RowBox[{
    ! D0 Q- V" O! K6 p& L     RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+",
    0 F$ j# _& o' r( x3 I' e  SuperscriptBox[
    . R5 |+ {/ O/ @! J/ }+ W   RowBox[{"(", 3 g/ y  k$ w8 n; x2 _8 L; ^
        RowBox[{! ^+ S) d5 x6 f% Z9 Q% A: Y- z
         RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+",
    % B: \) I$ s6 |9 l5 _' H  SuperscriptBox[) T/ F) ?; M( L& x5 b. t; K7 s
       RowBox[{"(", , z0 j# T1 J; d9 A
        RowBox[{
    : y% j! I, e/ t- f6 m' P     RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+", 5 c- o4 P! O- N$ v" P& v: G
      SuperscriptBox[: @, N: ^! B! {
       RowBox[{"(",
    & Z( j0 S8 c5 J- p) l& x0 p    RowBox[{
    + t: V8 Y) l1 M' {+ e     RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+", 0 ^8 j$ K- w7 R9 ^0 a
      SuperscriptBox[
    % ~5 i2 ~/ f3 W, h9 }   RowBox[{"(", / W0 p" `  D5 h5 g& W3 z
        RowBox[{$ `8 ]# p! z% B
         RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+", ; p9 x+ d( D8 b, R9 n
      SuperscriptBox[
    1 w9 N1 P2 }" \, T1 R0 ?- f   RowBox[{"(",
    3 x. g2 o$ U% t2 e; y; j    RowBox[{: k1 _5 r- |5 I8 V" p
         RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+",
    ! O" @% y1 s5 Q4 M! v  SuperscriptBox[! D4 P, K8 r4 Z0 [
       RowBox[{"(", + _1 i' i4 _) v3 e1 M2 L8 M
        RowBox[{" ?0 g4 W# n5 ^& B7 L% e- y5 u
         RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+", " p/ P* d! q5 d) P7 G
      SuperscriptBox[
    - g- p* d) C' p3 s9 W, p   RowBox[{"(",
    + V) Z$ y  f  e  @7 Z: n5 O    RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",
    6 D+ h, w  Z, Y# H" G" s CellChangeTimes->{
    ; [, d$ K. w, P' a( L  3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9}, $ g4 {! \$ U6 g1 S  y) n0 F) Q
       3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9, # U/ E6 j; [3 f
       3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9, 1 \4 q# ]! l/ S
       3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9, - z- g/ B, ?$ l3 f1 ^# V
       3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9}, ' i- g1 Y- E. T5 o# T1 F5 D9 A
       3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9, . [& G' k" O( N: k/ {
       3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {
    . C7 O7 a$ h) {+ U   3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9, / g* ^0 b$ g# K# H+ Q" }, |
       3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {
    ! E: s9 v6 K/ t7 v( ~   3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {3 B, T1 g8 P: y, A- Z
       3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9,
    : _3 }; t0 U3 O+ n   3.5779618537169228`*^9}, {3.5779618846049767`*^9, % N& c; m" l. r
       3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]
    ; H) U  W# i- j0 c: p}, Open  ]],; u  f. f% d  L, }3 r/ E
    $ ]; A8 o  A1 d
    Cell[CellGroupData[{- X' W6 k! G9 w% R% I' M9 I3 B
    3 I- _1 ~1 G2 v
    Cell[BoxData[
    , [) P' g8 [% n5 a RowBox[{
    # j9 ?6 S( d$ v9 N$ X# f8 V/ T  RowBox[{"Ca", "[",
    ( |- n/ n. e$ e+ u" X   RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",, X, P* j9 t( f2 Q9 @2 E
    CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9, 4 K5 ^' ~5 ?+ C3 P7 j
      3.5779616465173616`*^9}],
    & w9 K$ u5 [" w- [7 ^9 B; |1 Q3 m( l9 j
    Cell[BoxData["0"], "Output",: o& p& k, T7 v) H& P; v+ y
    CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9, , p5 ~$ W: X& J  J
      3.5779616484049644`*^9}]$ m7 A4 e  X, q' f- @5 M
    }, Open  ]],. p# |3 k2 g, k
    & Z, i4 K  J& k- a) M6 k/ T* T
    Cell[CellGroupData[{8 B# B8 }9 J5 e1 r% T, ]  s

    ; W5 p+ ?& y4 [4 F3 g0 C1 s3 F4 OCell[BoxData[2 T& a2 @  T  r! _) G
    RowBox[{! w$ f, ~8 q# M4 w4 K) M5 \  v2 X: R
      RowBox[{"Ca", "[", 7 E4 J/ r4 m/ R6 b+ J2 D9 G
       RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",+ y( f7 H9 ]  X7 d: N2 @+ D4 D. P6 V
    CellChangeTimes->{3.577957376235614*^9}],4 e9 D7 A8 L9 u3 S: x

    - i, ~  H4 U+ HCell[BoxData["0"], "Output",
    , i& W! k$ j* u3 _/ @' b CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]8 N* V& |/ ~8 x
    }, Open  ]],' ]$ h4 X# m" N' A$ w+ Z
    8 [: d7 V- X0 [9 f$ J) ?
    Cell[CellGroupData[{
    0 b7 c8 m5 n$ O( ]' C$ i) L& L, }2 E2 D
    Cell[BoxData[" G7 f" B' w- _4 m; ^6 H0 Y
    RowBox[{
    ' i8 N( a7 v$ g8 X  RowBox[{"Ca", "[", ) s9 U+ P0 Y& r, K$ b
       RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",4 V( j& a# S8 C
    CellChangeTimes->{3.5779573112927003`*^9}],
    6 A8 w, E0 }. _# b4 u/ _  W. u8 k7 g+ \: Y( u) a9 i
    Cell[BoxData["0"], "Output",. c3 x1 W/ K7 S* [# r/ @' a
    CellChangeTimes->{" Z: l$ V0 b: E8 ^2 h
      3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9, % p5 U7 t% f" j
       3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9,
    0 i6 S  w+ f$ n9 b   3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9},
    1 L! z2 B$ E, R. I8 j   3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9, $ F; I! k7 m9 F' z$ x$ b$ B
       3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9},
    : b6 P8 X% k7 S8 I   3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]
    " U. ]( k* }/ ?! x/ R}, Open  ]]," M7 w6 Z0 n1 t7 z) x0 Q; {, }$ U
    6 C3 \( e/ C7 ~
    Cell[CellGroupData[{5 R, o2 h* T3 ~

    4 t$ @0 n4 c" g6 \0 x9 b$ ^Cell[BoxData[6 W+ v# a' }$ R: u/ [9 z7 \
    RowBox[{
      N7 U( `! w5 v, g  RowBox[{"Ca", "[", 8 Y# a: w' m# J9 [
       RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",1 {2 k- G  X' X0 C& n+ x
    CellChangeTimes->{3.577921461734375*^9}],
    # n& a  r6 A% [& z% q) b: }0 e' t6 c2 A8 b0 l
    Cell[BoxData["0"], "Output",$ w4 T0 K" n2 D/ u' b' D
    CellChangeTimes->{
    * g7 a6 Q+ N6 c9 x  3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9,
    - |) C5 B8 I# E( x) u) T   3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9},
    5 E8 N) L, H# M$ R   3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9,
      T  p# W' e3 G. }, Y8 o   3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9, : o. g+ T" O+ [1 b. A9 s
       3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]/ u3 w% L0 M4 H/ M7 r
    }, Open  ]],! G* p+ L1 W2 \/ X
    # n1 f0 k5 p1 ^9 Q0 F* K& K1 A: r: p  C+ [
    Cell[CellGroupData[{
    2 F8 W! S3 \, }
    ) }$ D- d$ r+ v3 k1 M0 B9 P) m/ |" @Cell[BoxData[  B( P! I# ~6 c" Q# o! Q( h6 {
    RowBox[{
    9 D) l) F1 b/ i; |0 Z! l  RowBox[{"Ca", "[", 9 A% E: g. t& r, l4 p! J  |0 t
       RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",5 k# o8 h7 }# d2 D- \9 S) c
    CellChangeTimes->{3.577957303118286*^9}],
    7 `4 q9 e5 v4 Q3 G7 ?) Q' t7 H# X, U$ M3 j: o* j6 [) Q
    Cell[BoxData["0"], "Output",9 L5 V& [* k' ?4 Y
    CellChangeTimes->{; a  X, W% Q5 X1 x
      3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {
    2 `' b$ ~+ p6 {4 k. }( d/ B   3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9, + m* X+ H* }5 c" f' S, A( _0 x
       3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9, 3 N2 |/ L9 U7 N  \$ N$ m
       3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9, % X4 M$ ]( M8 U
       3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9,
    + b; P$ z5 O0 y  y2 r' S# ]   3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {8 P. M  ~# B1 h5 i1 X
       3.577961889378585*^9, 3.577961912965826*^9}}]
    , ]2 z) ]. d2 S: W( r% ^}, Open  ]],- Y8 P' N/ o% f0 ^# n

    , x7 S1 X- M( Q! g5 eCell[CellGroupData[{
    . |4 a1 q6 }  E
    , ~3 M' {: n3 N" ^2 QCell[BoxData[
    1 r) q' a& B! s6 |% Q RowBox[{
    , B1 n6 u& {7 W1 G& O% _  RowBox[{"Ca", "[",
    % h$ t8 @, o+ H5 B   RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",4 \0 j' f4 b& F4 q
    CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {
    & p( x# {4 N: Q) z' a" [3 b  3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9,
    & P$ {. [' F" h, {, }0 o  3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {
    , G! h( K( P. g: h" y" {0 b  3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9,
    2 c$ e+ f  H  ?/ F% O  3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {
    ) t4 I! k, q. a3 x3 c7 i  3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9,
    9 F- \% S& @, Y- P% j8 f  3.577921435703125*^9}}],! o& r( X' o' b2 O
    ( j. T4 k$ X6 a7 i7 t( K( J
    Cell[BoxData["0"], "Output",& X- h5 C" d! V5 F
    CellChangeTimes->{% W$ r3 i2 _; F$ W% Y3 {8 h. `- I
      3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {
    ( Q0 b! h& B2 q7 T. U   3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9, . O- n5 p5 l; b1 X8 A0 K! f
       3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {
    * I; p5 g& ?( k- ]6 k. N   3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9, ( ^- U* q5 f+ o
       3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {9 m; E3 j& @4 K" y
       3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9,
    9 v6 E' O; o9 E; C   3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9,
    5 J( o9 M# U+ }   3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9,
    3 J1 F% g/ D0 ^# W   3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {& ?( O( l. L5 C" m4 B! C
       3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9, ( {: }& Q: P$ j! {- K% `
       3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {
    2 k' B9 s& D- N( U- A1 R   3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9, 8 a  O* E; E, ]: T( }+ p7 e
       3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]
    8 u6 ]0 g! n' d}, Open  ]],2 L( \3 L. [' S  e; l
    ' q$ Y/ k' |  T' B" k
    Cell[CellGroupData[{
      ^( ^) ~5 e0 V5 M
      \+ K% p4 O- w- ~. I  gCell[BoxData[. A+ r5 _8 j, H! K) v; N  Q
    RowBox[{"Delta1", "=", # d7 z* y. h$ u
      RowBox[{3 c; W4 y+ f* H
       SubsuperscriptBox["\[Integral]", + p7 j. c& n' F7 ^9 p2 L
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], - O  e/ N) W3 q
       RowBox[{0 e$ m# s8 E7 n7 y) a+ }; @4 N) L
        SubsuperscriptBox["\[Integral]", 9 D  M; y  V7 _* ]: D9 S9 u
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    2 e( |0 p/ t% H1 y. ?0 W1 i" v8 G1 u    RowBox[{
    3 v6 I$ c" k! L4 {: T3 U' x& u     SubsuperscriptBox["\[Integral]", 9 o# _- s( t" \  [8 ]1 n
          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    # _3 t. h' S, ~4 ]" G     RowBox[{9 z6 t+ E* @; p+ T8 l
          SubsuperscriptBox["\[Integral]", 0 A. Y* N# O/ ~9 o4 j- ]
           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    ! z3 m/ R' ]9 O" h  |      RowBox[{
    7 f0 b( s# b2 P: T7 [& |       SubsuperscriptBox["\[Integral]", 0 O. v  `# l& k) N# N
            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    9 g$ |: z# O0 g% f9 F& S: d       RowBox[{9 C6 B8 L" _3 i2 S# \& j
            SubsuperscriptBox["\[Integral]",
    - v, @2 j" ~) z$ o         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ! ^, `$ y! Y- I
            RowBox[{, p! w) Z% w; w/ ]5 u  E: {9 _% b$ @  N
             SubsuperscriptBox["\[Integral]",
    0 O6 s% O: z& @! u3 f          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    : \( c& Q1 D: P. B( M# T: k         RowBox[{
    4 B/ ?: e1 w' T9 V; C          SubsuperscriptBox["\[Integral]",
    $ f% B0 K& Z$ ?6 J. R) I  {           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ) K2 g# O# i* y5 ?6 L7 K
              RowBox[{- ^4 j2 b& ?; M! i! J8 Z+ k3 [0 o
               SubsuperscriptBox["\[Integral]", " G6 J% V3 L$ u4 P0 {+ J
                RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], - Y2 i3 J- V) k  u) r( {
               RowBox[{" ~- i- E8 n/ ~" ~
                RowBox[{"Exp", "[", 4 z8 V6 A/ G6 G
                 RowBox[{
    4 t/ Z1 R" I; Q" U/ ^/ M; k              RowBox[{
    - g7 [& J) E8 V. P8 T               RowBox[{"-", 5 Q7 _: U- U; R4 f" d" ~
                    RowBox[{
    # v+ c) }2 }) G                 RowBox[{"(", 0 |% i5 n1 ]4 e
                      RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ' K  A" |. I! i) j  k" W
                     RowBox[{"(", ! j6 K/ n7 Z! |# t
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", - U2 C( V+ `) O( O1 F' I3 l$ L
                  "Delta"}], "]"}],
    2 K6 Q2 o) u& P; _2 V/ H1 H$ k            RowBox[{"\[DifferentialD]", "x1"}], , ~3 @4 R7 q& u. D1 a$ K$ u
                RowBox[{"\[DifferentialD]", "x2"}],
    7 a- [5 c: g, X0 z# d+ m2 _            RowBox[{"\[DifferentialD]", "x3"}],
    ! G. \. \/ Y, B/ R            RowBox[{"\[DifferentialD]", "x4"}], + F5 q$ V4 D' w1 z4 s1 W
                RowBox[{"\[DifferentialD]", "x5"}], ! t2 E2 Y; J0 {- J
                RowBox[{"\[DifferentialD]", "x6"}],
    5 p( D+ e" u! m7 s/ ^$ B( S            RowBox[{"\[DifferentialD]", "x7"}],
    # q4 {1 b5 }' \) q            RowBox[{"\[DifferentialD]", "x8"}], 9 U( n1 [9 Y( c: M( z; i
                RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input",* c2 w, O" J- C" \
    CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {
    9 N" N  @3 r- {+ O, D   3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9,
    " u8 m7 e/ s* [   3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {5 ~6 r' Z! @" M8 s1 E% u& Z
       3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9, $ [) E4 Z$ v% V  H' w# E
       3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {
    ! c0 h$ k$ f7 T# e# D% a   3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9, 2 x* m' \1 d4 J! D
       3.577918964453125*^9}}],
      g' i; o0 }( u! j" S: p) b, ?8 M1 S' i$ A# Y- p* V/ J
    Cell[BoxData[0 z0 |  {- ~. c8 A! M, O) R
    RowBox[{"97.40909103400237`", " ",
    * H  s% ]3 [8 w. {# i5 F' D  SuperscriptBox["Delta", "8"], " ", & y( s9 Z  L' F6 |
      RowBox[{"If", "[", ( b" E( ?8 H0 Y- r7 ]8 L
       RowBox[{
      o: U) _8 z! N3 s    RowBox[{
    & ^& v. e$ k# t1 `7 n6 ~: U, A     RowBox[{"Re", "[", 9 R! S+ D, Q8 M# K5 d
          SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",",
    8 V! i8 R( k" |    FractionBox[
    - }+ I/ N5 x/ U9 |& ^& a. j     RowBox[{"1.7724538509055159`", " ", - H5 U, J$ `" D+ J6 H
          SuperscriptBox["\[ExponentialE]", 7 p0 o& G0 _. k0 n6 e- K$ S
           FractionBox["1.1102230246251565`*^-16", 0 U/ o- l& f, q: |
            SuperscriptBox["Delta", "2"]]]}], 0 A* x% D0 h2 T
         SqrtBox[
    ' C) S9 d4 ~, Y6 \- ^      FractionBox["1", ; k! X, f2 X* \6 }
           SuperscriptBox["Delta", "2"]]]], ",",
    9 L/ a' d3 \& b+ R    RowBox[{"Integrate", "[",
    9 q/ {" K. J( C! {: C  p     RowBox[{7 h! z: d9 c9 A- ]8 D
          SuperscriptBox["\[ExponentialE]", # r% Y4 Z3 P6 T5 n* J
           FractionBox[
    3 W/ r. A9 b# E7 t4 j* W8 Y) r        RowBox[{"1.1102230246251565`*^-16", "-", : _. `7 T* t, k' n6 z: C
             RowBox[{"1.`", " ",
    : I9 V4 {8 C9 `# Q          SuperscriptBox["x9", "2"]}]}], , I/ q6 H/ E) I) @* g% u, _" N
            SuperscriptBox["Delta", "2"]]], ",", . Z" _  u* H3 e9 q
          RowBox[{"{",
    * f' T+ I+ n4 H       RowBox[{"x9", ",",
    6 h3 y/ ?( }5 A: d- _        RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", ) @& v, m- z. L* _2 Z0 A
          RowBox[{"Assumptions", "\[Rule]",
    * A. a  \7 P: I       RowBox[{1 n/ @2 d. b, B
            RowBox[{"Re", "[", 3 \  G: [6 G5 t  i4 z
             SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}],
    5 F9 x1 D) K2 j( ?4 o( h& c     "]"}]}], "]"}]}]], "Output",8 C& s' [' I" T) D' t) O
    CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9, % p4 u0 W) S! Q0 g
      3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9,
    & T, N2 ~& }% q1 n0 E% p5 u  3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9,   t- A3 j  ?# {
      3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9,
    / Z" ?( q' z1 F  [/ G  3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9, 6 W  O9 _7 x! T7 f. }
      3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9, * U! ?, Q* i; ?5 W7 a* a, A
      3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]
    3 l5 B# M! P4 h& }) k7 ^}, Open  ]],0 U# b& Z+ X# U5 G. U0 l5 ~( Y4 J6 P
    % Y3 x& W7 S9 |8 ~+ m" J
    Cell[CellGroupData[{
    2 _% |- M5 K5 E) I, O7 }; b# Q
    5 Z2 C$ v! \! nCell[BoxData[
    ! L' I7 z! F, y6 b& b9 ^& x" e* u) ` RowBox[{"Delta1", "=",
    9 b# ~3 D, x4 _, T- ?, z% q* T  StyleBox[
    6 V7 Y9 _7 a' ~   RowBox[{"97.40909103400237`", " ",
    $ P* N1 k- Y% T; w: d0 g: M  d    SuperscriptBox["Delta", "8"], "  ",
    9 o/ N$ W6 N' U6 f- e+ b    FractionBox[
    ) [* s8 ?/ c! r" f% C* P8 ^, L     RowBox[{"1.7724538509055159`", " ", ' O4 t: E0 l' t; w+ g- a1 V
          SuperscriptBox["\[ExponentialE]", . [5 P2 V. C3 E3 ?- W  e* j
           FractionBox["1.1102230246251565`*^-16", + x4 G9 C+ u" }% ~3 j2 r
            SuperscriptBox["Delta", "2"]]]}],
    & |2 l  z* t2 e2 B9 V( |! X3 d     SqrtBox[  E  ?/ O" @# N( l3 k
          FractionBox["1",
    0 y- e+ N, a8 z, c7 l: C" N7 q       SuperscriptBox["Delta", "2"]]]]}],/ Z4 _. z7 P- v3 L8 R  z; }8 Y
       FontWeight->"Plain"]}]], "Input",
    , u" d0 Y/ s6 z! {* N1 ` CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {0 @+ j" l. z! w2 s. i
       3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9, 3 H8 s& q$ ]& A. y- B
       3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {. E7 y- V% u" ^: s9 w/ x4 Y5 x
       3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9, 0 W' p( B. B8 Z' w: ^
       3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9},
      @7 J7 o1 H2 x0 e# c   3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}]," J# Y" T/ w4 y- J  F% x* Y

    0 v, n# U) A2 \* UCell[BoxData[& M% C9 Y, A) P% e
    FractionBox[# P5 S4 t9 P; m& W, n
      RowBox[{"172.65311851642346`", " ", 2 ^5 M2 L4 y9 h4 q2 N# m
       SuperscriptBox["Delta", "8"], " ", 2 k6 ~4 p7 `+ t) X. o0 q1 C
       SuperscriptBox["\[ExponentialE]", ) q( F, ^! z! I1 D& Y; Z+ l4 u0 L
        FractionBox["1.1102230246251565`*^-16",
    7 @6 S9 ?% Q+ J! w$ s7 M; w0 v     SuperscriptBox["Delta", "2"]]]}],
    7 ]8 @. b' T4 p1 g1 X  SqrtBox[# i; n* y1 h# m
       FractionBox["1",
    0 `1 r" T+ P! ]! M# ]& E* V* l    SuperscriptBox["Delta", "2"]]]]], "Output",
    . V/ L8 g$ w1 E CellChangeTimes->{
    4 a* R, y5 I( G# v6 r  3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9,
    " a4 F' m! A' L9 V& J. Y   3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9, . x1 {9 Z. P; U+ K1 I: T: I
       3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9,
    - n4 ^, e4 s6 z0 N( \   3.578012166234375*^9}]
    + C4 K  M) T" d' A1 j3 k6 o4 m}, Open  ]],0 g0 S# b/ K- [- O2 S
    + x5 C! _% a# V8 w3 v; R( R0 p
    Cell[CellGroupData[{
    " L: B( |' T  D" ^' v1 C9 ^3 [5 D  v2 |, t$ ]
    Cell[BoxData[
    0 O, M; `( ~$ X: @5 Y. F RowBox[{"DeltaX", "=",
    ! b, Y8 l3 G! L- W4 D# @4 |  RowBox[{"FindRoot", "[",
    ! T- P: I& W4 r3 f8 }  @   RowBox[{# D2 p0 M5 N7 E+ w7 a0 Z
        RowBox[{"Delta1", "\[Equal]", "1"}], ",", 0 y- Y% Y6 C3 {2 c8 s
        RowBox[{"{",
    8 l8 m) f- u$ `- N7 C     RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",4 d' e1 R! r8 x- c9 e
    CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {& b* I0 Q8 S; b3 e; h  Z
       3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9, ; C9 i6 _$ T. M! A! m: Q
       3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9,
    / M% S+ ]2 V* P9 g9 o/ K6 L   3.57791921584375*^9}}],  o. M+ p5 N4 @

    . N% A8 Q1 u( Z* k* J1 QCell[BoxData[' H, \  o- K# Z5 w1 d. \1 ]
    RowBox[{"{",
    " s! B2 w# t9 }5 M/ t9 H  RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",
    ) l' ?) f5 w& u$ Y5 ]. _8 t* z7 T CellChangeTimes->{! O) ^, r9 m! t/ f4 |, j
      3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9},
    ( E( k( E) ~0 q+ t1 ?2 {. w   3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9,
    & O% y  c$ j; }4 _1 w9 l   3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9, - Z7 H5 a5 f5 i+ F+ X) R6 W
       3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9,
    0 k+ ]0 @5 N; m$ {" D   3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {. [7 J; I& P; Y5 W, N. l$ q& j9 d  s
       3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9,
    ' R  R3 u. T0 y# k) k! b3 ^% e   3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9, . N" j' _! J; D! H' F
       3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9,
    ' B, k, M$ T$ ^1 f; ?   3.57796070150625*^9, 3.578012167703125*^9}]- {% P; r" X8 g0 r
    }, Open  ]],
    ; I# c$ e; ~6 q' A9 `2 Y' L0 B: K+ C& w
    Cell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\
    0 a" @+ m5 L+ z8 v+ n! @$ O\:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",, y6 L4 K7 E- F+ v9 R' I
    CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {: |. j, o; a2 H# i; b
      3.577960705312657*^9, 3.577960707621461*^9}}],
    $ T! U# R, y. t3 @: J8 O- |
    ' b9 [$ X% X4 x' q! K- \Cell[CellGroupData[{' J: d0 V9 [! B3 m2 I
    ! v0 z: E/ |9 i, B2 V' u
    Cell[BoxData[0 ^4 {% y' _+ N
    RowBox[{"C1", "=", "Ca"}]], "Input",
    3 ?" C( D9 S6 [# h4 L3 x3 @ CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],! }. q/ @( |. W, q/ E) o& M: I
    . h" f2 b/ d' f) T% N, ?5 l
    Cell[BoxData[3 |5 ]1 @3 L4 \5 w3 O
    RowBox[{"{",
    % Q% _6 Z% L7 c( l  RowBox[{: D5 h8 n* I) @  V6 r
      "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",",
    - |: V, t' D+ t$ p5 |  @   "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",",
    ' l- Q. x  G& @0 s5 i   "0.`"}], "}"}]], "Output",
    4 O- ?2 W8 H! g CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9,
    5 |: z, S, C2 R, u) ~" v9 s  3.577960710273465*^9, 3.5780121855*^9}]  _, S6 e! L+ p# k" t
    }, Open  ]],
    ; S& T" L5 {5 D/ p" @  U8 Y+ e' K! `3 ^2 X/ V! Z
    Cell[CellGroupData[{
      b8 ^  j: {4 F% x6 p+ ~5 I/ ^, J5 N
    Cell[BoxData[
    8 A; ~9 d$ h3 u0 n* a RowBox[{"u1", "=",
    $ c/ @6 a7 i7 r- n) e  RowBox[{
    : {" t4 T" c8 g4 ]   RowBox[{"Exp", "[", ! o6 M3 K1 N6 A6 B8 b4 I9 A% I
        RowBox[{; u# g  m9 |- p4 Z: s( b
         RowBox[{4 m4 S  S4 d% x9 H. B
          RowBox[{"-", 1 ~; U1 z* M" y6 Z
           RowBox[{5 v% v5 U7 k) \; Z+ X" V/ |
            RowBox[{"(",
    . p) @& z6 |) k) i+ w         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 d$ V' O# \/ w" M& H. O0 k1 x        RowBox[{"(",
    8 {9 Z  P: N5 B) i6 m" e! o% e         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ; I4 o7 f0 c% M' r5 L     "]"}], "/.", "DeltaX"}]}]], "Input",% F2 T$ M% Y0 E# f6 g$ b
    CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {& m' m4 m' M; o/ g
       3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {
    4 G6 w  w1 \" O% J3 l   3.577919193484375*^9, 3.5779192326875*^9}}],
    1 A) M5 h. Q- d3 Q2 q3 |6 d4 ]! b1 W* S
    Cell[BoxData[
    2 J# W4 n+ v. b SuperscriptBox["\[ExponentialE]", , p0 Z$ @3 N9 y& `5 Q0 W* \
      RowBox[{"3.141592653589793`", " ",
    " t. Q' Z9 s  N' r, J7 Z   RowBox[{"(", ; o& @! `" P' }2 F; v
        RowBox[{* ]& H2 ]2 I: b% _8 c
         RowBox[{"-", + H& P1 p% K1 P1 S
          SuperscriptBox[3 W5 _! C7 u; }( G5 u& b
           RowBox[{"(",
    + ^- a7 x0 f0 g: D% N5 U        RowBox[{
    - R" q, e: O) a* I8 @+ k8 o         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", ' K$ ^: ~4 P7 z5 Q" f, Z$ \0 O3 V
         SuperscriptBox[) ]5 c- f/ S4 P$ g8 a8 B
          RowBox[{"(", $ Y* T/ z% y7 {3 @* l
           RowBox[{( f% m" U( Y1 N" e! T# a9 d
            RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", 2 \% C7 F% H! ?" m7 d: i. @3 w4 j$ F
         SuperscriptBox[  M; [) a: N- I: j8 w3 `' i
          RowBox[{"(",
    " N. m* K* Z3 Z0 h       RowBox[{+ Q* _! n& b( u) f" S- q
            RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-", , d6 M, z, j; p! v# P3 Y
         SuperscriptBox[6 b( u- {0 [( ?9 C/ E
          RowBox[{"(", # F) ~9 h, C% x( b( a
           RowBox[{  l( o* t2 X* W9 j
            RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-", - Y: }0 Q' O2 N
         SuperscriptBox[
    $ I' h9 E2 @/ f- s; b. s      RowBox[{"(", # C( @* a, G! m
           RowBox[{
    5 O' q' z7 m4 Y$ j  K1 m0 o        RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-",
    : Z9 E- O% ^& Z9 A     SuperscriptBox[! v0 I% f5 Y" Q0 r, U
          RowBox[{"(",
    - {9 u$ \4 u" k7 M/ s% N# h       RowBox[{
    & t% t* E# Q% W8 V        RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    8 F5 e( e) M- J$ Q4 f1 i; F     SuperscriptBox[
    8 g6 S% @) l0 r; O- z7 Y      RowBox[{"(",
    " J. ~% J* @, E6 f4 |       RowBox[{+ \- J9 x  f* E# P
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", . _4 c9 `' Q  d% y% ?) U6 P+ A
         SuperscriptBox[. s' y3 K: a' y8 \; q/ ]& n
          RowBox[{"(", , m0 ?, ]0 ?0 ^/ j4 ^1 b8 I5 ?
           RowBox[{
    . p' K3 q  d, R' ^* P9 o        RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    - g3 r0 X& p& `. u5 \# ^. S     SuperscriptBox[; U# v: |; y; J7 x% b/ b
          RowBox[{"(",
    5 x$ j; o3 b9 v2 `       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 6 N1 r, W( j  d0 F
        ")"}]}]]], "Output",
    % g6 e$ H# e# {9 N CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9,
    3 b" P& P" o2 X9 [3 T! k4 P; R  3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9, 4 z, ?& w# D4 I
      3.578012187078125*^9}]6 h3 I4 Q+ `& N9 \% l0 [
    }, Open  ]],- g" n: S, D8 Q: n

    6 {3 O% v1 ~( d/ v+ m, Z* [- e; nCell[CellGroupData[{9 ^9 I. W! |$ y

    6 F! C# Z  w" Q2 ?" q0 }/ sCell[BoxData[: r6 d# V+ @. w0 y/ {
    RowBox[{"C2", "=", "Ca"}]], "Input",
    8 K; P; W1 }7 ^: R4 S, Y. @8 z4 K6 W CellChangeTimes->{3.57792047321875*^9}],
    " [, ^, j5 h7 {8 J- L/ C% O9 m
    - r3 @* L: N; }, f: xCell[BoxData[" S0 d. S" o  K1 ~  `) t
    RowBox[{"{", " J, o8 v' E) c. s! J4 X
      RowBox[{
    % |6 w# U4 x' W' d  "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    ; Y5 Z- i9 R$ l8 x1 ^   "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}], ; n% w0 j) E, e; ?6 g  W/ ^1 U
      "}"}]], "Output",
    - Z- p( |0 v5 ]5 |) F8 `1 k CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9,
    3 ?5 d& G. o# E- _4 B" n4 w6 [) z  3.5779607401163173`*^9, 3.578012204671875*^9}]% w# G8 l1 r# D! ^. z; O! _
    }, Open  ]],7 v8 B$ U) ?4 W/ j9 _+ Q* s7 W
    ' d1 S2 O/ i2 j
    Cell[CellGroupData[{7 ~, F9 q( N8 }" y- ]! V4 r; f

    ( [, |* X! W: P( z; \: UCell[BoxData[* R, `7 r: G& T; p1 Y# x2 T
    RowBox[{"u2", "=", 0 ]& E' M% R" \( l
      RowBox[{: ]( b' b: r, a, W# d
       RowBox[{"Exp", "[", / q. ^) Y  \! c
        RowBox[{
    5 ~+ q) \3 @- @- m     RowBox[{
      z* X7 d5 s* |      RowBox[{"-", : k1 o- n1 c4 `/ E3 h1 ]5 k+ n
           RowBox[{
    9 H+ f% X" y; ?5 T        RowBox[{"(", $ @* x6 |" {  U# n7 R# _! M' M# j
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    & v) A- n- x: O1 c        RowBox[{"(",
    6 E7 A/ Z' k; @/ a0 a. {         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    , h: k6 f& r0 {6 w" P& ^     "]"}], "/.", "DeltaX"}]}]], "Input",
    0 Z  r! E9 z3 T! D- {0 W9 W CellChangeTimes->{3.577920484109375*^9}],
    : p! R3 c( c! b. ?7 v
    ' G( |! b5 o3 I; o' i: bCell[BoxData[
    ) R4 X- o: o4 P/ v! e. \7 q5 b SuperscriptBox["\[ExponentialE]",
    & P; r/ b% L8 u. Q- u* F# d  RowBox[{"3.141592653589793`", " ",
    % Q0 h$ K3 M/ m$ |# E   RowBox[{"(",
    + s$ U( R4 j3 T! \8 y    RowBox[{
    : r, y# u! U9 o2 m  w) `     RowBox[{"-", + R8 V% [' k. q0 M- B. l# A: Q, r
          SuperscriptBox[/ ~6 X3 [' P3 g( }, r- M; j
           RowBox[{"(",
    5 k7 S' ?( l9 |2 p/ V        RowBox[{* a& }6 m4 [9 X3 }1 ~
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-", + F$ x) G# w3 f% B0 K& D
         SuperscriptBox[% e% J- h1 v; r  b/ M7 M0 W
          RowBox[{"(",
    . l' K, q5 x+ ]4 L- J4 v6 c       RowBox[{
    4 M' Z/ A3 M9 w: Q. a7 o        RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    - G+ [- U5 w) u$ u( [0 L5 Z& g2 v- G& F     SuperscriptBox[1 O2 _: O3 d1 Q% _# N
          RowBox[{"(",
    9 A( b1 t2 C9 m7 @0 w7 i       RowBox[{
    * x  d5 H* j% w0 r; |; y3 h        RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", 3 L7 H; ]- m( p: a5 N5 F2 U" j
         SuperscriptBox[
    ) Y9 M$ x* D6 Z$ q      RowBox[{"(",
    : }) {$ w* Z5 C0 z: F4 L& I       RowBox[{
    + f6 s, `- ~% |) t        RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-", % O# @* U/ y4 d. Z1 }
         SuperscriptBox[  ~2 c4 u" ~$ X3 B+ m4 G* z
          RowBox[{"(", + q+ q$ U- B. s3 Y# Y
           RowBox[{
    9 ~: J) P+ w: J% k* `        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", ) ?  l+ k$ H$ s
         SuperscriptBox[+ ~5 W# Y( W& J9 x7 W8 H; b- l
          RowBox[{"(",
    . R; H8 s7 H  l9 c% O0 n0 ^       RowBox[{+ j. u, K: ~5 p. J* d' D. d+ X7 |
            RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    7 g) n! @8 k* U, t6 Z6 Y     SuperscriptBox[
    . s( P9 m1 i5 O4 y. l+ d      RowBox[{"(", , H% t1 Z: g# M. {. `8 O! E% ~
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", % J$ i% w+ P2 Q
         SuperscriptBox[' b2 k8 g; s& c  {, ]" M1 K' ]
          RowBox[{"(", ( G8 W! V! y2 T6 A  V$ u
           RowBox[{
    - k8 o% e# Q6 c9 A& z: Z3 v        RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",   o% x' Q  s5 w0 v9 R1 \
         SuperscriptBox[
    4 `/ t9 U# q" N0 @      RowBox[{"(", & V$ H" \  F+ D9 V) U4 Q1 S) n
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ; @7 ?1 S: _* B    ")"}]}]]], "Output",6 @2 O& u( h1 B1 |
    CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9,
    7 U7 W2 I9 O2 o9 \$ p  3.5779607413955193`*^9, 3.578012205484375*^9}]" F" r9 M! r4 n# H7 k9 ]
    }, Open  ]],6 U/ m1 B% H: M5 C  ^7 t( A3 Z$ U% Z

    ( r# M" b! o- n4 A( DCell[CellGroupData[{
    9 X6 I0 w) d* O/ a! o, ^! y
    3 X. R- B% e/ Y6 D& x- _& JCell[BoxData[* x1 H# u0 X. z
    RowBox[{"C3", "=", "Ca"}]], "Input",
    0 V" m* c# }) C' a! B CellChangeTimes->{3.57792064125*^9}],
    1 s8 S7 q7 X5 h( s9 ~6 ~! K; T' W( D* N& w( d) M) G5 J
    Cell[BoxData[
      u6 E8 X. d( d RowBox[{"{",
    + a3 v2 X7 B) M! y& ~+ d  RowBox[{8 @, I7 X& c3 S" c- ]) t
      "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",",
    8 n, ^3 p$ i. D) E+ r   "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}], 3 v( u' J$ o" {/ G9 {- q+ k' Y
      "}"}]], "Output",1 u5 p/ Q0 M% e
    CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9, * m: b9 p, X4 R  s2 _/ Q6 z( P
      3.5779607642027593`*^9, 3.5780122103125*^9}]& k: |* b8 F# i  L( o
    }, Open  ]],2 k* d+ H# p2 Z

    . J& e! B" }$ ?0 uCell[CellGroupData[{- |/ ~: r, w% Z  X/ B% y$ X! N

    , i4 [* B8 Q$ v- |# }5 {Cell[BoxData[
    9 N# ~3 Z9 X# L0 p3 l RowBox[{"u3", "=",
    , u6 p9 l6 f6 @  RowBox[{
    0 A$ I$ Q4 O7 Q' ~. ~   RowBox[{"Exp", "[", : O3 S0 I8 y0 p% i. X/ i" _( y
        RowBox[{3 L! b  m: g4 `
         RowBox[{3 ?6 N: ~$ N5 d! j
          RowBox[{"-", : I0 I$ G: ~; b& ~" k1 Z4 R5 N, Q
           RowBox[{. {& S5 |' B8 i5 D! n, K
            RowBox[{"(",
    # p% W  N8 I8 M" I         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + {) V+ ]  g- r" D3 |6 g) C) f) w        RowBox[{"(", ; z5 l2 b) c( Q8 J' X% j2 |
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ @2 b7 [! h5 \. N
         "]"}], "/.", "DeltaX"}]}]], "Input",, q; z" i4 {0 T% f: z+ H
    CellChangeTimes->{3.57792064921875*^9}],5 W9 e* x0 D( [; z0 T% D
      a7 K# [& u  d' ~! o$ c
    Cell[BoxData[
    , l. T: b' i, i7 Y/ @1 R SuperscriptBox["\[ExponentialE]",
    3 N3 U" }: }2 ^6 {) A  RowBox[{"3.141592653589793`", " ",
    $ z+ D8 O  p. Q& T+ m: |   RowBox[{"(",
    . g5 ^  l; o# r, N    RowBox[{
    & _9 W$ v0 {2 Q1 ^. q! q     RowBox[{"-",
    : d. S% ?9 M5 F% f4 y8 B! e      SuperscriptBox[5 \- P  a; ?! g
           RowBox[{"(",
    7 J+ V$ W2 [4 t  k. X0 G, b. `        RowBox[{. r9 K+ T# B( F7 U
             RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ) n) U2 d6 B- \% Y5 @. Q     SuperscriptBox[
    2 o# h& j( ^$ n. ?9 A0 p' t9 Q      RowBox[{"(",
    4 s+ p  [2 N$ x- i! u! c4 g- s# k       RowBox[{
    5 Y) O: r) \# N# T& D        RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-", * R  K$ x3 n3 R2 m2 o
         SuperscriptBox[% ?" j9 m  H; _8 d; Z( `
          RowBox[{"(",
    " A! L3 l( @: y2 m       RowBox[{8 b; ^9 P( S0 x
            RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", ! Y  H" a+ R  p: p/ ^* T( x& S4 c* ~, m
         SuperscriptBox[
    . H7 ?8 N; r, B3 |      RowBox[{"(",
    ' t( L. T$ h- C; j$ _       RowBox[{
    ' l) Y- y( o! p        RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", " H/ L( Z2 x3 x, j1 x, x
         SuperscriptBox[) G# {+ s8 C; C4 B1 [
          RowBox[{"(", $ ~) b! V0 l+ T
           RowBox[{! D, o1 X1 A; A4 a7 {: f
            RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-",
    & h% v& \" h4 o& g9 b" O1 i  W     SuperscriptBox[- {9 L8 k0 n( E
          RowBox[{"(", + Q0 i% }* `- R3 d: s) R
           RowBox[{. T. C7 A' _+ Y4 F# a! \8 s; v; d
            RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-", ) x1 @& y0 d. l" b
         SuperscriptBox[& Z- |/ C+ n3 A' _4 ~
          RowBox[{"(", 8 _, g( ?$ F& _
           RowBox[{; _  H9 `6 F% k
            RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    5 Q  B% W+ @: s7 v     SuperscriptBox[, ~) f9 {9 [/ c* H4 F3 j- ]# p; L
          RowBox[{"(",
    2 @9 m2 f5 {* k$ ^) E. P0 S       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 5 c; U1 F2 f, o/ ^7 q9 [; [$ l4 V
         SuperscriptBox[# I/ s# h  x9 p: o8 Y+ t
          RowBox[{"(",
    * h2 @, s4 D4 A8 U* b" t, O" c, u       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 0 a0 l- e! c+ d. T2 ^
        ")"}]}]]], "Output",0 s' f8 k. W3 Q& ]
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9,
    * [$ Q0 W" L# D7 \: F6 h3 s$ a  3.5779607654819613`*^9, 3.578012211515625*^9}]
    2 Y5 v! c  \# g- \}, Open  ]],
    7 H' x) ^$ }1 i# p. C( M: d: k
    ! |4 u& a& B9 b" G) S9 DCell[CellGroupData[{
    + N( f% H3 e% I8 R6 @! ]; N. _9 G8 s) q/ ~/ B6 d4 J
    Cell[BoxData[9 A. b4 n) q0 _7 h& Q; f
    RowBox[{"C4", "=", "Ca"}]], "Input",# N, I' \3 |9 x5 }
    CellChangeTimes->{3.5779207559375*^9}],
    ( G- |$ K7 Z$ _, y6 e+ P* S  K% ?  \3 @7 |" r0 E3 G- y
    Cell[BoxData[
    8 ?, \+ {0 P6 m" H RowBox[{"{", 4 O! V* n7 p# v  M
      RowBox[{7 W! r+ P2 f) C
      "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",", 3 v+ S  |8 G" S3 _! Y7 ]+ ?
       "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}], 8 Z7 Z( _8 f8 m% `5 k
      "}"}]], "Output",4 i% A$ _; q9 }9 o, [2 i0 k
    CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9, $ F$ m6 L4 k& L
      3.5779607861363974`*^9, 3.578012216171875*^9}]- `3 k, L5 A* _  e& r, n
    }, Open  ]],
    " }0 T6 V, f% u6 U, A; d) r2 ~) k" ?5 G+ {& g% c
    Cell[CellGroupData[{4 ^+ Y+ J  U/ y6 L+ S! o
    $ o3 F+ |7 d* V3 O
    Cell[BoxData[8 x' Y- P" f# [' J" F5 q* x* I6 {
    RowBox[{"u4", "=", - C, z/ x4 }" ~, ]) |% z
      RowBox[{; S% c  b* o" c! P! d( a( y; U
       RowBox[{"Exp", "[", ' p9 d; g  G3 G8 n
        RowBox[{0 ~1 Z1 p" N+ Q8 O* i& i. K
         RowBox[{! k6 k9 @- D. t9 `. p9 K
          RowBox[{"-",
    2 |2 Y3 c  j0 c% U2 O& z       RowBox[{
    ; K/ x$ V: J# a& b2 J        RowBox[{"(",
    # Q7 ~' f% L: w         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ' _& |, d2 t2 \
            RowBox[{"(",
    6 r0 y9 R) v$ R1 F: C" T         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],3 ~: Y# U* ?  W. \
         "]"}], "/.", "DeltaX"}]}]], "Input",
    % j0 I. y0 E9 z1 c CellChangeTimes->{3.57792076325*^9}],# m& _& P& [' Y

    0 v' J" ]) u3 |7 m" _Cell[BoxData[
    ; q4 w1 g. `1 y; p. C SuperscriptBox["\[ExponentialE]", " a* P* o# }" I& Q
      RowBox[{"3.141592653589793`", " ", ' X7 B% B  ~9 w" b' n2 \
       RowBox[{"(",
    0 X- S, s1 W: Y7 Z  x6 E8 b    RowBox[{
    1 H+ E4 u  v2 e& u) [* i1 w     RowBox[{"-",
    8 Q  Q3 D* |! {: N" D- R, j      SuperscriptBox[
    $ u( z  a' {2 i+ L5 H/ z       RowBox[{"(",
    * D/ w& Z9 n1 y; s9 }        RowBox[{
    ' X  S+ s8 d$ q% W' C4 X9 c         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", 4 w2 Z. D2 T- N3 G4 m
         SuperscriptBox[; r, f$ T7 h, e: ?6 t3 [+ f
          RowBox[{"(", 6 w' H& D6 I1 e3 b8 ?- ?
           RowBox[{
    ( N; m6 w: n0 e- x        RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-", ( G" @8 E+ r" u
         SuperscriptBox[
    6 G  |$ U9 t& w- D: I      RowBox[{"(",
    & j1 P( j/ T3 M. C  @7 u       RowBox[{. R% T, ]9 Z& ~1 V/ n
            RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
    % p' P- @- M! Q. G     SuperscriptBox[* r. _9 [& a1 b: v3 C
          RowBox[{"(", 9 R! n. t1 c3 w3 R  y) }% A+ a& T$ t
           RowBox[{, ^  q! B: [4 r: H/ i2 c: k. j
            RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-",
    7 K% Q- K# p- L$ {: T     SuperscriptBox[
    0 Q& o) M9 i& w2 X3 b      RowBox[{"(",
    2 E: H5 _2 h4 S: T2 L       RowBox[{
    1 E1 C: U6 D& y( l5 A  ^+ C4 I+ p1 Y        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", 2 V1 Y! h) h- F, O
         SuperscriptBox[
    ( A" r) T: c: E8 q! R% H      RowBox[{"(",
    ' j+ ?2 q1 G4 |) w/ N& |7 m       RowBox[{
    & J3 |. j; Z, Y9 _' N        RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    " A* o! V) }4 X     SuperscriptBox[' |0 k. Y9 C  N; K
          RowBox[{"(",
    9 O, D2 y! C0 ^# ?, b- N+ L; m7 @       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    : P& Y/ V+ `! @7 R1 G6 |! N     SuperscriptBox[
    8 B5 x" J+ q3 {$ h7 [- o1 g& O# W: k* C      RowBox[{"(", , ~) W) g+ }) h( ]
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 5 [4 q5 [  f  @8 E( |( w- C
         SuperscriptBox[
    ) ~0 C  s1 C% ^, H% \4 P" ]5 o' h      RowBox[{"(",
    . Q9 K% m* ?2 G% @. E+ S$ f- r; L       RowBox[{
    ! K$ u5 D  P  L3 V& N5 v# J        RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}],
    * z+ g5 J% o: _5 B    ")"}]}]]], "Output",
    / Q' n4 j! Z5 U: `+ D# e* w CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9, * D% W/ N/ T" f9 K7 c$ Q# N3 k
      3.5779607873531995`*^9, 3.5780122169375*^9}]! z2 _; t0 k1 M" h$ h" @& h
    }, Open  ]],1 s9 R  ~% O  ]  N7 O
    & c+ j% I5 j- a9 H2 M" j5 C! w
    Cell[CellGroupData[{
    3 M! M  A' Z# m' S$ }7 X7 Z  q: g; B* P4 [4 u" x) N/ z) v4 P
    Cell[BoxData[; U- m3 q) T" ^' Z, p
    RowBox[{"C5", "=", "Ca"}]], "Input",6 v' ^) }: c( L1 |8 _
    CellChangeTimes->{3.577920860671875*^9}],
    7 W) `* L9 s6 ^1 p9 _8 t: a$ H9 H. h; S9 w8 H5 d; o6 I
    Cell[BoxData[
    4 F5 E1 a7 N0 {4 [ RowBox[{"{",
    % u! N6 S( l, [3 D& J# g9 T6 R( l  RowBox[{
    1 ?% M3 k8 m# ~- R# Y/ {# {; ]2 c. K  "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",",
    # }# h+ s1 R6 D+ A# K) u( W   "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}], 3 g* w1 p2 V' o0 e
      "}"}]], "Output",
    & |" z! W6 {0 v6 Y CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9, - v2 |- f8 p" G4 v8 u1 B1 D0 [
      3.5779608137328453`*^9, 3.5780122209375*^9}]
      V4 O) ]8 V" T$ @}, Open  ]],6 g5 y# w0 X/ U( k# ]4 e9 @

    ) ^3 P1 P% k! Q. `  y, b5 HCell[CellGroupData[{
    ) a, B1 C* x+ ~! f: A/ R
    4 M- f+ P' T2 J# zCell[BoxData[
    " ^2 ^4 H& _+ r! W8 |8 u RowBox[{"u5", "=",
    ( k4 K/ c# @( m' P2 C# k  RowBox[{
    ! M' @' }) G$ X3 v2 j' Z   RowBox[{"Exp", "[", / c, E+ J" p& |) e7 E* h3 C. K
        RowBox[{- P2 b9 i1 S& d( e( u  s( y
         RowBox[{4 q& @: P$ C9 }5 q# j' l
          RowBox[{"-",
    ! k+ A! S  u( U: Y: s$ O* F       RowBox[{! G5 t2 g1 [2 a1 n6 q
            RowBox[{"(",
    9 [3 |* B& H: Q& v8 a% W0 N         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + H' n7 N7 [" j; a        RowBox[{"(",
    " U& V* a6 j6 m# w  N/ x         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],5 r8 D9 U6 }8 w8 Q
         "]"}], "/.", "DeltaX"}]}]], "Input",
    0 k: m8 c' k8 |: A) P8 B; E- A CellChangeTimes->{3.577920869375*^9}],) k( }+ Y" E7 s/ c  p

    9 Y5 x& V5 F9 Y# s* lCell[BoxData[
    , ?8 \$ O$ z! w3 K4 L1 ^ SuperscriptBox["\[ExponentialE]",
    - `: I, y3 b; N$ O  p  RowBox[{"3.141592653589793`", " ",
    ( N. c9 U, W+ X. j: \& E   RowBox[{"(",
    / v* u2 h* J" A% C$ m: M; ^    RowBox[{
    0 B$ A& n: L0 r. B) s     RowBox[{"-", * [8 ~+ _* p/ q; c( ~
          SuperscriptBox[+ N9 w7 ^0 c  [+ _
           RowBox[{"(",
    & w/ z8 \" x4 W9 p- I        RowBox[{9 y& K2 U6 Q7 J% B# {
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    , N4 Q! C% P& L& {4 H1 Q     SuperscriptBox[
    $ r. ?! e5 ?/ _9 [$ C      RowBox[{"(", ) \" }- g9 v3 p# W, C" i
           RowBox[{
    ) \/ Q: |5 U  z  L6 C0 n# C        RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    0 H# x6 [9 a$ o  T, `! t     SuperscriptBox[
      I. v8 ~  d& S1 {2 Z      RowBox[{"(",
    - L$ Y6 f; X5 K9 T/ i3 B& \       RowBox[{( ?4 @. K3 [) |# F8 L
            RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    ( x9 h; m6 V3 i0 g+ Y, n     SuperscriptBox[
    : G3 Z9 r/ r  m8 l' H( }      RowBox[{"(",
    9 c' w! I2 G5 y; k0 H       RowBox[{# {; Z) g  z: w1 _* }/ W
            RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    + h1 B; Y* Z0 e2 G     SuperscriptBox[% p" V8 D' t3 U/ t2 w8 i
          RowBox[{"(", & T+ `/ y) ?( ^" O6 T: ~* F
           RowBox[{
    + A7 K6 z8 o7 z+ x' S* h' a        RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-",
    & b7 T6 P, T: s6 W3 I2 T7 u     SuperscriptBox[! q% \% \5 E( @) ]& i. }; k
          RowBox[{"(",
    & d. Z3 a! ~7 }: S, S       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ' t, H3 L1 Q" [" ^$ r
         SuperscriptBox[
    7 [* |. q9 L$ f# ]$ ^  v      RowBox[{"(",
    " `/ l) A; O* g$ I" u       RowBox[{
    " _( |# u2 U% R        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    8 F* x  I' C* [: l! I+ l     SuperscriptBox[
    & b$ C% [! Z) O  S" z  _( j      RowBox[{"(",
    2 t. P9 O6 p( `  q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    - o% n0 D  z- U  _: F* U     SuperscriptBox[
    " D4 ^& _5 H2 x& b      RowBox[{"(", * F* H* ~/ w1 K1 P
           RowBox[{
    1 y) |3 L1 U9 g; x) v: ]) h        RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], 7 J7 N4 q7 y$ A6 E) [' Z4 c% Z
        ")"}]}]]], "Output",6 S% m. d5 A) H
    CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9,
    5 y! L+ _/ \( ~# E  3.577960815043248*^9, 3.578012221953125*^9}]( r4 ^$ @( g- W* V+ d' A
    }, Open  ]],  T5 `1 m& u& Q2 d8 p' u7 S6 T
    4 E0 N7 J, q/ ?8 T' N
    Cell[CellGroupData[{
    2 D8 }* L% C6 D" R8 f
    6 d( W# Q( K4 @1 f9 `) ^Cell[BoxData[0 @9 R3 B. T3 f
    RowBox[{"C6", "=", "Ca"}]], "Input"," q' X# K: d  K+ C/ k. C
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],/ {# v5 |! L- C! L9 `

    ; Y% J4 X3 g" }/ V- {Cell[BoxData[% @  Q+ M: Q) C* c
    RowBox[{"{",
    ! b3 Z1 {8 x$ B* i$ _  RowBox[{* V" y8 v% R# d0 p; s  V! d- V0 N
      "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",", + b4 _. V5 x! y6 w9 t
       "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",",
    , @5 ^: E* _8 H# D+ s3 l   "0.494866`"}], "}"}]], "Output",
    ! m5 j3 @" s, ? CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,
    # ^. J1 |( G" y  J7 R   3.5779608373044868`*^9, 3.578012227359375*^9}]
    5 E" W2 G# A  o8 r# U6 b/ h6 N  a. A}, Open  ]],
    * [% _  t& R. D% H  Z% t) s( ~* p  z2 ?! b9 ^
    Cell[CellGroupData[{+ |+ U4 s; l/ w9 ]+ o* E

    4 M7 p& b# k* A/ r/ C+ PCell[BoxData[$ b1 V" R( [1 p% ?( K! M  H- p- U
    RowBox[{"u6", "=",
    $ h, q  }. }4 Q4 P  RowBox[{
    ; |3 _8 g6 b) s   RowBox[{"Exp", "[", ! c* ^' C: ~3 C
        RowBox[{. ?& {" E" h6 p5 @$ F) e
         RowBox[{9 B: k) s1 y, f8 O6 f6 f# @
          RowBox[{"-", 8 b& y1 S) f, Y" h' f1 }( q
           RowBox[{0 n: q# O! r! ~4 e* e0 G
            RowBox[{"(", . ~5 z! I9 Y9 u
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", * v; H6 U5 ]* u3 t
            RowBox[{"(", ; H2 E2 w: x% N7 J: K
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    * k8 I$ L9 C) x9 `7 m8 t* c0 _     "]"}], "/.", "DeltaX"}]}]], "Input",+ z9 W, ]; t4 N2 }. Y
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],
    * N; K1 Z0 D" q9 S  q% G9 R- R0 q3 U& T3 ?8 ~; Z* i; X* E" d3 Q
    Cell[BoxData[
    ! p+ E+ r8 b; t( q: `" C4 t SuperscriptBox["\[ExponentialE]", ; ]2 G* W0 |4 C+ I
      RowBox[{"3.141592653589793`", " ", 1 f! G& e9 I: ~4 f
       RowBox[{"(",
    3 r5 `. i0 O$ c" A1 x    RowBox[{
    " P) ]( r, L% L6 ^0 |) l3 a, U: K     RowBox[{"-",
    2 v5 L9 I& p; w, S: E* t      SuperscriptBox[/ }& P0 _% p4 Y
           RowBox[{"(", ; m* F& s$ i2 f' S1 b4 x- G' v& E
            RowBox[{! ~% ?, B8 t4 D) _
             RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-",
    + }" Y( y4 A4 p( O     SuperscriptBox[
    ) M0 y3 r& m7 {4 q      RowBox[{"(",
    8 W  i6 ^( G+ k' S, f       RowBox[{
    1 z2 ]. |  f$ _$ e        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-", 2 ?& f7 q( @* p( g' @/ @
         SuperscriptBox[
    9 b8 w1 a6 v- g% L      RowBox[{"(", " {1 ?" E$ i; Z* b; b- A1 h
           RowBox[{8 q+ T2 k' c, Z& s4 h! E6 t, ~9 ]
            RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-", " f3 _2 ]( |; Z0 y; H) d8 @
         SuperscriptBox[
    8 R! x6 F$ l4 @8 d8 }; R+ ?' @      RowBox[{"(",
    9 [" P8 n0 m. l6 Z; Q! E       RowBox[{
    5 ~3 j7 l5 F- w9 v        RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-",
    5 M% W* g% U2 ?( X$ i) C9 D9 ]     SuperscriptBox[( _6 y7 q' {$ h, O: N
          RowBox[{"(", ! c; N/ v6 F' y* k# v
           RowBox[{/ E0 `1 C( w3 R  ?8 `* E8 a& v  v
            RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-", 6 Q. r6 i1 }% k% l: C
         SuperscriptBox[
    0 j( C) l  a7 G$ _! w      RowBox[{"(", 6 A9 N8 k! E) j/ s; k7 v
           RowBox[{" M! Q+ ~9 L9 d/ \0 D! U
            RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    - J0 A/ b  e- X' h     SuperscriptBox[, M9 u1 D* y# _: h5 I0 I
          RowBox[{"(", 8 v* P0 y1 `8 F3 s  P
           RowBox[{
    $ i8 f+ x0 ~0 ^% E' }        RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", 5 v8 w' |. i8 l! D4 p
         SuperscriptBox[
    ( V/ K4 {/ w( h9 p0 Z5 i4 O/ l      RowBox[{"(", % j* x5 C1 v; j- p* B6 `- a
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 0 [: o8 U0 C# U+ l
         SuperscriptBox[
    ) y7 F5 E7 R. c  M' y# Y      RowBox[{"(", 1 P3 c( ], @; U! F) _* O' G
           RowBox[{# c2 f2 k% u7 O  N1 \$ [+ T
            RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}],
    - b" V2 U6 Q5 [' @+ [" `' ^    ")"}]}]]], "Output",) J7 c7 F: W( S5 V! D6 s
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    2 u) @0 \7 N9 f( l- H  3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]1 \* ^: i9 j# E6 H
    }, Open  ]],
    4 E6 n. X8 q4 q3 P# P7 J+ S
    . _% d) c# M& r$ fCell[CellGroupData[{
    " B( {5 o) O( }. U7 {0 v: S3 |6 K) @2 e( r8 I/ b
    Cell[BoxData[" r0 |" p7 v5 u$ Q8 Y' n4 s
    RowBox[{"C7", "=", "Ca"}]], "Input",2 G, o- @) A2 Z. w, G
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, ' h& j: E" r) w2 z
      3.577921316125*^9}],4 C# b7 o+ m& E: q

    / }7 t* u  H  r8 M* U+ ICell[BoxData[
    9 L% z& s' p% }  h. O% m RowBox[{"{",
    * K, A  @' l& F0 |8 }  RowBox[{
      S) y, y; u: ^+ h5 ^  R  "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",",
    $ Y; S5 l9 d( a- ]0 ~   "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}],
    1 h0 U2 L; j+ M$ r  "}"}]], "Output",) V& @8 @4 r; l% y- D  E
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    / m2 \4 V: L9 q& E+ Y  3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]
    , G8 K% W" u1 T, {% Q0 n5 X8 ~}, Open  ]],& R$ M' ~( f0 Z: T# E

    " v- ~4 A3 H! }$ ]; w6 ^# X; z  ECell[CellGroupData[{
    7 S3 F4 o8 ^% T8 _+ e: N& a! }: v1 c# w
    Cell[BoxData[$ Y+ |; N4 Q) f" Z0 O5 S- t
    RowBox[{"u7", "=", 1 z* g/ J* K3 N1 r, _
      RowBox[{, X, V7 K9 a* l
       RowBox[{"Exp", "[",
    $ q  h1 T+ v5 l. e    RowBox[{
    , u* D! r! M9 Y. k3 r, ]     RowBox[{
    * k* P+ C, a1 P" p+ e1 [' Z      RowBox[{"-",
    ! w8 `7 n  I3 w/ ]1 U+ ^8 q, p: H/ X       RowBox[{" h5 D2 M9 P/ W3 L' S4 C, @8 w; O
            RowBox[{"(",
    ( V: j1 h1 y! K         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 2 F1 D; k5 w1 x) a: `+ [0 ^& Q
            RowBox[{"(",
    2 m% N+ w2 e9 Z- {; V* H         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    $ \7 s  D9 r: ^4 [     "]"}], "/.", "DeltaX"}]}]], "Input",
    ( C/ T& B6 s$ g6 ] CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    ; P/ x/ A' t2 [7 b2 ~  3.57792132028125*^9}],
    7 Z% |# c4 P$ [8 i- \, x& w/ w
    " o% p$ [# l) F( m3 N( T: iCell[BoxData[
    - v& V2 o' Q! h' r* A3 [ SuperscriptBox["\[ExponentialE]", : B; K3 T) q$ ?
      RowBox[{"3.141592653589793`", " ", / O2 T2 S% F, I" i( x& b! s
       RowBox[{"(",
    $ b6 E% f1 g% T' O$ J2 y+ g# m  S    RowBox[{
    9 k# @* T; d0 N) I# b* \     RowBox[{"-",   ?6 G1 h4 I9 R* }, o8 k
          SuperscriptBox[& P) o; c3 y. ?. H  `! E3 O1 j
           RowBox[{"(", 2 f5 r4 {* g# i1 S. C* y: O0 W
            RowBox[{
    ' T, I/ `8 Y' k4 W         RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-",
    . m. i% n) r+ S0 s6 F     SuperscriptBox[) f0 Q2 b3 [. m+ p% {
          RowBox[{"(",
    4 g+ ]9 _" c' w) s& R3 r! c, _       RowBox[{
    8 Q5 P* K% G7 b0 o: z        RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-", ! w$ Z6 ]  N8 K
         SuperscriptBox[
    # E2 R$ M8 z" W7 ]( N+ ]0 t      RowBox[{"(",
    7 b1 \( `3 {; _8 c* i- s3 t: f; L       RowBox[{9 a9 _' R3 A4 u, H1 Z/ Z
            RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-", - R/ z: d$ N5 m+ `
         SuperscriptBox[
    ' @& ~% |+ x2 ~9 H6 B" z      RowBox[{"(",
      J$ I' ?! Y, |8 ~# i& _       RowBox[{; k0 I) p3 e% X2 c1 I% Q3 m
            RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-", 6 e0 s% b9 z$ ~1 I2 h. h
         SuperscriptBox[
    ( A/ c+ w9 \% B* Z4 s% [      RowBox[{"(",
    ) X7 [, w6 D- B2 m       RowBox[{1 c7 C4 g+ B* {6 r* N* l$ H
            RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-", " C) r0 T- R4 [, r; n7 \  z: C
         SuperscriptBox[; r! J( |3 m- W9 J" j
          RowBox[{"(",
    ! z) c" Y' B0 w  k       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", . ~/ ~/ i# G# W, K2 f5 Q  f
         SuperscriptBox[8 G6 F8 Y, J/ U6 N1 T
          RowBox[{"(",
    * z) y- K" O/ Z* _       RowBox[{
    % ^+ y' x) l# F( o0 U        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 0 X3 K( e6 w  F2 w, G
         SuperscriptBox[4 T8 r8 b& T9 T) B8 ~
          RowBox[{"(",
      B7 ^! ]3 \2 f( L% T) b       RowBox[{
    " T% f6 V5 W4 ^        RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    : |: y, i' `0 E% Q, h     SuperscriptBox[
    5 F: o2 H( O1 K0 ^2 G) [+ P. |  ~      RowBox[{"(", ! o: m( Q- A$ N
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ! A4 L$ |( q8 _, {. G/ D/ P    ")"}]}]]], "Output",8 y; ^+ ~; C1 d3 e. v* n
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, ! X9 w8 v' v' S  v( k
      3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9,
    7 D: U0 a" K, {. j  3.578012251359375*^9}]  V: V* Q4 Q  M, ]; F1 F3 R) n
    }, Open  ]],; ?, z  p% d( O% a
    4 a, P/ E2 J  _: y
    Cell[CellGroupData[{
    8 G1 Q4 L. ~+ L' k3 F+ g9 s" G; R! |5 y6 j
    Cell[BoxData[
    # U, _5 o% F. D6 z! s/ [9 C RowBox[{"C8", "=", "Ca"}]], "Input",( R; j! L  Z9 L- |% m9 \
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, & D$ m7 y5 a0 `. U5 \/ U4 H
      3.577921316125*^9, 3.57792141421875*^9}],
    6 {# y. w; B' y( Z3 }; {, L, D* _) X! V
    Cell[BoxData[
    : T# }" @& r0 `. c' s/ C RowBox[{"{",
    " r# u* N8 n& z, C, f9 z; R( H  RowBox[{
    7 [( m* R+ V' B, r  "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",", . N0 k+ c' w5 r; O
       "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}],
    8 l1 {8 ?; t2 o) h0 f* Z3 N" C  "}"}]], "Output",2 B( {7 Z1 Y+ B) [
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    ) ^& J" W+ a5 n+ b. k8 W  3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9, " P, X/ M" R+ M( i
      3.578012260515625*^9}]2 t" Y8 S) f# r9 F# X" e) q
    }, Open  ]],& R, s5 f0 \% B( h) \7 P# ]& o

    " G) l" x3 A4 ^Cell[CellGroupData[{
    # T1 }, n7 c* y7 J1 h0 O6 M. J8 \% Y2 E0 q: k- f( e
    Cell[BoxData[4 ~. @& |" x: J: k! D) A3 W
    RowBox[{"u8", "=",
    : v# X) x' X! H8 v  RowBox[{6 |" ?: b, D1 e! M
       RowBox[{"Exp", "[", $ Q2 ]# P& `' a2 e9 V& X: @
        RowBox[{  [) d: P( O+ Q& x% N6 g5 [8 X% W" Q2 W8 y
         RowBox[{4 r  k  m5 B4 E: U
          RowBox[{"-", 5 c$ `$ G. Q0 T: Z% ]6 D0 }  y
           RowBox[{
    / k+ q* m5 |! J" ]. m( q3 M  {        RowBox[{"(", 4 X1 s+ ?9 p% M8 ?
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    % B8 H2 ?8 G3 Q! H- n+ N        RowBox[{"(",
    8 z* J* \' R; J- a9 b         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    + K9 c- q0 I8 W0 G' _" r     "]"}], "/.", "DeltaX"}]}]], "Input",
    7 Z& E# e5 Q( N1 @ CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    ; N% x/ `( ~& X# r  R  3.57792132028125*^9, 3.577921416921875*^9}],; i, ~2 Q' Q9 D) I+ ?0 A3 ?
      ]; ^- r- K. k7 @  k/ @& c6 i
    Cell[BoxData[( h# Q% c: s# X0 a4 B
    SuperscriptBox["\[ExponentialE]",   E' T2 m% T: |
      RowBox[{"3.141592653589793`", " ",
    - z$ n7 y2 a" e* f   RowBox[{"(",
      i+ l" D/ }: Y3 F    RowBox[{
    9 R9 s6 F7 ^% t3 e/ M" J7 N     RowBox[{"-", / z0 H3 F; Z& \3 ~; J: `  _  ?
          SuperscriptBox[. `4 J8 E# ~1 T8 M1 f. F# v
           RowBox[{"(",
    " s2 }9 y+ g$ F        RowBox[{. {+ ~4 d  x0 |& |4 C) \
             RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ; _3 R/ w3 Y3 {' R) C$ k7 O     SuperscriptBox[
    - a$ g2 f, v1 ^% P% ^9 ^      RowBox[{"(",
    ! |; g2 H1 V. ~7 ~" Z% T       RowBox[{9 X/ N8 ?, z. N* [0 }0 B1 ^
            RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-", & r% {6 Q* \& ^9 r- ~2 E
         SuperscriptBox[9 ~5 e0 c9 h; a  v
          RowBox[{"(", 1 W/ @0 z8 I. R3 n& ]9 U/ K9 Y
           RowBox[{3 }% w! Z0 k+ s2 d( n8 y9 C
            RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
    # e, C/ \1 z# U+ v     SuperscriptBox[# O$ u6 @# D1 G! a1 Y# c
          RowBox[{"(",
    4 a% Q( w4 `0 _( `       RowBox[{9 b# h5 ?, F# v1 R; y8 B+ Z
            RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-", % \5 ~- D  ^  N3 Y
         SuperscriptBox[
    . [0 ]1 G- m0 d& t: c; i: J      RowBox[{"(", 6 `: V2 B" w: S% N5 B
           RowBox[{
    + E) X. p; r( W9 x+ ]        RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-", 7 P6 B1 l+ @+ _$ J) V- S1 Y
         SuperscriptBox[
    # H# o% F& U5 i5 J/ Z2 Z$ y+ [5 R      RowBox[{"(", 2 |* C- P+ ?1 S/ i9 T! J& q
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    * m% w6 [' M4 P, h6 C, m+ o  A     SuperscriptBox[; [" q0 U3 }! H
          RowBox[{"(", 1 E" I4 p( l! P% e% p; G- y7 Q. P4 O
           RowBox[{
    $ r" X" m! S( M* I1 s, ~* r        RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", # ~1 X+ |7 ~$ k/ n2 a$ x
         SuperscriptBox[" o- ?% p- A* ]: m  F& s
          RowBox[{"(",
    3 i  T+ k! t# E6 |       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    4 u; N( ~! X, D* k8 T; G     SuperscriptBox[
    1 b' N6 b9 A) L! |$ p      RowBox[{"(", 2 d6 Z1 L* K: B. Z3 k* t( b
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 1 l5 m& \, R8 `; O* n1 {+ l: |
        ")"}]}]]], "Output",. l: \/ a+ C" q: `
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    % Z) {1 s7 d2 G4 i  3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9,
    4 M- P. B, z6 o3 V. D% |  3.5779608945565863`*^9, 3.57801226165625*^9}]
    2 ^; W, o! C, L4 E) k: {0 g}, Open  ]],$ k6 j( O, ]* `2 [9 {

    ( _8 @  P  d0 X! G, ~4 p& R1 D' RCell[CellGroupData[{$ r$ I5 Q6 y7 O0 d

    " Y2 a0 g, \; UCell[BoxData[
    , J( x4 C* m3 D" w6 r RowBox[{"C9", "=", "Ca"}]], "Input",' r2 J0 I) x2 S1 I6 f' R# g. `5 [( ~
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, 5 Z' I' C2 q' i) Z
      3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],1 _7 {$ N# D7 V; W' `$ e
    8 ~: c' A3 E' M# }7 \
    Cell[BoxData[" ]6 W( p; E9 V, v6 m
    RowBox[{"{", 9 Y, G$ T4 s, m! T
      RowBox[{
    ( {" u+ j+ y9 i" p  "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", + Z3 @7 E! K$ z: k; w
       "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}], 8 Y' ?5 e8 t  x' X  b
      "}"}]], "Output",
    4 d# u* ?3 R: {+ m7 O- e CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, 0 J; b: h0 l* n. c6 g+ g8 i4 S
      3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9, , t: e3 o9 D, u. d
      3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9, . n# G3 m- Q# W7 c7 q3 f
      3.578012268234375*^9}]/ O4 o! w$ P+ l
    }, Open  ]],
    ; K7 J+ ^2 W/ e& r" {) @4 B
    . w# u( A- k, |Cell[CellGroupData[{& O9 D+ P+ [( Q+ [9 G3 i$ F
    / l* A/ B3 w, K* T
    Cell[BoxData[9 o5 A6 q9 U, p
    RowBox[{"u9", "=", . o* Y" |4 T1 t/ i' i( W! r
      RowBox[{/ N% a! F% `& D, H! `
       RowBox[{"Exp", "[",
    $ }$ V. A2 r. u6 D; \" r8 @    RowBox[{; ]- r1 B$ d, l) c( z* E
         RowBox[{3 }/ V4 X; A, ], M0 V6 b
          RowBox[{"-",
    6 b: F* n/ T* {- Z+ y4 q/ g4 s       RowBox[{
    3 M. u1 b  Z% k  V% q+ {        RowBox[{"(", 7 G# ^/ u' C* O/ Z" H
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",   L0 T! I( ^% E, d8 q' p4 Z) F
            RowBox[{"(", / ~$ e2 n/ s6 \0 h
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    8 I! I' _1 B2 v: H& V     "]"}], "/.", "DeltaX"}]}]], "Input",
    ! ]7 S, }' @" W# Y8 v# Y) T CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    6 p! q. j# J7 g  3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],8 \7 t) P$ a6 Q) X: t3 C
    2 q9 F7 ~3 ?7 F  R2 p  I1 L
    Cell[BoxData[7 V( L' U9 j3 |- A9 Y
    SuperscriptBox["\[ExponentialE]", ( ~# u3 G" P) h, Z4 _- d/ N
      RowBox[{"3.141592653589793`", " ", + N% c" c1 O$ G( E
       RowBox[{"(", ) H# a5 E; b6 L" ?: o' A5 {
        RowBox[{
    4 s. e, W! ?3 H, p  h! Q7 @     RowBox[{"-",
    2 M6 _$ i; m0 @( [% J: B      SuperscriptBox[
    6 X* ^. ~- U) W& Q8 z5 x       RowBox[{"(",
    & h8 x( w+ o' H5 V: g, S8 L+ _        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-", % q  _+ F  Y: _- B. c2 J' y6 ]
         SuperscriptBox[, _: T0 R# S) \% l
          RowBox[{"(",
    4 f& E5 ~; Q3 T- j2 L       RowBox[{1 d* _. Z) K, u8 ^. Q# {
            RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-",
    & c! G. e6 q2 H! q9 i     SuperscriptBox[
    ! C! ?# k: p, s/ G* [      RowBox[{"(",
      L! `$ _0 [( p, Q) y7 N) a       RowBox[{# {/ I: A( l3 t
            RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", ( _# t! N  J; \( [) M9 e
         SuperscriptBox[
    0 d3 ]7 y7 S6 ?" J4 a& b3 @6 w% m$ X      RowBox[{"(", ; V7 |% w# i) `6 T
           RowBox[{& Y3 w) ~  N7 @9 F
            RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-", 5 }' p3 p2 d) `$ q0 B" G7 a
         SuperscriptBox[3 ^# ]4 }$ V9 c
          RowBox[{"(", 8 k& C4 [/ ?3 R* k* }5 [
           RowBox[{$ `6 {3 Q: F3 H, m
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    : X+ x+ [3 z, Z. w9 v. \: Q     SuperscriptBox[
    1 V- z/ K  l+ t& p1 n0 h7 l# \      RowBox[{"(", / W3 H7 z7 J7 R1 f3 N
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 2 t8 }) D: G7 b% Q& E
         SuperscriptBox[
      s: j% M& E( k      RowBox[{"(",
    ( q1 ^5 k' c' p! q! E       RowBox[{8 X* c* U& z, i/ ^
            RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    3 t, n( p5 v  z" A  @     SuperscriptBox[
    - @# a: }( Z2 b, [      RowBox[{"(",
    + Z# w0 _5 U- I! ~       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", % Y; A; r# _/ {$ b
         SuperscriptBox[
    4 n7 ]9 U% o: T( B# K6 q( T1 N      RowBox[{"(", " G) Z, \1 b. y
           RowBox[{
    " m+ _6 D+ R! y- ]# Y        RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], - H& M& D& q& a8 ~! @& R) ?
        ")"}]}]]], "Output",
    ! {9 v+ j6 b8 o5 C CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, & @4 t- a- P) w6 R3 [9 x2 h3 @
      3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9, % {  x1 t. d. r. h3 F1 v5 F/ C6 a
      3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9, 8 R2 K- Z3 n2 @) `$ t
      3.577961530421959*^9, 3.578012269125*^9}]( j( e; {: q3 h) D, \. u8 [
    }, Open  ]],
    * J- z# a- T/ Z$ u" e6 {7 N( G7 l1 Q4 O) Z
    Cell[CellGroupData[{8 Q" `4 K! E4 T9 x4 Q2 ]/ r
    , E: J0 ], f! `$ f
    Cell[BoxData[{! ^4 C# R( V. {& z
    RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]",
    % V4 X/ h( G: X4 {6 n: I RowBox[{"u10", "=", & T$ B: P: P8 V0 M7 L9 ?
      RowBox[{
    + M8 C4 t$ @' j$ E) {   RowBox[{"Exp", "[",
    ' U  S1 Q5 g! z7 i- G' b, W2 p    RowBox[{5 j2 a9 a( t. Y# S' h! S+ `
         RowBox[{
    1 `( U5 e+ n% R/ F1 N      RowBox[{"-",
      F8 }4 j* e8 Q$ e% m       RowBox[{' p  d# ?- Q+ S8 t$ L+ a4 q9 M
            RowBox[{"(", 3 r0 [- r3 ~/ U+ R% G
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 7 F! |+ j" C/ F
            RowBox[{"(",
      X+ g) J' M+ n         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}]," ]; f9 W- V6 }5 u( v  D* {
         "]"}], "/.", "DeltaX"}]}]}], "Input",+ l" o% X* w$ P  U
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],; ]* B4 ^$ [; N) b& X  Y9 w8 |
    6 t5 g1 x& H, u9 ]) r1 t! ^
    Cell[BoxData[
    7 Q2 s' E4 K+ M) @# }1 \0 P RowBox[{"{", 9 d9 M7 ~, v% T
      RowBox[{1 R0 n9 ^7 N2 \  K. l1 @' k* R, h
      "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",",
    " R, m; G. F3 V0 R   "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",
    & j+ w* `& k) G# L! y1 k8 y CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],
    3 t. k! c7 R5 X/ z! F& Z4 @4 q! Z! n* `$ [
    Cell[BoxData[
    2 A' p( H% ]  d- v SuperscriptBox["\[ExponentialE]", % N+ S6 v5 a8 J5 `5 T3 s) w
      RowBox[{"3.141592653589793`", " ",
    9 |- F3 ]# m, ~' J   RowBox[{"(", 6 r: M- M; @. S9 \' x) g  b
        RowBox[{
      q# N) h0 o/ ^) K* i% J     RowBox[{"-", & c4 m( Z$ _' o# u
          SuperscriptBox[/ c/ D1 K+ v) V
           RowBox[{"(", & H; A6 V2 r7 n# A  s- x+ |  O
            RowBox[{, O0 h. {# D4 N$ o: g5 {% x- a
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", 4 j: W+ A( A8 p* e" r0 Y) i
         SuperscriptBox[
    ; X0 w- C& a) f0 _& R      RowBox[{"(",
    7 k8 j% \" ?$ J       RowBox[{
    ' e+ u' K) Z# z6 r0 \; |4 P" d        RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-",
    : u& E# e" \( e% ~0 @6 S     SuperscriptBox[
    ' G4 C7 J4 U; @, X0 p      RowBox[{"(",
    & m  c+ r+ S1 k& N9 |3 E, k       RowBox[{8 C6 E, G) k' Z4 a" d6 |; U
            RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
      ?) T8 Z) ?) x3 m) i0 ]3 k. \     SuperscriptBox[8 m# N, E8 \- \8 C* R5 G
          RowBox[{"(",
    % d+ ^& ~9 O$ O! n# T       RowBox[{
    ; U0 A3 M  ?7 u# ]8 P) ^, ^! T        RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-",
    ' U  \! W. X# ?# F% v, y8 {     SuperscriptBox[3 E& R' P) K7 [7 |# J  _
          RowBox[{"(",
    2 W, @5 {' `2 Q. i" W       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", . J2 ^  d1 z* l+ |3 F. E
         SuperscriptBox[+ q$ J+ U9 N# t6 G1 m0 y
          RowBox[{"(", 4 s# h4 R3 U) C
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 0 N7 V2 I- \* r
         SuperscriptBox[6 H/ A* b4 V' I# z  r
          RowBox[{"(", 2 H6 u" \+ f* O
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    1 l; U5 |0 H5 T3 q* r8 c  S, F6 V     SuperscriptBox[/ G6 y" b* L' E* B* L: d
          RowBox[{"(", * |: ?) ^$ M3 @4 H
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 0 e2 o2 r  j  t: l8 q
         SuperscriptBox[$ |. L' [1 e8 k( F
          RowBox[{"(", ! l; e2 [8 j$ Q  {$ V+ ~; ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    - f1 L- i3 {; p8 H5 @2 M/ y    ")"}]}]]], "Output",/ F& C1 F" h% o" y
    CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]
    ' d$ c+ Z8 L8 U2 p}, Open  ]],6 b, _' T( }) g2 G) K
      p& `9 u! j( O1 }- c8 m, |
    Cell[CellGroupData[{% ^' ]9 Q3 f# \% L  ]" ]# N

    ' a9 F# X3 B- f6 h4 u+ b* R) j3 |8 bCell[BoxData[{0 q, U. H" L4 i. b  [" l
    RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
    1 U7 [8 R- {2 _+ t  M* N, Y" Q RowBox[{"u11", "=", # x9 j( j" T$ ?5 x5 q& \. m+ ?
      RowBox[{, }, c% `8 O( Z- Y4 F
       RowBox[{"Exp", "[",
    ( x7 k6 l* g5 H& u4 [/ s7 P    RowBox[{: Y. k* y% U5 V
         RowBox[{
    % T3 j( ~$ g: S6 ?4 D      RowBox[{"-",
    " y8 T8 F; {. U; a# V. ^5 Q# o) K  Z       RowBox[{/ P& q: z+ E  z, t
            RowBox[{"(",
    9 J& d; m0 v! F, B         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", . f" B: j& [8 _/ |
            RowBox[{"(", 8 P' }8 k0 Y* w' Z
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    + h9 E4 ~% A' c5 S1 t     "]"}], "/.", "DeltaX"}]}]}], "Input",. `9 {- t8 _4 i) j
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    6 c/ Y3 `  w1 H1 \1 G) Y  3.57796154237158*^9, 3.5779615434011817`*^9}}],- ?3 H  z! o* c/ N- }

    - k# D: V) ?/ FCell[BoxData[- {, m  S% C1 A2 P
    RowBox[{"{",
    ) N# g: a+ J( G. m/ d  RowBox[{
    7 q; E4 t, s/ L# Z: T  "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",", 1 D- d# ^" d9 G
       "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 1 O2 v# [/ z2 k1 w; W( M
      "}"}]], "Output",
    8 y$ G; a" i5 V% I CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, . u8 G9 u: v) s# b$ b' {$ p
      3.57801228203125*^9}],
    ! C! i+ z/ F( |, O7 G, j# M2 a2 b+ M2 i. Y/ D, A
    Cell[BoxData[
    7 d) e) e+ a* t# c1 Z& v SuperscriptBox["\[ExponentialE]",
    % E  z/ x; p6 D" T2 s" y7 ?  RowBox[{"3.141592653589793`", " ",
    / @, f! r+ @4 k2 Q% ^# e/ y* l+ K  u   RowBox[{"(",
    9 O" B7 T/ v( t- Y0 E* l1 I    RowBox[{. V# Q% e3 W' Q* c
         RowBox[{"-",
    ( w, E. U" o8 B0 e4 F- ?/ q      SuperscriptBox[, H: s/ g6 j3 z3 k. d0 L& x
           RowBox[{"(",
    , P  C- v$ f4 Q4 R% e        RowBox[{
    3 E  n& y& a! s3 w5 }1 F, }         RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-",
    , F0 k6 @! Z2 J+ z. S) {! d$ J     SuperscriptBox[
    7 `) Q  ~" ]) L& n& d      RowBox[{"(", + Q3 |% `! m8 ^1 X3 e2 \
           RowBox[{9 A1 c; [. j3 W/ q( b0 j- o! {4 B
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-", ; u$ m4 N. L% `1 R  {6 r# Z
         SuperscriptBox[7 u, w: h7 E( q# i
          RowBox[{"(",
    , y4 d; k4 h5 Y! d6 Y7 {3 P* S       RowBox[{
    7 F# v# L4 t- w" k  E9 o        RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    ' T; \6 w/ ^' ~+ B9 Q     SuperscriptBox[
    $ u' H5 R! E9 I) s+ V      RowBox[{"(", 5 s1 {% E; q' E
           RowBox[{) z- }1 A2 G* ]5 f+ p: ]
            RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-", 2 F. V3 l8 s# S+ A; x
         SuperscriptBox[
      m! v5 |0 E1 @- R: s4 S      RowBox[{"(",
    - n; }+ p6 t, x. g! Z' N" w* z       RowBox[{/ u2 w% A3 s; q4 K8 M
            RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    ) g* }: q" ~  I* k& i( l; F     SuperscriptBox[
    + ~" ]) G2 M# ~+ B5 @" f6 |: D/ @0 \* B      RowBox[{"(", 5 o8 Z. ~( E& A" _! I- z
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 7 m) G" I- W, y1 a
         SuperscriptBox[
    4 A0 i  k* ]3 j9 V" }+ S      RowBox[{"(",
    # y+ N, J* U) M       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    8 L6 Y. q- Q, k' {) M# _     SuperscriptBox[; h: g4 f$ }! A  e
          RowBox[{"(",
    5 H: h* K& z3 t% ~- \! m, g       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    * K$ T# ]( k) l0 _     SuperscriptBox[1 t6 B  U2 i; ~7 A$ f
          RowBox[{"(",
    / L1 u. a& N# A+ \       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    9 g8 V/ x8 g% _    ")"}]}]]], "Output",! E0 e1 w; y- b# S) l( G) V- f
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    . ]1 ]; }: Q) B! F- I  3.57801228203125*^9}]8 w4 m" g! j- U- |& r4 _2 c
    }, Open  ]],! f; l0 V1 o( w% I

    2 M! H& Z6 I; x3 v8 H7 ]3 {Cell[CellGroupData[{
    5 c; {( G/ m2 S0 ~  w9 g- v8 |
    ' z7 e9 P" }; |2 pCell[BoxData[{
      e* j) X3 U. m# q/ ]3 j" } RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]",
    ) Y/ n9 b( Y1 j4 Q. Y RowBox[{"u12", "=",
      q& y. r& U; Y5 C9 `% L5 R  RowBox[{6 [1 `; b: `! R% p# \# _& Q
       RowBox[{"Exp", "[",
    7 ^8 n) ~) _) J    RowBox[{
    0 J/ a1 J+ ~9 ?4 a' g( @     RowBox[{! s0 H% M7 F9 c  [& K
          RowBox[{"-",
    7 n& @+ G* c" B( W7 F       RowBox[{0 O% W( ~) E" z9 w# M2 X1 c& b
            RowBox[{"(",
    4 ]8 ~+ @- Q9 n: j& d         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ; B- ]7 H9 b+ p5 M4 K1 l0 S& Y
            RowBox[{"(",
    & r! i8 D+ k. l2 b0 i2 r         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],% t" o  V  E: j( d$ \
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    6 u& v4 _5 N) n; @ CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    # L, G+ {5 D, r+ q% s  3.57796154237158*^9, 3.5779615576284065`*^9}}],$ h% P; ^! a  Y4 r  E: w
    / ^, @: v) W1 e, I
    Cell[BoxData[3 _0 e: B" K) ~5 Z$ Q0 k' D2 \
    RowBox[{"{",
    # B5 h- n* S; E" X  RowBox[{
    " k: a* B9 F+ F! x- `  "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",",
    3 g4 m8 m2 u- B" [8 X8 K   "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}], ) B6 r7 \0 ^& k, J8 i
      "}"}]], "Output",
    ' W3 E( Z  i: K, O+ }/ W) E CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}],4 G; t) e0 A/ s+ W) P9 T. G' e
    - l1 v8 J3 w; u8 {6 ~& S( G* x
    Cell[BoxData[
    7 \. h* D9 b2 H SuperscriptBox["\[ExponentialE]", , J4 o% L2 L1 m( ~, j# F( @. x
      RowBox[{"3.141592653589793`", " ",
    & t  J' L/ _8 \# {+ f" S   RowBox[{"(",   ^6 ]8 u5 E3 h' {3 r
        RowBox[{- u% y/ s4 h# n, a6 x6 e% F. k
         RowBox[{"-",
    ; ^- e% L* v9 I; _* K) w3 t  i      SuperscriptBox[
    ( f) W3 U% o( G. a       RowBox[{"(",
    5 m; X; c/ M9 [9 H7 L# C        RowBox[{: `( x% S) e9 M- ^
             RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ) C3 K' A7 d3 I! [; {9 D7 l/ O     SuperscriptBox[
    - ]' A9 j* Y0 w      RowBox[{"(", ( n( l* T8 @" x5 i# B
           RowBox[{, o7 ~( V7 _3 U& V3 b
            RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-",
    8 _! G" Q/ Q% l7 I, X) t: d% U     SuperscriptBox[
      n$ M. U4 p3 C. m& d" X      RowBox[{"(",
    ) P4 l" U. V9 j$ L# E& r       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-", # `) a. n7 O# f& y9 C! k
         SuperscriptBox[
    ! b" a6 f! x+ W- k3 p9 f( D6 l      RowBox[{"(",
    * N( P8 a* O0 c( A+ j2 l       RowBox[{
    - q$ l8 @: R; J) m+ x        RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-", ) d; ?! `  q1 C  c1 D. D& S; R
         SuperscriptBox[
    8 U( B2 C4 Q7 x# J6 Z      RowBox[{"(", % T( k2 j+ E# `- K, Z
           RowBox[{7 I: I: z! F! l) @6 i& k* V1 |
            RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-", 7 c* R% `5 |* u/ N
         SuperscriptBox[6 r1 A) E3 V! Y& j# y
          RowBox[{"(", ; i3 {! [3 h5 B5 V+ J
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    % s$ C9 Y; }# B5 l! ]     SuperscriptBox[8 Z- ]. F8 W3 H. f
          RowBox[{"(",
    7 ^3 b5 h0 Z6 B# g; f% {       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    6 `8 k% I+ l( J) g- `9 }, e8 I     SuperscriptBox[7 D7 x0 {) R3 S$ L( ~! i" F: G
          RowBox[{"(", " I" _7 g* O* T" d( J& F
           RowBox[{
    ! x1 N  }! Y7 G2 m        RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
    3 m5 U3 g  X. M0 `; n" n5 N     SuperscriptBox[
    & H7 f5 }' ?$ k% ?8 M1 Y1 I! m; H7 {3 E      RowBox[{"(", ' i& L9 R! W# F
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], + v7 J, A7 V, j: P; Q0 A" h
        ")"}]}]]], "Output",
    , v& J6 F% m6 S2 G* u# z CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]
    ) w  B& {3 e- q- R}, Open  ]],' Z* i. Y( H/ K) b! Y6 L
    : K/ j1 }8 F! b- ], N
    Cell[CellGroupData[{" z! W  R+ d1 c* }% v6 ~( O
    ' {0 b3 L& f6 V, G
    Cell[BoxData[{. n2 @8 I1 L  x
    RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]",
    . P( I( w0 V3 }& e RowBox[{"u13", "=",
    3 c# Z8 U+ t1 I  RowBox[{
    / O% H0 {, U& \7 D   RowBox[{"Exp", "[", " V+ d* ^- c  [& ?
        RowBox[{2 ?# u+ E. e2 Y0 L
         RowBox[{5 N0 O4 h8 u+ x3 ?' O: ]
          RowBox[{"-",
    9 j7 N: l+ G% V1 R3 l% Q       RowBox[{
      `# o0 V- d$ p        RowBox[{"(",
    8 e3 M$ _- Y* e3 u7 j. m* W0 r         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", / d; F8 ]+ x" w0 I) t' B
            RowBox[{"(", 0 u3 [' o& M6 I9 y: q
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],, s) J- |4 Y' H
         "]"}], "/.", "DeltaX"}]}]}], "Input",1 X, E' v/ N8 N3 |5 ~+ x, _
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    1 a2 O5 k% J( Z- A- t# [" N  3.57796154237158*^9, 3.5779615599684105`*^9}}],
    7 l& c) X1 d5 c+ ]& z  p
    ( {$ d' W/ w' v8 H( e& A. F6 MCell[BoxData[6 }/ ^; r4 X( U
    RowBox[{"{",
    1 n. x! }( ^' b# }! C+ H  RowBox[{
    8 m  \* K- a& Y0 y4 h- e  "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",", 8 J* O+ _4 [' [$ {/ I% {9 o* M
       "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}],
    9 L9 x$ @( Y; U1 X6 \4 f2 g# i  "}"}]], "Output",: K" L' g- N3 g5 |9 p
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],
    # N) I4 Y. d1 F' ?
    1 f7 w5 w' s. PCell[BoxData[
    & a8 k& S& P, A$ ]; t' U SuperscriptBox["\[ExponentialE]", 4 F+ m: G* ]. v3 G3 L4 c
      RowBox[{"3.141592653589793`", " ", : U  W5 l, e. K& Y0 A4 q) B% \1 a
       RowBox[{"(", : K5 i* P$ p  _3 ^2 r4 \" s9 ]" ^$ A
        RowBox[{  Q4 Z- a" q+ i+ A5 J
         RowBox[{"-", 5 ?+ V( N/ ~6 i! \- b  [; C
          SuperscriptBox[
    ' {: q( t( r. W       RowBox[{"(", - Q! x7 ~' @! c
            RowBox[{6 V( m1 T: n7 {* u7 X
             RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-", % t; e9 n$ e; T- X
         SuperscriptBox[
    6 N, E# _8 c" w. w# u, W      RowBox[{"(",
    - t# B% t. r8 S2 T       RowBox[{9 u7 p  @) {7 [- {, }
            RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-", ' R* c% A# X7 x# e+ X  ^$ O' |
         SuperscriptBox[
    0 {5 T7 H0 X& V6 h6 h0 d      RowBox[{"(",
    " b$ j! A. {3 R! r/ {       RowBox[{
    : z& `- E! L7 E        RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", + V( R  X0 [# m" A  w
         SuperscriptBox[
    * ?) M! i& y9 \7 P      RowBox[{"(", 6 I+ f7 W: B+ {  R% D- a
           RowBox[{
    ) T" l! h& u: A! L. k0 y" H4 t$ m        RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-", ! Y! w  [: I- h' s7 q  t5 r
         SuperscriptBox[- }/ Y4 \1 t% Y) v2 a2 s
          RowBox[{"(", . _, H' o- g) Z9 G" |) h
           RowBox[{
    2 o/ |: `5 X- H+ {: R! a7 j        RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-", + s5 W5 J8 ^* G! j  O
         SuperscriptBox[4 f) F% u2 |# H% l5 l2 }) c7 z# j
          RowBox[{"(",
    5 a2 R* p: v; S       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ( v* o2 J9 |/ |1 P, O
         SuperscriptBox[2 p7 G) {. `9 z, o5 c3 b6 A
          RowBox[{"(",
    $ m4 h: o$ d7 m; ]& \/ i5 ?0 X       RowBox[{
      e7 b  z! h6 k0 e4 T6 w4 E. N        RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",
    ) M& j$ l3 ^' r9 p$ Z% k- E" b     SuperscriptBox[
    0 j, d9 Q; B1 S9 O. e! p& P0 o      RowBox[{"(", : V* W7 K$ n( @/ `
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 2 T3 U! p4 P/ O
         SuperscriptBox[
    . J+ L6 \2 l7 i) S7 z8 I+ G; p) X      RowBox[{"(", % m  r' i  p! ?( _. f7 i
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    6 K6 V' B# A' ?% J, g! c% k: B    ")"}]}]]], "Output",
    4 c9 b; L1 E( n CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]9 ?( B  S4 G8 X. m1 P
    }, Open  ]],7 Y6 Y. B+ Y( J- r
    ; V4 E- [7 t* Y! ?' F
    Cell[CellGroupData[{
    . D" D9 R3 {$ D' ]' J7 N0 ~: l1 m( D, f9 d2 @& _7 m' g$ m
    Cell[BoxData[{
    - F. {* ^' t8 F8 N% K- p0 ? RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]", 2 j( a' ^) z; L# C! a; S7 s/ R
    RowBox[{"u14", "=", 5 H) F" [5 K9 l
      RowBox[{
    4 n, S1 N* G1 r  R   RowBox[{"Exp", "[", 2 K9 `. b$ |# D* x- e
        RowBox[{
    - ^- n2 Q0 l+ H7 w; {# i     RowBox[{" ~0 C9 B9 s$ G( y
          RowBox[{"-",
    $ v. q# f7 D0 z7 z1 f. U: W       RowBox[{
    ! E4 g" v0 U0 ?# [4 ~        RowBox[{"(", ) N7 r+ }' o) T
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ) N- f3 e/ C5 _; {
            RowBox[{"(", ' t" ]& C3 B( a1 ^: j6 x3 J
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],- w+ _- i% U* Z  z1 e
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    6 `6 [8 r% i9 M+ Q CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {; G$ `* ~) o" G
      3.57796154237158*^9, 3.5779615663176217`*^9}}],
    : X8 B: g' w0 u2 P) B! H5 B: d& b3 y% o/ ?0 P+ Z
    Cell[BoxData[
    % S' a, w# Y  [: K RowBox[{"{", * V4 H" j( O2 p0 }$ H4 J" e8 ?
      RowBox[{2 f& i" g. f+ Y7 D/ P5 }  V, ]
      "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",",
    % O7 A  [4 y2 y0 l# P" X, \: a   "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    8 P4 p3 K. p6 ?" Y6 z2 H! u  "}"}]], "Output",9 O; r, T2 |2 h4 A; U$ D
    CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],
    ; K$ \# u& }2 [7 M6 r$ u* k) U$ H8 e
    Cell[BoxData[* }/ T$ A4 U! F1 q& m: o
    SuperscriptBox["\[ExponentialE]",
    # G6 n4 X/ R8 _  RowBox[{"3.141592653589793`", " ", 7 V/ o1 ]& T# W/ E( z
       RowBox[{"(",
    / ^( n: G  x- B& m    RowBox[{. H* l' j  k5 K5 b+ n$ Q
         RowBox[{"-", & U. J4 t$ `8 ~4 m: r
          SuperscriptBox[
    # \9 Z. f6 r* K2 C; @, s       RowBox[{"(",
    1 ^7 E9 s$ ^6 W& O9 h8 W3 l        RowBox[{, u/ t' S7 |9 b" h6 n; J" L; G" }( f  r; N
             RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-", & Z. j& X3 z& e) k' [- O$ c
         SuperscriptBox[1 h  S5 |8 y6 L
          RowBox[{"(", 3 }- ?* Y6 a( \, H  I
           RowBox[{
    ! B0 k" V: Z1 }% ^0 e: _5 p        RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-",
    & H+ d$ T6 t' c% C( @$ S' E  s     SuperscriptBox[
    3 m. k: r( C9 ~2 m9 O6 J( w9 D      RowBox[{"(", + T6 V- _3 C$ {& ?
           RowBox[{$ _: N/ _% G+ A! O8 Q% }( q  W6 A
            RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", ; _2 K/ A' a% S9 J
         SuperscriptBox[1 @1 l$ q6 S7 C" F- ]% t% L
          RowBox[{"(",
    * w2 H0 V9 V  H$ |       RowBox[{9 |" p* ^) h  J
            RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-", # G  ?# m6 a0 j* e# T$ k
         SuperscriptBox[$ N& p7 V/ p& ]- ^9 _
          RowBox[{"(", ; Q: q- v. d! c/ J
           RowBox[{4 D+ Y# V$ \( U6 D$ M1 X
            RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-",
    0 W7 Q9 ?" `7 D+ m& l     SuperscriptBox[
    2 P/ [/ |0 x( x, @: k  ~& q      RowBox[{"(",
    . _" F3 A. M" k       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    : N% q' [4 Y* }4 [/ y& z5 q     SuperscriptBox[8 Y5 D9 d3 D# g7 @, b$ m$ T* `
          RowBox[{"(",
    0 F1 V/ ^, Z5 i4 B: m- E6 ~       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 7 C# m; o, I: `1 e2 d
         SuperscriptBox[& s- s0 |2 M; k+ n% P4 ~% L
          RowBox[{"(", $ w: f& {1 r; V7 a
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", $ e- l4 x- ~) ^/ t/ n8 Y
         SuperscriptBox[
    ) E# [) H  J+ P* u$ `9 U( d! f      RowBox[{"(", 8 a  ]+ ~- S9 `
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    2 z0 ]2 R" M$ S; _    ")"}]}]]], "Output",/ z5 H+ d% g8 P' t, I/ a
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]
    . x6 k) K( b7 W" u}, Open  ]],2 @2 g5 R1 a+ G% l2 D

    / L5 Y+ t2 ~8 d# \6 q, lCell[CellGroupData[{& T  j7 M$ I7 p; @) V; }! n# _
    : r; C- e& _- x; m$ R
    Cell[BoxData[{  M" V  F9 w" \+ `9 |1 H
    RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]",
    0 Q: c' B+ W" e RowBox[{"u15", "=",
    , {) p* \& y2 f! h" ~  RowBox[{( X/ O: V% s- y8 W% w; W9 M; \
       RowBox[{"Exp", "[",
    # `' T( P* s1 g% N4 g2 g% k    RowBox[{; x* R. Y: m' v# d! O8 P" g# f6 L7 Z
         RowBox[{
    % \" f( V2 C% |      RowBox[{"-",
    " q0 E- H6 S: Y       RowBox[{
    * R2 u/ l& V- w/ N9 h9 x        RowBox[{"(", + T! q4 \& N! ^! e4 T& R
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    0 D0 z. T% G& c* P        RowBox[{"(",
    2 s+ w: B5 m2 z3 l5 C         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    9 n  a% C, g! }. S& f) c+ K/ z     "]"}], "/.", "DeltaX"}]}]}], "Input",( h$ C% R% D" W- h3 ?0 P
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    " H, t5 I: V% {1 Y! w  q  3.57796154237158*^9, 3.57796157098203*^9}}],
    ; ?8 _% y8 v. Y/ |/ }- _0 r7 ~" I: i% x" U& y
    Cell[BoxData[+ v, K8 g/ M% V. n" J
    RowBox[{"{", . |: i5 W9 u9 I! t7 U. d
      RowBox[{
    3 ]  \* a& P6 |# k; T  "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
    ! L, D" P& O* n# B, Z( S8 V2 }   "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],
    . v- o. X) H1 S$ }9 V5 u# u  "}"}]], "Output",
    : L7 C. K0 S% @/ `  a CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],; k+ m4 F4 y) l3 d- d

    8 z, e5 T6 E# r/ OCell[BoxData[
    # w* a1 u  B: t SuperscriptBox["\[ExponentialE]",
    4 e! d, F' _3 }/ t4 L" i$ z  RowBox[{"3.141592653589793`", " ", # A+ D* |8 L  h/ ]% U, e. J; I3 E
       RowBox[{"(",
    & I  b6 w8 z8 {3 e. o    RowBox[{
    ) [: m! m( h) \/ c6 t, u) |2 x% p- }( X     RowBox[{"-",
    + ~; V& ?7 \8 r4 }      SuperscriptBox[) m9 E! X. z, p6 r+ Q
           RowBox[{"(", & V8 J0 b* }2 i
            RowBox[{
    7 C6 c: {; \8 r4 E2 F         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    $ z# o. _2 r8 E% s; G& S) H     SuperscriptBox[
    3 _$ @) j0 v# t$ ^  v; ]6 i      RowBox[{"(",
    ; r' u2 v- v* |0 u: H, F3 L       RowBox[{
    - y: r0 k& d* y1 b; p        RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-", 0 X( h- H0 W  C4 M
         SuperscriptBox[
    " \4 F6 C8 A  }$ L; C" S      RowBox[{"(",
    , Q9 y6 k/ |  ~& O0 L6 c3 j       RowBox[{: R) Z! k, V) ^/ Z
            RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", ) Q6 |+ j, C* }
         SuperscriptBox[% Z9 Y9 d- K" o# O/ M/ X
          RowBox[{"(",
    1 Y4 T) Y. \0 Q# W       RowBox[{( e! m$ u5 L  M7 B
            RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-",
    ) n4 c- G: C. F. \4 {     SuperscriptBox[
    0 P2 o: _9 @) `% O      RowBox[{"(",
    8 q* `* z/ f$ O& X       RowBox[{  d- x. A& d7 P% b/ ~9 y4 Y
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", 0 t: @6 D9 A2 ?. W! \" p" L
         SuperscriptBox[
    0 E+ c; o# Z6 |# V      RowBox[{"(", 3 A; i# y- p' H  O$ @
           RowBox[{
    * z8 G/ A$ e! H0 b        RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", ; k: k" [( M4 o$ G  U" l
         SuperscriptBox[' H  S5 E# a8 _
          RowBox[{"(",
    + }3 `9 Z, i  x9 L* [       RowBox[{/ t$ n# W" n0 V) Y/ u$ X
            RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", : ^- m' M. [0 V4 l4 e
         SuperscriptBox[
    5 K: i# _4 t" I, K# n      RowBox[{"(",
    ! Y/ w2 w5 @4 C  F0 C2 p+ Z# F       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    # t; H! U' H6 m" _, T- {; m$ Z     SuperscriptBox[
    , F& K) `3 O: x/ I/ I      RowBox[{"(", ' k7 o. h; b' M: B
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ! M* C/ @6 o; z1 N9 R
        ")"}]}]]], "Output",
    % ~+ A* ]# K5 G" ?8 Q- ^* w' S CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]
    5 ?0 L* d8 g& g) u0 n6 b}, Open  ]],
    * b3 K" P; _1 n" M2 q4 `$ I* E+ O
    Cell[BoxData[. w( _/ A% G# d
    RowBox[{"For", "[", 4 J8 D( [4 i5 u/ R0 K  v) q
      RowBox[{
    5 P! P: O9 U4 X) z& S. i/ |( ]7 j   RowBox[{"i", "=", "1"}], ",", 5 \! a. R3 I6 {6 e
       RowBox[{"i", "\[LessEqual]", "9"}], ",", $ \$ o1 E9 \6 u# r" O" r( p
       RowBox[{"i", "++"}], ",", 6 q$ p9 z+ A1 Y" V& w! C
       RowBox[{
    ; Q3 j! i+ x' ^) e3 w, \0 k! @    RowBox[{"Ca", "[",
    4 Q& i. C5 P5 p3 i) V- l     RowBox[{"[", "i", "]"}], "]"}], "=", 7 m( O  }* r  y0 O
        RowBox[{"CM", "[", 6 y1 i! f4 ^$ O4 o
         RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",
    % ^! x5 }7 @" y7 p CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],
    ! P: l( A4 U1 o: l1 ?
    3 T2 \6 T* n  ]1 R) kCell[CellGroupData[{
    . T( N" k5 \0 m8 H  ?, p4 x% H/ F5 R9 W) M* q6 `8 J
    Cell[BoxData[{
    - V* c2 A3 S0 J# [+ B% p RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]", # R# W- e$ ^( ^9 C; f; X  H
    RowBox[{"u16", "=", 8 m2 V9 r1 M% {2 T8 N
      RowBox[{7 c) m* s, H3 n- C" L' W: X
       RowBox[{"Exp", "[", 4 [0 T9 ?( q# c+ S  D5 V
        RowBox[{
    & ?8 T( x) @7 q$ q1 k9 B     RowBox[{5 Q9 @' P  c7 u3 w3 n% f* h4 ]
          RowBox[{"-", 3 m; P6 M0 a( |, f; K# v9 u( h
           RowBox[{
    - Y4 I9 S8 p2 u% x6 v1 E; U' i        RowBox[{"(", 7 o. \+ ]& I% ^# {5 \3 U4 f
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", + o$ b: [; [  o! \9 m/ X" h
            RowBox[{"(",
    3 U* o4 J  t1 l         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ) o! V0 W6 h3 g6 T9 P     "]"}], "/.", "DeltaX"}]}]}], "Input",
    7 X5 N1 k! j2 h6 f) a CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {  H& l  N& h& m& }, D
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9, 0 Z6 |( U! _( z) l/ I4 E
      3.5779615751004367`*^9}}],
    & a5 L8 e* C7 T0 Q8 |$ X& H9 f
      Y% w+ z7 j; M/ Q) I2 WCell[BoxData[: G# m* t9 x/ p8 u" G3 S8 l' S) L
    RowBox[{"{", # `) F, p8 W5 g' Z1 m7 ~# P
      RowBox[{  r9 _6 t: L& z
      "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",", ( |* P( F; I0 O& U, {
       "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], 0 x" k7 ?% ?! q6 f/ L4 x8 s7 R1 w
      "}"}]], "Output",
    . u7 N2 a0 _4 X! K  l CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],; K' x1 \* K# @, J; O: W

    4 I- u" a& b, ECell[BoxData[
    ' M! e: O5 Q# `$ _ SuperscriptBox["\[ExponentialE]",
    ; Q& O" C' ~" p  RowBox[{"3.141592653589793`", " ", 2 c3 W- [  Z: n$ _& f
       RowBox[{"(", 1 [; J# e. r9 E1 e
        RowBox[{& `; D6 o/ y+ W' y4 q
         RowBox[{"-",
    ) S. K: [$ {9 G+ ~+ e9 L3 n9 |) {      SuperscriptBox[' G# T2 l" |5 \8 g# S% w
           RowBox[{"(",
    0 h. z  v9 I" x/ ^/ q        RowBox[{
    1 W: W7 |. Y) m7 B7 X6 s2 ?! k& [! J         RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-", 0 T" k' n3 }/ Y; M" h! o. g' A
         SuperscriptBox[
    2 W# R6 `$ K3 }( h6 J& R7 k      RowBox[{"(",
    2 d/ B: ^# q% @       RowBox[{6 Y& ?- g, D/ r2 z6 N
            RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-", " n% B2 J, }/ X- \- Z
         SuperscriptBox[) n( y6 F7 w7 n; K# @
          RowBox[{"(",
    7 |# w6 D" |; Y6 z, `7 j       RowBox[{
    + s! a6 k8 P- S        RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", 9 I" K: D2 n) j5 t
         SuperscriptBox[
    ; C! v% ^3 R: p9 t8 i$ |/ U: O      RowBox[{"(", 2 v& }$ `/ ?) T( p' J
           RowBox[{8 S( R( T8 _% h( z/ i* y
            RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-", $ I+ I5 }% `1 N
         SuperscriptBox[2 ^( w* S' s# m$ {0 {
          RowBox[{"(",
    . ^+ E2 X1 F2 e8 Z/ e7 g  L3 }       RowBox[{
    2 {% \% w1 u9 p, b( ~2 O$ F        RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-", $ Z0 _1 S1 ?/ |0 b
         SuperscriptBox[
    - ^! Z* \% M+ k1 v- e      RowBox[{"(",
    5 e, w( x# r" _0 `9 y7 J       RowBox[{
    4 a$ q* Z( z) x1 _; W# |* ^) G1 u        RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    8 }0 ]. H, L- H     SuperscriptBox[
    ' g+ ?7 g$ N1 k9 i6 d5 r      RowBox[{"(",
    & i6 Z0 H' x, Y/ x' V9 g       RowBox[{
    " w2 ?5 _0 G# ~2 E" V9 o/ {2 b        RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-",
    8 I1 e& u# @6 w5 y  F' T     SuperscriptBox[
    - X/ W* ^2 X5 |4 I4 A- S      RowBox[{"(",
    - \& f8 S  H( i7 k       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    4 V7 e+ w6 {1 Y5 T: q     SuperscriptBox[
    % I6 V: a9 M' p/ K# @- B      RowBox[{"(",
    & y/ ?, T: b4 ^) X6 G( E       RowBox[{
    % J% S+ V5 b- k7 Y) S+ G        RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",
    # }' S; y/ c  C( N5 p, n* [& E CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    7 E$ `) q! s5 p; K9 J}, Open  ]],
    ' I1 w, B# E5 a$ z/ n8 p. k* {9 E5 w: c: U- h, d
    Cell[CellGroupData[{
    * o* A+ x# E3 ^9 Z5 H$ G. t: Z' w6 ^6 K6 C7 {, j
    Cell[BoxData[{2 g* O& e& p# T. ?  E1 e
    RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]", ) J2 c5 u/ M0 ?, ?. ~$ h) k" _, I
    RowBox[{"u17", "=",
    9 S+ x! v- G% \/ `8 }& j  RowBox[{
    8 ]. N" V, r& D7 @- \4 C   RowBox[{"Exp", "[", ' w1 o) `* G* U  ^% G9 u( |
        RowBox[{8 X+ b3 M0 m  K0 n! [/ n
         RowBox[{
    8 z9 X! }; `& y2 {& L$ {      RowBox[{"-", / U, u+ f' t5 J# y9 C9 f' n' N6 t
           RowBox[{# A) A* t7 M0 o& r
            RowBox[{"(", 7 E+ A9 W. S6 j
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 2 G+ O3 g  a, S6 u7 ]2 d( ~
            RowBox[{"(",
    ) k- J/ d  o# z6 b7 }         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],) ~! ?+ I7 e  g1 p4 b
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    ; M8 L0 x" i# }" |3 f, ` CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {6 Q9 Z. d: T2 E9 d
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9, 9 D# R! V, C$ p( U9 m) t, R
      3.577961578953644*^9}}],- V  F, W& r9 i8 K9 n5 s( a

    " p+ O4 j0 p" s* `Cell[BoxData[
    1 o' G% A* @0 R RowBox[{"{", % W0 U) K# _" y/ Y
      RowBox[{
    / M3 ^5 J4 _" k# K$ ?8 J  "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", 2 u  \' t& g) ?! [1 Q/ k
       "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}],
    , r# b6 B- \. R9 i" o  "}"}]], "Output",
    ; r. l# L% d8 Y9 u% k! x/ d5 a+ C- ^/ M CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],
    $ g0 V( w& H0 W! T( a
    ' R/ w) U  J5 H5 w2 X6 C% oCell[BoxData[
    ' z, j% D! Y7 g3 Z! ]/ F% d9 I SuperscriptBox["\[ExponentialE]",
    # x3 i! O8 K4 U: X; d  RowBox[{"3.141592653589793`", " ", + |5 e' D3 Y; H
       RowBox[{"(", . h7 d& t0 o& \7 ~' _! S
        RowBox[{
    $ F* M# J0 W* b+ Q     RowBox[{"-",
    6 ~! q  k+ G: ?/ ?+ _* _# e      SuperscriptBox[% S: \% O% \  W! h
           RowBox[{"(", ( m3 X6 Q) `- j" Q
            RowBox[{
    0 Z* ^6 w( [9 Q5 v8 O         RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-",
    # C/ T0 ~- s/ q; _9 e     SuperscriptBox[
    ' b5 |9 t8 o& g      RowBox[{"(",
    ! w. J8 G& H3 c0 B( }* j4 i       RowBox[{
    * c/ W' b' ^; i        RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-",
    ) O) v9 b& F3 g     SuperscriptBox[  `) e% b! ^; }, d4 T; l; G0 N5 T
          RowBox[{"(", - i9 b( V" {0 L0 x0 a4 w
           RowBox[{
    0 R8 N3 t0 m4 ~& [0 o' P0 X        RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", ( U. s+ |" M4 t  k) W1 o: L: H, I
         SuperscriptBox[
    , D* }* D+ w( V      RowBox[{"(",
    5 r* X, ~1 Y! r4 m5 D+ z! L       RowBox[{
    9 p# d3 @2 c1 y, Z7 l1 z: ]8 O* m        RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-", " l9 m/ i, n' V' n+ L- D  }
         SuperscriptBox[
    / R! T5 u5 q! v. U5 P/ D      RowBox[{"(", & K7 A, n* Q7 R! {" k+ G4 o
           RowBox[{
    ; _) [. w5 u2 Y) q* ]0 u, Q' A        RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    " z2 f% {+ `* G, B) r     SuperscriptBox[
    ; B4 G4 r  h& }' Z/ _) }      RowBox[{"(", . {; z( T' {) F, |
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 8 O1 T6 }) M& ~) Y
         SuperscriptBox[9 L. U& S! O2 r! x- @+ a
          RowBox[{"(", & k' c$ g' D+ {; p) h! v7 r
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    2 x( Y. [0 C7 w, ]     SuperscriptBox[: T8 Y/ H6 k; `( f9 v* D+ O
          RowBox[{"(", ( G5 A6 f$ J- \' o! m4 O3 \
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ) v+ k& v2 X5 D0 A4 g5 t
         SuperscriptBox[8 \5 P0 T, R; ^% {  _& ~6 b/ C
          RowBox[{"(",
    ) \4 P# v9 V- f       RowBox[{
    8 G5 i8 r; E" E% M) I5 ^) c% Q        RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}],
    0 c/ Z  g" L9 i    ")"}]}]]], "Output",1 o5 S( z5 [  Y- @/ ]  Q" i
    CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]2 j9 {/ [5 c1 s/ @% ]- E" j* F+ D
    }, Open  ]],
    $ S% z; {& \: ]/ ?' m+ k+ h! o# I$ N6 J) v" x- w# }3 q
    Cell[CellGroupData[{" Z) M! c" R6 J5 n  t
    1 M5 _: N- G+ n# p& K
    Cell[BoxData[{: ?( N/ Z9 Q, i) j6 Y' X
    RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]", 9 N( n. A# g+ H) g/ @0 |8 B' S) I
    RowBox[{"u18", "=",
    $ h; ^! J' y+ {  RowBox[{
    8 n7 k8 k: a/ B9 u  V0 J   RowBox[{"Exp", "[", : e0 Z% m5 N0 U( |9 ^0 j& o
        RowBox[{, E6 U+ h9 @+ R; _# T
         RowBox[{7 h3 n9 x8 h! G, l( X0 G6 V
          RowBox[{"-", * k* S+ ?' C5 f( g5 J& e3 f
           RowBox[{$ b) Z/ m0 u$ w4 Y" d3 N
            RowBox[{"(", ' a, y; ^/ y* J0 P% Q& n3 \2 l: M
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    " [+ u: x% E6 E4 V' q  U        RowBox[{"(",
    7 a, p8 n+ d& o- E9 R         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],9 Z! q0 `' n3 A* t: K+ A
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    # Y, s3 ~) m6 i4 O CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {' r; e* p4 Z. `3 ?* L+ O
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9,
    + h# v. W* N3 k  3.5779615828848505`*^9}}],
    4 U* N. p  S% U/ H* g# A
    ; w% F( a: z# J! r! i! \Cell[BoxData[
    & \9 w9 ]1 h0 s( S. q RowBox[{"{",
    ) I3 z7 p, ?: u  S1 t3 o% a  RowBox[{
    - d) Y6 {# `; K6 k+ m, C  "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",", 4 t/ X2 z/ z0 ~# W4 w
       "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    9 D3 |, V5 }: b! G0 p" D% Y  "}"}]], "Output",
    # g% ]$ F5 H+ i. T+ ?* h' T6 i CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],
    / n5 p5 Y" I+ h7 w8 F" q0 }% }9 I
    Cell[BoxData[# a* H* m$ I) t3 g9 f
    SuperscriptBox["\[ExponentialE]",
    & S, V$ G5 ~8 L* V  RowBox[{"3.141592653589793`", " ", $ r- G+ n4 `5 j; b7 e
       RowBox[{"(", 5 k4 g! p1 f+ A( g. [8 N0 k0 Y
        RowBox[{1 i. J! d5 H% j' a0 \+ p8 M! u
         RowBox[{"-", : V2 c  o) K  g7 q9 Q
          SuperscriptBox[1 g* q5 x  Q; Q* g
           RowBox[{"(",
    + x* U, H' U  ~& ]8 \/ D        RowBox[{: G3 v/ r3 H9 y( q; L
             RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ' ~9 W' J$ Y4 K5 x     SuperscriptBox[
    8 D8 H3 Y$ D1 b7 G% a      RowBox[{"(", ) Y1 f2 c, m  L3 }1 S
           RowBox[{
    9 }- q( ]& Y8 U/ u* f        RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-", 5 R  g) _$ d9 E4 u' O
         SuperscriptBox[
    ! m' h* O6 W9 Q  ~# @/ y      RowBox[{"(", 3 \& ^- j# b4 s! C  b
           RowBox[{/ Z3 y3 G$ C- n( `" o2 v
            RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-",
    5 B: t- c6 g  A- y/ N; ~3 _! S" j     SuperscriptBox[
    + f! @& `: o, D& g8 Q: c9 A6 s' z      RowBox[{"(", 2 z5 e' q  z: f$ q2 Z& c
           RowBox[{$ J& j: H* o3 s0 m
            RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-",
    9 `/ x  ~, D5 Z$ L     SuperscriptBox[
    * l2 S# \" t) f' U9 Q  b! ^9 [8 j      RowBox[{"(",
    . D  m& j5 {0 @6 L, a8 G5 N9 M       RowBox[{1 F3 B. H7 p# n: C% J; |3 [' p$ j
            RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", 0 L# _+ h/ a' U1 w" V; a6 o
         SuperscriptBox[, Z  X- z' l- R
          RowBox[{"(", , K6 E2 s* _% I  H
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 3 j, N, R7 W, G! F+ `" x* d3 y
         SuperscriptBox[
    ) Y: g( K! g5 v: h. O! o# Z2 Q      RowBox[{"(",
    / t" S) @4 N! ^* S) w       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", & b- e  S1 E4 ?# [- m$ L+ n( I
         SuperscriptBox[
    . J) S% _  ?, N. R0 v/ \      RowBox[{"(",
    & G5 }- c) i2 a5 D3 g7 n1 c       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", , q$ x5 D' Z; l' U6 m5 r' E. d
         SuperscriptBox[
    8 t. R: n. Q. L' J) C  m      RowBox[{"(", " G% d/ @8 {7 X+ u
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 8 i( q0 G1 Y' v% y3 r; _; _. t  I0 W
        ")"}]}]]], "Output",, R6 T; N# v: {% _4 d) S& ?- Z/ T; d( i
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]
    ! h9 `" r0 A$ ~" E" Z  @}, Open  ]],  E. z  b$ k/ F
    ) h( B" F/ j7 y) P5 W
    Cell[CellGroupData[{
    % v5 f9 ^8 p4 H& i, l
    " X( @  ^3 \8 B( Q4 I/ @8 C: `1 hCell[BoxData[{
      D6 T! z2 o4 s4 F( J3 K- } RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]",
    ) K, f# f7 P" v0 k9 g, Z RowBox[{"u19", "=", + H) E7 F$ J8 L$ C9 t' l7 S
      RowBox[{& B8 k& v" m* M" ^$ m8 J5 U. o
       RowBox[{"Exp", "[", # e8 q8 r# i  M9 Q- {$ ]
        RowBox[{; M$ Z7 \5 j; b9 ?
         RowBox[{
    ; [8 ]- Z; D* q' {      RowBox[{"-",
    ) F, p* O1 V2 H+ I       RowBox[{
    5 h9 b8 t" l0 \# z        RowBox[{"(", . Z, A8 r& |) o& N# v( G% c
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    - I0 L6 @' O7 z1 m# b: k% D        RowBox[{"(",
    7 O& O$ g7 o2 k  P4 U         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],7 R# R# a6 V. D
         "]"}], "/.", "DeltaX"}]}]}], "Input",3 @9 T! j  p8 v& O0 N3 f
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {: Y- C: l4 H$ n4 ?, t# v: }$ Z
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9,
    8 N$ U( J6 |* R  3.577961588890861*^9}}],7 J% C6 J; o; B6 s; u$ Y
    7 ~5 t, b' z1 O- c2 z* z7 h0 U& ~" q
    Cell[BoxData[/ O% I8 d( ~, Z" j* q
    RowBox[{"{",
    " \: a' v% z# A. N9 e  RowBox[{
    ' i+ U) ]& B3 g% X* e- {  D1 D  "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",",
    2 ^# W" y! p7 N1 l% H. P+ ]   "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}], 7 S7 F/ V3 U2 J
      "}"}]], "Output",8 ~( s3 {; t0 v% {% a4 S' n
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],
    5 i" T  }8 {% A4 u3 p) y  o4 s4 Z& v5 Z
    Cell[BoxData[5 b- X# f8 g0 w
    SuperscriptBox["\[ExponentialE]",
    # m8 P( H  u% d9 ?! I3 M  RowBox[{"3.141592653589793`", " ",
    & s  T7 a+ f2 r( r   RowBox[{"(", ! {* S3 W1 |8 z
        RowBox[{9 [0 x0 C4 G0 I5 M# [( @
         RowBox[{"-", / V( V' A- j# T, I  B1 U+ A
          SuperscriptBox[1 f5 R  |* y: j4 z
           RowBox[{"(", # B; g/ \9 Z3 }, B1 g( p8 W* J
            RowBox[{
    3 X: |7 p1 s  a. n4 P4 C         RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-",
    + T4 W4 k5 N- W. M4 d6 j     SuperscriptBox[) B  e7 ?) M9 S# N& ]
          RowBox[{"(", 1 T) r; y3 @- }3 G, \& z6 @) V7 m
           RowBox[{
    1 C. W. |  Z; l; X9 n        RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-",
    ! p. J2 C$ S3 F4 z     SuperscriptBox[
    1 {2 c) ~! G3 `" ]/ g( l      RowBox[{"(",
    " m( O" r# c# [, P( J) p       RowBox[{
    / A4 [6 F7 J- q7 H! Y        RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    9 s: }, }4 L) m9 o     SuperscriptBox[
    " @3 U7 W) y* w      RowBox[{"(",
    * F7 U: v' T# b, j3 H       RowBox[{0 @8 v1 I, ^4 g
            RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-",
    / U- u; {2 R! o; r1 q$ s& P     SuperscriptBox[9 U3 ]  q  S1 r( R
          RowBox[{"(",
    - o: `  ~" W5 L8 _& V1 G0 P       RowBox[{- S- D. A: l4 M, `! Z: k* C/ @6 S
            RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-", 1 F' }4 p' O: d* \+ |. g% d
         SuperscriptBox[- p0 I' ?' {4 [+ N" i) f: G2 y
          RowBox[{"(", 9 h* A+ i. W# k; E. A! L, s
           RowBox[{3 H4 L* `" m) @) a
            RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-",
    4 C% c$ l; t- j+ M     SuperscriptBox[
    ) `+ _! @# P- c. ?5 L. g' B      RowBox[{"(",
    ! Q% X" V+ h& }' M7 V5 h9 X       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    / I. \# ~- V& A     SuperscriptBox[
    & h9 F- Q2 R6 u8 R1 j      RowBox[{"(", - @& {" ^* w7 q3 _
           RowBox[{1 M5 t! K, o; l2 I2 K
            RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    ! ]/ ~, c. {( G* m: i     SuperscriptBox[2 K# t9 D0 G: r
          RowBox[{"(", ' u% T& e) s* g% G, O# I
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ( v/ w6 S+ P, V1 p" k
        ")"}]}]]], "Output",, F1 n  f" T* o0 B, b2 Z
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]
    2 u$ S' q0 T# N4 u: @9 P. i  U6 A}, Open  ]],- ?7 |5 ?8 W# Y; f' X
    5 S* K! ^6 z/ z2 `
    Cell[CellGroupData[{
    1 {8 h7 ?( W2 D) Z' d) a/ m
    % H" J9 l* m' V1 _6 Q* ^Cell[BoxData[{9 n" B* @/ S! B2 x5 K4 n
    RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]",
    / D7 e: Y$ o: T+ S% s- g' p RowBox[{"u20", "=", ) F+ g+ Q; o  f
      RowBox[{! g7 k( q% j2 s2 ]4 V
       RowBox[{"Exp", "[",
    ) w5 A$ ~1 z9 ?/ g7 z$ h    RowBox[{' ~# g  ~( P, Q5 [8 \9 w
         RowBox[{
    . N( n& _  L9 E- @6 g$ v      RowBox[{"-",
    . v# w# x: Q9 A4 n# S/ E6 D& y       RowBox[{' z7 a" n; ?7 i6 s
            RowBox[{"(",
    + `7 v/ i" J  J( C4 _         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    * _) b9 s3 s; s8 V  K1 B        RowBox[{"(",
    " m# G/ B( ]1 f* R+ I         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    5 {( @/ i3 x. a! ]  k/ s$ K3 v: @     "]"}], "/.", "DeltaX"}]}]}], "Input",
    ! D* K# C5 L& f) v1 ~1 O CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    $ f' `) ~1 o0 p: D; o  x  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9,
    7 S, ^: y+ P: u" Z  3.57796159382047*^9}}],
    * D1 r- w9 I) j+ j$ N! k' ]/ ]3 h% A7 ^# l; s; _! B
    Cell[BoxData[; e+ Y; y/ R9 d! _# R; v
    RowBox[{"{",
    ! y! n  R4 Q; P) y/ i# C3 k  Q  RowBox[{
    ; D- ]% t# a  _6 _0 w- k0 r  "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",",
    # D) G! S3 d0 w" g* P   "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}],
    : N* n, y2 w+ W  "}"}]], "Output",9 h+ k' X; T# H  T- N0 e$ w* l+ F
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],
    5 i# S+ k/ C- g: D7 F$ M6 X
    5 d; b; \  s- Z  c6 O9 ^Cell[BoxData[
    : }$ ^6 j# M$ M8 J' C; K7 U SuperscriptBox["\[ExponentialE]",
    ; m3 W2 O+ c7 a, {/ \7 E$ `: N, R0 _  RowBox[{"3.141592653589793`", " ", ) [$ z6 y  q' F# x
       RowBox[{"(", : I& H% d3 U0 D7 r
        RowBox[{# K$ A9 L- R2 Z1 G6 N% {' b
         RowBox[{"-",
    $ I2 n9 u- x4 t9 E* J, I      SuperscriptBox[" I8 V0 Y8 [- e( d) O; [5 U
           RowBox[{"(", 1 }  X& I$ z; r* ^& E4 }
            RowBox[{4 D# v! P% S$ q
             RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-", 5 c+ @( M7 _! O; T1 f& q
         SuperscriptBox[
    9 _7 j/ V+ @) e: C, h      RowBox[{"(", * N* d/ U- T8 I8 v! p$ B4 X* p
           RowBox[{3 u1 y5 b5 k6 N2 |' n% K1 i5 ~
            RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-", 6 ?; B4 a1 N- Q% Y7 m6 S& W
         SuperscriptBox[9 `9 T3 j5 ?. w7 V0 D
          RowBox[{"(",
    ) Q& J' u% `- H( x% D- s/ L       RowBox[{1 Y& S# x$ \) }
            RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", % K/ _; A9 o2 m2 }4 d6 S
         SuperscriptBox[0 P" K" [' }  D  _
          RowBox[{"(", : u5 C/ @+ l, d  N# y$ G- D
           RowBox[{; N! Z4 a; X) ^+ I. J7 A7 M+ `
            RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-", ; {% Z: \9 U/ E, ^' v6 @
         SuperscriptBox[7 I5 M+ L1 h  a7 r
          RowBox[{"(",
    ' I& X# @6 P) y9 D0 o# o* T       RowBox[{
    ! c- r5 |( M% N. U+ j        RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-",
    & f  e" Y# K5 J0 Q, c     SuperscriptBox[- @% X# j1 s9 x
          RowBox[{"(",
    0 m/ F9 B( o* _4 k$ b; ^/ d& T* F2 n       RowBox[{
    : q. f9 o# o6 ]* W        RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", % W* C8 W4 j4 z/ Y% ~* d
         SuperscriptBox[
    ) E, j6 d' f! }      RowBox[{"(",
    - k/ z6 \0 |4 ]       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ( f7 J$ I2 s) k4 M$ D     SuperscriptBox[
    5 _/ |( r' X7 k      RowBox[{"(", ( ]" `' N) d( g' G# D2 z
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ! p* J( d* I. |- T7 n     SuperscriptBox[
    3 g' n( \5 ^7 }: }! }      RowBox[{"(",
    1 [* b( a/ U3 ~$ t% s9 S# j2 Y3 z       RowBox[{" c5 t8 a/ \7 ]3 J" ^
            RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}],   ^) i) V  w# ]1 F
        ")"}]}]]], "Output",0 y  |3 k: @' t/ p! P" @
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]
    + u6 ^+ U" ?6 V+ C6 T# S}, Open  ]],6 k2 [, U7 p) v, C5 x

    1 {+ v. q$ J' h( wCell[CellGroupData[{
    . t  z% P& i) L* V" t! P$ R1 n% Y8 Q, m1 D
    Cell[BoxData[{
    * q' |1 a9 d( Q, m6 R RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]", 5 n( Y' d: B# F9 D" b
    RowBox[{"u21", "=",
    ) A4 K  q9 ?" p1 d3 O7 u2 S  RowBox[{
    / S7 g* o1 Y2 ^+ I! _/ h$ l   RowBox[{"Exp", "[",
    3 S* Y% o, W/ ?# a; N" b/ `    RowBox[{3 X" a3 |1 d& q, I; i. m9 k
         RowBox[{5 w: j) |6 I3 j- l7 j! R
          RowBox[{"-",
    4 b# n% i. R/ Y' }       RowBox[{
    - i$ ^/ w' s' t$ _        RowBox[{"(",
    9 A1 L; }" N$ h6 H* {% E         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ' t% w. `4 X1 ]3 E7 h        RowBox[{"(", 6 Z9 O: i, `8 Q3 Y
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    8 `& L% [/ X4 _" P: o     "]"}], "/.", "DeltaX"}]}]}], "Input",$ l, [; a3 c( `
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
      Q& y, z" w. Q! U  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9, : g' O3 W1 {  S( A+ [2 Z( ^9 Z
      3.5779615991556787`*^9}}],
    2 \  j1 ]( X' s9 ]# \- }/ t  e6 k- R6 I1 I
    Cell[BoxData[
    ! d; r3 K: V* _2 \$ Q7 F/ r, s RowBox[{"{", " {  g1 D" m% n' M4 T: j" p
      RowBox[{
    8 [7 B, ~* E7 P, i. M  K  "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",", 3 X- c' Z9 w2 q4 x( A3 f
       "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}], 2 I( E7 u: u5 z+ d" L
      "}"}]], "Output",
    - _7 n4 u7 K, F+ N) @& g CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],9 B: w  V0 v5 c( `2 R% t

    ; u: ^2 I* r! ^Cell[BoxData[
    6 B2 {/ K" ]$ m7 d( D8 l0 P SuperscriptBox["\[ExponentialE]", 5 p5 M$ f) U* a& c- d* Q/ b0 O
      RowBox[{"3.141592653589793`", " ", $ |' V0 ^: }. Z" X. ?
       RowBox[{"(",
    4 N* j1 ]: V8 T2 G, K* d- t; x6 `% H    RowBox[{
    / C4 N9 Z8 H3 q/ n/ Z     RowBox[{"-", 4 D" ^7 j. x4 c) X5 w! N6 l
          SuperscriptBox[& H0 I3 l7 K7 H1 k) w3 N( G0 ]
           RowBox[{"(",
    $ [4 ?( {% p$ r2 K5 A( v8 F1 [5 f  o        RowBox[{5 W$ J4 ~3 O  T6 ^- F8 Z4 X" i
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    9 K( r0 Y# J% Q8 V- ^# K+ v. A     SuperscriptBox[
    0 R0 d: d5 o6 H2 S6 i) u0 B0 s/ y      RowBox[{"(",
    0 f# x% w  \5 K       RowBox[{+ Z0 M" `( J* ~+ |8 `+ J5 i
            RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-", ( z1 m8 ^  N4 z# t' o- J7 B
         SuperscriptBox[
    9 u( J. t" {9 R- p' u      RowBox[{"(",
    # ?' F0 w3 m9 h4 u* j! S       RowBox[{
    7 w& \& Q5 S1 _7 q9 z3 P        RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-",
    * I& `# Z/ c4 {9 r+ _9 C) n# I     SuperscriptBox[* k4 @: \, ^' S1 I+ [& Y
          RowBox[{"(", + n5 D7 r0 x( i7 e" i5 ~
           RowBox[{
    ' }, R5 h& t# U        RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-", 8 Q" {2 \; s" A& V
         SuperscriptBox[8 ~5 F: G# Q3 I
          RowBox[{"(",
    % w/ E8 l; T& l1 m0 N& ]- t       RowBox[{% @* ~( |% A2 h0 K! {
            RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-",
      J" M" K! [3 v) s% W7 {8 ^     SuperscriptBox[+ m& d" U2 `( {! \, D
          RowBox[{"(", ( M8 d& [6 ?! N
           RowBox[{
    , _* p/ a; t, n, t) c+ s        RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-", ; a, f: q+ M' p$ x# m- }1 X9 y6 F, p
         SuperscriptBox[7 _8 E3 @$ b% T
          RowBox[{"(", & J& m% L! H. A4 ?
           RowBox[{
    . n: X# ?  G$ P1 J) L        RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", 8 b- u; B, M0 v1 a
         SuperscriptBox[7 m7 D6 K. C$ [
          RowBox[{"(", & H- u+ V! I& d( q( w
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    + ~7 K6 K0 N; L7 `1 i6 p3 f     SuperscriptBox[! n2 X' D! Q% |2 p* {0 {. ^% C
          RowBox[{"(",
    4 P; o1 J6 {) ^5 o6 ^1 j       RowBox[{
    5 P" U! ]6 o$ @  i7 G; @        RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}],
    / r7 }; Q2 R0 E0 p# ~% z    ")"}]}]]], "Output",
    $ |; m0 n& \9 ?7 D2 L5 c% a* _2 B CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]
    7 ]& _; j6 i9 z' u}, Open  ]],
    + o% `. k$ g3 f3 P; d  l" z
    " G1 k! y2 Z8 L- y  `) F4 GCell[BoxData["\:62df\:5408wi"], "Input",
    ) t. Z; A4 O; r' o CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],1 O3 G9 f- R/ Q; p3 Q7 _

    : R) ~2 ~! {: M; cCell[CellGroupData[{' ?! b3 r8 w8 p( N* N9 _6 t

    2 X5 T% p8 g; N' N1 c: ^& o; oCell[BoxData[
    5 s. Y* m/ V0 u RowBox[{"y1a", "=",
    , _7 ^2 `1 G4 a3 p; U8 ?' A, U  RowBox[{"Table", "[",
    : p+ k# n0 U5 k5 V5 K: c7 k   RowBox[{"x", ",",
    : k2 }& ?# g# ^0 {' X: V& J, D    RowBox[{"{",
    . l! v, a+ {- n4 M. f     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    # b  N- ?, b9 y% j/ D CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {5 ~; D* F1 l4 q& m' [
      3.5779226649375*^9, 3.5779226810625*^9}}],
    : \7 u% t7 b# T
    + O7 w, Q( O2 RCell[BoxData[) B4 O+ b6 `7 I. x
    RowBox[{"{",
    3 ]# u, c) ?. O) ]4 O  RowBox[{
    / e' _- v0 x; v0 e5 K  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 2 F' m( b% e7 e3 n/ D* U" S
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",1 v- `" Q" W9 K- b4 T$ L. C$ U9 P! \
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    : N' l. ]( z3 z' N, X   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 3 X/ e  z* W% T7 C
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 5 i% \6 [' B, C) O
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    : Z5 H8 x0 f9 O9 |9 @   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    3 @* S& I% H9 t# y1 u$ G# |! v   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", . S% v5 n( f) C% K4 ^
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    2 W) K, w( K/ Y& m- A  "}"}]], "Output",
    . q# I' _% P( K1 x+ h& u CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9,
      G7 O, |+ ^6 u' D  3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]0 S1 R; ]4 R% k( s' ?6 [4 n, s' D
    }, Open  ]],
    0 H3 `* C6 t: ~* F( q, |
    6 G5 T/ Y, \0 w) ^( j& e: r6 ECell[CellGroupData[{: u/ E3 l* e  M. a$ e& W! U/ S0 A2 `* Q

    $ X( @- F5 J1 ^/ l" XCell[BoxData[
    1 e  E  \" S- S# N0 m, L: C RowBox[{"Data", "[", 8 X6 M& f4 l" h( N& ~" V
      RowBox[{"[",
    ' \4 `/ g7 f, p  P2 O, v   RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",' A, K2 r& k1 P
    CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {* f- W0 X& k  |- z
       3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],
    ; V  W: J8 J3 _& u! G6 t/ m$ a+ O; n8 z* B+ Y5 }
    Cell[BoxData["0.899882`"], "Output",0 h  r* [) j8 Z# o' m
    CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9},
    3 z  ~0 V5 E! e( G   3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9, % X% I% w% `7 D2 _
       3.577961929080654*^9, 3.5780123419375*^9}]
    * i4 Z0 R4 O0 L9 m}, Open  ]],
    / C+ t0 ]; m) B( F
    % f' B" F% Z5 O6 hCell[BoxData[! }/ G1 Q$ p4 l  c
    RowBox[{"For", "[", ; E+ H8 |5 {' C' {! c
      RowBox[{
    ' {8 D- ?" o2 z) I   RowBox[{"i", "=", "1"}], ",", $ L# p' a$ s: r& {
       RowBox[{"i", "\[LessEqual]", "60"}], ",",
    + r. K1 M  }6 z7 _" n' C4 B% K   RowBox[{"i", "++"}], ",",   J; i( X* g$ V$ j) X7 A; P/ i
       RowBox[{
    / K- @. p: Y% O. E    RowBox[{"y1a", "[", + u0 x' I- n) b9 {
         RowBox[{"[", "i", "]"}], "]"}], "=", * h1 b2 c6 L+ m3 [6 v, Y4 B
        RowBox[{"Data", "[", 6 V/ M: n$ f  I; n) V  J" f
         RowBox[{"[",
    " m9 x2 F5 h. K9 R2 p# y5 v      RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",
    % B0 N! a; o+ j  [9 Q4 [ CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {- `  F5 e0 @# e0 C1 `/ L/ g+ ~
       3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    $ U% J9 p# v1 O/ @: C   3.577922923203125*^9}, 3.5779588839702806`*^9}],4 i5 X) }4 W+ o  u: f7 i2 a

    : u' w& J5 s  zCell[CellGroupData[{
    5 j; s2 q- D& e" x0 i" W  x* F- `3 f
    Cell[BoxData["y1a"], "Input",
    # x7 m: w( Z0 h, N4 Y0 ]' n4 F' R+ \ CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],% D& S' l5 Z: i9 k8 A+ u

    - ]' o+ |: Z0 l  p& t4 pCell[BoxData[
    0 ^0 n/ x3 M/ L1 ^; b RowBox[{"{", , p! u+ W& r! V- h( K) z6 I
      RowBox[{
    , V  f' C* X) {" D7 y5 v  "0.277091`", ",", "0.220259`", ",", "0.899882`", ",", "0.265607`", ",",
    , d5 w- K) w* j) ?+ i$ L   "0.642226`", ",", "0.306243`", ",", "0.186985`", ",", "0.175501`", ",",
    " X6 t9 k% `' E3 W! q  H   "0.147821`", ",", "0.352768`", ",", "0.23881`", ",", "0.095701`", ",",
    + U1 F; I) m( D+ I( U1 b- W   "0.162839`", ",", "0.335395`", ",", "0.160483`", ",", "0.398115`", ",",
    1 |! G- i/ q! s" |7 \# }/ D% D6 [* w   "0.157833`", ",", "0.315665`", ",", "0.492344`", ",", "0.638398`", ",", 5 T  x! N/ ?$ w9 L% l$ J! O
       "0.392521`", ",", "0.362191`", ",", "0.114252`", ",", "0.401355`", ",",
    $ t% P. e4 Z6 d! }5 u   "0.827444`", ",", "0.676973`", ",", "0.331272`", ",", "0.845701`", ",", 2 d. S+ H8 r" |# {& X; K
       "0.287102`", ",", "0.`", ",", "0.050059`", ",", "0.254122`", ",",
    + o$ O( m7 E4 Q! O6 Z% O   "0.086867`", ",", "0.659894`", ",", "0.317138`", ",", "0.605124`", ",", - m. {) W' W! O6 b- M% x
       "0.32126`", ",", "0.595406`", ",", "0.555359`", ",", "0.333333`", ",",
    " F6 B- L2 _7 d; b9 K5 O   "0.149588`", ",", "0.493522`", ",", "0.224676`", ",", "0.410188`", ",",
    ( f7 p4 ^+ j6 U3 i4 M- ]' x- [   "0.668139`", ",", "0.102179`", ",", "0.380742`", ",", "0.319494`", ",",
    ) ?! o" s: }# Y2 x% q$ n4 a   "0.031508`", ",", "0.292108`", ",", "0.329505`", ",", "0.337456`", ",", 8 Q' d! c0 W/ g3 ?6 F  z' z
       "0.766784`", ",", "0.676678`", ",", "0.541519`", ",", "0.064488`", ",", # Q2 [7 {. l9 ?/ _0 L, J+ m* P( q
       "0.463192`", ",", "0.388398`", ",", "0.262367`", ",", "0.290931`"}],
    $ U  p& `6 Z) j5 b" P" ~; Y+ Y  "}"}]], "Output",* ]& B2 l# n% ~( b5 m0 y
    CellChangeTimes->{3.57792293246875*^9, 3.577957577756765*^9,
    $ V$ j. c  H4 o9 S7 _  r  3.577958888806289*^9, 3.5779619425902777`*^9, 3.5780123438125*^9}]
    $ d# p; Q9 Y6 K. A5 g# l}, Open  ]],
    * u% K1 n* {5 i& H- f3 s6 I/ y! \1 n5 M& r: N" T) Q% j/ Z
    Cell[CellGroupData[{
    8 h$ b2 Y, A+ U( k2 H5 s  Q6 l" x- L' R6 J9 _2 a
    Cell[BoxData[
    3 F* p6 ?# H6 D+ y0 I RowBox[{"m60n21", "=", % B3 M+ k& y2 ?9 H, I  x6 @3 K3 c
      RowBox[{"Table", "[", 0 |4 f; X& G/ t! R
       RowBox[{
    , b; z9 r8 s5 U  {8 r$ o- G* C    RowBox[{"Table", "[", % P$ F- c5 A  f4 U8 @  D
         RowBox[{"y", ",", ' [! s. g5 W& g$ G1 `
          RowBox[{"{", 1 t! `9 P, g/ z. w6 e( p# ~
           RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",",
    + G+ |1 q0 P. j. U    RowBox[{"{", : j# j0 C2 ?) D+ |
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",6 v2 |1 e- O- Q  a
    CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {9 \' L  f2 n0 A. s5 p  W
      3.577924052828125*^9, 3.577924101671875*^9}, {3.5779619669419203`*^9,
    * Z( C& q1 e4 o, e* j  3.5779619706547265`*^9}}],9 ^0 p' l  ?0 R/ z* l
    3 `- f$ S# b: w  [& @2 v# s
    Cell[BoxData[$ m! v5 }# o. ~' K' B! V4 Y; b
    RowBox[{"{", - j( E+ |: t( j& L, W
      RowBox[{
    ! m7 b9 Y! e0 ^   RowBox[{"{", ' d& q1 h, H& F/ N% I5 M# l3 b' o
        RowBox[{6 Z5 N: }' `, h  L9 W, C
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 n. T# R3 L$ I1 D; D$ l# D0 H& M
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( V, w% C1 Y! I: Z7 W
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],  h  W2 G/ Y' H/ Y# x& o: a
         "}"}], ",",
    : ~9 H0 g7 Q- O   RowBox[{"{", 2 _! L& B+ `9 u, S) G- ]
        RowBox[{
    8 m9 B5 }6 F* |, ^    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + K0 P& h/ v! I, k: o. v      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' R, w, G; E# q+ d5 ?7 M
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! G1 X+ L' s1 H! i2 ?7 I. O
         "}"}], ",", 1 ^; Q. S* h( G1 Z$ ]/ o# U
       RowBox[{"{",
    / Z0 t" x" @- e* D$ t2 t0 V$ T    RowBox[{
    ' R. W+ F( M3 _/ @% E- q% ~$ w    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 a+ T' g$ `7 W6 Y$ N) H( k# T# s, E0 t
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' P; |" `' e, b0 S! f
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( y; `3 W/ u3 R& Y1 ]# R. g, j
         "}"}], ",", + }0 x8 Z# k1 L8 J
       RowBox[{"{", 7 F9 k. X2 b9 p
        RowBox[{
    & g  M8 }6 e1 A    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 D' ?7 Y8 R7 V2 Y: @9 x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) S8 H1 e( U: Q8 C
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 |  x! Q! s2 k) i( T
         "}"}], ",",
    * h5 B  q, f) L   RowBox[{"{", - p% P1 b3 b: G  i8 I4 M+ j' q
        RowBox[{
    % c  l! Y7 }( g' T$ b' F$ F" {    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . Y, z* C2 h9 n2 V      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) m. x! R$ u8 e8 [, W! B* u& \. P     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) v. b( u: o4 S& \4 Q# i) ?     "}"}], ",", * R+ r1 A5 H) P; c, F
       RowBox[{"{",
    % h& b. Z+ o+ `$ J$ T* O# e- X    RowBox[{1 B# r: }1 u3 n
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : ~* x% |  p/ g+ n) s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' _3 U0 d" [6 b, B# w" z" a3 L2 [
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 F, \) G% f/ n& D' }) r) P
         "}"}], ",", 4 r9 D' S2 `8 [: N' x
       RowBox[{"{",
    4 F5 J0 h7 Y: j& I    RowBox[{
    , V7 i% ]* t: @/ F$ q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",: t0 N( x4 z' |
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # ], h+ h% `8 G: \3 F5 i& N
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],0 e9 T* L4 y& b  H% W$ g1 G9 f) w
         "}"}], ",",
    - z& _+ J, t* o; o( o& z   RowBox[{"{",
    / M5 @' o+ z: n' I* z6 v3 \    RowBox[{2 O4 D2 _" f5 H
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ; T, ~( ?; y6 f3 B      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 2 [8 i; u- `. q$ B: B9 I
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],$ o3 j& c" E9 [: K
         "}"}], ",",
    ( X+ Z3 q& p* _  H3 B5 K* b   RowBox[{"{",
    / w+ c- B3 N$ S    RowBox[{* h! t( F2 ]% t) w, k0 Z/ s* i. L# p
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) c( Z; x5 `5 [" S
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 B4 c% c7 @* d  `     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],0 ?: l& u; a8 q. X# B( F: F3 I
         "}"}], ",",
    : a* l; l4 S$ w4 L+ ~   RowBox[{"{", - t. N  a$ _7 @" ]9 ?
        RowBox[{
    5 J0 b) B  M+ w/ p( C0 S' T0 l    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",: h* _1 x8 y- I: k2 }5 _# e# C# U3 R
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", : }) I  K1 x( Q. e6 q/ o4 s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    $ S+ k2 ]2 z  L9 k     "}"}], ",", 8 m* j. S6 I1 ?* q$ H
       RowBox[{"{",
    2 F) {5 Q4 ]" t, U- |3 M    RowBox[{
    " s7 O- `! m. t2 k- y, v    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 q) Y' U2 x3 Z1 n5 ]" J      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 o) W' l( r% ~+ X     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 o1 P. t  Y6 b2 @
         "}"}], ",", 6 i; U6 \( ]0 H4 @1 Z1 L
       RowBox[{"{", / ~  P) t& f1 O' \
        RowBox[{
    + r5 k& N+ m9 v" G    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' J5 r8 S5 E3 q5 s8 B      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   z, X) C$ w9 S: B; H# _
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & m  ?/ P; n- \2 o* G     "}"}], ",", 2 i7 G! |! h+ T: O* b: L
       RowBox[{"{",
    % l3 e8 h8 R6 V- W' s* s* x5 S    RowBox[{
    * O0 Z% b9 n! G% \2 _    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - R, b4 Y1 a: ?- j& Y' B' E      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # D, b. t6 b0 Y! @( m; f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; `6 z) G  q3 }- s2 X% z+ W" w
         "}"}], ",",
    - ]2 d, S# U. Z6 [) k' o   RowBox[{"{", ) H+ H, l" L/ W. T& `: b
        RowBox[{
    , e9 l7 w7 j7 R9 K    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 l4 ?3 g6 P" w) u
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # z- ^( C' p( [; n& H; H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    0 n# D! i; ~! b9 b# ?     "}"}], ",",
    0 u1 [( O" T2 M0 ]+ T1 N   RowBox[{"{", ; [! v4 v( K  g1 p
        RowBox[{
    2 s' q2 o8 |3 [1 `. w# s    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ _$ P* D, f5 w
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 r2 _4 V. c# R) `& r
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( \% c. E" q) J     "}"}], ",", $ O3 m+ ~: G. R5 W  v" O% Q" {
       RowBox[{"{", 1 ^4 J6 j2 j2 s, ~
        RowBox[{
    / h, E. c  F; e7 x# K$ g/ P    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. l% Y* M- t+ l
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", % e+ K! r6 }# J* u
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],' U0 [% C' a& H' S" o( E+ c
         "}"}], ",",
    , z/ r2 Z  Z& m  l   RowBox[{"{",
    & K- U8 [- a# }& ?+ S) H: p: C3 B    RowBox[{
    , X8 |0 {, [6 o. {5 @    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 U+ F, p" [) U; ?      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % ?! J% f, E; [" p- o7 b6 r2 k     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) q4 V, b/ E  t5 X# H7 J7 m
         "}"}], ",",
    $ G; W# u% u" ]2 q9 I   RowBox[{"{",
    9 m- L: Y% e+ _* ~4 j2 C% H' N. P    RowBox[{
    . g9 Z' @6 \& j2 f    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",; T; G6 V& _" e  b  W
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 S+ [6 V" P9 ]0 ]7 \* |" l
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # G3 P( K  ~2 y# y+ y     "}"}], ",",
    / Z9 o( ~/ k, z4 e6 B5 {0 \* m4 ?* g   RowBox[{"{",
    3 c1 `2 Y/ ?# C; F$ e9 C    RowBox[{3 j% H( k0 [7 Q! D6 X- H# X
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 u* w5 w4 S; G# W0 T      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 P- g* l0 \& G
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],% }4 t5 N* P# V& d# ~6 }' u. T5 ]
         "}"}], ",", ) J/ N. d7 V$ Q' k, Y, ^$ Y$ N, v
       RowBox[{"{", 6 G/ @% x/ F- \
        RowBox[{
    ( X0 b4 i0 x* a- T    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ y  C( l% N# A" b, T      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 l/ @2 g) x; C2 N: r! M
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 K4 n6 ~0 m$ k
         "}"}], ",",
    $ }- ]0 t% k  \3 E! z! h   RowBox[{"{", 4 U8 m7 Q# c: @8 T: a
        RowBox[{& q" Y. \( Z3 Q  `( f
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # b9 D' g1 s5 U8 E      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    . Z: ]- c3 y" m- \# g8 w     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 m( Z& b# z7 R- L6 ?& g
         "}"}], ",",
    ! M, l# H1 N" W. z   RowBox[{"{", 8 v. T0 L( N; B' o: U
        RowBox[{! j& m$ q0 j' y- @, ~
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",( `" X: H1 W8 ^+ W
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : L! N  z" J! j' d/ Y     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! v, Z2 b, M# C5 a. U     "}"}], ",", 4 ^. J4 b" }# U( R7 R
       RowBox[{"{",
    . P6 O4 Z6 T, _; y    RowBox[{
    & F$ ]+ g8 g4 Q9 q: ]    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      L8 M2 o  Y4 Y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " U8 a5 N$ D/ X) }     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],& ?- p/ W& F# v& t
         "}"}], ",",
    ( Y& i: ?. y2 }   RowBox[{"{", 5 O, a! A3 V: K# L6 S! a& ]7 h
        RowBox[{0 g' c1 ^, t/ P& p7 y
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",# \& D) b$ |/ w! K2 U( y2 e7 d
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 S6 u" @6 a. u" V6 {5 I8 L     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 ?6 S8 p# c  e8 k- T     "}"}], ",",
    ) i+ b2 P# z: P8 [0 ?   RowBox[{"{", 9 }. q- n; _* o' a. `0 L
        RowBox[{
    & n5 D4 W7 I" }8 S" ]: q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",: ]* `7 W$ l: `/ a$ F6 `! j, F1 ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 ^0 y/ h: \9 f6 f8 ^6 j3 D
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( q9 m! _+ ?3 c1 o: G- Q) L9 f1 {
         "}"}], ",", ; R7 q! Z( F9 b: m1 }9 ]  t; B% f, R' T: y
       RowBox[{"{",
    . y. b- F8 s8 X' v    RowBox[{
    5 s; ~  b3 j3 B    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",5 N+ {9 X! x6 x& q/ g$ `+ v, q+ ?! m
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * _3 |$ _$ d" G1 k- r+ M1 f
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( A+ h' n( M( L+ g: c* F2 J6 g     "}"}], ",", $ k  k1 K' [5 x% U7 {+ S" H
       RowBox[{"{",
    ' ~" ]2 o% W. Q: I& }3 W- G    RowBox[{4 g9 z# G+ S  l; b# K
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    4 w& }6 p  V/ r7 A      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; c# g0 h+ ]+ V: Z; L2 N, P- o& h
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 \- c" {3 w# @/ v# a* w) N
         "}"}], ",",
    ! A" h1 m: @, G: v1 m   RowBox[{"{", & L' _: a: _  C3 C
        RowBox[{
    5 ^( ~( U* h/ F) e8 P5 t9 c    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",' ~; `. r( h4 v5 D
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; i) b0 O" t; S2 E0 F     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) m  y+ `4 d/ i' \  Z+ e; b9 p
         "}"}], ",",
    ; h' I4 `4 w! f   RowBox[{"{",
    7 q5 v6 H7 m- X: h% Q6 s    RowBox[{
    % n7 c+ w$ N/ j' u    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) E$ c6 {, Z/ I4 }+ }# m
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - T7 h# S1 X5 g: l     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],- U/ C4 B, K$ U+ \  J" @
         "}"}], ",", 2 p7 E3 G$ o4 D' T- B, r; `
       RowBox[{"{",
    % M; t% W7 d* ~" _/ k! M/ `( V    RowBox[{6 \8 K! Z: P* a" r+ t' z% ?
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",  R' E! B8 ~1 [& s
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 J5 N$ n: s5 z' w( p: M     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! q3 M1 T1 z0 k# b2 T6 j2 M/ J     "}"}], ",", % \: i2 k" l3 m! ]; w3 U, I1 N
       RowBox[{"{",
    : w( f- p; }0 L( }    RowBox[{& y+ B& j) w' o8 }6 ~; h- h
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* s; H- o4 u% R4 N( A
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * H5 T6 W9 i+ N1 g! T7 D9 B/ f  Y0 O
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) N& T# N& ~* R! A* u
         "}"}], ",", 8 A' ?! c8 E: j" |% \+ x
       RowBox[{"{",
    # y) Z1 _8 Q, H: k    RowBox[{
    3 p1 h, W+ M" ~+ U- G# H6 x    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& k7 l$ A9 J* M, x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 W; h$ ]& m2 ]$ Y5 ]# ]
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / i' y+ x! U$ c     "}"}], ",",
    & o2 L& v2 k$ a) [4 Q   RowBox[{"{", . V/ T0 J. J' A
        RowBox[{/ j6 ?+ l3 ~3 ?9 r
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / ^/ g- i4 Y$ _' @1 F      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 b* F! M* K( r$ j  [
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],- p( w& j/ W6 a
         "}"}], ",", 1 ~( H9 Q0 F) X8 V& A- r) B
       RowBox[{"{",
    . A' i) ]" J, u3 g3 k    RowBox[{/ D1 S% S* ^# Y- {
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 b: E/ O# s9 D3 U( `
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 9 t- [1 c% x. |* C# W) F
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 b+ K; T& \/ S  y" N/ _     "}"}], ",", 2 m2 ^7 E. t! w% o6 t
       RowBox[{"{", ) |: A! j! k2 l0 B+ S2 ]
        RowBox[{6 D. J: w8 A* w: c6 V0 `! D; @, Q$ L
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ S0 o1 I8 F8 _3 @! C
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   C( F! i1 F6 h# c: ], ^+ E8 b
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    4 i4 y4 H7 Q, d9 C( @+ |     "}"}], ",", ) x% w7 e# l: ^% A$ \9 G( `- d
       RowBox[{"{", / a) o9 _$ b) L
        RowBox[{8 k! |5 z" l( D; k
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",' f8 F& q- i) X  @! O3 O6 Q- B4 j6 d
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : ^4 T$ X; }, u4 ?- i     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 t; |- d. C2 V9 P% Q+ t5 B
         "}"}], ",",
    & W  c: s$ o. w" N   RowBox[{"{", ; C" [( f; X, c+ v
        RowBox[{
    # D3 Q# V1 W7 N: b% ~" U; |    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % ]: j& ?, s( R  H; T      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; h0 E6 W! e  T& g/ d( R
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],9 u3 r1 S6 T' ^/ Y* Q  k5 p( m* e( O
         "}"}], ",", # {- P/ V4 V2 ~& u5 n5 I
       RowBox[{"{", 4 W6 C% a- X, Y, u: f
        RowBox[{
    ( r. W; k; A' X4 J5 r2 I    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 o6 t. f9 B* Q+ ^+ U3 G& }
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # T/ X/ A& L. `4 v& w
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / R& I, o1 O  A2 v5 y     "}"}], ",",
    ! O' I- Q0 f- S4 Y   RowBox[{"{", 6 Q" n7 U1 X9 Q! }! B, M
        RowBox[{  ?  k# ^0 m5 e$ s" e, t2 ~5 U
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",' {+ d" Q% Q- z- t8 ^* _. |
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 O* Q7 a2 {0 C$ r     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . J7 @/ w/ O6 w     "}"}], ",", 1 @7 t- C$ ?8 S0 w5 j3 B
       RowBox[{"{",
    9 s* m( i; {  y    RowBox[{! V* [$ I+ `$ y: [4 l4 H8 n
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! G: i  N5 I7 A" d  n' O! N2 }
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : M& `0 k- ^! A4 _     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! V8 E1 \. L8 W  X9 Z
         "}"}], ",",
    . M' C* U# o5 l3 _" I! `   RowBox[{"{",
    ( |! v5 C: F) v! Q# b/ e: C    RowBox[{
    & X9 {0 k$ m, n7 G7 T    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ( G3 t6 g* Q( d0 v2 F      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / Y- `/ [5 ?; a0 ?6 n) U     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 ^! K/ Q/ _+ Z# ^. p7 t1 e     "}"}], ",",
    ( p1 u" X4 V8 K" R: L: }9 w   RowBox[{"{", 4 Z4 \9 X8 M. B
        RowBox[{
    ' e, ~0 z5 P8 _: s. l% C1 Q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 e, ]  B( `6 {) [
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   E& d2 v* H% }1 ]! |7 a. l* O
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & u0 [3 M: h! P9 C4 B% }6 N     "}"}], ",",
    9 o* t7 A0 f. X% Z5 J   RowBox[{"{", + J4 c, _% a4 y6 A: v  J' Y, N
        RowBox[{
    . A* `6 [; G& y# d. Y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 _* S! w. X+ q- K
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 Q7 z; P* S; V% X; S
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , {' b* R/ [" ]$ \# Q     "}"}], ",",
    $ U  B. _0 {( g; |. v5 l$ |2 N   RowBox[{"{",
    2 Y9 E0 |1 o4 y4 @3 J    RowBox[{1 D3 }" `9 h! d1 l* |6 x/ X
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! s/ f, W& v( E! s
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 N' |) C" N4 O3 U
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],' t; {$ A) Q5 Q* C* L
         "}"}], ",", 5 O# Q9 a0 h  k/ ~& Z
       RowBox[{"{", ' l" ^( M$ r6 B. H) o
        RowBox[{. S, j* Y6 e+ U6 e: Z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",8 F! e: k! e* x* V8 V) Z
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 r- {% I6 [- y7 H" A     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) X" ]1 S2 Z; T& o" Z  u
         "}"}], ",",
    % [" r0 A7 u$ Z. K# q   RowBox[{"{", ' x) w- |6 S1 S. m/ F( y
        RowBox[{7 R4 H( Z& [/ q; @. M' C6 n
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    4 \% ^6 X$ ^4 w" }7 z$ F      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    9 H' w4 i8 W  ~+ h. W5 p' b     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],0 c/ K  m; @1 p, @% d+ N7 V
         "}"}], ",",
    # O& V5 M% h! p6 W9 {8 J2 q   RowBox[{"{",
    1 v# v$ o& s$ ?) m8 ~9 w, m    RowBox[{) \& N* p- D" W7 H
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ i0 a  C1 L8 ]! C* g6 |  v      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   b; q, U) l  R5 {7 H+ R
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],* _4 y& i' q0 t
         "}"}], ",",
    0 t3 m3 R# X3 ]0 X& W# ^   RowBox[{"{",
    8 b0 T8 c( ]2 A) h    RowBox[{
    " W" t- e1 u& {( t' w    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",% ~& L0 h4 [- t& x5 C% w
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 s) _- v( p0 A2 Z2 p; P4 {/ B% V
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % X% k  ]# J3 k# ^     "}"}], ",", * M; a- n2 c0 K. V/ u( o5 `# Q
       RowBox[{"{", , H- K9 i- {! m0 M5 t! e5 L3 N! a
        RowBox[{
    # P; a% M# ]# Q  \9 i    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + `1 b- g" u5 S1 s5 O3 R) m+ z, N  v      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 v1 }7 @" ?# \2 K: N     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 M$ L6 R& N: H/ T     "}"}], ",", - f: c$ [7 D5 ~7 s. |# m) L
       RowBox[{"{", * p% N! k& q5 X8 h  N: V2 I/ G2 H
        RowBox[{
    9 I. h, l: e( H- H- f: H    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ h9 j: P5 I: Z' s  i
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , e& {: X" P$ f4 \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],3 t0 u. q3 C; ~" {
         "}"}], ",", # n1 r9 y5 g- V( }5 _
       RowBox[{"{",
      ~/ Z/ b2 C" C  Y  o3 f2 h% u    RowBox[{
    / y- c0 g7 F" R  m( l( D/ b1 N. B    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 h' ]" q) i5 S7 J) i      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 9 @$ E2 G0 _# S- C
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 r7 h0 I: O" I# J
         "}"}], ",", 9 S6 F" O, v9 z! n3 L4 k  t
       RowBox[{"{", 8 M# R+ ]8 A) y
        RowBox[{
    4 j' ^+ w0 z6 y- Y, y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 `) U  _: s7 g2 N2 L$ o2 J
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & _% Z; [3 f! H5 A     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 Q1 c# E; F& x
         "}"}], ",",
    , L" z4 h; B" {( T6 h$ a   RowBox[{"{", 4 W. H/ D7 W: ^( c# w6 M; x1 ~- L  G
        RowBox[{: B; u( B5 R! L% w# O
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    4 u) O8 c  I- h9 P% l- A6 _      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 P$ I% j$ b' w     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, \) t# x1 N6 f/ ~
         "}"}], ",", : d5 @4 j" a0 \0 w* Q
       RowBox[{"{", % Y' z0 m- x6 y& x
        RowBox[{
    " C" `' P) a) k& F    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' f# |# |0 w7 B0 }) ?      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - c. I, {+ R$ C3 p/ C
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & U3 Z; A: A( l     "}"}], ",", # c5 A9 E  ~# k. A8 h
       RowBox[{"{", # j, e9 y  g! \# e/ m8 B% A
        RowBox[{) f4 t3 X  v  o5 z" g0 b* d' ^
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : O" @+ K# s: z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 r  V5 D$ ?1 u3 p" O2 A5 H
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, `+ E, t# e7 R5 B* B, y" b
         "}"}], ",", 6 O+ f; T- M0 [; i
       RowBox[{"{", 8 H0 }7 a9 H8 F# m6 _* b
        RowBox[{) q( c( ?9 H4 _
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 Y3 u, u  v  {2 z( U5 P* t
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( P* [  W; S( ~
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    6 g) L. y- w! H8 F! t% e& |9 p     "}"}], ",",
    / j' D* ~+ w: W( T# a# i   RowBox[{"{",
    ! v" L, z& s- b1 W- e    RowBox[{
    , W* x- Y5 V4 E2 f$ a% w( P+ \! ]    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 B2 `9 d& p! R3 s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", % I9 g4 O1 P* |: o: w3 U( j- B
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 U7 @# `. r1 E4 Y  O% _& f' z* z     "}"}], ",",
    # t: B! x- |( }! }% r   RowBox[{"{",
    $ X- O6 x) M0 v: R! E+ s1 z    RowBox[{
    . S; p# N* f2 Z9 T! \) J3 U* ^    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",( \$ M( w8 e/ e/ k; a2 e; Q) e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 F8 C9 y0 M* Y% _9 E& j     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],$ e  c9 s* W2 H2 i! M4 K6 [
         "}"}], ",",
    $ t9 @& ~2 ^5 z   RowBox[{"{", - z2 O, e! Z4 h1 M: Y0 {$ v4 g' k
        RowBox[{
    5 S4 v8 x& C: X- e6 Z' |6 m1 E    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",  ~- L2 E  q$ i7 D: n! `
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * r: f7 d- [! I6 @* A) x- m
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. k1 Y5 b1 J( @+ |
         "}"}], ",",
    * g, a# R8 p* e; J! \   RowBox[{"{",
    4 o5 t( K& ~4 j# j5 [! f; w4 D9 p    RowBox[{  B! ~' _! k8 c$ Q; q, k+ X
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 m7 Y9 R  ~4 \7 ?$ }4 o5 g. p
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " x2 r+ v, t4 K+ `# j" v     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) p) L' V9 ^+ T$ \     "}"}]}], "}"}]], "Output",5 d% G4 e- }2 N
    CellChangeTimes->{
    # G9 d  S" ?. H* |  3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9},
    ) I# S3 n, l; d   3.577957579987569*^9, 3.577958891536294*^9, {3.5779619459910836`*^9,
    ) O5 V2 T9 w1 u1 c) I# L( k   3.5779619748823338`*^9}, 3.578012345453125*^9}]
    9 u  K  f. g( e( i2 x}, Open  ]],
    ; v6 Z; q* d& v/ j" r& u6 r; W$ c- J) t
    Cell[BoxData[
    0 _7 T  N. w3 z4 O. K RowBox[{"For", "[", ! @- {1 J: |* r  n" S
      RowBox[{* b% ]6 w( o+ B; Z( c
       RowBox[{"i", "=", "1"}], ",",
    7 h1 n* A1 a2 t1 y  i" H   RowBox[{"i", "\[LessEqual]", "60"}], ",", & f, r9 y& d! b8 P2 {! H( v
       RowBox[{"i", "++"}], ",",
    - n' D( S! X" f# {   RowBox[{"{", "\[IndentingNewLine]",
    / M' p, c4 ^7 e# Z1 I    RowBox[{  y# D7 w6 q+ Y4 e2 [% j
         RowBox[{1 f1 z3 f. q1 h1 H. A, R/ c; H
          RowBox[{"m60n21", "[", " ]6 h% P& l& T' r  T7 \0 n! W/ \: ^
           RowBox[{"[", 4 Q/ v; L# i2 W8 U1 A( l
            RowBox[{"i", ",", "1"}], "]"}], "]"}], "=",
    ' |* u+ n0 X6 Y, k: t      RowBox[{"u1", "/.", . d- l( W2 o3 `8 L* \
           RowBox[{"{", ! h% ]; _; k( }* y
            RowBox[{
    9 T8 ]! q% m. c2 Y0 B- h         RowBox[{"x1", "->",
    , O8 P$ j" E3 h9 i$ T: Q! v! I8 _0 ^          RowBox[{"Data", "[", ' F# {' A# I; H. ?6 {. O
               RowBox[{"[", " c7 O+ x/ H! P& V8 W1 y
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    & B; ~. p- h$ t' l         RowBox[{"x2", "->", # x3 p0 t7 \( A; w3 x
              RowBox[{"Data", "[",
    6 u  X/ i% Y! k$ N# K           RowBox[{"[", 0 ?* o& J* Y8 c2 i) p) D# Q
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    ; ]% d, C5 o' Y. H4 ^! }+ T  Z         RowBox[{"x3", "->",
    6 h- D- z# M, B* N          RowBox[{"Data", "[",
    + l6 U. Z' {: }           RowBox[{"[", ( O, L( p' v, h, g
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    ! _; Z: r* I0 h& c7 k* N         RowBox[{"x4", "->",
    ' P) e2 b" w, s          RowBox[{"Data", "[", - s( f+ ?* @, {  G$ X( X! W- m; [
               RowBox[{"[", - R) p2 F  r" a2 [- I
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
      w$ }8 K  d& U, ]5 ~- e         RowBox[{"x5", "->", , l; i; r( I) u6 r# e( ^! h8 ]
              RowBox[{"Data", "[",
    ! q: D- j2 b' x( O           RowBox[{"[",
    1 X. _+ t' X& j) P) F. }            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", 2 g1 r+ a4 \2 w) M- e8 g5 D( d7 G
             RowBox[{"x6", "->",   ]* W, j% W( j
              RowBox[{"Data", "[",
    ; g% h# n2 h: F           RowBox[{"[", 2 ~( [- F2 X# G: g6 f
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", ! W# W) ?: p# l- }% n1 o
             RowBox[{"x7", "->", " m, E: w' w4 x
              RowBox[{"Data", "[",
    ) E' l# I, D$ ^  _0 ]* m           RowBox[{"[",
    5 I# e7 o- ^  h) ?" X/ _$ G            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    2 V- |5 I& y4 x3 V* V/ g         RowBox[{"x8", "->",
    . A/ T4 f* M2 v          RowBox[{"Data", "[", 0 G6 \/ J4 m& ^, m- X7 i, b. E
               RowBox[{"[",
    % G1 a* o" g9 b            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    6 N6 G: p5 m( k0 |8 o         RowBox[{"x9", "->",
    1 S! q& X$ S9 y  H          RowBox[{"Data", "[",
      v6 [, w2 F* S8 I; [/ \& R) A! j           RowBox[{"[", + M5 E6 b5 q, v7 Y( G+ w0 c
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", . z' t8 \- ]& }1 A3 K/ T
         "\[IndentingNewLine]",
    3 m5 {" o9 q& F/ P     RowBox[{$ h) E/ U5 C4 f6 @1 a3 p
          RowBox[{"m60n21", "[",
    1 H% d# W" X5 e$ `2 f       RowBox[{"[", 7 |* J! N7 h- H% T
            RowBox[{"i", ",", "2"}], "]"}], "]"}], "=",
    9 K( }6 g! s' B* `* @* t      RowBox[{"u2", "/.",
    % _9 r: j4 i9 ]: J9 W& s) }8 H       RowBox[{"{", 6 Q2 z* R* q; l( j7 D! d5 G: H3 a
            RowBox[{
    : M1 K' |  ^' o& t+ w! T         RowBox[{"x1", "->", ) V: ]7 v6 \' o% n6 S3 L* n/ S7 }
              RowBox[{"Data", "[",
    & j; @) P1 T# w" D' O           RowBox[{"[",
    + x# v6 C& w' w* D) Z            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", 5 k/ Z0 f, x) t$ J9 G- `& g& ~
             RowBox[{"x2", "->",
    ; T( u4 e/ d8 n8 T: M          RowBox[{"Data", "[",
    2 E- i% S! l8 {$ m           RowBox[{"[", , @; ^- S$ m5 e" c) \' P
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", ( E/ m0 l2 X  M3 W& I+ _
             RowBox[{"x3", "->", 2 R( I4 Z: E3 A6 e) ]
              RowBox[{"Data", "[",
    " M  o/ z4 i8 n6 j. h$ `           RowBox[{"[",
    8 v3 Y! I. m; b" T            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", / s4 `' W" b( D$ I& l' |, b7 E9 Q
             RowBox[{"x4", "->",
    + k( v  T4 o- K5 O0 a6 S4 w          RowBox[{"Data", "[",
    # ?1 q- y5 T( n) e' ~. g4 s           RowBox[{"[",
    ! q5 _1 V: z) U. c/ c* w            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 5 L5 A1 Q2 S0 h6 [+ K
             RowBox[{"x5", "->", ! b4 P, P2 c! c5 s' r
              RowBox[{"Data", "[", 6 n: A2 ^) H; T8 L
               RowBox[{"[", ( B  N* L; p( H% J6 [: w7 J" _& I
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    7 H* U* @# F& I6 I& |; D         RowBox[{"x6", "->",
    4 c7 p9 l. ~& k/ G          RowBox[{"Data", "[", # [  ?6 F$ U5 }2 k
               RowBox[{"[", 0 y9 n6 S- R5 `+ q  o
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ( x1 d+ X; i( v7 S$ A         RowBox[{"x7", "->", , F, R. _1 a' t
              RowBox[{"Data", "[", - L; e5 `& J  N& J: K3 g6 k
               RowBox[{"[",
    $ T+ K5 X1 `- L/ I            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    & U$ a% f3 u$ M) G* x' q+ G         RowBox[{"x8", "->", ! m) J4 d7 i, J
              RowBox[{"Data", "[",
    ! K$ K+ g: V  \7 T4 f3 Z           RowBox[{"[", - }+ I: ]; s7 q* o( r0 d0 l
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    + P& X. t) c, z5 l9 F/ U0 y' T/ J* E         RowBox[{"x9", "->",
      {( n. n% @; I; {$ Q, M) G1 b          RowBox[{"Data", "[",
    $ B& @+ s' {9 E5 e' L4 |           RowBox[{"[", , |- O% P( p0 ]) Y& M
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 6 \) W# i0 ^  V" P6 V" @+ L) x, H
         "\[IndentingNewLine]", 7 j# Q9 E9 N3 V: k; j  T
         RowBox[{
    + Z. C2 q3 k# r& S      RowBox[{"m60n21", "[", - p, A" T* y1 d  ?+ v2 I- @; Q
           RowBox[{"[",
    " H2 i9 b; @8 D' T: y8 C4 b        RowBox[{"i", ",", "3"}], "]"}], "]"}], "=", 9 y) s1 z) I  U; {0 E) ?
          RowBox[{"u3", "/.",
    ; M' u* H! j5 B7 a       RowBox[{"{",
    # T) [, t. g% Q1 z& c( v- P        RowBox[{4 t3 ^" ]% \( p- t. W
             RowBox[{"x1", "->", / k5 A. Y0 u: D* f4 @3 t6 ~* l
              RowBox[{"Data", "[",
    7 X( O. R+ z7 a0 u& p/ q           RowBox[{"[", ' I2 C( f. _& y7 P$ H" b0 D
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", $ n  u% j# e4 R" }& r
             RowBox[{"x2", "->",
    7 O. Z% s( K  @9 d0 R, j          RowBox[{"Data", "[",
    0 w+ q# v8 V  S, z! D+ |: F# Y           RowBox[{"[", - Q  S4 x8 |# A
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    8 a- j/ ?1 m: |2 W" g7 n         RowBox[{"x3", "->",
    + v: w* I' L$ A7 ]          RowBox[{"Data", "[", . z9 }) s' G* [& @! d9 M+ z6 F5 |
               RowBox[{"[",
      Y2 L, {: W* @1 _4 [- G$ w            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    1 U9 {7 S4 T7 F; a% q         RowBox[{"x4", "->", 4 k0 H# O; V) M# c9 }
              RowBox[{"Data", "[",
    * N" p8 S& S  q/ y% y           RowBox[{"[",
    + a4 q: i3 l0 c$ Y. ?            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", ) p" d5 j/ x, j9 @) b; D: P
             RowBox[{"x5", "->", * ?- g" x. R; ^0 M6 Q9 H% z
              RowBox[{"Data", "[", * |, X% I! f* T; h. V1 ^
               RowBox[{"[", 5 ~' r* m5 {& l% y" q) F
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    8 O; h% m* Z- h6 f8 Q% E         RowBox[{"x6", "->", $ C  U4 s* q+ a# m& F* }
              RowBox[{"Data", "[",
    ) P# Y( Q+ {. ^; B7 O) p           RowBox[{"[", ( H3 d& U: M, l$ N2 q
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    % v2 W( ~9 a' P         RowBox[{"x7", "->",
    % I- a1 Q9 t% S; S% @$ o6 A          RowBox[{"Data", "[",
    4 o. q& p5 u7 p* _           RowBox[{"[",   {" i0 S' j  ]) R0 w7 I
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    % L+ o5 E9 [. N" |. @" d         RowBox[{"x8", "->",
    + R3 w6 E# ^' U/ X" b9 Y          RowBox[{"Data", "[", 0 G% S1 ^5 O$ J" d+ j/ X" i& q
               RowBox[{"[",
    4 c8 k# K: p9 ], @) U7 U1 p            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", , K0 }' }) h( A6 _0 Q) ?3 E
             RowBox[{"x9", "->",
    , Z* M: W+ F+ N" k1 w          RowBox[{"Data", "[",
    % d% i- ^) Y7 q6 @: Q( O# x* Y0 X0 s           RowBox[{"[",
      x+ g' @4 K5 E( n8 {$ Q            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 1 B/ W% e# _  G' f* [6 a
         "\[IndentingNewLine]", 2 v/ V$ J, k+ |6 O" c% z
         RowBox[{! t6 G  |3 @# g* K( o' I
          RowBox[{"m60n21", "[",
    ; P, g, D4 u8 i+ q3 z       RowBox[{"[",
    " h- \6 y: I! K2 R        RowBox[{"i", ",", "4"}], "]"}], "]"}], "=",
    5 N4 N# C7 p# L5 k( O( z      RowBox[{"u4", "/.", - G1 K% `4 m6 S: x" E: X
           RowBox[{"{", $ Y- K; T2 u" O+ x7 R/ X
            RowBox[{- w0 A: c' U4 p* T
             RowBox[{"x1", "->", / @1 U0 Y6 q# K+ I& ]
              RowBox[{"Data", "[", / S  [2 R7 ?, n# c
               RowBox[{"[", , v$ Z: P1 S7 K
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", / ]) A2 S: A: C/ i$ K" u
             RowBox[{"x2", "->",
    % n) m4 B, }$ [! W8 I5 `' c          RowBox[{"Data", "[", % a) K" c* t" f2 B
               RowBox[{"[", 9 \1 J0 J) v% O4 B8 P- L0 E* I; C% T
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", , Z: @* b7 |! S# d, B$ L0 w% R
             RowBox[{"x3", "->",   {# a1 M' g  I1 U( s& ^
              RowBox[{"Data", "[", 4 w) m+ |0 W1 P
               RowBox[{"[",
    8 c$ x% x7 C5 o2 `" ~2 @, ?9 y            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    ! ^5 q) o' N5 u7 u/ [$ I$ ?( b         RowBox[{"x4", "->", 9 E0 h$ I7 K2 v8 E9 h
              RowBox[{"Data", "[", * J/ J# b( a( H
               RowBox[{"[",
    2 P/ k# I, {) C2 i            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", + E6 {2 O4 P/ q( V9 g2 j0 B+ _
             RowBox[{"x5", "->",
    2 q3 I( d& k0 k% ~          RowBox[{"Data", "[",
    . Y. E& H! ~- m8 D" H1 H! E$ N           RowBox[{"[",
    & j! A# ?4 G% U3 ]# z7 S            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", * t1 E2 k" @. S! S
             RowBox[{"x6", "->",
    ; x3 K% L' o" [( H6 U% h$ H          RowBox[{"Data", "[",
    5 U7 F( U9 A9 I4 ?           RowBox[{"[", ; s3 m9 `& u/ v, C
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", % _, P# j+ t% i8 w7 w
             RowBox[{"x7", "->",
    3 d6 v4 ~5 }' e" k" O          RowBox[{"Data", "[", 6 z( y3 x# U) A5 x$ g1 I; p# j- p
               RowBox[{"[", * h6 |$ d4 v3 Y, ^7 I) f
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    1 F; \5 D* r/ ?3 h8 V0 N         RowBox[{"x8", "->", 5 o* [# y" s. x# z/ ]4 i7 w# \
              RowBox[{"Data", "[", / w& ~6 K" j% c2 l: ?1 {0 ~
               RowBox[{"[", & W5 l0 Y) |6 z! O9 ^) @
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    3 R: R8 t0 M6 s& k0 y4 }         RowBox[{"x9", "->",
    4 \; s7 w1 t! g: u8 Q3 O          RowBox[{"Data", "[", - `' O, Z* _0 i! I4 c6 T  r
               RowBox[{"[",
    " W6 d  J% V' U/ t! |, y2 A2 j            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", ' e2 n3 _2 G$ ~2 T' ]" @" R
         "\[IndentingNewLine]",
    6 p" k' h- I5 Y: Y, f5 w' h     RowBox[{8 D1 P# v6 K5 Q5 F
          RowBox[{"m60n21", "[", # V# N$ i  W- T4 b3 K
           RowBox[{"[",
    9 ^. h5 h- [- g3 q        RowBox[{"i", ",", "5"}], "]"}], "]"}], "=",   ]: I, t6 e" n6 f, q: N; v0 s
          RowBox[{"u5", "/.", & j4 W( X8 B6 q
           RowBox[{"{",
    # N4 N9 f( _/ p        RowBox[{
    * T% D1 @' q  F3 q% C! G         RowBox[{"x1", "->",
    ' w! D) D/ _/ k6 w          RowBox[{"Data", "[", 6 A# }0 R4 _4 h; ]4 x8 r  F
               RowBox[{"[",
    ' S8 o% ^. }2 a) K; a( j% v" L            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    6 C- W5 Z: v* |$ |8 J         RowBox[{"x2", "->",
    ' \1 C) J% n" A8 i, B7 X/ C6 U1 [          RowBox[{"Data", "[",
    7 a0 w! V$ v5 U# q; D; U           RowBox[{"[",
    1 a/ o6 ~. Q4 y% G            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", # I6 |1 g" ]; M0 H$ }6 [
             RowBox[{"x3", "->",
    + m3 [7 b' C7 ^: Z# n          RowBox[{"Data", "[",
    3 u+ @( ?& T( K) H/ h           RowBox[{"[",   e' Z3 l' `) E: @# ~: z7 G6 T
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", & J+ h, d% u# o9 h
             RowBox[{"x4", "->",
    0 }0 C7 F/ _% B( p  l8 q% W$ L7 s$ g) W          RowBox[{"Data", "[", 9 C( m* y" p* ^
               RowBox[{"[",
      V% f/ \+ J  r& [# K            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    ( o' c6 O( J, }: \8 M- G# ?         RowBox[{"x5", "->", % Q# b0 L! X. m5 B" t6 i
              RowBox[{"Data", "[",
    & ~" P6 g* N  _8 O* M. g/ v           RowBox[{"[",
    6 w$ V$ x4 [# c$ E, L( e            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    6 Y8 O" @) b: I0 A         RowBox[{"x6", "->", % G' r2 ?  c6 e1 o9 C" \
              RowBox[{"Data", "[",
    $ _3 u/ \- Q" s           RowBox[{"[", ! A4 _4 z" h8 l) J3 T
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", % w3 G+ {! p$ u* R
             RowBox[{"x7", "->", + C6 Y: r- U7 |; p
              RowBox[{"Data", "[", , _/ t! H8 }( H3 K$ P
               RowBox[{"[", * Q, F1 H5 w7 i: u% C. Y' c
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ' g1 [9 S, M; g# D
             RowBox[{"x8", "->",
    5 N# t* Y. {4 w+ i8 I# b' {. n) A          RowBox[{"Data", "[", % _8 v( L9 ?6 m( d: b
               RowBox[{"[", : ^  W: l- A3 a1 I$ O
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    1 y: o* {9 B! @/ _         RowBox[{"x9", "->", 7 P# o! Y% t9 c  s, P( e
              RowBox[{"Data", "[",
    9 E8 F, x2 s/ ~' R5 j0 R           RowBox[{"[", + j9 x# u5 t' I( @/ X$ Y  A
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", ; b6 l& I8 {% o3 _& o1 L
         "\[IndentingNewLine]",
    2 R. w, e6 E8 I0 T/ \     RowBox[{, M" L8 n. q/ z$ z+ Y' [
          RowBox[{"m60n21", "[", ! ~7 [8 L- c5 q
           RowBox[{"[",
    ) C( E  k1 D0 s1 D9 a6 c/ r; d        RowBox[{"i", ",", "6"}], "]"}], "]"}], "=", 0 D1 [3 X( U' n9 [% Y5 [
          RowBox[{"u6", "/.",
    ( ~' v" l- d& n' i; u6 E       RowBox[{"{",
    % t6 K6 C, U* t' z        RowBox[{
    ) B, W( |! I' S: P9 Y% @: k         RowBox[{"x1", "->", ! L! T% x  U" o; n4 @" ?
              RowBox[{"Data", "[",
    . ^) Z& C& x* x5 P9 F           RowBox[{"[", + p$ e! z' \* }2 `% Y! m
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ; b+ g0 w& k4 x9 A1 \# b
             RowBox[{"x2", "->",
    * c; j/ d, ~$ c  Y          RowBox[{"Data", "[", & w, A6 w, s) S
               RowBox[{"[",
    . {9 F1 r/ `* D4 x) E% g2 l            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    . Q# V( t% M0 F1 T1 f4 }2 c: g         RowBox[{"x3", "->",
    9 N: F8 V8 U2 k( [+ [& j% e6 c$ g          RowBox[{"Data", "[",
    % n# L; m, {7 ]8 a, E           RowBox[{"[", / |, `' J! `0 H. ?
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", ! Q" T: V3 H! W7 n% ^
             RowBox[{"x4", "->", " a. A3 c. E- U, o8 S( @
              RowBox[{"Data", "[",
    ) Y) \  J- v3 E% f% N0 z$ D- A           RowBox[{"[",
    0 s; u& g& q1 F& u            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    ) x7 ?) U3 W/ H: l% X; A" k         RowBox[{"x5", "->", / _  f, f6 v" o& ], h# O4 g# ^
              RowBox[{"Data", "[", + C1 O! L; {$ v, a- @" l
               RowBox[{"[", 0 T5 w8 ]+ B& ^. |  a+ v7 R- Y! U$ U  k
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    ; b3 P& _( e$ s! k         RowBox[{"x6", "->",
    ' _* g4 {; j$ y7 Q1 j: t          RowBox[{"Data", "[", " x* p) b4 v# K7 O" S# H# m
               RowBox[{"[", 0 m+ |. s" ~/ d
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ; c; c8 ^$ t7 M$ {& Z7 b         RowBox[{"x7", "->",
    # `. t3 _/ ^' E8 b; |9 M6 y          RowBox[{"Data", "[", ; S2 h- H3 Q3 `: P  [% _
               RowBox[{"[", ) a$ {# V% d9 n$ a' e5 v
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    , e, g+ ^) Y' v& A- F; Q         RowBox[{"x8", "->", 2 A* f% j) q! d! p- B9 \: K2 d
              RowBox[{"Data", "[",
    & a+ n# w$ K: t+ s1 ?& X           RowBox[{"[",
    4 D& Y3 }* R4 C2 S9 {3 d            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", & u4 K# l8 X% q$ P3 C
             RowBox[{"x9", "->",
    1 s& X7 u9 s8 L3 g/ `          RowBox[{"Data", "[", ' x! o8 r+ u2 s
               RowBox[{"[",
    ! X6 f3 j( v4 `0 L8 B            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 0 Z9 T* z% g5 A# S( U
         "\[IndentingNewLine]",
    # z6 D7 b7 J7 o- s7 d9 p0 z  t% Y7 @     RowBox[{
    6 A0 A& ?- Z9 [! B; ^      RowBox[{"m60n21", "[", $ _3 x$ k, D2 J! s2 ?$ ?: A
           RowBox[{"[", # p7 f( Z6 `9 b0 _. Y" v* p! W
            RowBox[{"i", ",", "7"}], "]"}], "]"}], "=", # w+ C0 @! a% Y, _; @& m) I
          RowBox[{"u7", "/.",
    6 H, B6 g6 V% n" W' u' d$ f       RowBox[{"{",
    4 B& p! U5 Y0 ~. Y        RowBox[{
    ! f+ s( @5 t& q5 n3 j% r' K         RowBox[{"x1", "->", : y- Z& f" e4 f3 e
              RowBox[{"Data", "[",
    ! ?$ A/ M. L2 ]) w% y6 t% d           RowBox[{"[",
    ! C# B# c2 @' t- A* d            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    # A  G: A) y4 D( ~5 E         RowBox[{"x2", "->", " ~8 [/ t- a2 }. u) m5 D# x
              RowBox[{"Data", "[", " `$ g' n! C" _( {5 B1 z& Z
               RowBox[{"[",
    8 q; ]* w' l1 W% P/ c: [$ b            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    8 L% ~. Q  S3 U7 `4 |' B; d) B         RowBox[{"x3", "->",
    : N# r1 T  n/ q# L: L* W          RowBox[{"Data", "[", , ]  V  O. ?0 t4 Y+ e$ X7 ^" l
               RowBox[{"[", : H7 r/ W; I) O$ R/ Q, {; b* ^
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", $ x% I" |" x1 ?- m$ g
             RowBox[{"x4", "->",
    # R' Z/ G0 g' Q          RowBox[{"Data", "[", ) U  o8 m" E6 |1 {5 g& K% b
               RowBox[{"[",
    # H0 }* @4 c$ A            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    2 W  H# a' B1 l) x4 F# a, ?         RowBox[{"x5", "->",
    0 \2 T/ J5 Z$ n" V6 W          RowBox[{"Data", "[", " B8 r* H2 o' I  F* Z+ n5 R
               RowBox[{"[",
    + `# J" l; D- s/ X            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", " t& a+ J2 R5 a: V& E1 U. b* J4 \
             RowBox[{"x6", "->", 7 T, g! b6 U- G# S* E+ W
              RowBox[{"Data", "[", * f" m- l0 W( ]
               RowBox[{"[",   ?. l: j7 b& T* M0 w
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    2 K7 P9 E8 Z; K" F* o) R         RowBox[{"x7", "->",
    9 L& z1 |+ @; X/ m4 }          RowBox[{"Data", "[",
    4 Z- S: a/ x& e- `7 l9 \1 @           RowBox[{"[", 8 f) i* ^- Y9 w
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    2 ]; J1 @" f1 ~# ~, c' u         RowBox[{"x8", "->", % n! s2 \8 n  b
              RowBox[{"Data", "[",
    $ T) f1 \, d* Q) S1 @           RowBox[{"[",
    ' J" `6 \4 z7 |% t5 v' T" [0 M            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", ! q2 T/ G) H/ T0 O$ Y3 ?  B+ N, m9 H2 n
             RowBox[{"x9", "->", % M/ }  {, s; A& Y: f* E6 s& C
              RowBox[{"Data", "[",
    , k2 w4 e, Y: t2 T. f2 N3 s- z           RowBox[{"[", ' t! W: {2 u) ]4 Z- K2 A
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    1 T( P1 j/ I* A) m( G* e     "\[IndentingNewLine]", $ L# q- B3 u9 Y! u+ e8 p
         RowBox[{
    0 N! m& q5 g1 }  N2 f      RowBox[{"m60n21", "[",
    ; ]7 u; ~6 \; d. |& b9 ?' t3 B       RowBox[{"[", / l$ @0 _: |4 p- k' U
            RowBox[{"i", ",", "8"}], "]"}], "]"}], "=",
    6 l9 t8 K& u2 I0 x# ?      RowBox[{"u8", "/.", 9 |. n* I/ a) J
           RowBox[{"{", 1 q& }  ^0 M' k! H, x! @! b  P
            RowBox[{
    & H4 K% g+ ], S: _! B8 i1 E+ H         RowBox[{"x1", "->",
    . G) D$ H- z/ t( R, U) @          RowBox[{"Data", "[",
    ' N9 I- k$ x" v8 U           RowBox[{"[",   ?2 J" e( X- {; z- C
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", + D  d' m8 l1 v
             RowBox[{"x2", "->", / b% h  _  \1 D  R4 i) P
              RowBox[{"Data", "[",
    - z) M2 `4 `' }: c* m+ r- t  F. T' `           RowBox[{"[", ) M8 r, c6 W' X. o. I; V
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", 9 Z. e6 ~" S4 O# o% ~2 j4 F8 C
             RowBox[{"x3", "->",
    9 u0 ~$ E% e: F! R& ^, h          RowBox[{"Data", "[", ! Y! Z4 O* b9 ~5 q
               RowBox[{"[",
    ; N4 Y! q- m$ v+ s3 z            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    # a, \0 z9 x, W9 d6 ^% D5 H         RowBox[{"x4", "->", # E( Z( J9 m# Q
              RowBox[{"Data", "[",
    . l6 \8 G2 C/ ~+ O1 g" U           RowBox[{"[", 7 Z% o1 n% a5 y( U( I
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 5 C( I' }" @7 v% k
             RowBox[{"x5", "->",
    ! o! Q+ n2 d% z% ]4 y/ u, h) S          RowBox[{"Data", "[", & t" T: S( F( z
               RowBox[{"[", 7 G( e( S6 M+ p& t
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    6 b4 S' l8 u' P* m% x. J$ J# o         RowBox[{"x6", "->", 5 o' r' v, N7 O  Y! v5 ^
              RowBox[{"Data", "[", . {# Y8 W# C. D5 b
               RowBox[{"[", 3 `1 c9 V% `7 X; X- f
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", & P) }2 f' }: `  z$ x
             RowBox[{"x7", "->", ' K! F, @8 @; ^
              RowBox[{"Data", "[",
    1 N+ R# q4 M2 V           RowBox[{"[",
    ) A& d7 H6 \  \, ~$ x            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    7 y1 f3 {* [. G6 ~* c; O- X& `' H/ j/ X         RowBox[{"x8", "->",
    7 T7 b/ j: O# K3 _  T: R" s          RowBox[{"Data", "[", 8 |3 u8 a; E5 Y2 i4 ?
               RowBox[{"[", # d) ^5 m  c  e4 w% W8 I, B
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 0 T' r, [2 Z5 j. o* I/ _
             RowBox[{"x9", "->", * [/ i+ x$ [& q6 f: {
              RowBox[{"Data", "[", - s% m$ e1 P. c) \9 E, @
               RowBox[{"[", 0 ~+ j- r4 ^! c+ p( e. \# d; `: g
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    $ D7 z9 w2 z; n5 O: r8 H# S: K     "\[IndentingNewLine]", ( @* n4 h- S' w9 V" N" J5 W
         RowBox[{- E7 i% d& o9 z' B) V" i8 B3 i
          RowBox[{"m60n21", "[",
    % x* \* k4 a- `8 l) |& E       RowBox[{"[", ' P! C& D% O% r- G% l) F
            RowBox[{"i", ",", "9"}], "]"}], "]"}], "=", , q8 J# W3 s; C. l4 s. Z
          RowBox[{"u9", "/.",
    7 f+ H, U0 V2 {5 h$ P) L2 P" @       RowBox[{"{",
    . S' }; h2 @+ d8 ~( E        RowBox[{" i/ Z' y! E$ L7 U. ?7 P8 S' g
             RowBox[{"x1", "->", 7 o  {* J3 R' h) ^( c! A
              RowBox[{"Data", "[",
      ^/ }+ Q9 F3 _, o% m2 u9 F; i6 O9 ]           RowBox[{"[",
    2 A/ J6 W/ s" d2 k( J. A            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ) P$ L* f0 P5 g0 |
             RowBox[{"x2", "->",
    5 J% j. C; b7 m; x0 _          RowBox[{"Data", "[",
    3 m" v% B) p$ O7 Y& N           RowBox[{"[",
    / r: s- ~- l  |2 Z/ @            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
      g3 o4 Q8 n! ]7 ]/ l. z. @         RowBox[{"x3", "->", 0 L$ u' C7 ]% R& g
              RowBox[{"Data", "[", ( G! w- k. f  }" t8 g5 o
               RowBox[{"[", 5 ^% |* P$ p6 _! w
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", / H1 d& E2 R" C2 C
             RowBox[{"x4", "->",
    6 U! j" M5 q" X% b# L          RowBox[{"Data", "[",
    ( o8 G/ |7 P& G: b           RowBox[{"[",
    9 o$ _! K+ W& }            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 5 N7 {5 Q  G4 d! x+ `% c' [
             RowBox[{"x5", "->",
    3 i3 L+ |0 W( B; |: d# j! Y+ u! k( A# D# H          RowBox[{"Data", "[",
    0 r% `9 Q' k. ?* l7 y           RowBox[{"[", 8 m& e( h4 V5 n- s( d) r) y1 O
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", % @/ M) T4 q' j# @  x3 Y( E" u
             RowBox[{"x6", "->", 0 A% M- i  Z9 U# Z
              RowBox[{"Data", "[", " E/ r* h, m6 W: S6 u3 r, B
               RowBox[{"[", ! Q- `$ J: m( r$ N: F6 K( n
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ' f* T/ y: a7 U5 j2 O  s         RowBox[{"x7", "->",
    # I( A, c; u6 z' _, o3 a9 Y* B          RowBox[{"Data", "[",
    5 T0 v) G4 {1 q4 w- i& h2 I* o. x           RowBox[{"[", ( j& e  \5 s/ k8 D" U, r
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    , l1 b4 p7 U% |5 D         RowBox[{"x8", "->", 4 \+ }6 V% C' I' w
              RowBox[{"Data", "[",
    # B, O2 K0 n! j. |1 c           RowBox[{"[",
    4 @  v5 h+ F9 B$ ?            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 0 w3 `7 \! x  E4 S$ F& y
             RowBox[{"x9", "->",
    & }9 n' ~- Y2 s          RowBox[{"Data", "[",
    % S$ W* M$ A* G$ R- ^4 S4 g5 _           RowBox[{"[", 0 C: k, p: J! e/ P; S3 q. Z: a
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", " `! j) k8 z) z8 Y$ L6 x% c$ H1 r9 V
         "\[IndentingNewLine]",
    ( K$ J. z( M+ U: u     RowBox[{
    ( u$ J& D! u$ D3 _, s: P! v/ P      RowBox[{"m60n21", "[",
    # m# w% ?9 A' v) L* [# h3 @       RowBox[{"[",
    9 _5 p+ e6 W) N4 z; k4 h: s) ~        RowBox[{"i", ",", "10"}], "]"}], "]"}], "=",
    % ]/ T' S' Q; I2 r# d      RowBox[{"u10", "/.", 2 P/ q0 G, O' ~7 F- T0 r4 t8 o
           RowBox[{"{",
    / y& s0 p" b. n6 d2 \- K% ]6 P8 {        RowBox[{4 Q& V/ B- `) U
             RowBox[{"x1", "->",
    & z" r7 w, J" L9 z: T' @          RowBox[{"Data", "[", 7 K* i( ]4 f. Q1 U( V# b$ m3 r
               RowBox[{"[", + ]1 V  l# x% s$ J0 u/ ^
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ! V2 {# g2 c, L/ L- [1 V; f: X: O  X: V
             RowBox[{"x2", "->", $ T5 z( D: i; U* O" k
              RowBox[{"Data", "[",
    3 M3 P: h* x) P" I: ]           RowBox[{"[", : @" }: O; E2 L* N# z& @
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", % \9 u0 P) h9 K; O) X  A" O) b
             RowBox[{"x3", "->",
    ; w( i9 m" i7 o- g& M% c          RowBox[{"Data", "[",
      c0 q; P8 R" W: [$ q- R/ c           RowBox[{"[", 8 i9 W- [7 _3 W
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", , x- j1 r+ l, n% J$ ^  O! F
             RowBox[{"x4", "->", : _& F: k9 R& @: E
              RowBox[{"Data", "[", 1 F# M7 M9 N; ]
               RowBox[{"[",
    . Y( C3 \* H" s! {7 u% }4 r( e            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    $ w0 |4 C- u/ L# b; {7 j! t$ }. M         RowBox[{"x5", "->", ; y7 D* ~' b6 c
              RowBox[{"Data", "[", 8 k# v; D; f" Y) W5 J0 S. |% o' o
               RowBox[{"[",
    , D6 i+ `. m/ q3 h0 ~) x+ y3 a            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", + N% X/ }" Y! y+ z9 c
             RowBox[{"x6", "->",
    : o, i' |7 ^& W; a" m% Z          RowBox[{"Data", "[", : ~2 X/ C5 p% e7 i2 }  r
               RowBox[{"[", + B# r/ m$ _  ~3 p4 ^: A! I: Q
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    7 W! S9 t8 }/ L5 d1 F" Y1 d. z& Z0 S         RowBox[{"x7", "->", , {; E7 v0 X+ X! n  K
              RowBox[{"Data", "[",
    ) h) C) F6 ^7 q, u$ b8 k( ~           RowBox[{"[",
    * b, i1 s* e$ s) A            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    , d/ d/ H& K" q9 k         RowBox[{"x8", "->",
    7 X6 @1 w3 Z6 T          RowBox[{"Data", "[",
      B) ?. r5 |7 ?2 K7 R( d: f: ~, {           RowBox[{"[",
    + e. R9 R& k5 M& @6 @* G. I- v            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    : x3 }# M& _9 ?2 ?; k) w# l& M         RowBox[{"x9", "->",
      h3 `1 |6 M8 g/ B" Z7 _          RowBox[{"Data", "[", ( k  b% [2 h) @: S+ A. I
               RowBox[{"[", 4 M. W- b! t5 j' {! X3 ?
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    $ [, u8 l& ]/ y5 l     "\[IndentingNewLine]", , G2 h8 K- P0 N! s- O% @
         RowBox[{
    ( S; O( N- ^% R! b( g; c% i- }      RowBox[{"m60n21", "[",
    2 J* y& w) V( t+ k  p, _5 L8 b9 h       RowBox[{"[", " u5 r# m* ~1 H/ u
            RowBox[{"i", ",", "11"}], "]"}], "]"}], "=", : |9 o% O$ t1 O4 J
          RowBox[{"u11", "/.",
    ) n7 u# h5 `/ P- q       RowBox[{"{",
    6 R) @4 h1 b; p" t4 Q8 U; s        RowBox[{
    0 ?6 v' n! m, ~. o. e         RowBox[{"x1", "->",
    , x& ~6 o: _5 U$ l0 y7 X          RowBox[{"Data", "[", 7 u: W+ L$ ?$ u' u! i" E$ G
               RowBox[{"[",
    : b3 B( h9 I' R: k            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", . M" {) y/ P9 M! L' T/ B& T8 X
             RowBox[{"x2", "->", - r' Y) S+ i; F2 i) F0 Q
              RowBox[{"Data", "[",
    ) e1 d" D$ ]$ a; l7 P           RowBox[{"[", 5 |1 m! B; C, _* ?& _
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", $ m# Q3 N9 ^0 G+ [$ c6 Y5 j
             RowBox[{"x3", "->", 8 ~5 m& F0 p" d& y0 Q% t/ W
              RowBox[{"Data", "[",
    ; b4 m* t3 Q' m4 A           RowBox[{"[", * Z" Z4 K$ c3 T1 g4 Z1 [# Q, \: r
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    8 d* f  z& s1 Z* f& n+ f; U1 E         RowBox[{"x4", "->", ) e2 x+ t: L3 q9 d: V+ `1 ~( s; V
              RowBox[{"Data", "[", ( M( G+ a' [( B( y' _
               RowBox[{"[",
    7 }# R+ V" I2 {  M6 y9 C& v( K            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    + B7 m% v2 J2 L' c* K# U2 p6 q. `% V4 Z         RowBox[{"x5", "->", - s$ ?1 C, V0 ~8 h' f, ]$ o" w
              RowBox[{"Data", "[", $ ^4 C+ E3 t& i6 X( i; T  V1 ~* |
               RowBox[{"[",
    3 \5 K& D' ^. u2 K6 W# w5 b% g) j8 I            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",   ^. u! t& L( Y2 s
             RowBox[{"x6", "->", 2 |6 Y9 L5 V1 Y. s1 v
              RowBox[{"Data", "[", : B# T8 f+ y) ~2 P( K; o
               RowBox[{"[", ' G, @7 x" p; `
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", ) T2 L0 b+ u0 e/ m, |& p- `
             RowBox[{"x7", "->", : y3 C( l6 Q, ], `2 H
              RowBox[{"Data", "[",
    6 j0 r- g# }* G5 s/ \           RowBox[{"[",
    4 E/ g& w( O# }8 _, ]7 D            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ( I  W1 C7 F% ]) B2 ?
             RowBox[{"x8", "->", 9 i0 J1 K- @& }- D
              RowBox[{"Data", "[", - Y$ C4 M, ]& A5 e/ {
               RowBox[{"[", 0 g& l, s: J8 h8 o0 P
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", . C. C& S9 m  i
             RowBox[{"x9", "->", . [, i* R" ~  L7 H/ j" b6 z+ }
              RowBox[{"Data", "[", 9 X8 Y' _: y) e, W) \* O* `3 e
               RowBox[{"[",
    ( N: C$ u$ M& u  `# E            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", * H- N' y( v4 P$ S8 V
         "\[IndentingNewLine]",
    ! U  |/ O* p7 p2 H/ ~$ K& K     RowBox[{
    ' w4 E6 e+ j5 T, a7 w3 J0 ]6 b+ j      RowBox[{"m60n21", "[", : z& b( Q+ y4 `  Y* P6 x4 Q' j2 u
           RowBox[{"[",
    $ s" @. M- ?* s! w5 h/ v. \* h  K+ K        RowBox[{"i", ",", "12"}], "]"}], "]"}], "=",
    3 j% W4 V, m+ t) ^- U      RowBox[{"u12", "/.", # e0 P+ Y1 ?, A0 Y6 s
           RowBox[{"{", ) S' P/ L) e1 h0 M
            RowBox[{
    % y# p3 Y) `9 b7 x0 B8 [  v! [         RowBox[{"x1", "->",
    0 |& N3 Q6 U4 T0 b# v          RowBox[{"Data", "[", : ~$ l( _0 p2 b
               RowBox[{"[",
    ( o- Y, h- A( M' p            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", 0 h7 Z( X  C  i3 \- o
             RowBox[{"x2", "->",
    7 |+ V) f; }2 g( \% Q2 W          RowBox[{"Data", "[", 5 s$ _, f9 }0 i, R& a! s
               RowBox[{"[", * t& g% w2 o/ x, X  E/ ?& _7 Z
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    9 O  }* a8 e( d1 s1 d         RowBox[{"x3", "->", / X; o3 p5 c$ W  A8 ~& ]4 }7 b
              RowBox[{"Data", "[",
    ( r3 j) p4 x6 B( I. e. G/ n1 h1 z           RowBox[{"[", ' Y3 ^8 z" k& g
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    - u  N/ y9 a: w3 x0 @$ \+ ^* S* D         RowBox[{"x4", "->", " }- d4 [6 @5 b1 g8 S9 z
              RowBox[{"Data", "[",
    ( Y. n/ L6 B' [' a' f6 n           RowBox[{"[", - F1 a- ?0 w/ \
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    3 L6 ]+ |$ U7 S" C# ~. a- v/ Y( @( g         RowBox[{"x5", "->",
    9 K. \, i- o+ }, ~& U          RowBox[{"Data", "[",
    + w+ O7 y$ V" [: k. o% A           RowBox[{"[", 0 ]5 k8 a; h3 p; [
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", : R* F# F4 M( X6 N5 _/ M5 Y
             RowBox[{"x6", "->", " N. M: \6 a/ I- Q0 R- m7 F4 I6 y
              RowBox[{"Data", "[", 2 ~! @$ \) U% x1 i  u
               RowBox[{"[",
    / ^/ L; j* |# R" q4 C5 K9 E            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ; z0 @. i, X! l: Z* x/ c2 G8 `         RowBox[{"x7", "->", ' e9 \8 }7 @* F
              RowBox[{"Data", "[",
    : z6 `0 z  J) S( I) b# u           RowBox[{"[", 6 N( z! N$ P5 d2 c, o" e
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    ' F% u8 T, M; ?/ d         RowBox[{"x8", "->",
    * L  T  K/ m; ?5 Z% N" c          RowBox[{"Data", "[", " W+ A  `  U0 G! F0 J  r
               RowBox[{"[", - [+ X+ P" o' i: e! Q: B3 `7 ]
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 4 k9 ]2 n4 `0 Y0 I
             RowBox[{"x9", "->",
    / F  [( _8 u; s4 w6 Z9 h- b          RowBox[{"Data", "[", % {# A. ?* W, G) _6 \( @* ~
               RowBox[{"[", 4 M% Z9 _! \/ ?2 X* `+ W
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    ) w% i0 ]! Z4 Q7 D& o" w2 j     "\[IndentingNewLine]", 8 E* @; a8 D7 Q, Y9 y
         RowBox[{3 ?9 R3 b. b2 t( J8 z+ c$ P
          RowBox[{"m60n21", "[",
    7 y. w/ ?; B: L, z; B       RowBox[{"[",
    ' G4 }$ V: ~1 _: e2 f7 z        RowBox[{"i", ",", "13"}], "]"}], "]"}], "=",
    9 X9 `0 v7 D' {, o' X3 i      RowBox[{"u13", "/.",
    . d  p# F+ _: j0 L. c/ b       RowBox[{"{",
    1 ~7 z4 @% V$ q' T' y: r" f; |0 w5 @        RowBox[{
    7 P4 Z% m- [! [9 Q- l8 c& B2 u8 {         RowBox[{"x1", "->",
    8 a6 ?. B9 ?1 S* V) L4 X* `          RowBox[{"Data", "[", 6 L) k  y% Z8 E6 o# L- F
               RowBox[{"[",
    ) t! G6 u( {% k" z$ x/ [            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    7 u% I( \) `! i) \. B* x5 R6 L         RowBox[{"x2", "->",
    % T% I8 Y: T" i          RowBox[{"Data", "[",
    7 z* ]; K) [6 x, T* Y  M) N           RowBox[{"[", - U3 E! `2 Y# w4 W! U% @( j, e
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", & q: D! Y/ W) ^2 b
             RowBox[{"x3", "->",
    7 A; a1 S% W! P* V6 Q+ [          RowBox[{"Data", "[",
    9 L! |5 N- M6 X0 ?* y; D/ q           RowBox[{"[",
    4 }8 l# P8 e1 }, J% V3 M+ E; x8 K            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    , v) u' N4 J9 `7 I0 z         RowBox[{"x4", "->", 9 s- q( p7 {, |! @5 ~
              RowBox[{"Data", "[", 1 B8 w/ b  B% f* L- V8 n
               RowBox[{"[",
    0 x* L  G' |* ~# P5 R/ B            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    % @6 {  y3 }; w* F9 }( C         RowBox[{"x5", "->",
    ' r8 ]/ ]6 A' h& w1 |! k; o          RowBox[{"Data", "[", 3 @2 p. @8 F+ j3 S8 a
               RowBox[{"[",
    $ B; E! c1 G3 L' }0 a) p+ a            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    ' _3 N) J) [- f  w* k# H         RowBox[{"x6", "->",
    1 M. @8 l( W$ b% Q5 }+ u          RowBox[{"Data", "[", 5 {1 v2 i6 F- |- H) E1 ^9 k- X+ F, P
               RowBox[{"[", 6 m) `0 E( S" |  j9 r: {4 f9 U
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    : v# F  `  |% T4 m. e         RowBox[{"x7", "->",
    + F# `( c" T0 p* V2 o8 Q          RowBox[{"Data", "[", * y6 C# D, Y* ]" q( h, Z$ z- K7 y
               RowBox[{"[",
    6 a3 L4 [" g  l' L( y+ O            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", : c9 |; X  C' C/ S& l5 A# Q* `
             RowBox[{"x8", "->", ! x- x" E2 `1 @! }8 a3 o  i2 J
              RowBox[{"Data", "[",
    - [  h% B8 Q& |3 |% K6 `: i1 e           RowBox[{"[", * C9 P7 G' e7 [; D
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    6 J  O8 l) c" X/ x. q: T         RowBox[{"x9", "->", . e+ x* N( ?/ ~
              RowBox[{"Data", "[",
    0 r9 s+ G, |: Y& t3 m# ]           RowBox[{"[", : [* w( O; M: E
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    . B5 M+ b8 Q+ A: }9 E1 n$ O- F     "\[IndentingNewLine]",
    5 X8 a7 b* ~5 R! N0 D7 M     RowBox[{
    + H; T# S6 b/ D' V: X      RowBox[{"m60n21", "[", * S/ w! @' z1 r  Y6 Z1 v
           RowBox[{"[",
      i, @$ ]0 i7 O5 V/ d        RowBox[{"i", ",", "14"}], "]"}], "]"}], "=",
    ( Q. v; g# y& A& g, s) D& F% {      RowBox[{"u14", "/.",
    6 B" ~6 A3 m6 x5 Q8 H. r$ W       RowBox[{"{",
    & U- q7 T4 H! B        RowBox[{( ]7 b1 f! p0 d3 v, V& T1 i
             RowBox[{"x1", "->", - z% q3 D" P7 |7 Y: P
              RowBox[{"Data", "[",
    $ @+ H+ F# [* Y  C: i! I7 e           RowBox[{"[", ! E+ y$ ?' q1 f3 T7 E! S4 ?
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ; N5 y, U6 ?( Q0 l, Z' \  r, h
             RowBox[{"x2", "->", - h5 U4 J1 E' z# n* A; t
              RowBox[{"Data", "[", % I) C% t# @1 _" @
               RowBox[{"[", 2 F! s4 Q5 W( e1 k3 m
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", . w. k+ g. ~  {  B( e, Z5 T3 X! b
             RowBox[{"x3", "->", 6 g% |1 Q& q0 y( E7 e8 N, R8 ^! M
              RowBox[{"Data", "[",
    $ c1 S% X9 A+ @           RowBox[{"[",   C% }- l1 b9 Y, [9 N# ?: }
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", ) j, A' y# L" `: U. U2 G7 k% S
             RowBox[{"x4", "->", 8 `: q" @* C$ J7 P5 s# u
              RowBox[{"Data", "[",
    $ y+ q4 f6 z  q" F           RowBox[{"[", - I, c' Y* @3 r- d; s" Y
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 3 p  q, G$ X" Z3 r( B
             RowBox[{"x5", "->", * d2 j# W/ a9 w8 C
              RowBox[{"Data", "[",
    & n. f) r- L# e& k           RowBox[{"[",
    ; p, v) c9 {  V4 Y. g            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", 2 \* h$ f! G; X, a4 [8 l
             RowBox[{"x6", "->", 8 c& t1 B% j' U: c" O" S
              RowBox[{"Data", "[", + v4 G& C- V) N0 I* }3 ~
               RowBox[{"[", / _0 q% [: t) f3 E/ e
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    / W0 S5 q! R- M8 S         RowBox[{"x7", "->", 4 O7 {1 B2 {0 v
              RowBox[{"Data", "[",
    4 p  W$ O5 `" ]8 H           RowBox[{"[",
    0 z* o% u5 f- h8 U& c1 |9 x            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    1 N: K( e' |2 r         RowBox[{"x8", "->",
    ' R. O4 I. z- p4 F2 A5 H+ D+ R          RowBox[{"Data", "[",
    - |& Q  E/ |) L  Z           RowBox[{"[", " s2 R* r$ J- `3 M+ _0 ]
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", ! H! q) Q, D+ t4 d* A
             RowBox[{"x9", "->",
    5 N5 g, z$ G7 l          RowBox[{"Data", "[", ! ^" W4 d$ p2 k* ?( U7 h
               RowBox[{"[",
    ) o5 c8 o/ N% h' u; b            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 9 I) S: [1 M8 g% F/ |% S
         "\[IndentingNewLine]",
    % V2 z) @6 w2 i! u0 k     RowBox[{0 b# d/ @; b% w8 B
          RowBox[{"m60n21", "[",
    4 h2 M$ q- B9 ^4 B8 y8 L# i       RowBox[{"[", ( Y" v" K4 \1 e+ y/ _: H: ?
            RowBox[{"i", ",", "15"}], "]"}], "]"}], "=", + _( e% z* t# b  @$ |0 r6 A7 S
          RowBox[{"u15", "/.",
    * @/ o6 _6 k  N+ f       RowBox[{"{", 2 Q  ]/ B6 \- N. c- z
            RowBox[{
    6 r1 \6 P5 Y4 P3 l- b, X0 K         RowBox[{"x1", "->", 1 r# |8 v" t' c' G: \$ k( O
              RowBox[{"Data", "[",
    6 B# `8 \5 V7 |! C% y' ?# d           RowBox[{"[",
    7 M: N% I9 S9 D: M, @- t8 p2 u            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    / c: P8 P0 h7 S5 ~# _% }+ q8 Y0 h& y         RowBox[{"x2", "->", ) @+ T" o8 K, X6 ~
              RowBox[{"Data", "[",
    . ^: h, J( h( w8 m           RowBox[{"[",
    2 Q- S6 f- X9 L- E            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", $ `/ p# ~) S* h- ]' [& T
             RowBox[{"x3", "->",
    + ?: g3 d! c* K6 p          RowBox[{"Data", "[",
    1 [4 p# s8 B9 g7 T' P! T           RowBox[{"[", 5 v( `& M8 K: H% o1 S9 Z
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    6 Z# [- @9 h8 b3 z% o         RowBox[{"x4", "->",
    ' J; P5 l1 [* r; A- C5 m* P* f          RowBox[{"Data", "[",
    , C, k7 t3 q! q/ ~) \' |           RowBox[{"[",
    ! C& [9 [6 p$ s; e- q3 R  ?            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    , G2 n/ B  v5 K/ w         RowBox[{"x5", "->",
    7 Y$ y# b! J4 a: u7 ?( @& `: X          RowBox[{"Data", "[",
    ) j8 l% [( }5 u           RowBox[{"[",
    # h3 ?+ t& _7 T$ m- i2 d5 u- U            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    3 C1 h: `# `: Q# V! N, Z         RowBox[{"x6", "->", 9 @) J! n6 q8 F
              RowBox[{"Data", "[", 4 [# o. j& z4 w4 }! d
               RowBox[{"[",
    / A3 L* ~/ L# [            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    9 @& w3 w" j& ^. s2 ~) A         RowBox[{"x7", "->",
    0 N0 \& Z% X: }% Y+ G1 C          RowBox[{"Data", "[",
    * W  m2 t6 w' W( ?           RowBox[{"[", 5 Q; @1 ^6 Q" r. S  D
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",   [5 Y& {& }. U. r) }: T0 J8 z
             RowBox[{"x8", "->",
    : x& e2 Q. }# Z3 S! G          RowBox[{"Data", "[", : g7 `/ a! S& g; V  ~! Y
               RowBox[{"[",
    3 r6 N: O* P5 P5 N& z3 {            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",   y5 R5 e% J. G3 D8 ~5 I1 O% Y9 q
             RowBox[{"x9", "->",
    6 \. t0 F* H, c' o          RowBox[{"Data", "[",
    . ~+ A5 |+ @2 S5 K/ Z           RowBox[{"[",
    2 D6 X4 n4 T+ V7 {, R            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    0 \7 I3 _2 T( R5 z/ K3 ]; z5 m     "\[IndentingNewLine]", * D; Q/ U) b7 ~: [% v
         RowBox[{
    % u* w$ C" ?% a      RowBox[{"m60n21", "[",
    ' j) A0 C3 J: ^) V3 _       RowBox[{"[", ) |( h1 T8 v: z4 m0 V% l
            RowBox[{"i", ",", "16"}], "]"}], "]"}], "=",
    & \( k% w* k5 R% ?6 D      RowBox[{"u16", "/.",
      i( g2 i% j5 I) S+ w+ t5 p, k       RowBox[{"{",
    ( V' I# D" f" h8 i: x        RowBox[{
    ; B, d! m- X% Y; g2 B/ g- D* i- b         RowBox[{"x1", "->", ( m# p1 B% k* e: [
              RowBox[{"Data", "[", * a5 s& k) L0 A3 `1 a0 Z
               RowBox[{"[",   ?0 H# A; r! @
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    3 e2 U% L7 U' \         RowBox[{"x2", "->", 8 R0 P/ X& C5 R* F' `
              RowBox[{"Data", "[", ) r; c" Q% t' Z% a7 B9 [' O* f
               RowBox[{"[",
    ' B3 m1 m; ?# j, B7 Z2 i+ M, |            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    , O1 B2 G; d  V! z0 c, }8 F         RowBox[{"x3", "->",
    ! C; ^, O; b' m9 y' a" [# G( J7 l/ ^          RowBox[{"Data", "[",
    " Q5 e5 Y2 G1 E( {- P# E           RowBox[{"[",
    & F& y6 h, q8 O% w/ Q            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    4 i& ]8 m3 }5 Q  P3 j         RowBox[{"x4", "->",
    8 n% P% c( b$ b# ]; R, a% U          RowBox[{"Data", "[", & r( m' n3 B3 ?/ _5 N, C# z7 l
               RowBox[{"[",
    + e0 k! O  D! i+ K% F/ r            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    + [& j# a) O4 A         RowBox[{"x5", "->", 9 V( ?- a$ Y# h, z7 R3 J- o$ d
              RowBox[{"Data", "[", 2 ?# Y8 m+ v8 J) `- t) [7 _( G
               RowBox[{"[",
      m% D8 p$ [  i5 S            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", - `- p  s9 C2 o. {* o9 Z1 }! k) ^9 \
             RowBox[{"x6", "->", ' ~5 c3 z9 j) c) u7 c
              RowBox[{"Data", "[", 0 p9 {( W/ `$ F7 `0 N
               RowBox[{"[",
    * X7 y& A( e. ~* z+ A            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", 6 X* u3 [' t# @* E* j
             RowBox[{"x7", "->",
    $ S' Y2 R9 x( i5 ~4 `1 r, `2 E- V          RowBox[{"Data", "[", ) E0 q( @8 j$ y2 i
               RowBox[{"[", / D8 x' f/ V$ v6 W9 Z( e' @
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 2 d' p2 }# R  w3 A. m! R
             RowBox[{"x8", "->",
    , Y8 o8 }- i3 A  l+ M          RowBox[{"Data", "[",
    * n, d1 `5 }6 W           RowBox[{"[", 9 i$ G; {4 ~( `# l
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", ) I" F& o5 }* C' b& d/ A) P5 @) n
             RowBox[{"x9", "->", , r4 p5 q5 P0 o- |
              RowBox[{"Data", "[", 1 y# z% p. E/ n1 x
               RowBox[{"[", & d3 S$ l; Q% d/ g
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    2 M9 D6 U, i( B5 `" k7 C* V     "\[IndentingNewLine]", 7 [7 t' W1 W+ C' K7 H+ y
         RowBox[{
    ; O. K9 h% [" \8 m2 K/ c      RowBox[{"m60n21", "[", % |. d4 ~6 D9 ], g8 y* J( g
           RowBox[{"[",
    : a+ b0 {+ B  x6 ~        RowBox[{"i", ",", "17"}], "]"}], "]"}], "=",
    ( r4 p$ g& M. B; C- ?* k% h; X      RowBox[{"u17", "/.",
    & A9 {/ M: L; e' N. U, j       RowBox[{"{",
    + j7 q9 d& x0 y% E, Z0 C- X        RowBox[{
    * l$ L" e) K3 n% r         RowBox[{"x1", "->", 2 p/ i5 s8 d5 s
              RowBox[{"Data", "[",
    1 `- r$ o# Y: T: K& X           RowBox[{"[", $ a. {6 n1 t' ]/ y1 I
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", 6 X% M- I; Y% O: n& b; Q' w+ H% q0 g5 R
             RowBox[{"x2", "->", 3 J, }! A; c7 h( F
              RowBox[{"Data", "[",
    . }* Q- s3 J0 s! j$ l; r: r# k           RowBox[{"[", 9 {: j) R- A: @" I; f
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", % F/ F$ l# F6 f
             RowBox[{"x3", "->", 5 F6 L. r: J0 |# D" `+ i
              RowBox[{"Data", "[",
    - [* i4 ^2 v& q3 Q, D$ X           RowBox[{"[", ( Z$ Q( N8 R+ f6 G
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    7 p3 p# T& R( c/ z4 v) O         RowBox[{"x4", "->", 3 A8 ~* P& s% B+ J0 l$ i
              RowBox[{"Data", "[",
    # _! B2 F" y8 h7 _+ [$ V           RowBox[{"[",
    % Z- |. |* _  m- p1 b- X; q( \' t            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    & r6 M, f6 [  x4 y4 M         RowBox[{"x5", "->",
    ) X3 f+ f* ?, o6 T          RowBox[{"Data", "[", ( O* _. b! |% x9 u
               RowBox[{"[", 7 x$ k6 f# e* H1 h$ k/ W) N* q/ f
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", ' X4 p: R9 p2 y
             RowBox[{"x6", "->",
    ; r7 m+ ^5 x% Q& q3 C2 g6 n4 P          RowBox[{"Data", "[",
    ; M0 h7 {$ g6 M  e4 @) C$ n" G           RowBox[{"[", & p+ ]. x6 r! g, q4 O  [8 j
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", 4 U; k7 x; C; n' S  Y1 x) s) r
             RowBox[{"x7", "->",
    5 ]8 I, o4 Z! }. E* }; f          RowBox[{"Data", "[",
    5 T& t, m4 c7 x0 @* i           RowBox[{"[", $ e% A5 Y$ O7 ~. L7 v! X5 |& y. k8 X
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ! T; w! b% V4 @/ B+ e! N2 ?. [
             RowBox[{"x8", "->",
    4 C, t% @7 ]& }          RowBox[{"Data", "[",
    : M: [8 R% q! E           RowBox[{"[", + h2 I: b5 e# ?  t: P
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    ' R: m) r, r5 V0 s$ k         RowBox[{"x9", "->", : H) [& B  P- E3 y& Y( V3 E, E
              RowBox[{"Data", "[",
    : ]1 e2 [* ^2 _! W- E           RowBox[{"[", # p  O7 _9 A$ l
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    8 Q$ f6 |( p/ U0 b( Q+ R. \     "\[IndentingNewLine]", ) A) S8 ~( H* b" ?
         RowBox[{5 l: O- C2 T$ c; }4 k; I0 i
          RowBox[{"m60n21", "[", / E% p* E* E- o) r  d& {
           RowBox[{"[",
    " G% v# a( o% J3 i' ^        RowBox[{"i", ",", "18"}], "]"}], "]"}], "=", . b' t0 C7 M  s5 a2 d* ^" n& Q
          RowBox[{"u18", "/.",
    . M- {  |. \$ [, Z2 o* Y       RowBox[{"{",
    , n- f$ X3 i+ M6 E        RowBox[{* w* \: c& c7 d% B8 L6 ?
             RowBox[{"x1", "->", 3 ?+ \6 K, p: i6 y( ~; l) y& G
              RowBox[{"Data", "[", ( {. [* Q. T7 ~- u' Y! s1 \
               RowBox[{"[", 8 A4 u+ g3 f* B7 r  B6 W) o, z
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", + K3 U4 ]1 K: j; H- [
             RowBox[{"x2", "->", ; N2 q9 i4 c7 D6 c/ ?% F: _2 A
              RowBox[{"Data", "[",
    ) ]# z* O. T# H* E& M7 ]. \7 R           RowBox[{"[",
    - H7 D+ n- p! z7 g3 [; K            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", 0 v2 i1 c7 x/ O* o7 k' O! [
             RowBox[{"x3", "->",
    4 K8 O( m  o9 ~- A5 H+ l4 v          RowBox[{"Data", "[",   C9 s, t0 u0 N& }% I( d& T
               RowBox[{"[", . e, m$ X6 Z" [. M" u8 q9 _
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    9 a3 W( O. A1 x  F         RowBox[{"x4", "->",
    + [5 Y5 ~5 ~  `" h7 H# r          RowBox[{"Data", "[", - k0 e9 }8 @4 V8 T
               RowBox[{"[",
    0 u* d0 \0 p4 G/ V& b: O4 q. a' j" W            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    ! }6 V7 M! Z0 {( M* ]% i         RowBox[{"x5", "->", " H: c5 {; Z2 ~
              RowBox[{"Data", "[",
    * x, |# R  g" J: W           RowBox[{"[", . w. X5 }" u/ n! E( |
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", ( Q. k0 {/ C7 W5 `5 h  @. O
             RowBox[{"x6", "->", ! R6 h+ a& o3 Z# h# F( b
              RowBox[{"Data", "[",
    % _  f: r% k+ e3 E7 G0 A4 a           RowBox[{"[",
    # M6 q9 |3 _) w2 H            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", . S* R( v. ?: m/ r3 C
             RowBox[{"x7", "->",
    0 A$ ^$ Z/ \1 ?) n9 _          RowBox[{"Data", "[", 9 c, ^' j1 c' S$ ~, s; E
               RowBox[{"[", 4 w% F0 p9 F+ e* ?
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ) ^* g  |! u) l( T. R
             RowBox[{"x8", "->",
    0 O1 j5 y1 v5 p, }          RowBox[{"Data", "[", 7 r3 [+ m' _1 Y( I, {
               RowBox[{"[", & t6 U& u0 o' C$ i
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    & U2 ^( @7 t  [# y7 y3 s. T* o6 {         RowBox[{"x9", "->", & l& M. g, g& t  G
              RowBox[{"Data", "[",
    " i8 G  ]9 K9 C3 z- F           RowBox[{"[", * ]# U! Y3 M. f+ z
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    ! ~# d5 S2 P6 E. Q% V: J+ a     "\[IndentingNewLine]",
    : u$ {) i+ x% j9 Z7 U1 _     RowBox[{2 K/ k2 H* d) i5 }% }) K
          RowBox[{"m60n21", "[",
      u/ {- O( N" y; J% {! s8 l; X1 u       RowBox[{"[",
    1 Z5 g* I5 V- L8 b* r9 m4 Y        RowBox[{"i", ",", "19"}], "]"}], "]"}], "=",
    9 d( P- p8 k6 a7 V7 z/ M4 b      RowBox[{"u19", "/.",
    7 p; d0 z  n. f* n  U       RowBox[{"{",
    0 m+ }& W( b' N% d. K        RowBox[{- Z4 Z( E, D( D+ S+ W: r* c
             RowBox[{"x1", "->",
    ) p* t2 X0 ?. t# j          RowBox[{"Data", "[", % t  l( w" c0 T: i5 M
               RowBox[{"[", ( t% D6 M4 L# \- V7 O/ }
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", : l6 N) Z/ s- y, r  R
             RowBox[{"x2", "->",
    " H5 h! l1 r, ?* U8 D/ s9 u2 I          RowBox[{"Data", "[",
    % E1 ^2 g$ G: k8 W           RowBox[{"[",
    6 l% o6 v7 ]' v8 V3 Q5 \) I            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    - `" v- c4 A4 r% |& C9 Y         RowBox[{"x3", "->",
    ) @) [. f& a% n' k/ c3 ~$ O          RowBox[{"Data", "[",
    4 X+ X' S5 e  l+ d; [2 D- P+ p           RowBox[{"[",
    4 \5 P9 e( V& i3 x# f/ W8 w5 {2 |            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    0 L% {/ F: M' s! u- Q/ E         RowBox[{"x4", "->", + j9 I) k' D7 @/ Q) @
              RowBox[{"Data", "[",
    " J. O3 S4 q3 }           RowBox[{"[",
    # k2 i9 L- I! Q6 b) S; j5 L) Q            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 7 ?. `$ [6 L6 P" ^0 I
             RowBox[{"x5", "->",
    3 o# t! v( z/ R          RowBox[{"Data", "[",
    4 L" k1 n: _5 }- d8 i$ T           RowBox[{"[",
    9 E0 ~( X' s) S! E* _  M            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    % h" x$ t2 R# G+ v' B         RowBox[{"x6", "->", ! l6 o0 d; N1 W+ Y; V7 B( l0 P
              RowBox[{"Data", "[", & h: B% f& ^3 ]' c# a  e
               RowBox[{"[",
    8 ]) G3 Q! |( y/ Y6 I9 c6 o            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    % q9 g1 N+ M. n0 t         RowBox[{"x7", "->", . F# D. Q# {3 p0 ?+ K1 ]4 R* b
              RowBox[{"Data", "[", . Q) i6 B+ x$ P! C6 @
               RowBox[{"[", ( I5 s' S: }6 X. r6 o- E5 W. g( T4 {
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    6 B' b! l' D/ S& G' h: d5 S( b         RowBox[{"x8", "->", ' V+ g6 \5 Y. I
              RowBox[{"Data", "[", 1 L' n* v3 E1 h4 u8 P
               RowBox[{"[",
    * ]: ^4 C/ ~) v: d# m: g# ?# K            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    7 @0 N$ W) F/ Z9 F, @8 r" Y         RowBox[{"x9", "->",   l  M% r% b' q; w" s' f' f
              RowBox[{"Data", "[",
    " u# I6 m( C6 C2 k% T1 {. c           RowBox[{"[",
    ! V) x4 l# n6 }. H5 T  R            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 8 S8 z! d7 U1 c! Q- w" T
         "\[IndentingNewLine]",
    & [6 q; X& j# M8 }7 h     RowBox[{! [: e3 A+ L4 ^: K7 Z5 L
          RowBox[{"m60n21", "[", / W7 J7 \; a. x
           RowBox[{"[", ' ]9 R/ u, N9 V" A5 j1 ?$ J6 P
            RowBox[{"i", ",", "20"}], "]"}], "]"}], "=",
    & O% Y: S2 V! a      RowBox[{"u20", "/.",
    $ ^8 k! T! w2 `- I" R, N       RowBox[{"{", 8 E1 g8 `( \: ~% p: i
            RowBox[{6 U1 T+ v# ]0 E- r' {
             RowBox[{"x1", "->",
    , V( J  h$ a& o9 q, u8 l! L. }          RowBox[{"Data", "[", 0 I& e! [% e  a1 a
               RowBox[{"[", ' D- y4 m3 {+ Q- F! T
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ' @) o3 s2 D7 q2 k) \4 v- M
             RowBox[{"x2", "->", 6 p/ j. f- d1 ~) G! X+ I
              RowBox[{"Data", "[",
    + z- ~/ k9 u: g4 N  S7 H% V3 m           RowBox[{"[", 2 a( d; t, U* x. ^. x# P
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    6 n+ k) e. A# \( G0 U% f/ v8 _- c         RowBox[{"x3", "->",
    8 D+ [; n- p) o# X9 _/ i& [9 k: v          RowBox[{"Data", "[", / z. ^- t8 W# Y" P+ d1 h
               RowBox[{"[", ' y  f- p# g/ a% y7 k, u" |* b
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    * S5 J* L3 p! j* t/ n1 ]$ t         RowBox[{"x4", "->", / `* x& w7 D1 I& a) `& U6 Q' x6 z' t
              RowBox[{"Data", "[", & F1 Q: X" d$ ]3 h8 i' d, h* R# s  o
               RowBox[{"[", 8 ?: X) l0 e. s4 C6 B! ^. w' G
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    , }( l, G/ w  b) q8 F2 ]9 G0 d/ H6 _& U         RowBox[{"x5", "->", # K" v. ^: \+ e6 D( O: R5 J
              RowBox[{"Data", "[",
    ; A( Z1 ~  o5 N! @1 ?           RowBox[{"[",
    - g: p  C5 |3 s4 c            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", . _) g) J/ Q. m0 U
             RowBox[{"x6", "->", ( N7 e0 N/ L' W* `% l
              RowBox[{"Data", "[", - R' j: h: m. K0 D. m% i" x
               RowBox[{"[", ! Z* [( `# i- x, ~
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", 0 W6 c, E* y/ s6 f6 s
             RowBox[{"x7", "->",
    . c! h  s1 h3 b; L. G          RowBox[{"Data", "[",
    # G* ^  |9 t, R% L           RowBox[{"[", / K2 V  ]- H/ F  r% S; k
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    8 r* X! O5 \$ Q+ p         RowBox[{"x8", "->", 6 b0 I5 ~  M+ x& M% ]  S3 H
              RowBox[{"Data", "[",
    & X7 U1 [9 ?% I/ ~$ l  l6 q& T           RowBox[{"[", ; [  b+ n3 [" g
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 9 Z. M+ _3 b9 Z7 |5 J" u% s% O# m
             RowBox[{"x9", "->",
    & S( c4 P4 s7 T' s9 ]          RowBox[{"Data", "[",
    1 h( G/ p, R% ]7 |3 @1 K           RowBox[{"[",
    % J& K' B' Y/ f% V! t- d. h            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", * _/ n$ o2 O, G' {+ q+ Y* `) P& e3 r
         "\[IndentingNewLine]",
    7 f9 y3 Q. Y* n9 N6 p     RowBox[{0 b! q$ ]; S" {+ `9 N
          RowBox[{"m60n21", "[",
    ) o# S: P# n8 d! l       RowBox[{"[", ( ?, a: I+ @" Y% r2 G
            RowBox[{"i", ",", "21"}], "]"}], "]"}], "=", ( P" ?# R0 d; y2 j
          RowBox[{"u21", "/.", 7 q% g6 J; ^  w2 [# s
           RowBox[{"{",
    ' o  Z1 N# _# z        RowBox[{
    ) P/ W$ D2 v5 ?* r+ m. x# c3 m         RowBox[{"x1", "->",
    7 i  v2 x0 i1 @; }          RowBox[{"Data", "[", - d5 r) ?8 L! \6 r# _. N# m
               RowBox[{"[", 4 ]; L3 Q) I* r  h: g
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    1 l0 F  E; P5 t! j# ]         RowBox[{"x2", "->",
    ; }- [* v! I- S* Y5 o          RowBox[{"Data", "[",
    & y- k' E7 t: n& `0 b% E' F8 @           RowBox[{"[",
    $ w: a# ?6 [4 T. B! R( ]+ F            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",   @- g1 L5 ~! K' v" @
             RowBox[{"x3", "->",
    5 @, h9 b  X" e          RowBox[{"Data", "[", 9 ~& p9 U6 o+ |4 [% `2 H% I0 \) }
               RowBox[{"[", * T: E/ U4 Y5 H3 ]+ d) f" \0 [
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    ; ^6 T( w! k! t5 o         RowBox[{"x4", "->",
    # E/ C2 f4 z9 V          RowBox[{"Data", "[",
    , a/ v5 Z* E- `# W% {4 j, I           RowBox[{"[", . C3 n- [9 b' d3 g
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 1 s$ j) X) D6 W: Y# g" W
             RowBox[{"x5", "->", + |7 M2 T/ J: B
              RowBox[{"Data", "[", 5 o- {* Y8 `. a* w
               RowBox[{"[",   W# R) a# f. y5 {
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", 2 q$ }5 c1 l$ U/ F" H; O& t
             RowBox[{"x6", "->",
    ! b& I! D6 g- l4 _  I          RowBox[{"Data", "[",
    ! ?8 e8 o& M9 B, g           RowBox[{"[", , S  e' s3 Y2 G
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", 0 p& i& e9 t9 P
             RowBox[{"x7", "->",
    * I1 s. G5 Z  f9 m% I, z5 `          RowBox[{"Data", "[", ! d4 \% _, P: D. t$ ?1 f
               RowBox[{"[", - l! J3 F/ v9 u* L1 F; x% U
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ' I/ k9 ~/ ^4 Z
             RowBox[{"x8", "->", 9 c8 c- b2 G9 B% H- P5 X
              RowBox[{"Data", "[", * y8 N& D$ l& @7 [4 `/ z
               RowBox[{"[", , Q7 P. \4 v8 Z
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    + G' ]9 b) F$ W         RowBox[{"x9", "->", : @3 M$ S; c# A# e
              RowBox[{"Data", "[",
      D8 ?4 m3 r' I1 k" U/ R7 M# k           RowBox[{"[", " s8 V8 H; {% a
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}],
    ' B5 R9 G) q' z3 z# o" i    "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",- _- P( j% R/ _
    CellChangeTimes->{{3.5779241165*^9, 3.57792417728125*^9}, {& M7 b+ i$ Q8 f8 Y! o5 L
      3.57792428359375*^9, 3.577924585109375*^9}, {3.577958919491543*^9,
    ! w: _/ y" v" @: n3 @+ p2 U  3.5779589224867477`*^9}, {3.5779619825731473`*^9, 3.5779620676400957`*^9}}],
    3 U+ j8 Q5 f# Y5 n& V' |
    / `1 |' j; w. L) M( XCell[CellGroupData[{
    . `- v0 M4 }4 C7 u5 }7 C- O9 ~) h8 X$ s1 p5 t# w! J5 Z- w9 m1 P
    Cell[BoxData[
    3 @4 C5 U$ D( z RowBox[{"w1a", "=",
    ' {- a" {# Y. I+ T  RowBox[{"LeastSquares", "[",
    1 m$ l# d6 A& s; [  n3 m, V6 c   RowBox[{"m60n21", ",", "y1a"}], "]"}]}]], "Input",
    % {5 Z; m  Q  I4 q) Q CellChangeTimes->{{3.577924598484375*^9, 3.5779246208125*^9}, {! @' |" G' T9 i1 d
      3.577924662765625*^9, 3.57792466596875*^9}, {3.577962074644508*^9,
    / B/ T! z* ~' w" I  3.5779620748317084`*^9}}],0 E, Z2 j' p- z/ W( h5 U5 ]

    % a% |8 \6 `' \  |* ?3 eCell[BoxData[
    ' Y, G5 s+ }1 I+ E RowBox[{"{",
    5 t; l& E% H$ p" V% i* W; o  RowBox[{"0.32564305572552416`", ",", "0.500820838606441`", ",", + I( o/ Z, w( `; h0 P/ |
       RowBox[{"-", "0.5945873894818967`"}], ",", 8 c; k( h- n5 x$ \" z
       RowBox[{"-", "0.1999688587779198`"}], ",", "0.020180806675835994`", ",",
    / u3 q9 Z0 H) P9 V; T" Y$ p. s   RowBox[{"-", "0.03345934908892623`"}], ",", "0.25282438852646905`", ",",
    5 A  e/ W6 q* B& P   RowBox[{"-", "0.17602467625404622`"}], ",", "0.3961180670900672`", ",",
    3 e+ c# ?' d" e: A   "0.02759193650965952`", ",",
    2 z# u6 U) c, z* u' w* o5 q   RowBox[{"-", "0.320472847796449`"}], ",",
    ' k' g7 @8 [0 e- Q6 j   RowBox[{"-", "0.07581214474544527`"}], ",", "0.4812237524557292`", ",", 1 D- ^% c, m- F# _/ w
       "0.7528674241482847`", ",", "0.6665374509702799`", ",",
    4 [& f! U, V2 p: |   "0.22861495086373018`", ",", "0.13092706311748484`", ",",
    ' a: \" e1 {$ d) W6 b6 k, H+ U+ c   "0.5252475961933538`", ",", 0 s# K/ ?# t. U
       RowBox[{"-", "0.10599338351843157`"}], ",", "0.6670272593678526`", ",",
    3 d+ Q; I& p5 }6 {; Y6 x9 I   "0.23580523388620733`"}], "}"}]], "Output",
      n7 P" c' s0 y8 C  N CellChangeTimes->{3.577924621953125*^9, 3.5779246688125*^9, 8 x0 A% Z$ m# a- l' H& Y  O% T' N( e
      3.5779575884583836`*^9, 3.577958952875601*^9, 3.5779620806661186`*^9, ; m0 ^: c2 u4 E  Z% `
      3.578012349875*^9}]
    4 ~) a2 J6 m6 i( O; Q: L1 k- k}, Open  ]],
    0 l- q: Q. m* X" T: i( W8 {7 u# C% y6 M) z- u# @! n
    Cell[CellGroupData[{
    " s5 }: `( O  U4 C+ Y8 [( ?3 C' |( `$ ?2 y
    Cell[BoxData[
    & x- B; h8 m4 X/ E9 n7 n( s RowBox[{"y1", "=", 0 `2 o( d% t) d/ U! H+ Z
      RowBox[{"w1a", ".",
    * N* y1 N$ S5 |2 V/ J   RowBox[{"{",
    # D- s% m$ _* F9 b0 S6 z. K( J    RowBox[{, U# p! ^- l' H
        "u1", ",", "u2", ",", "u3", ",", "u4", ",", "u5", ",", "u6", ",", "u7", 3 j: D/ j: v  u- ^: Q: `
         ",", "u8", ",", "u9", ",", "u10", ",", "u11", ",", "u12", ",", "u13", - D9 M6 b' O0 V$ H) r/ ?
         ",", "u14", ",", "u15", ",", "u16", ",", "u17", ",", "u18", ",", "u19",   C: u; K7 c4 m+ d
         ",", "u20", ",", "u21"}], "}"}]}]}]], "Input",( z6 Q4 f4 s2 ?7 U1 H
    CellChangeTimes->{{3.57792471553125*^9, 3.577924755875*^9}, {' ?5 e5 k& K- Z# ]
      3.577924897078125*^9, 3.57792491596875*^9}, {3.577962095642144*^9,   i. Q& V! p5 I9 w
      3.5779621231449924`*^9}}],0 d, v6 M2 o6 ^  U' A% Y

    9 ]3 v  c* _. x! f6 RCell[BoxData[
    ' b/ ?7 T6 Y4 M6 n9 o RowBox[{
    " C& _, p, F$ Y9 Z! ?  RowBox[{"0.22861495086373018`", " ",
    6 Z8 B" A3 [9 [   SuperscriptBox["\[ExponentialE]", 5 l) _2 D8 K  U. C
        RowBox[{"3.141592653589793`", " ", ) J5 i7 z! M) y
         RowBox[{"(",
    9 j8 B0 _% @/ F" [! W9 _' X      RowBox[{
    ; b8 P: Y( Y1 I: m8 Q. B       RowBox[{"-",
    # A+ f! p6 k; i5 F9 z        SuperscriptBox[
    ) E/ n/ w7 v2 X1 R, k         RowBox[{"(", - Z; {- ]8 m7 G$ j
              RowBox[{
    % n. C' \, o5 X' M           RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-", 3 F! l* J( F$ }2 g  \" s/ U
           SuperscriptBox[
    6 z; F$ |) k4 ]: j0 |        RowBox[{"(",
    & R- r& S6 q5 _# j. f7 b# \         RowBox[{
    , q1 }/ X, o- W$ T' V          RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-", ; M/ M- p+ g( q# l7 _- {5 J
           SuperscriptBox[7 u+ {) t" s- V& y& L
            RowBox[{"(",
    " I2 p. o8 S- K+ A8 f         RowBox[{
    $ w- y7 z" u5 I          RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-",
    ) H+ q# W6 O( A' u# n- W4 |2 x9 B/ x       SuperscriptBox[- H( q. ?, \( U  \
            RowBox[{"(", ' v, c4 @* b2 A8 i1 u5 m
             RowBox[{
    6 _5 {, k4 ?3 z. |- M          RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-",
    * R  {: x% e. a' S- A8 z( C       SuperscriptBox[# f  |* ~: E+ a: r# m
            RowBox[{"(", 8 i( p9 Q( _7 e* G# F% H3 n3 C% J
             RowBox[{4 n1 L+ z3 h" b9 K# t3 V3 y+ @
              RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-", 0 u# ?0 w/ N! F2 E! X% ?
           SuperscriptBox[
    ! z$ L& l- d% Z) a        RowBox[{"(",
    0 n( U* Y  Y/ }" Y( b! F0 W7 D         RowBox[{, Q4 |: m$ X; i4 ^
              RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", 3 G' P" _4 h# h0 W
           SuperscriptBox[  e% |. o! I2 t$ L3 A6 T
            RowBox[{"(", : z1 b+ o/ ~( Z: ?& q: ~
             RowBox[{4 a  l+ F! ^$ ~: [, ?6 v5 Q
              RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", 8 z3 s4 R' {  l: n% B" G7 f' U
           SuperscriptBox[
    ( `# b9 Y: g% M; w3 G3 ]+ ~: ^        RowBox[{"(", - `" ]# P) \' P, D
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    # z" g: q: H; v4 x9 F       SuperscriptBox[
    ; U5 m( [( q: c! P        RowBox[{"(",
    " w! p5 }  y* _5 @/ z: l( H         RowBox[{
      w! |* e* ?# q          RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+",
    4 C% o5 \) w# u8 b3 O& J, d& T  RowBox[{"0.020180806675835994`", " ", ( z: Z0 U2 P. [! V" o# h
       SuperscriptBox["\[ExponentialE]", 9 Q4 C' X6 u+ @4 T* b" C: X) e6 m1 e, o
        RowBox[{"3.141592653589793`", " ", & x2 Q( w$ s9 A( J' [1 R: }
         RowBox[{"(", 8 Y- |2 P/ f. f
          RowBox[{+ T: U7 \( P- U2 b
           RowBox[{"-", ( ~2 s8 s+ O4 f$ D
            SuperscriptBox[/ B3 [( H5 I. d5 a3 ?
             RowBox[{"(", ' D, S: g5 P$ j6 S# h$ T9 s& T
              RowBox[{" D& z2 z  G$ D3 d- q- M4 |# ^5 k
               RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    & ]# G5 m( C9 {+ T/ R       SuperscriptBox[3 \. z1 t& ^. L
            RowBox[{"(", ) ^2 \9 K; A# U2 R* X) s
             RowBox[{" Z1 D3 }/ I# O, G( f
              RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    3 E+ P# D. _9 W) o       SuperscriptBox[$ j: G* N2 ~; N1 U5 @, o5 [  U! Z
            RowBox[{"(", * L* L, ]3 j3 }# A0 _( B+ D
             RowBox[{1 f+ s' z: n( b' _
              RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    6 w( B* Z, n5 a! a5 E; J4 m       SuperscriptBox[7 v4 }# C/ L/ K8 E2 R/ u. D
            RowBox[{"(",
    6 k) H+ z. d1 r. j  t         RowBox[{; z( ]) ]4 i7 e% s4 p
              RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-", 6 q6 z# j$ p+ {" f* J- h' z8 T
           SuperscriptBox[
    & i9 \) }' _2 k- z/ u8 g        RowBox[{"(",
    ; p# j0 Q5 i' l: Z5 Z: H) q; `2 v         RowBox[{9 K7 W( n' N' o0 X* f
              RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-", 1 T' n5 [; d. c1 E) L
           SuperscriptBox[0 t. b1 m4 @' Y# @" D: `3 P
            RowBox[{"(", # i6 h. I4 C4 n) `- v( l7 W! w
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    1 {0 M( m6 ]0 p9 c( w. Y       SuperscriptBox[
    / N: e' a! {: A! j. F6 X' ?        RowBox[{"(",
    6 O% u: K' j  @! C9 Z% J$ ]1 ~         RowBox[{0 h  X% }8 `8 c1 Z
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    7 u: ], C  F6 Y       SuperscriptBox[4 N4 B- O& E% U, F- m
            RowBox[{"(", " J) I) h! W9 s3 \  k
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ' I. j& g! @) @) k& \6 V
           SuperscriptBox[1 J6 H7 }9 q" T9 d; N) P
            RowBox[{"(",
    2 N6 B/ ~( I7 Q1 [$ S" K         RowBox[{
    2 a0 k" y( ~8 ]          RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    ! s3 X- c) H4 y6 q) u  "+",   X4 v. O; J4 f$ U9 C2 ?: @
      RowBox[{"0.13092706311748484`", " ",
    + B( M7 V3 Y8 ^/ Y   SuperscriptBox["\[ExponentialE]",
    8 R0 g, U. i  v6 U: t8 e4 s: a    RowBox[{"3.141592653589793`", " ", 2 [0 [' S8 v! X! z5 }5 A
         RowBox[{"(", ; L  ?- ]4 j& X4 i4 J
          RowBox[{9 i4 o3 ^; z- t% J
           RowBox[{"-", 4 K1 h- R* J* {- d
            SuperscriptBox[
    ( P- o9 i% n; L/ P8 V         RowBox[{"(", 1 ?* y- S1 _2 |4 ?# F* `9 ?+ q" l
              RowBox[{. x+ j; b, G0 S$ @
               RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-", 2 y" e+ [  l+ U/ ^3 l+ r! \4 d
           SuperscriptBox[
    4 F8 i. G8 {6 ?  d. E        RowBox[{"(",
    * T5 y9 H# r6 z: B: h: q0 F$ H: B         RowBox[{! o+ A* a2 A5 m' [: `; F
              RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-", * o" `4 h: V, t  F; m: K2 U
           SuperscriptBox[: X& Y# y' C& l, J
            RowBox[{"(", + G4 g  u1 A/ d, b5 w
             RowBox[{) V7 i+ c2 a: B( D) A9 r0 l
              RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", 7 m/ o+ j% H* a3 U5 K
           SuperscriptBox[
    # F* l& p, O% ^' I        RowBox[{"(",
      M0 z) m/ Q5 V         RowBox[{1 T% h9 B& S; ^" c/ m" K3 }' n
              RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-", * R. S  A) V5 u, G' K% |% f
           SuperscriptBox[
    & z( ]$ M9 E* f+ t% K        RowBox[{"(",
    7 b8 O$ G. P1 l* d3 ^* p) v1 _/ u         RowBox[{# J/ r$ A0 w- Q/ J
              RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    7 L# {* o( J" G. h$ r       SuperscriptBox[, ], U" N0 z0 X/ a# S# A( e
            RowBox[{"(", & m/ J' c) `4 t" u9 Y
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", * _( D7 C- Y8 S
           SuperscriptBox[' e3 {( k- c% H
            RowBox[{"(", " `* Q) p; j" y% o6 C# a3 r
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 6 |* T5 t; p; P3 K3 C( `' A% o
           SuperscriptBox[% [6 C2 k- O( b, d7 Z
            RowBox[{"(",
    - n5 X- K$ {& R+ ^         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    * ]. N4 N6 I! j9 Z7 j1 P7 N       SuperscriptBox[
    0 o, M3 d2 H% E6 o4 W        RowBox[{"(",
    1 ^, |! N7 `  _         RowBox[{
    * X. E4 E4 Q& k* H9 F# R+ W          RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], % F, M5 b! D/ W8 |6 Z  u0 T
      "-",
    ! y' A' H) B/ Z3 Z7 P  RowBox[{"0.03345934908892623`", " ", 8 h0 E2 a* F9 e- P- {  Q. A: _) I
       SuperscriptBox["\[ExponentialE]", 4 v+ Q1 l5 d3 K9 ~
        RowBox[{"3.141592653589793`", " ", ! \4 T. J! f" a: ?# T1 y4 q
         RowBox[{"(", / v& R: M# L1 f, F
          RowBox[{- |. u) K$ E7 ^& G' t" G1 x. B
           RowBox[{"-", # Q4 V0 W7 K, I' W5 H7 K) m1 M
            SuperscriptBox[* `* G; m; N$ I& J7 B' s/ m! \; I
             RowBox[{"(", + X, _8 b% d$ e$ n9 H/ t
              RowBox[{
    % N2 d" H* y& J4 k9 D$ t           RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-",
    $ d& s6 ?$ x% E4 D) v       SuperscriptBox[
    2 ^( A* z. _4 p) C        RowBox[{"(",
    3 Y$ s3 L8 P0 z2 d, \9 e1 ^( z         RowBox[{
    & H% ~2 N' j* c* u          RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-",
    0 b, Z) @. o4 J; Z) ?$ T7 B- a       SuperscriptBox[  Z6 |! D- G; c$ Q: q- X; n7 s
            RowBox[{"(", 2 w$ {; I+ }) p$ M2 }' ^
             RowBox[{5 A3 L" n6 @) y& u/ H3 e6 |* \$ X
              RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-", % e  |5 M5 V% j6 D; V- q2 `/ x; p
           SuperscriptBox[5 E8 o3 G5 M8 }" W( G
            RowBox[{"(", # H+ O! v( y. X# w% H- i! A
             RowBox[{
    ' T  Y% K6 i  ^! H5 P. i          RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-", ) L" p8 {5 o" f% D* M
           SuperscriptBox[
    ) Y% F+ p/ S1 U$ r        RowBox[{"(", , k* a9 W; v0 W% N3 f* i4 x0 O
             RowBox[{& ~% V7 W$ D$ L" D1 y
              RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-", 5 |* b1 z$ L4 S/ n% A
           SuperscriptBox[
      x2 v6 W4 y! v        RowBox[{"(",
    ) D  z* q" D$ T- O% _. P6 ]( L         RowBox[{
    ( z. E1 I! @( h4 c* ^: S! A+ s          RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    ( w5 a7 x" Q$ z2 s, r6 ]; v6 T! K       SuperscriptBox[, @: P0 o& ~. {& {7 e2 P, o: ]% W: l* i
            RowBox[{"(",
    2 e; a- d$ U. B+ j- j         RowBox[{
    ' v2 U8 O* @( L7 ?# D( s          RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", 8 {, T7 ?" I0 P: \! u( T, {
           SuperscriptBox[9 T; J. V2 X  Q7 i" t2 D
            RowBox[{"(",
    : z+ R; @, \; ^% B         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", . C" P, h, d* {" Q9 U2 H
           SuperscriptBox[( ^/ A3 R% D; z0 x1 j
            RowBox[{"(",
    ( B- X3 M, l3 I* Z) W8 ~         RowBox[{; Z. l! e' J$ }+ z
              RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 7 q+ N7 C; _1 L
      "+",
    " Z! P; Z9 [! h5 ?# B  RowBox[{"0.3961180670900672`", " ", ( k7 T" x& @: |5 \
       SuperscriptBox["\[ExponentialE]",
    6 D/ \  g- p! P8 c9 Q    RowBox[{"3.141592653589793`", " ", / N- K4 m" y1 ?; ]" h' F/ D& t
         RowBox[{"(", ; r5 m& I& F1 F( ]( J
          RowBox[{
    $ W, [7 L. D& W/ M       RowBox[{"-", * x/ Q. b! ]9 J1 J1 j
            SuperscriptBox[
    ( H% {7 _9 {  N$ ?* ?4 D         RowBox[{"(", 8 ~: J; ~, e3 Q& }2 A5 q7 a: Y
              RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-",
    : ^, I2 }5 {5 k3 y( S( Q& z/ h       SuperscriptBox[
    # O) k) e1 c. m/ W        RowBox[{"(", 3 C7 f# U3 B3 }7 k1 v
             RowBox[{/ Q% m4 Q) M2 U4 H
              RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-", 4 B1 K% e- [. q- W! \" ?: x
           SuperscriptBox[: s( e! E# ]" _
            RowBox[{"(",
    1 \: W5 K& U  @  Q  R0 x+ Y% w. j. P$ F         RowBox[{  X) p: }* Y, m" @; B' z2 v! O. H7 `
              RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", ( d) t1 _& b' D1 J: t& r( G8 V. I
           SuperscriptBox[9 c6 Z4 l2 |3 e( Z6 X; j$ I
            RowBox[{"(", " N( k2 S6 G# |: P3 [
             RowBox[{. M; X6 d) c6 g4 a/ j- a- m, v
              RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-",
    8 p  j2 D5 ^5 p       SuperscriptBox[
    ! e& R# i  }. u+ O        RowBox[{"(", + C$ w% U* n; M1 M& p
             RowBox[{
    7 G! E; U6 n$ |          RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", 1 f, U! M1 \# \: t
           SuperscriptBox[
    1 v) y$ r$ ?' L0 Z) N! e( G  |        RowBox[{"(", & j% {$ o9 e+ s
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", " L3 t* N+ U9 D! m  O" M3 w0 M$ d
           SuperscriptBox[
    ( W- U$ x5 A" @: S% ^0 X4 W. k        RowBox[{"(",
    4 ?. V( `# t, {  }* s         RowBox[{
    8 g% Q: I0 p( Z; K          RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    2 E4 R4 y0 y" J. U, M4 U: m$ ]       SuperscriptBox[1 n5 [1 R5 g$ S
            RowBox[{"(", " @+ l6 M0 y/ ?$ x- E. A
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", + u* H3 I" |+ Y; r/ F
           SuperscriptBox[. T# o" a; K% v1 |5 B2 u2 J; B
            RowBox[{"(",
    $ L/ ]  P  c3 T) s         RowBox[{
    + Y3 j9 W2 \! F' p5 o          RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 4 b; \$ ~1 \. A* P
      "-",
    8 ~% ~+ x: \0 s# ]2 M, M" N+ q  RowBox[{"0.1999688587779198`", " ", . G0 }2 _, n2 c+ H" i5 V( \
       SuperscriptBox["\[ExponentialE]", 7 _  i2 l1 M; K
        RowBox[{"3.141592653589793`", " ", % p* Z5 S7 l8 C# q+ w
         RowBox[{"(",
    9 \3 Z0 B% d( r& f      RowBox[{# N: z( u2 J8 `/ d1 k
           RowBox[{"-", , M. [0 Y+ \* [% m$ S/ E
            SuperscriptBox[
    & \" a/ u7 r: c/ r+ ]         RowBox[{"(",
    1 d2 A  [! g+ r" v4 V0 X          RowBox[{) _; E6 g$ l' b, ^6 e8 |# j% F6 g
               RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", ( a7 l2 ?' u) _, `+ a
           SuperscriptBox[9 V) A% f5 g/ j+ I
            RowBox[{"(",
    2 |& A# X+ a. w3 j! D5 R0 J         RowBox[{: j& J2 ]: Q. T3 h
              RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-", 9 s: A2 c  f8 U5 ?. q
           SuperscriptBox[
    " O4 Q. B' k( y$ M# u        RowBox[{"(", ' \: W! Q9 [# Z! W2 }- G
             RowBox[{
    6 ~( I* ?4 e1 L' U( ]& v8 h9 U          RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", " w; J6 [6 X$ @+ p
           SuperscriptBox[
    1 m7 T2 p! M: b" ~. l- Y        RowBox[{"(",
    + u9 }" A! ^/ l. w5 M/ p) u         RowBox[{  w1 {. x$ y, X! P% D
              RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-",
    ; u5 @9 q1 g" D, V; R2 G       SuperscriptBox[
    % ~- [+ |1 q  o$ F, W        RowBox[{"(",
    " {9 M& b+ Q: q# m" u: B/ L4 R4 G         RowBox[{
    0 U! C0 c9 H3 X" |3 h) M          RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    8 V# {+ T% V8 m" K+ R. ^: ?4 T       SuperscriptBox[
    6 i, @4 M* U% l7 u3 V/ b- \' R/ x& T( l& m; d        RowBox[{"(", 1 L; g# p5 N+ t; a) d/ S+ {4 z
             RowBox[{. i. z0 ]  U. s
              RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    ' v; L7 a- I7 q4 `; n# d5 H4 r       SuperscriptBox[2 g4 _5 \% C4 P7 Y
            RowBox[{"(", 2 ~% x, q, @8 k2 L) H  z
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ; {6 h/ t3 g) x& {3 ^% O9 Z1 N       SuperscriptBox[
    8 r8 V1 n  O; }9 ]) U0 _        RowBox[{"(", " V: I% Q) D) h; x2 a1 z8 \5 E
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    7 M/ `  P5 Z' C& B" K2 N  e% O       SuperscriptBox[7 e$ e% z  W8 ~, l: J" u
            RowBox[{"(", 1 ~% o9 ?  v9 L6 l$ R3 h- ?
             RowBox[{
    # ~  t$ r! d* _6 [  C          RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 3 ^! Q* y. J3 N+ K+ o
      "+",
    % h* q+ H! _* E! u9 j  RowBox[{"0.23580523388620733`", " ",
    ' v  U& _& o1 d$ @2 R. a   SuperscriptBox["\[ExponentialE]", 5 X$ |# e9 M& I& n. t* c
        RowBox[{"3.141592653589793`", " ", ) G# N0 d$ @4 x+ O9 p
         RowBox[{"(",
    % T' y; |! s+ @/ I+ v      RowBox[{( ~5 E2 J+ d% a
           RowBox[{"-",
    ( Q+ A9 J) a" o, c* Z        SuperscriptBox[& V* h4 p/ o! d; L" K2 z/ x
             RowBox[{"(", / h' s! g4 `. e3 f4 L2 [# o% S
              RowBox[{
    + C5 j, ~1 d# b+ B4 V           RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ! j4 Q5 q. J. l       SuperscriptBox[
    , v0 `8 B6 k9 I: f6 D% X: h+ W% ]        RowBox[{"(", 8 j( w6 E. \4 G7 R1 G
             RowBox[{
    4 r7 B' F6 N" D% ?          RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-",
    2 C6 J$ {7 _( m  y% E2 ^" Q5 H' w       SuperscriptBox[1 u3 d% H% t/ y3 b
            RowBox[{"(",
    1 b7 a3 w; S# H3 r         RowBox[{
    & x3 D  Z9 ?1 ?) F          RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", % [2 y8 @9 o" N
           SuperscriptBox[
    9 B5 B7 M- u: C- ~3 g( \" N        RowBox[{"(",
    & z/ Z3 B: }* Q) B9 V: M! ]         RowBox[{) \2 f3 G! v) q
              RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-", - z3 r( r6 n$ S2 G
           SuperscriptBox[
    9 x( o* B. s/ |% ?' D        RowBox[{"(", , J) I6 }( a% e8 Y8 g5 e" }; U
             RowBox[{
    2 w. o7 r$ A4 o2 [  d6 ~8 h  [! l          RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-", ! J$ M( ^: p  ]
           SuperscriptBox[( u0 [5 O# i/ E* f1 |
            RowBox[{"(",
    : n, y# r0 y- n/ k; K; b+ w4 K- W! ]         RowBox[{
    ; M: k; j! J5 B+ {, F          RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-", " Z; l. u+ l8 \1 A! B* L: V
           SuperscriptBox[+ ]* R3 ?  z( u. C' c2 B
            RowBox[{"(", ! `" U9 J% P, l$ U
             RowBox[{
    5 n1 B) p3 E. t/ u' s$ h- F          RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",
    $ ?1 |) a2 w2 b  B% e       SuperscriptBox[
    0 d) ~; B' q& V9 D& \        RowBox[{"(", : P% z" P4 s  L3 k5 k
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    + U% r/ B' U4 ]8 L$ A       SuperscriptBox[( E: W1 ~+ L$ f: h: |* P0 x
            RowBox[{"(", 3 ]! w3 p4 U6 S, ~& O; U
             RowBox[{4 P6 Y8 j1 p4 Q6 \
              RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    ( y9 z6 r, c+ i' `: p3 y  "+",
    0 L5 f1 v# M8 g7 Q% [/ w  RowBox[{"0.6670272593678526`", " ",
    # X8 M( q! n  a3 n  _( M8 I) t   SuperscriptBox["\[ExponentialE]", 6 `- _# W' f2 ?. V$ Z
        RowBox[{"3.141592653589793`", " ", / v6 m$ m  Y0 g: W
         RowBox[{"(", % Y! v% s5 i" `; D% A
          RowBox[{
    $ i9 S( q4 p, v' `0 ?2 |       RowBox[{"-",
    9 N: W) R- k- [4 M        SuperscriptBox[. s# Q, U2 `' f3 E* V: B+ f. Q
             RowBox[{"(",
    9 x& R) Z( ^/ x/ Z; ?1 A. h          RowBox[{
    - a# p* _5 k, D; G6 H           RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-", 1 j1 g1 U. P" N5 c: D: Y0 n5 R5 B
           SuperscriptBox[/ z5 N; {+ X0 m& i/ z% |
            RowBox[{"(", 4 Z* I- V) R1 e: n; l
             RowBox[{: K/ I, J% V# i0 J# ?" h
              RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-", & U: |- N4 P( |% |
           SuperscriptBox[
    % i0 f2 X1 X4 ?5 @* W        RowBox[{"(",
    , D( j/ ]& t* c4 D0 h% G         RowBox[{
    $ f% k  D; _  l' f' O5 w1 X  V          RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",
    ) Q% q: K) Y4 C* _, Q% h# b/ x       SuperscriptBox[
      n9 o2 J+ @- _, C% M% z- D7 [9 C- H1 K        RowBox[{"(",
    $ y  A  q, O: m% J) A/ ^6 t7 Q         RowBox[{- P& a2 T6 a# g! l6 U
              RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-", - ]' F. Y! G. w4 ~2 g
           SuperscriptBox[+ l- m: K# H$ Q9 N
            RowBox[{"(", ( _4 O- g/ c+ `. c+ ?* `0 Y$ S
             RowBox[{2 W3 K- k4 \9 k6 ?
              RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-", ) j$ t- U* S. T( w
           SuperscriptBox[* B7 K0 X$ c! N
            RowBox[{"(",
    3 C+ B: q; O, ]" e* Q  J         RowBox[{1 j& P+ S% {' K# K( p, M, A3 S) B
              RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
    0 u) R* f" c0 q2 O, y       SuperscriptBox[4 S! V" s7 a1 H: k2 W
            RowBox[{"(", $ [7 U  `* N) E" P/ \6 F7 ]: V, A
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    % v& V6 ~/ [) t8 V) p       SuperscriptBox[' o, q2 K3 u+ N: E
            RowBox[{"(", ; l, e: t) ~0 x3 I- I8 r
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ) m- v! ~" d  E( c
           SuperscriptBox[
    ! }5 l) [2 [, c6 n$ r        RowBox[{"(",
    # O0 x2 \+ H; G; @# k, z         RowBox[{2 s( }* ^- R. L$ Y7 H9 @
              RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    5 ^# b2 r! `& k: q  "+", 9 i7 e4 k, G, \1 @1 e6 Y3 B7 [
      RowBox[{"0.25282438852646905`", " ",
    3 H5 i1 L. i2 J/ Z: A   SuperscriptBox["\[ExponentialE]",
      P; y8 Z$ Q. I! j. e! a    RowBox[{"3.141592653589793`", " ", % y8 S# a1 f; n% k) J+ _
         RowBox[{"(",   b+ o4 ?4 V/ R  i! z  c
          RowBox[{  z1 b- b8 r3 j4 {$ w+ ~
           RowBox[{"-", - N8 _: d7 |* f' [7 X
            SuperscriptBox[
    ! h, G9 V' ]6 f" I4 o0 J. D! [3 [         RowBox[{"(",
    5 l' N' J- z0 {- A' H( m0 e8 P5 y          RowBox[{- y7 C" p% k# P3 I
               RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-",
    3 B3 i1 r2 q' f; O$ `2 O       SuperscriptBox[3 m: V& V' Y% Z& z- ~
            RowBox[{"(", 3 I0 D7 D# [& U, r6 @0 d& V
             RowBox[{
    5 w5 s% |9 H, r$ m" u) \          RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-",
    / Y) }# l1 V0 p0 j2 r8 t# `       SuperscriptBox[3 k# h3 P1 t+ K* `
            RowBox[{"(",
    # E, B1 |* Q7 O; S  E         RowBox[{0 P4 l# C. J: t( M; P. s
              RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    ; F! m0 I* q6 _, k( u) n       SuperscriptBox[5 d* Z! x: m+ _, T! X
            RowBox[{"(",
    3 Q$ U: |. f/ R; u7 k8 |         RowBox[{2 U. E2 \) h8 C1 k$ y
              RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-",
    4 I) C' z7 {! j! q4 X$ h       SuperscriptBox[
      d& i) B  M, P2 `        RowBox[{"(",
    ) u( A0 ?1 [3 T) E         RowBox[{* {5 V% |* K( V% m6 V
              RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-", ( K! k4 H& d8 J" @# c* J; L
           SuperscriptBox[, V  C- }; Z/ U1 T
            RowBox[{"(",
    0 |1 ]9 @0 ^% G* i( T         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ) r& m0 |2 G! X- x; @/ e& @) U1 V
           SuperscriptBox[3 V$ B- d$ X3 j- S' f- A# N# |8 I7 Z
            RowBox[{"(",
    : n* V) w# |6 r' A         RowBox[{* e3 l! A3 i/ W- F
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 1 X* N; T+ \/ c
           SuperscriptBox[. ^1 g/ k- u7 b* s' N) P- [
            RowBox[{"(", ( \; O" s8 o/ P5 U/ g
             RowBox[{
    4 D2 v' O2 I; y# e/ s          RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    - q# v3 s/ r1 L8 A       SuperscriptBox[0 l. r% K4 p( i& `* g8 M
            RowBox[{"(",
    8 D, ~7 X; x! \+ ?4 \         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], % B: I' j( `, ?# _$ L
          ")"}]}]]}], "-", 4 n, s! S8 @4 ^. ]7 h
      RowBox[{"0.07581214474544527`", " ", 1 K( L0 w& ^7 T; ~" {
       SuperscriptBox["\[ExponentialE]", / H% s( \2 z7 J8 i* `9 f5 q+ `
        RowBox[{"3.141592653589793`", " ",
    6 y1 V! y! j$ b7 x, o1 _8 m$ s4 B     RowBox[{"(", # m1 ~1 p- c7 @' y+ V" M- D
          RowBox[{
    2 ]+ B) H' B% o- c$ t       RowBox[{"-", 4 {' |+ E3 y+ }  x: |
            SuperscriptBox[
    3 C8 q4 G: f- p; B% n' i2 i         RowBox[{"(", 9 Z# r% f/ n& \# z. Q& t. W: Z- S
              RowBox[{
    # a/ i$ h& t, |1 N1 |" n9 w8 A           RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    5 _* [/ k" }8 [" z( b# _  W9 C( o3 D       SuperscriptBox[
    ; |3 B- X/ F  J  N, D! L        RowBox[{"(",
    2 ~1 A8 ~# f9 f3 g         RowBox[{7 o" D7 \5 ~0 I7 t; B, U9 l4 {/ X
              RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-",
    7 ~& k( Z  I7 Z9 ]       SuperscriptBox[5 h6 B4 f3 h1 s+ w- @5 _- r7 x
            RowBox[{"(", & K" M# o3 S- i
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-",
    $ y3 H1 Y) Z& m+ H1 q# y7 b' j/ k       SuperscriptBox[
    4 ]# v# x. E( n9 ?        RowBox[{"(", 1 N5 q4 l  T. g
             RowBox[{0 p$ K! ]7 t5 k! a+ E
              RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-",
    & z- o4 Y' ?0 u$ H0 d5 _- U       SuperscriptBox[, D4 w6 J( J1 ?% z+ K: q
            RowBox[{"(",
    6 S/ Z& @7 v0 |+ t& Y- I         RowBox[{
    8 m; V5 X& m3 Y9 S$ z0 J5 S          RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-",   W3 s6 x2 e4 l4 t, c+ t5 a
           SuperscriptBox[
    + O+ n4 i8 G5 z3 v7 ?* E5 [        RowBox[{"(", , {6 e' e8 @$ C2 a. V
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ) ?6 L3 N2 Z# E+ i* e6 _       SuperscriptBox[, u9 i" G) k0 r$ Q* T
            RowBox[{"(", 1 {6 G% E8 \, r; z5 b1 _' Y
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", & D% a# T$ y4 H4 G9 u8 g. m; W
           SuperscriptBox[
    6 C# f; Z* K8 c        RowBox[{"(",
    3 E& {; v& m- ?  H# \         RowBox[{
    8 y! @, }+ X) y: c4 U6 l          RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
    * J! |2 X  i: u5 \       SuperscriptBox[) t, \: E$ h7 }, R  t$ N* ?6 M+ i1 [4 v
            RowBox[{"(", % L5 U% u% {# y: S
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 7 H* U2 c3 W# B6 r- G
          ")"}]}]]}], "-", 3 }) ^0 Z5 g0 I; d& D; j
      RowBox[{"0.10599338351843157`", " ",
    ' s$ ]+ J& l4 O( F+ y/ A# I   SuperscriptBox["\[ExponentialE]",
    & B8 R: S- f2 n  x5 L    RowBox[{"3.141592653589793`", " ", - M  |# Z, @+ U: F2 D
         RowBox[{"(",   l* A+ `0 v* ]; A( i2 a9 o$ O. K
          RowBox[{0 e7 d8 ^6 F$ x) ~$ A: o
           RowBox[{"-", 9 o  k7 D4 o0 O5 J, @
            SuperscriptBox[
    " k+ y0 G2 i; T         RowBox[{"(", 5 X) y% @$ N7 a4 a
              RowBox[{
    % e8 t: D" W5 a) ~1 Y           RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-", $ R4 Z  U/ W: O( W/ B+ f9 `
           SuperscriptBox[5 ?! d* P$ Y; R! U  {0 N
            RowBox[{"(", ( @" P1 L4 c7 B% B
             RowBox[{3 b1 O2 B* M, {9 U$ S3 A
              RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-", 3 Y0 o8 d& X$ y( `, H$ O0 E4 s$ m8 C
           SuperscriptBox[
    & |" `. V9 R7 {; ], \        RowBox[{"(",
    , e8 u+ q2 N; V3 o         RowBox[{
    3 U0 w6 ]  }6 G5 P          RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    , N, U$ x( e( l5 k, `8 F, b+ r$ v! F       SuperscriptBox[' {. ?. M6 j* I* [) h
            RowBox[{"(",
    6 R" E( ~# D. C; @, V+ i" i         RowBox[{. z6 F/ f; ~7 Y1 r
              RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-",
    1 F" e9 H6 H# I6 I" ^" F, \$ T) j+ E       SuperscriptBox[
    5 y: s* |1 C) T/ P, M        RowBox[{"(",
    " K0 I' a  {3 r3 M         RowBox[{
    3 A  Q5 N2 p, Q+ Y* J          RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-", ! k" T7 L. r5 U) `7 r# {
           SuperscriptBox[
    * l" W; j4 y! ]9 c3 A        RowBox[{"(",
    ' P  g. f" q2 B. d6 j; n) ?         RowBox[{& c' G2 U+ y3 Y" I0 U
              RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-",
    2 l4 E2 c% @. b. s       SuperscriptBox[( R; c) ?) G7 Z2 w* _
            RowBox[{"(",
    . o! y9 b; c# m! l$ A         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ) J  _( m! b! r% \" ?% X  a
           SuperscriptBox[+ V" x( o8 Y5 p5 K; `
            RowBox[{"(", ) b9 `5 |4 n1 o! C
             RowBox[{
    8 a: l6 N1 l/ E/ @! V( q          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    % Z* Z+ a2 e9 ]' K! H       SuperscriptBox[
    2 I) {" d3 l+ \; \6 x6 z0 z5 m  K        RowBox[{"(",
    , m7 g- d5 N: ?- T/ \* {         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], : }1 \* a- T+ \2 {
          ")"}]}]]}], "+", / P2 _/ F# D1 w+ s  U7 K3 L: `
      RowBox[{"0.500820838606441`", " ",
    $ ?0 ?1 H! }% [' I/ s+ |& m  j   SuperscriptBox["\[ExponentialE]", 2 J0 Y  w2 P9 r4 r8 I3 o. r
        RowBox[{"3.141592653589793`", " ", 4 u1 x9 G/ B7 v# z
         RowBox[{"(",
    - U4 F& W3 I3 D: A7 N      RowBox[{* M" g% w$ j8 D6 i
           RowBox[{"-", " y) x4 e2 [0 P6 C6 a1 u
            SuperscriptBox[2 x, K3 B& b4 ?8 U
             RowBox[{"(",
    0 F( i+ n; j) j4 `          RowBox[{/ q+ t, G- I4 `# D; C
               RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    7 W% H+ x3 P5 c       SuperscriptBox[
    ' j7 Y" P9 \, r        RowBox[{"(",
    * F! u" v7 p; \6 w! J* P3 W! m         RowBox[{4 J3 j# j  P$ i: o+ c( [
              RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    7 v8 \% P" U/ i* B( p& @       SuperscriptBox[
    / Q, d6 o: [4 B        RowBox[{"(", 4 ^6 x- s  G& s2 M
             RowBox[{* m/ s+ h2 M' I! `0 G6 k. q' S
              RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", $ \4 ], N  |% R8 t5 L
           SuperscriptBox[
    " [4 `- k- I/ U3 n% F        RowBox[{"(",
    2 u! e2 I: ^2 c% q3 X) `8 ^* a; Q         RowBox[{! @6 q/ G* x5 C6 z
              RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-",
    * E. g4 V5 N# C; `- H       SuperscriptBox[: \( ^3 X1 E  ^6 v% D& l
            RowBox[{"(",
    9 P" F5 x- p8 y8 |$ A$ g         RowBox[{  H2 d, C5 M. ]
              RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    , s% O, m/ D* k& j! u       SuperscriptBox[
      z* e' C# v% o* o# t- V        RowBox[{"(", , J& E  l, @. P8 P+ C
             RowBox[{- a9 n; z1 d* \$ e
              RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    3 @7 D) `' A; w       SuperscriptBox[
    7 D1 s+ {6 p9 S; v3 n7 T        RowBox[{"(", ! O! ]. Y, H% N$ e
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    4 S% t3 L/ H6 g5 Q: ^- C; R       SuperscriptBox[
    ! r+ e  d" g8 F( a) s: T7 ^        RowBox[{"(", % B7 Q$ Q- D" T: w# V9 V
             RowBox[{  }/ E$ ?# I1 u: [0 l4 E% P
              RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", 9 n- T8 @, d* I6 A# W
           SuperscriptBox[
    ; o, k# p3 z, b& Z6 |        RowBox[{"(",
      }- z* g: ?: z         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    7 K2 j+ Q, p( \0 m) S  A# c      ")"}]}]]}], "+",
    % W8 X6 |( {7 f4 J1 s  RowBox[{"0.32564305572552416`", " ",
    $ ?7 p/ b4 L; h, @/ c" a   SuperscriptBox["\[ExponentialE]", & |, Z+ c0 R/ n* Z
        RowBox[{"3.141592653589793`", " ",
    ' l$ {( X$ h7 F     RowBox[{"(",
    ) |. H# P3 H8 i      RowBox[{
    ' u7 F0 |: C4 G' N; F       RowBox[{"-", 2 f: N4 F9 j9 ]# W
            SuperscriptBox[
    0 ?: @7 V! _- n  {: A         RowBox[{"(", * l/ z4 t8 p; ]
              RowBox[{
    % H7 a- K$ J# D           RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ' n+ f9 V$ }; N$ g$ m! {       SuperscriptBox[$ O2 k2 k* W  U! c9 L% E
            RowBox[{"(", & P3 t% }/ J% i
             RowBox[{
    ) N. e6 f( b6 j+ F          RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", ( }0 L- w+ u: J  I$ y
           SuperscriptBox[
    % a5 W( A( [! A2 |& N0 M6 A2 E+ g        RowBox[{"(", - d% C+ b" R2 x  |; n. u  a: Q
             RowBox[{
    / @+ g; \  j3 u9 Y- {7 I          RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    + }& I( Y5 a* F0 s  Y% x+ N7 e3 r       SuperscriptBox[# S  A7 P% J) Q3 Z. ]( \  I' ?
            RowBox[{"(",
    3 `+ {+ R2 M) h/ J& K% f* B5 z         RowBox[{# |# H: q, l8 |! q' E9 @- {; i+ E7 i" _
              RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-", 3 Y6 a) h/ H2 G5 S' p
           SuperscriptBox[7 S3 ?+ }0 h( J  z- x: ^0 V
            RowBox[{"(",
    & z. d9 O8 W9 w% C- M. j* v* Q         RowBox[{
    % `7 o, o) h; g, e( M4 U          RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-",
    ( Z9 m9 N" Q0 F& K. Z       SuperscriptBox[: A1 {2 I  m3 B# y+ Z
            RowBox[{"(",
    ; g% T. k! b; h8 h( T) h         RowBox[{
    * a( L/ M) ?9 C2 R          RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-", 2 I; Y6 X+ B" [0 U( R$ V; r1 q
           SuperscriptBox[- J2 H' J6 h7 R% g3 y
            RowBox[{"(",
    & M6 \5 n- `6 L, G         RowBox[{1 t2 G$ Y- g% N0 ^0 _
              RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-",
    ! L* @7 e- \& Y- b       SuperscriptBox[
    " n0 Q4 S8 W/ T7 D$ l8 r1 x        RowBox[{"(", / f2 R+ [1 G$ v0 J& e# S' |
             RowBox[{) t0 Y0 j" D4 |% m$ c% A9 [
              RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    1 w# r. c' z! Y3 I8 S( J       SuperscriptBox[! u8 R3 s2 ?* X, A7 q8 G8 D6 B
            RowBox[{"(",
    ( g* t0 v( s+ K3 ~4 O+ h         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    - ~6 ]' u2 S* Y0 c5 ?- r7 s      ")"}]}]]}], "+",
    . ~; ?4 W7 u+ `  \  G( |  RowBox[{"0.6665374509702799`", " ",
    9 P* b1 y4 R; \: q7 ~2 V   SuperscriptBox["\[ExponentialE]",   i- `+ o  X- d& p
        RowBox[{"3.141592653589793`", " ",
    6 K) }  L+ {2 E9 Y2 D7 p9 `+ |     RowBox[{"(",
    7 I+ _: U, k* r0 n4 x' u$ C  [7 P      RowBox[{# ~& i* @8 J6 w3 T
           RowBox[{"-", $ Y1 w3 S4 _" k4 a) J' i0 o
            SuperscriptBox[
    & X3 h0 v* C$ i) u$ h. q- `         RowBox[{"(", , n+ \4 b6 S! H' o  T2 j
              RowBox[{5 Y7 _7 d4 w" K* `
               RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-", " i# G: H2 x( h+ E3 O5 C
           SuperscriptBox[% Z( @3 C9 z2 L/ B  s% b) d
            RowBox[{"(",
    * Z/ y/ _- a) S3 z( Z% r0 I         RowBox[{
    ) O3 f/ v% O( Q1 a1 A          RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-", , G% m) p  p5 {; v- J+ ^( ^0 n  `
           SuperscriptBox[
    : s9 Y" S* s( _" J; d- E  O! u4 ^        RowBox[{"(",   q3 |/ ^5 w  F) K
             RowBox[{
    9 N) w! R  v$ O3 ^          RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    2 h  }7 e8 v0 w* N' E9 \4 ~9 I       SuperscriptBox[
    4 I+ h2 U5 ^! a1 _! J' Y- q- f        RowBox[{"(",
    4 x; c2 f, N: G4 N# T8 ?' `         RowBox[{2 E* H- R8 T( z3 `2 {" h9 M
              RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-", ' P; p# J* `1 R; r( i6 y8 N) q
           SuperscriptBox[
    0 I; B4 Z& Z' I. ~% w! q. e        RowBox[{"(", $ [, r6 [6 C$ U# A  G
             RowBox[{
    ) |0 z1 v# N4 T4 W2 ~& L9 O4 H          RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", ( x2 [4 W7 t# _+ ^; b7 e% m; T& g
           SuperscriptBox[3 g* \6 F! g* P1 Z, _: ?
            RowBox[{"(",
    ! |8 b8 ?0 \7 K, E         RowBox[{$ f! v0 w  @2 l. \
              RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", ' P3 w6 L: E% o- Q( `- Y$ w
           SuperscriptBox[0 }! v7 ^$ F) ~% |1 [0 f
            RowBox[{"(",
    5 H& i8 I# e8 ?, [: ~( `         RowBox[{! I( N! Y2 D7 j2 d- y0 I; K) x! }+ M* f
              RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
    + S( l9 d4 i6 E       SuperscriptBox[, p8 U  [* p0 L7 I0 D( A6 g
            RowBox[{"(",
    , ?  N  i" e( f         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    4 ~) c* `$ d0 t! \6 `3 k( ]       SuperscriptBox[4 Y6 h  q. W; h% O  Q
            RowBox[{"(", $ ?. f. S  U8 U
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    2 u& }# H4 [! t5 `* i# _      ")"}]}]]}], "+", 9 U+ }8 K7 Y8 U9 ^7 W
      RowBox[{"0.4812237524557292`", " ",
    - g: ]7 p- H. u9 L0 H   SuperscriptBox["\[ExponentialE]",
    2 s, |3 Q. p' B/ e3 A    RowBox[{"3.141592653589793`", " ",
    1 F; c# k5 t' k# b' a     RowBox[{"(",   u) o& u& p! N- q* I' o
          RowBox[{
    ) _& T9 B- H$ x" _( y       RowBox[{"-",
    9 I# c! d/ P& [        SuperscriptBox[# t( B+ X8 _- }
             RowBox[{"(",
      b0 B# P4 }- d  V0 {          RowBox[{  L2 d  {; x4 S9 K' B6 e
               RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-", ' I) H( y0 i5 o, u& X' ~) \- G5 F) k
           SuperscriptBox[
    5 Z: ~) i/ o9 e3 L; r# F        RowBox[{"(", ) P6 |2 h! {. R; j9 ]  y4 i0 k, T
             RowBox[{/ @& N( h) X& o2 b% }( w
              RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-",
    " B4 t: D5 z% M0 i# J, N       SuperscriptBox[
    , _; T. y* p) c- |: X8 t! s        RowBox[{"(",
    ! g5 U2 n8 N; o( A         RowBox[{
    * z: V$ h" o( S/ r, N, J          RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", 5 Y; i3 A" M& }- n0 [3 |! c
           SuperscriptBox[
    - }8 [( |8 Z/ M0 Y# C# c        RowBox[{"(",
      z) D0 w3 ]) w7 ^         RowBox[{3 d6 E9 ^' Z3 M8 ?1 g9 y$ O' @
              RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-",
    3 F; G* u! u2 q$ Q4 {, K+ }       SuperscriptBox[2 P  o$ s% e1 s/ y' u
            RowBox[{"(",
    / m, l% q2 k% _; Z* T5 ^         RowBox[{8 ]* W) g0 W$ V4 E6 I$ }4 F, r
              RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-", 6 v: A1 t% D+ R1 e0 R4 a
           SuperscriptBox[
    ; W, f- @: [4 g        RowBox[{"(", - y0 f3 A$ ^! z1 j; f' f( \6 C
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 0 n3 t! c  O/ n. t% P6 y7 P' n% C& H
           SuperscriptBox[
    & x8 I" s: W( b( s. k' z        RowBox[{"(",
    " U0 \/ h& P+ W. I% I1 W  d/ l3 H6 `+ n         RowBox[{' M* ]- t- a- w$ O9 j* {, T4 Z" N
              RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", ) L: x, o; @( y
           SuperscriptBox[
    : [! j7 \6 B+ I. F5 @  b+ ~  U' P        RowBox[{"(",
    # m$ `9 j5 c& f- M* k2 ~1 Y+ ]/ N         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    $ W: r6 N2 `- ?6 j$ P0 Q9 @- b1 y       SuperscriptBox[" N- e+ H" P6 P0 O3 F% e1 x
            RowBox[{"(",
    ) T1 v, s' J* }- N- {5 Z- `  V         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    % Y$ y! S& r% d" l3 ?      ")"}]}]]}], "-",
    ! r, d0 p2 r. n! X: {) O  RowBox[{"0.17602467625404622`", " ",
    1 L8 ]7 f7 L  n7 w/ N   SuperscriptBox["\[ExponentialE]",
    1 s/ O. U' B* {9 K0 _    RowBox[{"3.141592653589793`", " ", ( \+ ^* Q% R% R1 G; C4 P5 w
         RowBox[{"(",
    / E, P4 v  f7 O; }7 n# I      RowBox[{% f& g% }' F$ ^, u  @
           RowBox[{"-", & {0 t5 S4 H3 b
            SuperscriptBox[
    / ^) ~( f- l4 M1 q2 ?# l5 |         RowBox[{"(",
    0 {! @5 s2 }- M8 r& {          RowBox[{
    - C$ y  D- D1 O; n2 f2 p           RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-",
    - j$ P2 K3 M, |       SuperscriptBox[
    % O) b- {2 p1 I/ l9 ?  f        RowBox[{"(", ( h# t6 h4 C* @3 _8 y* E; O
             RowBox[{+ |7 b- r2 f8 j" z8 S
              RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-", ; d9 f3 E* M2 U
           SuperscriptBox[0 m  S  k9 c6 Q( Q- T) M
            RowBox[{"(",
    - n& Z: p+ q4 {! C  z2 Z         RowBox[{9 ]: V1 C2 Y, P4 k* a( x
              RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", 8 G7 {" m# V' E! T" R
           SuperscriptBox[
    - q1 @% d6 o; I" v& X6 T. P8 J2 C        RowBox[{"(",
    ; `9 D7 W) K  n" S: g: o2 ]& u7 v         RowBox[{% U3 s6 w0 v0 H7 j0 B% ]& w
              RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-",
    / n4 \. M  P9 n, {% p( K. k       SuperscriptBox[  c/ a' d% H& X7 N
            RowBox[{"(", , A1 C2 a" C9 i( _7 Q: ]
             RowBox[{, H. e5 R! _# j# z
              RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-", 0 Z( H; Z! U% Z: R# G- z$ t& L6 o
           SuperscriptBox[: b/ `) b% V6 q/ J5 @6 q' l
            RowBox[{"(", 8 {5 k2 M6 {% J+ O8 W" Z7 ^: f5 Y
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
      @7 ]8 \# b" P, u4 b       SuperscriptBox[" _4 m: j! m: t( q
            RowBox[{"(",
    + M; m) @' i" V" v% s; d9 r; i. k         RowBox[{
    0 J1 y: P$ o. P* a" a' S$ w% y          RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", ' F3 K& U* \% [8 |* I1 b5 ~
           SuperscriptBox[4 ~, ~! B; n0 d2 F% I' W  ]
            RowBox[{"(",
      H; Y+ ^+ C' E$ L* C         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    5 z  Q( v+ _/ P9 }       SuperscriptBox[
    / X* ^9 p, f" i/ Q0 Q" _8 |2 m        RowBox[{"(",
    % ~& u) ]# U- G1 p8 N! F' E         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    4 q# H1 z$ i; j2 F, X$ M/ W      ")"}]}]]}], "-", & H0 ?& E8 {+ \9 Q. O" Z! h
      RowBox[{"0.5945873894818967`", " ",
    - O# i  Z0 M' n& ?   SuperscriptBox["\[ExponentialE]",
    3 q% H, l2 ?' r9 R# w# \  }3 X    RowBox[{"3.141592653589793`", " ", 9 |+ P5 L9 E) ]" W# ]
         RowBox[{"(", * v3 Q/ O, U, S& ?
          RowBox[{+ i3 R! q6 s5 x1 w4 q1 `& H6 f
           RowBox[{"-", 1 `# {9 }8 p/ K
            SuperscriptBox[
    ( t/ i* ]. D$ m         RowBox[{"(", 7 V6 O8 l# Q- H5 M; a" N( v1 z
              RowBox[{
    + r5 @3 @3 M+ f/ H           RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-",   S9 G8 u3 `( ~, S( F" x- P  @, {5 u
           SuperscriptBox[0 W/ e. ]/ }9 x4 D' Z
            RowBox[{"(", 4 p+ }7 v# @- v' ^  X" j
             RowBox[{' r" a8 ]% G2 E5 n  d7 I
              RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-", # f) K, f5 M2 \, X  e
           SuperscriptBox[1 G  A' X. Y7 X3 i/ O- a( ^( f
            RowBox[{"(",
    ( Z1 ]4 c/ |) d. ?1 V$ q7 W         RowBox[{
    # v: @$ m) s2 o6 O1 f3 U          RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",
    4 T3 n  @8 a: \2 y$ p! |9 |       SuperscriptBox[& ^. L2 c) y* _0 g
            RowBox[{"(",
    8 E9 b. Z" Z5 y; c         RowBox[{
    1 Y5 x3 H- u6 o2 Z1 S          RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", " e0 e: N0 @  o4 q& {$ \7 g
           SuperscriptBox[# F, K" k  f8 A+ x& x7 ]3 g; ~- b
            RowBox[{"(", 5 V* e* T2 b+ d/ i+ U5 N( e% C
             RowBox[{1 R/ e! a: |4 b7 t1 }: g& D. V& z
              RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-",
    * a: }& L; D# g3 \7 R       SuperscriptBox[
    ! G" N! }; r: S3 m# q7 }5 E        RowBox[{"(", ' w; E$ u) y0 G7 c
             RowBox[{
    % n6 r9 t4 G" b" J, N          RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    3 W5 o5 f8 R4 F9 y& i+ b0 C; N       SuperscriptBox[. w$ K" W: L4 z2 z. r
            RowBox[{"(",
    6 n  a1 u' \0 b         RowBox[{: t" x" J+ {  Q7 d+ r7 p3 y& O0 A
              RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-", ; E/ {! d/ b3 y# S9 D
           SuperscriptBox[1 z; _* q7 d. M# h* q- X
            RowBox[{"(", 3 v9 k" w. l' u2 w/ E& ~9 v* F
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 1 w/ G9 _5 c1 r  ]* m& c; x) F' d
           SuperscriptBox[
    % g0 [+ c9 U: Y3 W+ }/ s        RowBox[{"(",
      W- d) N5 \+ Y4 s         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    3 i1 G6 h( x+ _/ i: C      ")"}]}]]}], "+",
    ; [  c( j' D1 R0 W3 u  RowBox[{"0.5252475961933538`", " ", 6 ]3 X9 y& f& A0 a# j6 S! ~" N: q0 Z
       SuperscriptBox["\[ExponentialE]", 6 Z( Z/ A' c% L. m7 Y" P. H( G
        RowBox[{"3.141592653589793`", " ",
    * `4 m  V# a  `' R. F- R; n! `     RowBox[{"(",
    % B! w* M' ], n- x9 u6 f      RowBox[{
    + l7 ?- m# @, F7 l       RowBox[{"-",
    1 U6 `; H8 Z4 j' e, W        SuperscriptBox[
    % L% i9 I, |4 l8 I  h; S1 m         RowBox[{"(",
    , `$ r0 O  ?) I! R) ~$ q          RowBox[{
    : `) [) N1 w& |           RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-", ! i$ G0 v, W) [" e8 M
           SuperscriptBox[, o% g6 G; V3 _
            RowBox[{"(", 9 ]/ ^' T0 V3 K( {2 w3 K% n( b7 V
             RowBox[{
    , L" a; ]1 z+ k2 @. }6 M9 f          RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-",
    3 h; p: J8 I3 j; H       SuperscriptBox[8 \' D1 n& y0 e3 t2 }0 v! o
            RowBox[{"(",
    : _. D7 d& q% ]         RowBox[{* F* y1 N) s7 g+ Z
              RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", $ [# o& }3 Z- n9 p2 \
           SuperscriptBox[
    ( y$ ~+ x: k5 K; w0 _/ b        RowBox[{"(",
    : L/ C; n3 ]4 S  g  v: Z2 t4 T* u         RowBox[{. G8 X' ~: x2 S! i# L! K# e  ?9 _
              RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-",
    0 u3 T; Q8 m, R. V# m9 b       SuperscriptBox[
    & u+ Q/ n) X! @* O! H$ ]        RowBox[{"(", & w" O$ t7 |3 X" W  k
             RowBox[{
    # k9 S) M: D& J; g8 [2 m          RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    * {% a3 C( Y8 n: P  |4 b' S- F       SuperscriptBox[
    ; R2 \" Y( n7 N4 U/ z        RowBox[{"(",   E; s( F8 \$ f8 [! y4 d
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    # L/ l7 j4 L2 B# T. P' z       SuperscriptBox[$ `* _# b6 C& O7 o
            RowBox[{"(",
    # ?- u4 p  X- l         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ) ?6 l: R1 l. Z7 z' ]: q2 n
           SuperscriptBox[, I2 b, W* b- S
            RowBox[{"(", 0 ^6 m& z' D6 @$ {8 L9 O  o  K
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ) B8 l: f$ F: K4 K/ Y, _3 p
           SuperscriptBox[
    3 h2 f. ?- p9 ]        RowBox[{"(", ; H9 B9 X- \( o3 N8 R  U- m* `
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    5 l0 n! {+ S/ U' k5 ~. q      ")"}]}]]}], "-", 9 E) U2 t! V5 I; Z1 ?
      RowBox[{"0.320472847796449`", " ",
    $ Z  b, N% u: p. C+ ?   SuperscriptBox["\[ExponentialE]", ! l/ {: h  k3 b+ f1 {1 x1 V( p
        RowBox[{"3.141592653589793`", " ", , u# v* Z, E" h
         RowBox[{"(",
    + ^* f$ L( Z. [2 S9 }      RowBox[{& A+ F( u! q# R* y1 L2 N4 N
           RowBox[{"-", , H/ @& \: p$ l4 H8 n5 W
            SuperscriptBox[
    8 l6 I+ ?9 A, r- q& n         RowBox[{"(",
    7 z# C1 |$ {' K+ j6 Q& A          RowBox[{9 I( P( D  h4 ]7 o: |5 X
               RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-",
    1 Z4 a% N; v) ~" Z! E0 _       SuperscriptBox[4 P) l8 ]( N9 F$ u' P$ W# w9 k
            RowBox[{"(",
    ; B. z! @+ U$ r4 w         RowBox[{
    . H4 ~3 d6 \. w+ p7 J- r; z0 v# D2 D          RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-", 1 [8 {# O) Q3 k7 ^: s9 N& c
           SuperscriptBox[# P2 i% S9 k, @7 z" O" G5 s; V# V" m
            RowBox[{"(",
    1 w/ V5 ^+ C; W- A$ g) N, ?. W         RowBox[{
    % |8 c' j  W4 H% E          RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-", - _+ `* L  E1 a. p) z- q
           SuperscriptBox[
    9 N: R# \, x+ ]+ s; r        RowBox[{"(", 0 x. |0 X  R" B1 z0 T8 D
             RowBox[{
    # E1 y# r* {" Z/ p5 J          RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-",
      D, M# N5 z) d1 \4 a" T* Q2 P       SuperscriptBox[8 A: q# x; j. V: f) S& V! N1 c( U( b' g
            RowBox[{"(", / k  D& I; n  t7 h$ R' P8 V4 ^
             RowBox[{$ D6 W; ~6 l% Z: T4 S0 X1 P8 S
              RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    / Z. l' D5 {. x+ r; y       SuperscriptBox[5 X3 y4 b3 w2 {" ?0 Z) I
            RowBox[{"(",
    ) X5 R( t( O* I2 V+ b8 h         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 4 m1 [$ `) U' R' x, \& H  |( S. c, {
           SuperscriptBox[
    ! n3 q* |8 s$ M        RowBox[{"(",
    / F! o0 Q! R. r+ l1 q, y         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ! a4 j0 p) k% l       SuperscriptBox[8 `3 o  u/ A$ ]: {; a
            RowBox[{"(",
    ; @/ [/ e: R: {% a! z, A         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ( D' u, N" {4 N5 I$ k  U  Q( G7 c) ~       SuperscriptBox[
    7 q/ d0 ?  K8 A& a) D& z) [        RowBox[{"(",
      r/ V6 d3 \6 P" |* U0 g         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ' w: x0 Q7 Z5 G* t7 E
          ")"}]}]]}], "+", 9 p1 _% u& S3 b  \9 o
      RowBox[{"0.7528674241482847`", " ", ) E: u1 ?0 v: m8 L0 q* Q9 m2 o2 ?+ K
       SuperscriptBox["\[ExponentialE]",
    % C1 B) I; n- u; @    RowBox[{"3.141592653589793`", " ",
    + _& U* @2 J6 N8 W0 f7 ^0 p     RowBox[{"(", . Q& T: U& f) b5 r4 ^/ ?- m
          RowBox[{
    ' g5 y+ P7 r3 E, k& T# H       RowBox[{"-", : N1 z3 t- M3 g9 L& B
            SuperscriptBox[
    ! R& _5 e# ^1 ^' i2 ~8 M/ F         RowBox[{"(",
    + H( K0 X, B" M9 o% |: h          RowBox[{
    8 f! ]0 M3 n* [& V           RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-", , `- s7 J2 s8 T" K2 M2 G
           SuperscriptBox[
    5 j: J$ ?, w2 o8 D8 L) Z        RowBox[{"(", % E8 U+ {3 A% b8 ]( _
             RowBox[{
    / h6 n" y/ K( c6 P          RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-", 8 Q# [7 c: E% z/ j& I9 M
           SuperscriptBox[( G0 i! W4 n$ C4 G
            RowBox[{"(", ( b% Y  R& f& i) U! }7 }* o1 Y
             RowBox[{$ z1 n5 d) S! G7 i
              RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    8 R0 ^5 ^5 y# P" ?% v       SuperscriptBox[
    3 j3 u1 A" t5 ~7 w0 H! j        RowBox[{"(",
    4 O# M& Z: _3 m0 `# O# V. Q         RowBox[{5 ^5 f+ k2 H9 B8 U
              RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-",
    7 V1 j  e* Q8 R0 ^% L       SuperscriptBox[
    - n" C, Q- S3 b' L& o" g! H        RowBox[{"(", . Z9 Q; W6 p) }+ {; `" q% P
             RowBox[{" i2 d, r: q/ n! t8 r# n
              RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-",
    5 i' Q! _4 i: B$ \       SuperscriptBox[  P3 X7 E( p. `/ O
            RowBox[{"(",
    , W; Y, I! Q4 j3 ^1 G0 j1 x& Y         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",   Z/ M' m+ W- {9 J4 @4 V3 [6 y
           SuperscriptBox[  F$ M  ?4 P. O  ^1 M  ^
            RowBox[{"(", 4 t8 F9 u' B7 n
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 4 }& [9 Q4 S0 A  {. y
           SuperscriptBox[' w6 B3 ?; C2 G7 l
            RowBox[{"(", 0 Y0 t, E8 U% M' a, P# \
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ; ^6 s9 t) u+ [' ]       SuperscriptBox[
      K$ A9 K% e0 N- v1 M$ ?; Z  O3 w        RowBox[{"(", , _0 F# a0 Z! B7 V. H: N4 x
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 1 G5 a% o. b0 S" {+ s5 [9 \; }
          ")"}]}]]}], "+",
    : `' {. H7 B' r  RowBox[{"0.02759193650965952`", " ", 0 q& e4 m+ p, `  F7 U
       SuperscriptBox["\[ExponentialE]",
    / [& N# ~5 e, a& Z* I    RowBox[{"3.141592653589793`", " ",
    ' K/ _/ @. S0 v# v: N     RowBox[{"(",
    9 h2 R7 {; W( R; @- p      RowBox[{
    6 G$ u; [9 e# T       RowBox[{"-",
    * [8 R% R& d& w# P4 r+ y4 r% d8 T        SuperscriptBox[
    / |/ w4 _5 }8 c8 a: k) {4 z         RowBox[{"(",
    ' t: a2 L  ^6 @/ m2 j          RowBox[{- F6 C3 I5 l# a6 E0 C8 k- ?2 j" x
               RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    & i% r" w) K0 f9 b) C$ G       SuperscriptBox[
    6 j# u" @& b- s        RowBox[{"(",
    : J, _, h& g4 R/ b- x         RowBox[{
    , g( b, l% `3 N5 C7 a; |          RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-",
    % _2 e1 r- P3 M& Q2 M+ @       SuperscriptBox[
    4 s# q! w0 k) [- r' Q8 h% R) m        RowBox[{"(", # K! S8 l5 G6 ^7 |
             RowBox[{4 I3 w; z% w2 r4 j
              RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    ; ~; W3 K/ ^. `7 N/ |% G7 j" D7 G5 m       SuperscriptBox[. ^. N8 j: L" V5 a( J3 h
            RowBox[{"(",
    2 a( E, q) U# F) i& }2 N; `         RowBox[{3 l; A& l$ Q. j, a, z' D* b
              RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-",
    & |. E4 T/ X+ e: }, I/ v       SuperscriptBox[: z) T4 q. x  h  \5 v
            RowBox[{"(",
    ' H0 M0 _+ p7 @4 H8 W# B* ]9 Z) N         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", + A- G$ \) i9 r2 {; r1 Y
           SuperscriptBox[8 i- Y6 u5 h" z
            RowBox[{"(",
    - g7 A- r3 {+ a  m7 X$ q9 Z         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ' N' r) k' X% ?1 k7 M# L- `( T
           SuperscriptBox[
    ) n2 \' }; l  w        RowBox[{"(", 2 x8 f9 I5 B/ X9 z+ p
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", - ~( w0 t6 s' L- v
           SuperscriptBox[: }' Z' G) R/ B
            RowBox[{"(", 8 I$ P- j/ X2 d1 Y' f! k
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    - d; h9 N# S. f; {4 W% n       SuperscriptBox[! @/ k5 p$ P8 g( g
            RowBox[{"(", * x+ B3 B  y) a# o8 R/ q, S
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], / v4 B: G" F+ J! ?
          ")"}]}]]}]}]], "Output",
    / o$ L2 y! x2 q2 G. S! m" g CellChangeTimes->{3.577924759875*^9, 3.577924921203125*^9, ) d1 ~' |9 X4 d
      3.57795759203079*^9, 3.5779589554964056`*^9, 3.5779621253913965`*^9, 4 I- f1 K% Y2 N) N" K
      3.5780123515625*^9}]' ]4 w. L8 [# b& w7 @# b
    }, Open  ]],
    : W' y8 G5 _0 D! z. J
    2 v  `2 A9 e* N" NCell[CellGroupData[{
    . x& A( s1 Z' n: Y+ Z8 P* t9 E, z+ a+ @& J  N! F% _3 {' t
    Cell[BoxData[
    * c8 b; J+ n. F' D5 Z) k RowBox[{"y1fit", "=",
    8 c: ~8 `4 o+ e- [: D* W8 E4 l  RowBox[{"Table", "[",
    , s7 U6 t! G5 ]! h9 E" r. T0 n! Y   RowBox[{"x", ",",
    ; ~; K' S6 h& y4 D" X& C* _2 O    RowBox[{"{", + u( Y8 y  M# A: A, f
         RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",8 B6 k! Y1 J4 |& S
    CellChangeTimes->{{3.577924969375*^9, 3.577924979515625*^9}, {9 B, I# P/ z7 G0 Z
      3.5779252768125*^9, 3.577925277484375*^9}}],
    2 S' R* V+ X* f+ D7 T9 H% f* W" b7 S  D! w5 u
    Cell[BoxData[/ t6 a5 ~$ d  x* \
    RowBox[{"{", / M# G( X( b. T% Q/ L  I
      RowBox[{6 y/ e" }% z) h$ `& l2 T6 v
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 `' u  Z0 O- E6 T$ O* u0 p' j   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    ; m1 |3 r9 k5 Q2 [2 A  T/ Q    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    ) A/ i# [! k! t6 s3 D   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    & `0 J' o% G% T7 ?   ",", "29"}], "}"}]], "Output",
    & `" C) h/ v! G4 Z; _/ l CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9,
    4 R( l/ @" M; Z; A  3.577957594916795*^9, 3.5779589579612093`*^9, 3.5779621294942036`*^9,
    . [  B9 L& A2 R1 X/ J8 D  3.57801235340625*^9}]1 s4 K: S; k# @" Q
    }, Open  ]],) S9 I9 O4 Y0 G% D8 }
    2 r; X+ {6 y/ `/ E" f" \
    Cell[BoxData[
    + ]3 r( g+ z# @- T$ k6 j$ m4 p RowBox[{"For", "[", 2 c6 C! |7 I) N8 q# U4 v
      RowBox[{2 x% o" F( c- R1 |/ ~
       RowBox[{"i", "=", "61"}], ",", & J, g7 M& \0 X6 _; c, X, M- p- G
       RowBox[{"i", "\[LessEqual]", "89"}], ",",
    5 o7 L# N! @$ }8 m  ^   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    % D# Z  Y4 k7 @) b( C1 h4 ^   RowBox[{
    4 u% S/ I2 ?8 S* \* H9 U/ M    RowBox[{
      T# z' Q0 `: d4 p     RowBox[{"y1fit", "[", ; I9 m! Z3 L' B4 u8 G4 ]  v
          RowBox[{"[", 5 Q( _- L: O$ Y: ~% i
           RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",   U+ M3 m9 Q5 c
         RowBox[{"y1", "/.",
    / w- m' X2 ?9 D$ W7 j# M      RowBox[{"{",
    + ~3 |: g; R; Y  ]# w       RowBox[{
    2 E' \: X4 z' g: P( L        RowBox[{"x1", "->",
    5 e( V+ y6 k4 T+ ~* F         RowBox[{"Data", "[", : K0 w8 K" N* Y) {# l( s% p+ m
              RowBox[{"[",
    ' D8 ]# o6 s4 A# o( B$ ^6 @           RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", / K4 {/ Z( ~! R' O
            RowBox[{"x2", "->", 4 y" Y: n3 f; N+ P
             RowBox[{"Data", "[",
    1 f; R, R6 Q8 U( J6 D8 [          RowBox[{"[", # s) m8 u1 p7 L, h* B: ?8 e% @9 r
               RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", . H* ~* ^. _# d4 b
            RowBox[{"x3", "->", 2 z& k2 H) E) y  E
             RowBox[{"Data", "[",
    # B* t8 ~8 }& J8 I3 R3 B          RowBox[{"[",
    4 l& v& R# C+ \* ?           RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    7 T/ K0 i# N) _6 Y+ Q( T        RowBox[{"x4", "->", 4 S4 u8 y. C( c
             RowBox[{"Data", "[",
    2 x- w6 B# M7 q1 j& H          RowBox[{"[",
    , Q6 K) |" ?2 a4 A7 ?/ z7 K           RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 2 d2 c5 b1 M; h9 ~6 N: e
            RowBox[{"x5", "->",
    # l/ f1 e( e, E) c$ U9 q; ]         RowBox[{"Data", "[", ' Q) D3 P- y- J6 f, N% \
              RowBox[{"[", ; a# Q0 o% \) X$ g
               RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    7 L) g* I7 [% W        RowBox[{"x6", "->",
    6 O% v6 o, k! [! X         RowBox[{"Data", "[",
    : M3 y8 y2 R1 v' e& Y          RowBox[{"[", % l: s. m) ]* W2 p+ i8 }! x
               RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    9 b  {; m% h6 O$ V; Z' U        RowBox[{"x7", "->", " |2 o! m, O: b4 V- v: B3 c
             RowBox[{"Data", "[",
    9 }5 d$ b" w$ F- A  J" ^8 q0 T. t          RowBox[{"[", 5 s, p) X/ l& b3 w. R/ G7 p
               RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ( O; x$ Q$ {0 d8 H4 L/ {6 B
            RowBox[{"x8", "->", . ?" `( z# ?+ ~
             RowBox[{"Data", "[",
    - e, r, H3 m# F* Y, c2 O          RowBox[{"[", 3 p1 I' E6 [) b6 B: ~, I- O
               RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    2 B, ~( f4 M2 |# X% g        RowBox[{"x9", "->",
    1 P+ @6 D' b  A         RowBox[{"Data", "[", 0 c& Y, O# J' C4 r5 X5 L+ U
              RowBox[{"[",
    3 E; M6 u; k, ~' ~: j  V           RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}], 2 u# y! p( x( Z$ G8 z7 r8 U8 h
      "\[IndentingNewLine]", "]"}]], "Input",
    6 J3 P- m. s5 L& b% Y! O$ ] CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {; p/ p- X1 I8 }- B5 b7 a4 r
      3.577925286140625*^9, 3.577925306765625*^9}, {3.577958922517948*^9,
    ! T) Z0 _% X" A* f7 ]% b2 p0 j; F. [0 B2 E! k  3.577958922549148*^9}}],, E5 R7 H! y" x3 l: X: R: i

    6 [- c5 D# d1 m' E; xCell[CellGroupData[{
    # O$ x* w+ }" J; A5 c) w+ w
    * ]& \7 W* q, F; SCell[BoxData["y1fit"], "Input",
    ' r3 r) ?2 {- a" y" u- ] CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {
    2 c4 {7 q, F. o! f  3.577925040484375*^9, 3.5779250440625*^9}}],
    ( s4 W! @0 Y5 b! w- [% R5 P- j# o3 y/ k+ b2 G
    Cell[BoxData[/ _  }. V- z8 l. a' g5 [( z
    RowBox[{"{", 8 t4 z& L* S; b1 i+ N
      RowBox[{# D! x7 \! y1 s
      "0.43193416525930517`", ",", "0.4501634853493982`", ",", ! E, j) V3 v: I, R' ^
       "0.33336034768525247`", ",", "0.4418609896858925`", ",", 6 U  J3 Y% I# D/ P' f
       "0.41030378932283024`", ",", "0.516814798191575`", ",",
    + X8 O6 V/ ]; r& q4 Q5 E6 N' r   "0.4476631213729994`", ",", "0.3016552978696669`", ",",
    ( i9 G% Q, {* n$ e: }( D   "0.378122167437847`", ",", "0.020339844919720733`", ",",
    5 s+ c' ]) ]3 q7 x( r/ _   "0.018745375782087376`", ",", "0.2919925992695025`", ",", * X  w* {' t6 H, ^+ A; ~7 N0 d
       "0.2649067959681263`", ",", "0.16343444284525593`", ",",
    ( @) X# c: A: K1 l& b) u# D* U   "0.4182466778551563`", ",", "0.27347752211364934`", ",", ' |3 V" e! y5 J9 Y, p4 K
       "0.38554057386385654`", ",", "0.35253160453718047`", ",",
    3 ~5 M0 W* v5 K+ V   "0.2054745841100774`", ",", "0.45504377112716676`", ",",
    % ?+ q; i+ k3 O2 T/ F! P   "0.1598805094678612`", ",", "0.18662509982279485`", ",",
    8 D6 }. w" K0 D, O   "0.10684797493248213`", ",", "0.013349212673286828`", ",",
    1 H. }8 O* L' I1 A0 E( _) w   "0.08215836003004297`", ",", "0.2979041599362813`", ",", ' m; X( f' k6 v: q
       "0.05995976512343641`", ",", "0.3884793499104568`", ",",
    2 H/ `5 ~2 C$ G1 |6 E4 i. I   "0.5361889337034293`"}], "}"}]], "Output",9 t  N+ A! |2 I! L2 I! r) `2 R
    CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9, ( F: o) l9 ~9 _0 y, ~1 X9 X
      3.577925312375*^9, 3.5779575978808002`*^9, 3.5779589654960227`*^9, 1 J5 @  n" C1 {
      3.5779621416934247`*^9, 3.578012355546875*^9}]
    6 F/ u2 e' G( c8 Y: p3 h9 c}, Open  ]],# b7 G$ ]) P/ K* @8 x

    6 f: J" P' u4 C" a* `Cell[CellGroupData[{/ ~3 T' E. g% D$ S/ I: ^
    ' e7 h9 {/ P5 P9 Z0 q- j1 R3 w
    Cell[BoxData[8 u+ K/ d5 o/ e$ u. f8 e. N2 k
    RowBox[{"y1fit", "=", , c2 v, @4 g( e! z% e6 ~
      RowBox[{"{", - r3 d  O/ G. x9 r: [
       RowBox[{
    4 H1 u; k! p9 m( W0 X   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", : x5 ?1 G! v3 N; }# g
        ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 r* N3 c1 X1 g7 q9 \# s7 Q
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", 1 t, d/ h1 L7 T' y; G7 T( @
        ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", / {, q" ]/ |' P1 J
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", # K4 j: R" M5 g/ T4 J, F) y, e- E
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    9 n2 p2 P# N+ o( X# a% }4 O" o    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    " O  o# V9 K/ M' o/ F2 l    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", 2 C$ h: L. u0 T+ \9 O( G
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    ; r1 @/ x# ]* ^" h2 |    "0.4319341652593058", ",", "0.4319341652593058`", ",",
    5 @. K4 m% Z9 Z% y* Y    "0.45016348534939865`", ",", "0.3333603476852527`", ",", % N0 g& l( y* y* b& ?8 ^
        "0.44186098968589294`", ",", "0.41030378932283074`", ",", * ~. \- q$ r0 v
        "0.5168147981915754`", ",", "0.4476631213729997`", ",",
    ' N3 j/ k' M( U    "0.30165529786966755`", ",", "0.3781221674378473`", ",",
    " {3 M5 S; y) B$ a    "0.020339844919720775`", ",", "0.018745375782087393`", ",", + a$ T1 ?2 t! J% i( f9 i
        "0.2919925992695026`", ",", "0.26490679596812655`", ",", ) s: z1 p8 ]2 f! ?) X  P6 Z2 J6 d
        "0.16343444284525593`", ",", "0.4182466778551567`", ",", ! R3 a& {1 X( l
        "0.27347752211364945`", ",", "0.385540573863857`", ",", % }' c) o; T( V; z& o
        "0.3525316045371807`", ",", "0.20547458411007796`", ",", : H& S! N$ q5 E6 P. e& {. j* B
        "0.4550437711271672`", ",", "0.1598805094678611`", ",", 2 }/ C1 O9 j1 m' L
        "0.18662509982279502`", ",", "0.10684797493248224`", ",", ! ]: G) O- S) X
        "0.013349212673286806`", ",", "0.08215836003004302`", ",",
      v, r2 h; L' B& |; a  w    "0.2979041599362817`", ",", "0.05995976512343637`", ",", + Y0 L! Z8 ]$ o* B- R
        "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]}]], "Input",0 g4 N/ z( C2 H+ F4 [  g: `% l3 N
    CellChangeTimes->{{3.577959701349306*^9, 3.5779597161381316`*^9}, {
    # Q' m5 x; Z& s6 K" L. b# u# p  3.5779621548286476`*^9, 3.5779621618642597`*^9}}],( W. m0 X4 M5 e! e  g

    # X! |) L2 C* x: E4 |Cell[BoxData[# G% b8 V( v1 X& v
    RowBox[{"{",
    4 {( |& u9 D! E6 H# K4 b6 ?  RowBox[{6 k% m  }2 Z- X6 J2 S( p
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ( A+ i+ ?# W/ I% N   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",& P7 d: Y# D" k
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    ! V8 z- G7 f3 s# Q# f1 Q   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    * [7 q+ k5 Z- n) O   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    . n- c/ Z3 u% G9 F+ b% }- v   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    4 @( A* T9 j5 Z* N' W   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", ' @  S$ o0 s+ W0 U; @) N" o# u7 ^
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
      w1 v* X9 }0 {& l# E   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    . J2 l" ?3 y/ M2 ^: V   "0.4319341652593058`", ",", "0.4319341652593058`", ",",
    " T7 ^4 h; `3 F  x1 S   "0.45016348534939865`", ",", "0.3333603476852527`", ",", + x' u" i/ |$ z  s& ^$ E
       "0.44186098968589294`", ",", "0.41030378932283074`", ",", / `. k1 @, H, B
       "0.5168147981915754`", ",", "0.4476631213729997`", ",",
    ( |1 }8 g6 Z. |8 [, ]   "0.30165529786966755`", ",", "0.3781221674378473`", ",",
    ; u$ j2 a9 i! v5 M% k' j1 i; y7 c   "0.020339844919720775`", ",", "0.018745375782087393`", ",", & G' ~+ \! u1 A" E
       "0.2919925992695026`", ",", "0.26490679596812655`", ",",
    * T- W! |2 w' N  l   "0.16343444284525593`", ",", "0.4182466778551567`", ",", 1 j6 W: m" a, g9 i
       "0.27347752211364945`", ",", "0.385540573863857`", ",",
    . h4 A! v1 q2 t; w& Y   "0.3525316045371807`", ",", "0.20547458411007796`", ",", ; k% ~% s8 j3 {5 n9 V% T3 H
       "0.4550437711271672`", ",", "0.1598805094678611`", ",",
    ; l6 b. h  M/ \/ G$ b( v   "0.18662509982279502`", ",", "0.10684797493248224`", ",", 9 E) ~8 N6 }0 m
       "0.013349212673286806`", ",", "0.08215836003004302`", ",",
    2 U7 r- V4 K# Y   "0.2979041599362817`", ",", "0.05995976512343637`", ",", " }/ E1 D  @( y. r( C5 u# a
       "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]], "Output",
    8 j4 F$ Q9 P9 V# P1 Y7 \( i' c; | CellChangeTimes->{3.5779597200381384`*^9, 3.5779621650778656`*^9, : t7 ^* x$ }# B! x  C
      3.5780123569375*^9}]
    + W5 e! p! o' O}, Open  ]],
    7 v( p& x7 A  S' v
    ; ?- j$ |- d. D9 k5 uCell[CellGroupData[{  c2 w& l1 `1 I. K! I
    * J: c* H2 U3 r9 p
    Cell[BoxData[7 N: F) q4 M1 J( s! n9 m
    RowBox[{"y10", "=",
    / C* {2 C3 Y# g4 {  RowBox[{"Table", "[",
    8 L; D6 A4 R9 [$ g7 g+ S. X   RowBox[{"x", ",",
    8 I3 ^. A9 O# N8 }    RowBox[{"{",
    $ `* w1 x$ [1 C( t2 g5 l( I     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    : W* O- s- M. i1 O; a7 `- H) V# f CellChangeTimes->{3.5779253628125*^9}],
    ( Y3 {5 Q0 b  C8 W4 ^
    , a2 o- F  S) j1 L6 ^9 [Cell[BoxData[. A  H2 V- I$ M# F
    RowBox[{"{",
    ; v2 I/ r! ?% u5 f" }  RowBox[{/ H+ U/ @, u- X0 J. G
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , h5 h# p5 a/ P9 ^# [% g2 d   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",  J! d7 z% c' f9 p
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", ) I( e7 s) L8 U
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    : G1 U% c# K' \3 f) W# Z! H3 X   ",", "29"}], "}"}]], "Output",. y/ ]% y7 {) N2 }
    CellChangeTimes->{3.57792536553125*^9, 3.577957599565603*^9,
    2 G3 l! c+ c$ ^  3.577958967383626*^9, 3.5779621678858705`*^9, 3.578012358609375*^9}]
    ' ^; ]4 {0 X, n4 H' g" D}, Open  ]],% i! J! ]2 `. I

    7 ~8 h+ u  X% G* F. @2 |, OCell[BoxData[" j, |' M4 i; v6 |2 v7 o" ^
    RowBox[{"For", "[", ( W0 n( z" @! H$ A0 @% n% p8 W7 B
      RowBox[{- |" T: y2 [% R5 c2 f0 c
       RowBox[{"i", "=", "61"}], ",", ' s9 P. y4 R9 X( h! _) u+ A$ m3 ^0 C
       RowBox[{"i", "\[LessEqual]", "89"}], ",", ' d( H, i( C5 o! J4 M
       RowBox[{"i", "++"}], ",", * b$ e5 }( K' B* F2 H
       RowBox[{
    3 y1 K$ C; k4 w) [8 d6 b% k    RowBox[{"y10", "[",
    4 p0 y8 {1 B5 y  Y- ]     RowBox[{"[",
    $ m) p% P( X* w: H  E      RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",   C5 s7 H( L+ i9 c' U; y& Z
        RowBox[{"Data", "[", . K6 F4 o% y. _: W
         RowBox[{"[",
    # {$ s# h6 T7 e5 a      RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",  p# F- V3 ^. `, s, m
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    - L' R( S. C% L8 [   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9, % u8 G+ _2 z' F
       3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, 8 \9 \" r( M- }5 P' p
       3.577958922549148*^9}],
    , z& h7 v  b- P9 F% M, t- l4 R7 d  |% J  }
    Cell[CellGroupData[{
    4 V( u0 B! j* V6 c7 }- S3 Z( V( z. G2 B
    Cell[BoxData["y10"], "Input",' C7 t/ v. E, B3 ~0 c% J/ R
    CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {
    + G+ [: S9 ]5 T/ V/ x   3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9}],7 X5 H  I/ S/ a3 {" |4 \! d" E
    $ z" _( {( a; d
    Cell[BoxData[
    & V7 q, f5 r& l* u RowBox[{"{",
    ! L: m$ ~" _; X% d+ E. h. y  RowBox[{' C* B) L9 c- h9 l8 y0 H
      "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`", ",",
    ! [4 g- _+ P# E% G, `6 j   "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`", ",", " f) e1 ]# U7 e9 [
       "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",",
    ' j+ W  c6 |6 n: h   "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",",
    : A+ S3 e+ d: B: m( o3 [4 A   "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",", + b* l3 Y& I+ ~$ h* y9 y+ ^
       "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",", 8 w! a' a' Q' R) M5 h
       "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",", 5 A$ J( }. B" r5 p
       "0.694935`"}], "}"}]], "Output",
    - F5 r% E9 n  [/ u8 i5 S; g CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9,
    + d( r; a1 d7 N5 {* I  3.577925393046875*^9, 3.5779576032628093`*^9, 3.577958971767234*^9,
    1 A5 T; D  j9 F% P5 C) a/ H  3.5779621736734805`*^9, 3.57801236071875*^9}]) C/ C# c/ j  Q8 r; M
    }, Open  ]],
    : P' Q2 J, P; c) w% z; m/ {0 ?9 _8 b: @/ E+ K# Z9 s6 ]& d: ^8 R
    Cell[CellGroupData[{6 C% ?( g) C0 f: f% }; j

    ( }+ c' R4 x" T# ?: _" {1 }Cell[BoxData[# e9 j* g& y1 h$ k: Z
    RowBox[{"y10", "=",
    . V1 t$ `( |+ P- f- c2 w6 g# X: C- X' g  RowBox[{"{",
    * w  l5 J: O& j% F' ]   RowBox[{% r& x/ o8 {" i  \1 }
       "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! m$ B' ]$ G9 a* F    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! x. d% x, f7 m7 r4 R    "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    9 A! f/ x0 V4 l9 |7 v    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", 8 F6 E7 r" Y2 H/ {: u3 K) Y; Q
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 0 N3 W! @9 g. o* p0 f8 y  @
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    - i9 E, b+ }  L) }  G* D    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    5 m5 o: J6 ^$ q. H) n2 l    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", ' `, [' }) Y7 P& H9 r
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", ! e& D9 X; ]" O
        "0.380742", ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",",
    , t; D" l/ `; V    "0.448763`", ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", - v# a0 d) b3 T4 G( F2 X
        "0.057715`", ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", / z& H  A# Q) |$ ?5 @
        "0.570966`", ",", "0.468198`", ",", "0.414016`", ",", "0.18669`", ",",
    ' j8 V' Q, f  C8 T9 c    "0.442874`", ",", "0.68669`", ",", "0.244111`", ",", "1.`", ",", ! A- C* x$ }- ]
        "0.957892`", ",", "0.266784`", ",", "0.826855`", ",", "0.341873`", ",",
    ' F  L, f  @* p8 ?; v. _    "0.412544`", ",", "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", ) ?/ p& V. d  U: }* b! V3 m
        "0.390754`", ",", "0.694935`"}], "}"}]}]], "Input",
    7 X! y+ E9 k/ s6 ]/ j# ~ CellChangeTimes->{{3.577959733438562*^9, 3.57795974955339*^9}}],  V; D/ i$ z7 ]0 ?- F1 W0 X! d0 ^
    4 f7 z5 ?. y5 J% s" _& w
    Cell[BoxData[
    1 d5 m% A+ _) ]( H RowBox[{"{", 2 i: }3 h0 K" X! j
      RowBox[{
    ' T1 x# W6 O* M& T; N, Y: f) o  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 8 f9 |/ }* P6 f9 T2 P! b
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",( q. c" I  r8 P' w& q. O
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", , [: j: y, s2 n* t- e
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    , Y  z# z- R& ]) X8 f+ q   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 1 P9 ~1 M+ ^0 O; `1 B8 b
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", * \" T/ n3 @/ [: i- @
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    $ k; Y, o/ W- J0 c: p   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", ( x/ ]  X3 N" P( Y$ g+ l
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.380742`", * q& N: T* ~1 E  {( F
       ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`",
    + d: ^% {1 }5 ~* r: Y! d   ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`",
      _- k& h+ p% E" S, u" f: X   ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",",
    & h" ]! C, Q7 D* {4 v1 ?0 y5 d6 s    "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",", 5 ~$ c# c7 K9 {. t
       "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",",
    6 Q( g, j! M+ z/ q   "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",", + \3 Z- E' z  E# ]4 f. n
       "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",",
      {' G4 j5 g8 X2 W   "0.694935`"}], "}"}]], "Output",
    - {; {/ R, B# m CellChangeTimes->{3.5779597517529936`*^9, 3.5779621844842997`*^9, 8 Z# _7 I. M# t1 A% _
      3.578012361734375*^9}]- f3 k) z0 l" j3 A& ]0 \
    }, Open  ]],
    4 L6 S8 q0 X7 `2 M8 R/ r3 s6 I
    , s, g- I7 z4 U% d$ i2 Z. B) aCell[CellGroupData[{
    # b/ c# {% S2 a' ], R# V# A# g# O0 E4 t% }3 X; T" E$ c
    Cell[BoxData[4 |( \2 P) K6 ]$ p/ R8 }+ T
    RowBox[{"p1a", "=", ) ^# v: ^$ \3 I
      RowBox[{"ListPlot", "[",
    : C' |9 I* L0 h& L   RowBox[{"y1fit", ",",
    . v7 V" N) N8 `" d! Q6 N, y& f    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",", $ Q; Z, v, D' p0 [
        RowBox[{"PlotStyle", "\[Rule]", 4 ^" P/ S( H) v  i6 p/ e4 {; \
         RowBox[{"{",
    1 |# [- u( O! m1 x* Q6 E      RowBox[{"RGBColor", "[",
    " @/ C$ [# J* {' @" \$ J       RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",",
    * @/ K" V" B2 R, s6 c3 d    RowBox[{"PlotRange", "\[Rule]",   ?9 k+ Y  I; K% o7 l
         RowBox[{"{",
    , e- j5 @* {" O: Y6 b- R- F0 Z3 q      RowBox[{. T7 H8 @. u8 f$ @
           RowBox[{"{", : S/ d: s$ E8 _3 Q9 P3 I8 v4 W: g
            RowBox[{"61", ",", "89"}], "}"}], ",",
    2 H1 y  z2 V0 p       RowBox[{"{", % {" z( ^5 l. n6 @4 y7 j9 T% J
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", & x' J* r, D" N3 @7 S  Q- W
        RowBox[{"AxesOrigin", "\[Rule]",
    & K  k( j7 w7 v9 T! r0 B! t     RowBox[{"{", $ t# z5 f+ ^9 `7 D% e/ u8 Z' r
          RowBox[{"61", ",", "0"}], "}"}]}], ",",
    ; G. L/ ], z' D0 A    RowBox[{"Frame", "\[Rule]", "True"}], ",", " x0 q" X" y1 {6 Z
        RowBox[{"FrameLabel", "\[Rule]", 9 M( `$ g) E% u2 y
         RowBox[{"{",
    ) ~8 U. Z" R$ m# T3 q: T      RowBox[{
    , d) v# i! k3 p) i: [      "\"\<\:7089\:6b21\>\"", ",", + I! K3 |1 a$ Q! C& Q# k
           "\"\<\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\* ~4 @$ `; ?5 ~1 l7 T0 A
    \:ff09\>\""}], "}"}]}]}], "]"}]}]], "Input",
    ; Y5 D( t; G. K# E: T CellChangeTimes->{  X6 _+ J- `9 [  l! n2 P
      3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {9 g7 d# t7 y" N) M$ f
       3.5779576143076286`*^9, 3.5779576277548523`*^9}, 3.577959769006624*^9, " b# q4 d& r& A6 I; u) o
       3.577960184458948*^9, {3.5779602338174343`*^9, 3.577960278745513*^9}, {
    6 m9 G. U7 y  H* M: {   3.577960347588433*^9, 3.5779603994429235`*^9}, 3.57801239140625*^9}],4 n% c! E$ {- }. p4 i
      y( s  B2 f' t( w7 r5 l+ U  F$ a& T
    Cell[BoxData[
    ) `2 l/ X$ {$ m, N+ n: A GraphicsBox[{{}, {}, % w; d6 Y4 a: S
       {RGBColor[0, 0, 0], LineBox[CompressedData["
    9 c) g7 P1 y8 f5 q1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn/ k' c& G; R7 U, h) k, m0 b  i5 |6 k
    8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq
    % r: y/ L$ l% k% a4 W0 J9 A) y& TD3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B: [' U3 e2 L* S! m
    1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX
    9 ~2 _( R, Y' F% j8 @" PC1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN: W* Y/ G( `, w
    a2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff
    / B$ [, O; \4 cyqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb5 a" k0 D# O9 W( t! l
    wrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX59
    0 ?# c, `' Z4 T6 b$ |! XY6nGQ3sAieueIw==
    # j7 Q  K1 ?* O4 v9 X' p1 V     "]]}},
    + ?4 l0 W; V( _9 d7 Q  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],6 E8 ~( C4 t5 S* ~( R. E
      Axes->True,
    4 P' Q4 w* _) D& L7 I0 [  AxesOrigin->{61, 0},8 D! @' p: I" p) y$ S  R! T& ~
      Frame->True,% Z4 D' F9 A9 \: x' \3 r
      FrameLabel->{: O; o4 ]1 C4 H, |8 j0 F
        FormBox["\"\:7089\:6b21\"", TraditionalForm],
    6 q3 D3 l9 l  x* t$ q0 j% ?    FormBox[
    : r' o* J6 Q3 \9 L! d+ K    "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\, y- g8 \0 G& W) H+ g
    \:ff09\"", TraditionalForm]},
    ( i3 P* e: z6 |) V; T5 X  PlotRange->{{61, 89}, {0, 1}},9 s3 U. T5 K. V. a7 T0 @
      PlotRangeClipping->True,
    ! h2 G  Q! r& W" G6 n$ b2 n  PlotRangePadding->{Automatic, Automatic}]], "Output",
    / k) P+ \3 _1 ~- h; S% {' z CellChangeTimes->{* R( \5 d' ]: ~8 j  C9 u5 G# |
      3.577925144625*^9, 3.577925396578125*^9, 3.577957630297656*^9,
    % P+ ~; w4 J/ Z1 @! p0 m( u1 d   3.5779576933061666`*^9, 3.5779589732960367`*^9, 3.577959771908229*^9,
    / f9 E2 R3 U9 e; S/ P   3.577960281756318*^9, {3.5779603518628407`*^9, 3.577960407664138*^9},
    ! S( h1 y. I# F; A/ n3 v% g: |8 _   3.577962187510705*^9, 3.578012396921875*^9}]
    , L) h- R& p9 m2 G}, Open  ]],6 h! W- g4 ^/ ~" M
    6 S" n* l* j9 y% E
    Cell[CellGroupData[{5 t, ~( ~' c6 g8 x6 m0 g; a
    + u8 q% O6 g" @1 f. |4 S
    Cell[BoxData[
    & u# c: u. \' ^' _1 Q% Y RowBox[{"p1b", "=", / {  p; i5 z, q' J% l5 n9 i' u
      RowBox[{"ListPlot", "[", ; y6 N4 E! g$ E# k# i
       RowBox[{"y10", ",",
      P0 X- W) k( A6 w7 h# n, K  I( @- L) T    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    7 q6 B$ ]) v* x4 S0 g6 L, A+ B    RowBox[{"PlotStyle", "\[Rule]",
    $ b+ w% ?/ j. C, u" ^     RowBox[{"{", ' ~; E4 z2 z- R5 [5 ~5 W
          RowBox[{
    ( H8 ^) Y# \2 q. n       RowBox[{"RGBColor", "[",
    ; i8 _- d, E  ^1 {2 ?, G3 u" ?        RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}],
    ! l# k# n5 f; ]& U7 p    ",",   Q  h4 G7 g8 ~+ r! l
        RowBox[{"PlotRange", "\[Rule]", * g/ W% r2 D0 k8 [, o5 A& M1 v
         RowBox[{"{",
    ; G6 u" c. t5 g0 q      RowBox[{
    * z/ K/ s" E8 E% d5 c8 b  P       RowBox[{"{",
    ) R; p! N8 G/ v7 ?+ t* P        RowBox[{"61", ",", "89"}], "}"}], ",", 6 x1 }0 C- E3 m+ C2 S4 C
           RowBox[{"{", * y( ^, s6 R" }: z) j% n7 \
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", " _2 x7 F- p5 S- I& k5 |$ m% b
        RowBox[{"AxesOrigin", "\[Rule]", 4 Z. ~1 P0 u$ \* d* a+ Y2 B
         RowBox[{"{",   c- N6 ~. r- P0 m4 G- H
          RowBox[{"61", ",", "0"}], "}"}]}], ",", ! u3 N0 z3 _3 G
        RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",
    0 m3 S8 V! C. z# H CellChangeTimes->{3.5779253991875*^9, 3.5779576384564705`*^9, 6 l) R5 Z8 W; m! e! `
      3.5779597764166365`*^9, 3.578012409265625*^9}],8 i( @  j: }$ |  G

    : K) t% w$ o% @" V6 JCell[BoxData[
    & U: S. |7 }1 `+ }7 O GraphicsBox[{{}, {}, ! ~9 _/ b! W4 a1 `* d/ J
       {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["
    3 l; j1 j7 l5 |+ H4 [# {5 T4 h1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ
    , }- p" A, d( Y' ]3 ~/ l0 A% ?/B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy
    ; m1 G( j$ t% T+ B) [GwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy
    0 ]* d; S/ H8 h; H+ h9 i. G1 MGFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy' \) E! P, w# Z+ y% k9 n
    7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/
    ( ~1 y" ]; v. O0 z2 ?Qu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri
      ^* d3 u  F! W7 A0 K% JH+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV
    % m, e/ u+ w' t  z$ M) g) erQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T4 U+ W' M+ Y# p; I* v8 N& ^* w
    vA==
    # W  F8 y; Q: ^& y! L     "]]}},
    + ]5 v. ]; [0 n4 Y& W4 }; m  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948]," Q2 H1 N7 |/ K/ b& h: M4 k
      Axes->True,3 L7 A* r# h. Q* D7 J* _6 w7 ]
      AxesOrigin->{61, 0},
    5 p2 B6 I8 j' w! T( D" I  Frame->True,
    / `% S) E5 _2 |" ~: Z  PlotRange->{{61, 89}, {0, 1}},
    & U; v2 V+ J- P4 p. [  PlotRangeClipping->True,
    5 w2 z* f/ V+ S6 C+ m3 j5 p3 i4 n- _" x  PlotRangePadding->{Automatic, Automatic}]], "Output",/ x: _4 l) }* H5 {1 @
    CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9,
    ! s! w; s# C; h" M- H, {  3.577957640266074*^9, 3.5779576946009684`*^9, 3.5779589749964395`*^9, $ [- ~" z) @  y/ b
      3.5779597781950397`*^9, 3.577962189476308*^9, 3.578012410328125*^9}]
    0 {0 s$ s  d) T0 I}, Open  ]],
    % A9 t& g/ N' x; @  r
      ^1 f2 {$ Y2 `. k+ N8 iCell[CellGroupData[{
    ! ?# A, ~1 P5 |% h$ L9 T' J
    $ T' i, [& O& ^7 ^" ]# UCell[BoxData[, {: A7 e0 i# |+ _8 @* p
    RowBox[{"Show", "[",
    4 n9 l' ~6 J% N' X  RowBox[{"p1a", ",", "p1b"}], "]"}]], "Input"],7 e8 B+ ^9 Q5 w, K1 r# ]

    ) H( W" X3 W! Y1 Q% }Cell[BoxData[
    , `+ ^3 K. p6 _2 D5 Z5 {  h5 A GraphicsBox[{{{}, {}, 2 x5 e; r1 V  d+ K3 Z# q0 H' _" L
        {RGBColor[0, 0, 0], LineBox[CompressedData["% Q1 N4 R) S1 O8 Y
    1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn
    : V/ w( h. Z& A0 ^3 j7 d, [4 a8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq
    ; L7 a" x$ V" v& e( b: L% XD3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B
    5 h" d6 |* B: h- f0 B* d1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX
    % N  p5 E- U& i7 eC1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN& F& g: p# P. K" A9 i
    a2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff
    # q9 W! s# z& r1 syqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb; u/ [- W% A4 V- M% a7 t* k
    wrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX59
    3 n& e9 y) U, c' i  P( w# W& v6 B. zY6nGQ3sAieueIw==
    4 r$ s0 d! j! ]" z7 v      "]]}}, {{}, {}, 9 Q& \: `% W  z) H! [7 S
        {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["- D9 w& h. @$ h8 [
    1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ
    % M# p: q$ H8 _- G* j/B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy
      a" q2 ~" j9 wGwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy
    ( T  q/ O$ r) }GFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy
    ! U# K5 F% _) n! p7 g1 j( J- G( s7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/& m; i/ _7 |7 n/ \# e. w1 U
    Qu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri
    * j2 }3 K6 z) ~3 X* c+ OH+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV. B2 F- Q6 w. n$ D
    rQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T% n4 L3 i& t* i* ^
    vA==
    6 U( k! P9 A. v      "]]}}},
    / G; s5 o  d3 u! ?, L  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    3 I0 F8 ?# Y: d  l  S1 n) |; I  Axes->True,
    ) i. C# Y/ y* I' t  AxesOrigin->{61, 0},
    & \: z8 t( x& {. k8 F  Frame->True," C$ j" c! K2 x% d* o% [
      FrameLabel->{
    & j2 c) o' w( J    FormBox["\"\:7089\:6b21\"", TraditionalForm],
    ; Q. f9 ]  f& e! [  m, s' o    FormBox[  v. L9 n8 y4 s
        "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\; A+ N" u  o+ u5 y+ v: P
    \:ff09\"", TraditionalForm]},$ |  s7 o  d; E/ @6 Y% A
      PlotRange->{{61, 89}, {0, 1}},% K" b" h; p! L- P* K
      PlotRangeClipping->True,7 P: U2 A2 M- Q5 H# B& C/ v/ c
      PlotRangePadding->{Automatic, Automatic}]], "Output",/ T0 M$ O* T! M
    CellChangeTimes->{3.577962196683521*^9, 3.5780124119375*^9}]2 z7 R  h8 ?- h8 F- R
    }, Open  ]],  Y3 g; S* b  m
    ' v! L: ^/ \/ e. n! U/ |" E# {
    Cell[BoxData["\:62df\:5408wi1"], "Input",
    1 M% y$ U, [& A8 E( V CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}, 2 p4 L0 w) F+ m  k+ X* z0 {
       3.577959662349238*^9}],
    ) V% ?+ P5 D- ^* U3 i/ A
    2 C& j" ?9 H! J0 NCell[CellGroupData[{- q- |  y( @$ [& s/ j: A

    3 o3 k5 s7 Q. h) t: rCell[BoxData[
    # `$ B5 Y* C( T4 h( p$ y* {- \  c, l RowBox[{"y1b", "=", # M; n( q0 y7 e
      RowBox[{"Table", "[", . b; {/ P$ ~% J, M% a* l& w
       RowBox[{"x", ",",
    6 W' M( Z8 s- b9 C1 T6 p    RowBox[{"{", $ k2 L) D! e8 z% q2 |1 N. F
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    ) x' i2 c+ Q. m# s% S CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {1 }5 g' n, f' }
       3.5779226649375*^9, 3.5779226810625*^9}, 3.577958232403945*^9}],6 m- v2 y$ W' k5 j' o

    + A9 v: Y/ |" D8 ]2 p! qCell[BoxData[) ~# G) s) Q& w0 K
    RowBox[{"{", . S( p$ z$ e. v( x& i: K6 [$ z; U
      RowBox[{
    / s$ r) k4 M# u" n6 d$ S  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", $ n" d* E- H, `. t" l* N. _, _* R
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    ) ?7 [3 m  P) f$ r    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    ; P" [- g4 {% j   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", * H. l! L, K3 U+ b7 V* X
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    9 ]; T" k* P) w8 O, X' j   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    * o0 [7 f/ J' K6 S! ]   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    , _& w5 _3 h2 L5 |+ ?4 h% `  B   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    1 m! H( K* G5 N   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}], & A- w3 r3 c/ n2 q5 E7 {2 }9 h/ R
      "}"}]], "Output",
    7 E+ ]+ n; O& J) o0 M CellChangeTimes->{1 Z9 R4 ~) n5 f
      3.577922682296875*^9, {3.5779582291435394`*^9, 3.5779582351339493`*^9},
    7 H2 O1 _" c9 {8 a* K& I   3.577958478041973*^9, 3.577959010205701*^9, 3.5779622225483656`*^9,
    6 u5 K* l- o. o8 C4 F7 C   3.578012438953125*^9}]
    : k" ^( F, Y# L# _$ o}, Open  ]],1 ~) r# ~  u. n; k5 J6 Y
    1 H* ?+ ]! x) g# V; A2 O: A
    Cell[CellGroupData[{! q* a0 A3 I7 o2 V

    % U  A7 Y- M# K. UCell[BoxData[
    0 @% @+ P" r+ {8 g+ T RowBox[{"Data", "[", " x. H% i, Z7 E/ e9 [: _
      RowBox[{"[", 6 w7 J' p0 ^) h
       RowBox[{"3", ",", "11"}], "]"}], "]"}]], "Input",
    ( {, F' T8 x. v$ e! D9 P CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {
      o5 h) [9 e9 v% G( W5 M; r   3.577922912015625*^9, 3.577922912171875*^9}, 3.5779582414831605`*^9, {0 W! I5 X+ L4 m( z
       3.577959014090108*^9, 3.577959016040111*^9}}],
    4 F! m# |0 Y$ @0 k- S$ k( ^/ I
    * N# R' V* p  b( |# Y  h6 F: T$ BCell[BoxData["0.492958`"], "Output",
    0 e& {2 f! A$ P7 Z9 Z CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9}, : n8 ]" ]" v$ E2 K. v. S1 {6 T
       3.577922913203125*^9, 3.577958242809163*^9, 3.5779584790403748`*^9, : M% ~4 |! f6 S, T  _0 V
       3.5779590175689135`*^9, 3.5779622239523687`*^9, 3.578012439828125*^9}]
    # X! M5 D, s! u1 O* a- b}, Open  ]],, ]+ n( g- a4 \- M
    + ?; R% D% x0 _+ z, P: x) N
    Cell[BoxData[
    % \( e" V* S) {( F9 x% Y5 @) s RowBox[{"For", "[",
    * I* C) N0 i& ?# J, \9 K. ~  RowBox[{
    " o" I+ P' E  i4 a   RowBox[{"i", "=", "1"}], ",",
    * d5 u* I$ l) l& J& x; o   RowBox[{"i", "\[LessEqual]", "60"}], ",", ( E2 S) e# X. X
       RowBox[{"i", "++"}], ",", 3 V% m% ~, @4 S/ K: \
       RowBox[{
    9 m2 G: L  z9 Q& Q    RowBox[{"y1b", "[",
    : C+ p$ |# R" S: L+ c' t     RowBox[{"[", "i", "]"}], "]"}], "=",
    ' J3 z$ J4 e+ G5 R0 @    RowBox[{"Data", "[",
    ( E% e( h9 s" K! P     RowBox[{"[", & S( D. R* R( Q. [; V7 _3 w
          RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",
    " Y" C( |# |: t. z+ O( P4 ] CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {4 o8 z$ S# B% b2 `4 n+ i
       3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    . e% H& n  `% [! L; R   3.577922923203125*^9}, 3.577958246272369*^9, 3.5779584755771685`*^9, {
      A* C+ n6 G( `1 Z! C8 y   3.57795902089172*^9, 3.5779590227793226`*^9}}],% p2 L0 C( c. o  R& t
    / r( |. T8 [8 u4 ]
    Cell[CellGroupData[{' X/ p8 }$ U' T/ l0 N+ y  S
    1 A1 k6 h. B* \$ v( @. U: ^7 s# p; n
    Cell[BoxData["y1b"], "Input",' z3 V; y# Z' _* U0 E' I
    CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9},
    2 p0 J# P7 H  U3 i9 W9 _   3.577958484172784*^9}],
    7 _) D5 Z- O& E
    * N) a" N$ N% L! B+ h$ fCell[BoxData[
    4 b# F! y) \( \- K& `, J9 Z9 t9 d- X RowBox[{"{", / f( S2 r( c9 `9 J2 ^
      RowBox[{
    8 Q3 C! F" t1 Z: h9 F0 ~' N/ M  g  "0.873239`", ",", "0.464789`", ",", "0.492958`", ",", "0.774648`", ",",
    2 [, u8 p" j. d! O   "0.380282`", ",", "0.647887`", ",", "0.56338`", ",", "0.295775`", ",", 5 ^7 i2 S* a( v$ s
       "0.338028`", ",", "0.211268`", ",", "0.690141`", ",", "0.43662`", ",", / f. y9 C) V8 ]( m2 Q+ V
       "0.`", ",", "0.267606`", ",", "0.211268`", ",", "0.408451`", ",", - |+ y* i2 H7 S
       "0.478873`", ",", "0.380282`", ",", "0.211268`", ",", "0.43662`", ",",
    6 Q/ Q- [8 C8 S3 N   "0.478873`", ",", "0.295775`", ",", "0.028169`", ",", "0.43662`", ",", . R( n1 N. ^1 Q
       "0.394366`", ",", "0.295775`", ",", "0.830986`", ",", "0.169014`", ",",
    ! e$ O# e% a$ I9 J   "0.366197`", ",", "0.309859`", ",", "0.352113`", ",", "0.309859`", ",",
    , ~9 q3 H+ b4 p( |   "0.774648`", ",", "0.422535`", ",", "0.887324`", ",", "0.887324`", ",",
    * o5 P7 V$ q+ X/ i0 d/ {   "0.859155`", ",", "0.239437`", ",", "0.295775`", ",", "0.746479`", ",",
    $ o/ z- Y4 j, O" \: w   "1.`", ",", "0.549296`", ",", "0.366197`", ",", "0.549296`", ",", 1 }2 K5 U  E) J  b. T
       "0.577465`", ",", "0.690141`", ",", "0.71831`", ",", "0.521127`", ",", 0 t4 F* K% K1 Y! y( s
       "0.929577`", ",", "0.521127`", ",", "0.338028`", ",", "0.380282`", ",",
    ! E. r9 w5 k0 H* E+ [2 J   "0.676056`", ",", "0.591549`", ",", "0.464789`", ",", "0.295775`", ",", 9 M- G0 A, Z7 |
       "0.380282`", ",", "0.211268`", ",", "0.253521`", ",", "0.28169`"}], . M" w( O6 j! r: W& Z2 a' Y
      "}"}]], "Output",
    , _7 w5 c- R) @, i" _/ d CellChangeTimes->{3.57792293246875*^9, 3.5779582549771843`*^9,
    ' g* r  J$ Y  ^) y  3.577958485420786*^9, 3.577959026460929*^9, 3.5779622288195767`*^9,
    . ]) K" l$ l# P9 _& M4 ~* `0 ~  3.57801244275*^9}]! l: k! v; h5 f7 ?, c7 N2 @
    }, Open  ]],# K# Z" }  x( I# u/ ?4 f& n
    3 ~# Y0 i3 h  ~, u( S; W
    Cell[CellGroupData[{
    " V' @; W# Z, g) X7 R1 Z
    . z  s1 }/ g1 _Cell[BoxData[2 z$ I6 J7 ~! n- n+ \- |
    RowBox[{"m60n21", "=",
    4 ?* S2 W( Q8 \) f, y  RowBox[{"Table", "[", - f7 h& y6 I& p% U
       RowBox[{
    + s- x( D% U) y& i& B) m, C! B- v    RowBox[{"Table", "[", 4 A' r3 R. I8 Y/ @" E7 H: X! @* ^
         RowBox[{"y", ",", : |( {7 c2 A; n; h8 q% G
          RowBox[{"{",
    ( \" K% P9 k+ ?$ s. R       RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",", 0 }% T. a/ p$ y; Q) C" a
        RowBox[{"{",
    ; U, p/ v+ m9 `     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    & m5 v5 J; N" L( k1 n' x% q' ~" w CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {+ v$ Y* i5 V7 F( V( m1 d; D
      3.577924052828125*^9, 3.577924101671875*^9}, {3.577962237961193*^9, * |: t% x/ O* @' ~" E* K
      3.577962240082796*^9}}],3 r+ J+ j+ {' b) s# g% }
    7 ]# u* {5 \. Y& [$ R
    Cell[BoxData[
    6 c" N& C+ E5 H RowBox[{"{", 7 |0 @/ H/ z% ~' r
      RowBox[{
    4 j8 ~2 Z& I; j, V( X# R   RowBox[{"{",
    4 D+ [3 L, }4 j/ [4 ^    RowBox[{
    9 x) O4 O. U3 L, T! j    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& Y* f0 A; e, S8 m! c+ ^' @0 e1 }  S
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 [$ ^5 A0 U0 s# p6 H* U2 ~     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 o* M1 o. W& X* [* I
         "}"}], ",", 3 L& b+ V3 i) l# m8 u
       RowBox[{"{",
    3 L- [3 j3 A) y9 Q' n( q. w    RowBox[{
    ) ^* v9 O# C: u  W) a    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' W/ i. @3 H7 P2 r% Y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 D0 O. |! A& a5 ], }7 r  v, K: _* A
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],9 e2 i6 `5 ~; R) ?$ r5 O
         "}"}], ",",
    - f+ X; c: O0 M7 C! D" l   RowBox[{"{", / _& _1 ^4 x* J2 z
        RowBox[{% }! j1 n( o( I1 @* z! T  x$ `% f
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & a1 a( l6 E: f* y: b      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", , g8 C( n/ E- z3 t& R6 i/ ?
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. \5 e/ q+ E9 T7 }8 h+ S4 L. h
         "}"}], ",", $ o; f+ J8 Q' F6 N$ `4 B% W+ o
       RowBox[{"{",
    , n8 x2 {  E" H  L/ H$ z3 F- P- E    RowBox[{, d# ^% h% c$ l, F
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",8 n0 f7 a: P& c9 b& z
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", % t* u1 a5 @5 h% j! X9 ?; ?
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 d% m! m3 W- D' h; ~# i
         "}"}], ",", 4 d' I) c1 L- n3 M5 [
       RowBox[{"{",
    6 b  i6 V* }1 W" F+ _1 E    RowBox[{
    - ]8 k. h0 c4 G1 Q& k* h" [8 I    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 {/ |9 t) @4 |) x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - }: w) r* r* S3 T     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ' m2 x6 Q/ H& {9 z0 v1 i/ {, E     "}"}], ",",
    & Y. c9 N9 T( V/ L" t   RowBox[{"{", / I& X: J( M4 C6 x: N
        RowBox[{2 g( Z6 a# \& Y
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. v3 o4 K" |. c
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    4 m8 v! y5 m. ?1 ~8 ?) U6 Z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 V- F- J" j7 g8 ]     "}"}], ",",
    * u- {2 u8 ^' U& p5 F7 _; B8 Z; q0 ?   RowBox[{"{",
    2 e* B( @1 q& V! r0 h8 {& h: s9 E1 r' g    RowBox[{
    0 |5 i- s# e/ _1 `1 M    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 P/ ^% g% R, K0 v      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 4 P4 h. d7 w5 k7 b
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
      A& a6 {) N5 B& D7 x( c) y' t     "}"}], ",", 2 f/ J% O6 V1 m" W  _
       RowBox[{"{", 0 v5 g1 U8 t. [/ P& o/ `( X
        RowBox[{5 C( X3 c6 a/ P9 {1 Z4 V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , }7 a; c6 ^, i2 w      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   C5 C* h; G) s0 O
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 ^9 ?) }) W6 Z$ {7 {6 @* T     "}"}], ",", - }7 H% I( S9 b) G2 U' F0 s2 Z" _
       RowBox[{"{",
    9 T; J: R6 ~- n( S    RowBox[{; u) b( n. _4 f! i* R, _  b
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # J9 z+ x# d8 L3 X( Y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 B6 f0 ^, v8 [     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    - w9 t# r( Q1 i" R# X: o     "}"}], ",",
    2 @6 P) ~, P; K   RowBox[{"{",
    3 L* U9 i; w( I  X* E    RowBox[{2 K' D6 [; C, W7 z3 M/ \# O
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 b9 T! K0 q5 i      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 [* C/ g1 }9 \
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! E7 i) K8 j5 p" a4 U7 }     "}"}], ",", ! h0 A/ d8 Q; B1 U  y
       RowBox[{"{", $ w4 R3 a8 z( s2 S5 _: q) f' ]* O/ G+ ^
        RowBox[{) P0 \2 ~! N: o- r
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 o7 G2 @& r" ~      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 K4 {' j/ y! E- A6 A, }     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. D/ j. ^+ X# Z
         "}"}], ",", 0 v7 }% r' V3 P2 d
       RowBox[{"{",
    ; A8 K/ l& C( I    RowBox[{
    $ S& w" P  T7 a    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ z+ M6 I: t# }7 i+ b. X3 T# W& f2 _
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - Y! p4 e# M8 q& l! \' H+ r+ r     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . H7 y2 c2 p4 c! Y, s1 Y$ K! y) s     "}"}], ",",
    . X* T% G0 s; ]* S! l9 {+ w2 `5 s   RowBox[{"{",
    5 [" ^' g% h, ~5 a2 ^    RowBox[{  C- ]& P. w+ v; G
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : a! \* g2 I! G0 U# L, j/ r      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 X6 r2 Z1 }) u" b8 D     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],0 ]/ m: M5 c- P5 G: h6 h
         "}"}], ",", . ^0 b1 n. P; v6 O& X
       RowBox[{"{", + x9 I- L( s& R6 g
        RowBox[{8 @, t9 x! T8 @
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- E  k4 j6 i4 q) D4 l" x* S
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 9 J# i. ?% L- v
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 H: Z# z/ C, o9 A0 p
         "}"}], ",",
    % M3 P( u" a4 A4 A   RowBox[{"{",   S4 f" Q, S* k& D/ ?
        RowBox[{$ y: {0 n/ @/ A; |$ @6 Q
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 h% M, b) c0 l$ M      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) ^* q1 O) U! d8 A2 [
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 L4 R( |5 t2 K% i. r9 D
         "}"}], ",",
    3 z$ T  L0 I# B* s5 j/ ^# S   RowBox[{"{",
    / G" r% m0 R% q- g9 Q& N4 \    RowBox[{4 h3 v9 @- }$ q- j+ ]: a
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' t; L' g' E) k' z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 q1 d/ `( @) g* Z* p; [/ L0 o* k     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 j  l2 b2 k4 S0 Y! e7 A; A7 k% o
         "}"}], ",",
    - ]6 ~% D0 s5 d9 b$ X   RowBox[{"{",
    ( l' s! y# d" x* u: ^    RowBox[{
    ) j; q+ ~+ j; N6 t, m- c    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , x! k( y4 D% ]8 C6 b  ~- Z& z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) t6 z/ \/ M. V
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! f. l% M; U2 b: p( C
         "}"}], ",", 6 Z  k4 S4 F! E8 {. b, P: `
       RowBox[{"{", ' f- i2 f+ r9 w; {
        RowBox[{
    # X& @( s, s2 J" o    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 v7 z& i) Y: N6 R1 Q
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - E" Z3 l- }+ x: Y
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 d7 y3 |' O. P0 K6 {     "}"}], ",",
    3 ?( E3 h9 F- {% h) b# S* ?+ a   RowBox[{"{",
    1 ?* c$ ^0 P9 @2 ]    RowBox[{
    ) K# M8 {7 e* `2 w/ c7 ]% Q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 V) b5 x$ k6 e  C- Q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
      X' [- N6 r9 f4 s     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 l; E6 t/ G% w0 d- I2 x0 A+ H
         "}"}], ",", ' n7 E2 l/ t1 g6 D. I3 n2 C# U
       RowBox[{"{", 1 F' C! o7 v& W
        RowBox[{; L( F; V6 p8 C
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . t' b1 a+ l3 c7 Z% P6 G& Q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( _  [; v8 Q! ?     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) s9 ]1 e( S3 a  }
         "}"}], ",", ) A2 @- V$ ~6 z* A$ T
       RowBox[{"{",
    0 s/ Z& G2 E4 d0 U: r! `    RowBox[{
    2 P  G  _6 X6 f; j" W, T    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 @" v- O9 \- h9 H0 p; U      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % P9 L7 Z# o; S+ M$ i( I/ P     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# c9 s. e5 C* u# e: n
         "}"}], ",",
    . r. U) p- o1 F. K5 `3 l   RowBox[{"{",
    , n0 ]: p. Y3 o! @$ K0 s    RowBox[{1 Q3 `: d  d2 e6 e* X& H6 v& U8 R$ F
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - ?8 n+ K/ }/ A/ t" h( |5 Q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " H! b9 a. a, k# Y( C% D0 S     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 G4 m) C. u; r/ v6 k, ]0 e     "}"}], ",", 1 \) C3 X. H* |2 Z" b1 }
       RowBox[{"{", ; h, S% K4 Z' U0 t  O' H% V- J
        RowBox[{
    . S3 F6 r8 c8 ~    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 N  I. j1 {) N3 b) G
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 H# h7 @; U  B: s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : T$ f: |( ^( H* D6 J  a     "}"}], ",", $ H) W& I  P0 G# }7 L/ s; J) ~
       RowBox[{"{", 8 e3 j3 o4 l. p+ N# ?
        RowBox[{
    8 S# V9 w3 j; Y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # G/ v; N7 M1 K1 x: c( O& B% k      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
      z6 S  j# _; o) _: F     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. i' a: `+ k3 M% y; w" ]
         "}"}], ",", 8 e& o4 E' |5 P& V) n3 M
       RowBox[{"{",
    1 L2 q% @; f/ l    RowBox[{
    5 a( i8 A% b  b/ |, _0 ?. k* {    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 T" h1 r- T) x      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 ~; V4 L0 ^. K  s( x     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 u& ?8 w0 g! e: f6 l6 ~, p" ~     "}"}], ",",   W/ j& N7 h. K
       RowBox[{"{", ! K; _" u) G+ ~- G& p& b; l
        RowBox[{, y$ p; G; S) |
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ L8 \8 M  O0 u0 G/ @' P  ]
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    * S, }% x6 ~4 `1 z1 J     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 j1 c& v  J5 m+ T! k+ |" h, [     "}"}], ",",
    4 U0 ?" Z. I# s   RowBox[{"{",
    ' S- y* O1 r' {3 G4 q    RowBox[{
    9 w! I8 x9 o! k$ F    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",1 B6 Y+ B- [& t# V! Z7 K
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; j, K3 Z& e# q, L& d- e/ E% i4 P     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ' H- ]7 r) Q- g/ O' F, q& `1 Y     "}"}], ",", 9 Y/ l1 P1 V2 K6 Y7 S! R0 i
       RowBox[{"{",
    + r: {8 }2 L  K% f$ ^    RowBox[{
    ; P5 _1 Z8 L4 c/ p    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) V# s, C$ e9 p, ~/ m/ w
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", % k1 e# U2 y( ?0 N
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) r8 @9 c# y$ P/ P5 v
         "}"}], ",",
    & J) [0 m9 K0 d   RowBox[{"{",   J2 i& V  ?4 }8 S0 Z- L4 H
        RowBox[{, P$ T8 W8 S' G  R
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 k# l+ a" r2 J% @      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , H" r4 h7 M* i     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 W9 b1 C! I- S3 \- h2 E+ M
         "}"}], ",",
    1 d6 s8 ~8 q+ E' C/ C   RowBox[{"{",
    + {% t, b! d4 J3 I    RowBox[{% G" C. Z7 N  q7 b" s5 B
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ) S: t4 S4 o/ u, B! n      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 T! v' N3 g& X5 v& q! t
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 v# U( B7 b  W% O! Q     "}"}], ",",
    ) w2 _, y5 _5 j9 ?8 Q1 J- q   RowBox[{"{", 4 a% q9 Y, U% ^
        RowBox[{
    $ l8 p- g- `. _5 K; W    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + z  w9 ^- s) x$ a1 o9 m      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    $ ]/ S" f0 ]- l( o$ Y     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 t; \8 w# C1 B3 }( U$ N, |     "}"}], ",",
    ; I8 S; F# R6 o/ f2 l  I7 f   RowBox[{"{",
    # ^. O5 }6 ~- c9 v. j    RowBox[{
    1 l4 y& Q. G; m, K7 J/ g    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) \" p- @  f6 J$ {6 H
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    . y/ q) a, E3 n9 U. d     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],' @) Q4 T) d' j' g
         "}"}], ",",
    & N0 U( u. {+ s  j$ ]   RowBox[{"{",
    - j7 d* m' ^, g; |1 I7 P" o    RowBox[{9 g6 s# @# k/ q% S8 A! I. k1 X
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 d8 D1 U" U6 K9 A& O, J' a) U
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / m0 u: M4 b: E$ ?! e
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 U+ E! C9 G5 N+ Q
         "}"}], ",",
    4 s, O  o/ a& p* F  _+ `   RowBox[{"{",
    - R: {9 L+ Y/ v8 M! g9 S0 d    RowBox[{
    1 I- n% a9 h; M' h5 U7 m    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," R  L0 I2 d' H$ M! e5 @5 v& {
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", , Z2 F* G8 `( d8 p3 j
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ R$ Q! ?0 x; {- l* u4 F$ @, R* E
         "}"}], ",",
    5 ^) k2 x, z. e7 m( y2 F4 f" i   RowBox[{"{",
    5 ?) ~4 Q. h' `( i+ w* `9 W, M    RowBox[{
    . S- v8 z0 c1 m    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 o% v) H/ h" c5 k6 b      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) t0 b; q5 i* k1 ?
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # X* a: l* O0 X& ]6 ?/ L     "}"}], ",", 9 y1 C! R  ]+ t6 u) K5 O! R+ A
       RowBox[{"{", # @5 M) ~( o8 y( X
        RowBox[{: t* x7 \* l3 s
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 @; E$ K9 Z3 p' [& |      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 }1 `1 b% p7 h8 b% m. c
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. d1 c% _! o. f% K  E* I
         "}"}], ",",
    % D* j! J& r3 b; U0 b  {* A, `   RowBox[{"{", : N' v# H9 S+ y2 `0 l% j
        RowBox[{+ x8 Z# @5 h9 T9 P' X) z  t
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",# K% k" e# _1 D( V. q
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & b( L# r6 a' O# N2 S/ d2 {, \- X  y     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ B' U& t, o) a
         "}"}], ",", " p! Q! Y4 L8 Y! s# g
       RowBox[{"{",
    1 N0 [" l+ C; l2 d" y    RowBox[{8 L# ]  ]* \7 ?  k( \
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ; K' x! u7 D( B  f      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", & G# B% L1 z3 D. r+ T
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, b% v% |  b' z5 B/ n. T, |, ]
         "}"}], ",", 0 C& h- S9 O* z" e5 T& ?
       RowBox[{"{", 0 ]  l2 e/ \$ v9 f
        RowBox[{
    6 Y! I4 l+ Y/ P- K1 T% @1 s. H    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. l9 f; t2 H5 B0 R+ D; }) k
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % z3 V- g2 [% `* s& f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 d8 w% ?3 W1 x2 Q; `% @     "}"}], ",", ( }6 ^/ P9 X! F  S
       RowBox[{"{", 1 v# ^: S1 R0 h4 Z
        RowBox[{. Q0 M% I1 l# ]) Q( U
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 T5 p8 Y4 H5 _9 }, G      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( Y( {- N9 o4 J6 R( |2 P6 Y. N
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % i3 z/ `3 G$ B% D/ [2 P& j& S     "}"}], ",", + C2 w- y6 M, W' S- W
       RowBox[{"{",
    4 H0 y( Y% [3 R    RowBox[{# E8 c, a) Y! d+ O2 r4 G- k
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 d- `" Z$ G9 r4 Z5 @      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - W# `8 m( N0 a1 `3 ^     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," z9 I9 {3 q, U5 m- J- Q5 t! t
         "}"}], ",", 1 e( Q2 _' Y8 O4 X% s( l+ Z
       RowBox[{"{", 3 F; E" S1 ]! O: h6 V' l, J
        RowBox[{1 A" x6 g( H) _6 f* w* l; t" a
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 h4 r# m, {/ u! B1 m9 a2 v" D8 [      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : ^8 e& y4 }$ h6 N# G8 f3 @     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 I8 m9 `) _( [     "}"}], ",", 2 t( f1 b. R, @( D$ ]6 ?/ ?
       RowBox[{"{",
    # d2 v: }7 ~6 ~# s7 s: v    RowBox[{
    0 n% u3 N8 i& f6 {$ U: {    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    6 v& }8 B' T4 o* K      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . M  d- j9 n5 X  z5 r' u0 F
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 z3 v2 ]& U6 `; c, L" t
         "}"}], ",", & \. e6 b3 V! f) ^; U0 h4 l
       RowBox[{"{", 6 c" Y! U$ J; S" V2 j8 l# e
        RowBox[{4 m+ ^. u- t  f1 _
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 g5 L+ q/ Z4 j# V: c- b
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; O) F8 {: c) B& v- x     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 a$ i7 S9 `# f1 m$ s/ X! ~& W
         "}"}], ",", 0 ~3 j0 a& \1 F8 n# W0 k
       RowBox[{"{",
    ; v- I! q8 W# t" Z; S  \    RowBox[{( ~5 H$ z) a# d' S/ y7 P3 a
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",( K2 ]( `0 U9 y- R# A9 B
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( H7 z, c4 i* E4 p) l% D# r9 n     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],% K: i8 l, p# S% U+ ~, D1 S& ]' S
         "}"}], ",", ( n7 X5 z$ s0 V3 m. d0 ^
       RowBox[{"{", , C" D: H) F! |7 U
        RowBox[{
    / S0 O8 U9 e( U    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",# ~- \* f0 R7 ^8 P3 R& Z" W
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 A% o3 W5 G! }4 i
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    - e3 [: S' d2 y, a/ d( v/ s     "}"}], ",", , ?6 m9 j( ^2 C5 _! [# }
       RowBox[{"{",
    . z$ }9 X, }" o4 u7 A/ X    RowBox[{% w3 P+ N  D' `7 ^3 v  N( W
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! G# g3 H, |; c
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % n7 L& g2 r3 A5 ~7 x$ c7 N8 R* d     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ ]4 w: ~! _2 A/ W# ?% S
         "}"}], ",",
    6 ~' B. D# X0 N' b: v+ {  o   RowBox[{"{",
    % ?4 q, F3 P+ F& ^* ~7 d3 v3 u8 z    RowBox[{
    : O$ z) y6 c2 q! z  ?+ z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",  Y. k$ a6 E/ V8 _3 j! v
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! a  g* \4 I! S5 n. n2 x! ~) F
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 f# n( h3 C; \& I& o
         "}"}], ",", . `/ [2 g/ _5 W6 P" j
       RowBox[{"{",
    1 r2 s) b# E& ]7 g    RowBox[{' g5 K9 Z! v8 J! ~$ }0 R
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & K3 r9 j. {" o8 i# T+ E# s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", % X1 v$ i* C# n2 x* y+ d
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( L8 Y9 F- E) |
         "}"}], ",",
    1 _' z' ]2 `. ?# J5 P$ g* g7 U0 k  e   RowBox[{"{",
    ; c7 l' u. V7 ]) ~6 v( h4 o    RowBox[{
    0 V! v( G9 Z9 E4 V4 O* J  n3 {( ^    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! T6 N, n3 m0 b) }
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 @8 g2 e8 Q2 `: k9 ^     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 h' p/ F2 ^& I; s% w( j
         "}"}], ",",
    $ t' _) t, ~8 y   RowBox[{"{", , Y5 p) y* m1 A% c$ \2 u
        RowBox[{+ A0 p) b7 ~; f2 V0 j  `
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ }' k. V4 F& u5 I! [
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' \6 }1 r. A: T* c( J& E
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. {3 Z2 J5 C: B- {. j  w
         "}"}], ",",
    7 _2 x. U+ Y2 \0 g1 n   RowBox[{"{",
    8 l# E: L  Q: t% }: Q    RowBox[{5 e: x% A0 h  c, p& Y# U) |" n) y
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ G" d! ~6 t: J' L9 E5 A' j      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 Y9 x, \* T9 G7 d$ e3 O
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " D7 o  c) f6 U7 t     "}"}], ",", $ O) C# K0 }9 N
       RowBox[{"{",
    9 {! e8 e) k  i0 L# n3 U    RowBox[{
    : O$ S' v) X9 E$ w6 D1 j% f* s+ q( O; j! c    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 f3 t8 \4 ?- n: I
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! O6 p1 h6 }" _# j# l+ u
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) E6 U" s7 g* s  U! l4 M: f5 h     "}"}], ",",
    * w' G% A: G/ U* h- a! v   RowBox[{"{", + Q4 g( R, F/ B: x' |" u3 ?" ]! O
        RowBox[{$ I# R/ e4 w  l' n
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & A6 P1 Z1 |5 A7 V      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , z) |0 d% k1 g3 M1 M3 N$ f: \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," ?( l: r1 |8 q5 j. N
         "}"}], ",",
    9 W3 f$ ^8 i( N" N   RowBox[{"{",
    ' D2 t6 c: h1 ^4 b    RowBox[{( I% H2 S9 H4 F* B7 R- F
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ j9 a" a' z  I
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 4 A) E+ x  i6 Q0 N+ s# a1 \! f/ Q
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & I4 a/ D' Q) Y- J/ j* {# e$ E' ?2 t. B     "}"}], ",", ' h1 ~2 o$ l- n+ [
       RowBox[{"{",
    8 t. B# b  D; U0 P    RowBox[{7 P7 {; Y3 S! D/ k! w
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",  g  k4 c" r2 O! x$ l4 G, @0 N# T
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + w+ ~" C; O& g9 a% |$ t% C
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# n. D  m1 ?) A& N
         "}"}], ",",
    + g+ |. H! |4 Y; }2 Q9 d0 s   RowBox[{"{",
    $ O* G/ Y+ J9 b# K# o0 x! Z" r    RowBox[{
    + q. R3 {) C! r  Q+ Z$ y3 u  [    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 A( |/ F3 f" y1 `2 O4 v) g! Z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    9 |6 B. p- w4 F; P0 ?: h$ `: w0 x     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 a; {6 x0 N) g7 s4 h
         "}"}], ",", * q5 T* e7 r$ y0 [- x, @, S
       RowBox[{"{", ; B# C6 u5 T3 Z& d& e
        RowBox[{
    4 b( O8 D- W- B    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 R4 U/ h+ G2 c7 b3 d      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) j6 L! b. V. W5 n5 V     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : X0 p- @- `" O) X     "}"}], ",",
    $ j/ Y% C0 M1 H) L! a0 M1 s% W   RowBox[{"{", 6 |' d6 {8 z& }' F4 z, q
        RowBox[{. ]' ~5 ?0 A5 `7 I- P
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",( l) O8 i% e* Z( C! K. V7 Y1 j( i
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 Q) w* n1 v" `  g     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & v. t+ l( j' R. y/ g+ C     "}"}], ",",
    ' q+ Z  a' Y  a7 ~# D$ Q( c9 i   RowBox[{"{",
    " j2 s: k1 t' i$ Z& c    RowBox[{5 I) O" S/ J% }- P7 c" S; B
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! S; }. F" \, r      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) y: n8 ]' b2 n0 o7 G5 i; u& t
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + _! v9 b( Y" [7 }5 S, H     "}"}]}], "}"}]], "Output"," ~7 ?: v( S- |2 m  E* z
    CellChangeTimes->{
    - j0 A( ^6 |7 \$ I+ X* {& x  3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9}, # `9 l. ~* n( {
       3.5779582609987946`*^9, 3.577958492393998*^9, 3.5779590297369347`*^9,
    2 c$ M, \: L! S% o   3.5779622422980003`*^9, 3.578012443890625*^9}]. k* V( U- A' T( S2 ]
    }, Open  ]],/ p  Y- D5 N' l) {1 J6 o
    . x8 z" v/ g3 _$ S
    Cell[BoxData[6 o6 k  Z7 H: p  L& b
    RowBox[{"For", "[",
    4 X# A6 k7 h0 c  RowBox[{! [" c2 m! u- C& N( s
       RowBox[{"i", "=", "1"}], ",",
    0 V# {) {' \$ R/ w   RowBox[{"i", "\[LessEqual]", "60"}], ",", 4 p& }0 V+ T( ~7 z* V  n# ~8 z  G
       RowBox[{"i", "++"}], ",",
    ' t) z5 U/ d* g   RowBox[{"{", "\[IndentingNewLine]", % T7 V8 i  P: R3 x+ A$ Z$ i
        RowBox[{  P* q2 H& K2 n" d% U
         RowBox[{5 ]; g" G4 q4 ~8 c9 a* D
          RowBox[{"m60n21", "[",   l' p/ `7 o8 i( f7 N8 `
           RowBox[{"[",
    2 `: h( K1 {$ r% T. @        RowBox[{"i", ",", "1"}], "]"}], "]"}], "=",
    0 l& _  I: O+ G. Z5 p, H      RowBox[{"u1", "/.",
    , Y/ t& ?$ @5 e7 R# }       RowBox[{"{",
    ; g+ u$ L# U& M! l  `$ i3 s4 v        RowBox[{# R" t# Z/ |5 y' ?8 c
             RowBox[{"x1", "->",
    ; r( c- o! F8 u9 U; m' X9 q1 N- q! T8 A          RowBox[{"Data", "[", + |' g, @! @: O/ T/ ?, L2 s
               RowBox[{"[",
    8 I3 H% ]- v" K+ w& D6 y& M            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    9 p3 [* o7 k& W9 Z' I2 B         RowBox[{"x2", "->", & c  C6 o: v# P7 [5 k
              RowBox[{"Data", "[", : \- B3 C* z& t1 o
               RowBox[{"[",
    8 L( }  {" S( R$ a; s: I            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    * H: y% L* Z/ W5 m         RowBox[{"x3", "->",
    * T( e6 @8 y9 g" J; V          RowBox[{"Data", "[", 5 \" M' T& m7 A* k. i/ Q' k
               RowBox[{"[",
    ! E! u$ ?; d: y$ ]" b7 F% x            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", % f, \' h4 j9 e/ t5 L# Z
             RowBox[{"x4", "->", " g2 h0 D) y6 r8 _# e# J+ x
              RowBox[{"Data", "[",
    5 _. N' T4 Z7 t! ^& V8 h1 Y3 ]           RowBox[{"[",
    , d2 A/ {6 f1 K            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 5 ~# G  s! R5 P1 {9 I
             RowBox[{"x5", "->",
    : z* P0 I. F$ e          RowBox[{"Data", "[", ! {; Y. u/ c6 Z9 q
               RowBox[{"[", . K$ j9 e# C5 x8 z, T
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", % Z# u/ L/ u; j
             RowBox[{"x6", "->", % `1 ]' O: Z/ Y5 L. }
              RowBox[{"Data", "[",
    6 G/ S7 E' n9 d' t3 H* n& `           RowBox[{"[", 6 l7 J6 G+ X( `( P; [# P
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    * M* x/ M* i! c- B" O# U0 G, f+ j         RowBox[{"x7", "->",   B0 N, U* f8 `4 ^# `/ ]
              RowBox[{"Data", "[",
    4 c. N+ q4 G, F  g! w9 ~' l           RowBox[{"[", 0 v1 l% ?: r/ e  T# B$ d
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 1 b1 x- f% j9 H7 H/ m7 a/ Z. O' l
             RowBox[{"x8", "->", & G7 _6 J; n1 F& Q
              RowBox[{"Data", "[",
    & E6 Y4 M* E; }' X           RowBox[{"[",
    + x4 t  e/ n- ?9 a, ^            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", ; O9 a; }. A+ P
             RowBox[{"x9", "->",
    , k' q) Q1 g2 h9 o          RowBox[{"Data", "[",
    ! v) D5 {0 R( h6 m3 s3 J           RowBox[{"[",
    9 n, X: x/ j7 {7 |- `0 k/ @. T            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    % T0 O7 y& x3 O/ B+ {  }     "\[IndentingNewLine]", ! k; Z9 o+ }6 E2 y
         RowBox[{
    0 u6 _, Y0 D3 p0 O/ b$ Z7 U, f3 r      RowBox[{"m60n21", "[", 5 t( ^& @, \) I- ~
           RowBox[{"[", & b/ G  D  i9 v4 d& G" e7 U
            RowBox[{"i", ",", "2"}], "]"}], "]"}], "=",
    , L2 ?1 S2 _+ e      RowBox[{"u2", "/.", 1 F5 v( B3 c) _/ }# A) r+ ]
           RowBox[{"{", / m7 U8 U7 R- L* v
            RowBox[{
    % a: O, C2 Z% T: M6 W/ ]         RowBox[{"x1", "->", 4 `( p7 d( O. n& @$ u3 f. O
              RowBox[{"Data", "[", 5 b" \2 g7 Y! B
               RowBox[{"[", 3 k# ^* l% T3 {  o8 l. G
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    & t- ^" B2 U; ?6 q1 Z& C         RowBox[{"x2", "->", & S( T# a: T' }( F3 J" {
              RowBox[{"Data", "[",
    - m6 g% y( C+ m. ?9 |           RowBox[{"[",
    8 {5 _4 R. }- b; U$ h+ x7 `) Y8 E            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", , ?' O' z" l) S
             RowBox[{"x3", "->", 8 y: O+ ~3 r2 h, l
              RowBox[{"Data", "[",
      k6 y1 |' \, S- M( C8 r- L) _" A0 M           RowBox[{"[",
    , u% N6 U3 }' E1 K0 U            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", 7 F( u! E: ~9 S6 Q
             RowBox[{"x4", "->", 3 L7 P. P$ b; `& v0 H0 ~. e* L
              RowBox[{"Data", "[", 9 R- @* w8 i' t/ Y* i1 V9 b
               RowBox[{"[", 6 v- W9 w) m2 T: A8 o+ a5 G
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", . [' q) s" w  `5 e7 V3 j
             RowBox[{"x5", "->",
    ) h5 f8 K4 Y% C+ H4 q9 \# U          RowBox[{"Data", "[", 4 {2 q. {+ K5 |* N
               RowBox[{"[", ; b/ I* G; L& j6 {& \$ m  E
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", , m" b# i4 i; l/ m* N* ^1 u5 x; ]
             RowBox[{"x6", "->", % Y+ R5 F; b% [6 W$ D, d" v
              RowBox[{"Data", "[",
    9 q0 Z1 `3 b6 E; \6 o- ~7 P           RowBox[{"[",
    1 g6 j% U& @3 `# Y& U, f            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    : f' R% Z- B6 L" Y. I( k         RowBox[{"x7", "->",
    % M$ ?$ [8 I% }3 D& }          RowBox[{"Data", "[", 8 A5 B/ p* w4 G
               RowBox[{"[", - G6 H7 C: B3 t/ P, ^% b- R
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 5 l' z" q% E) m# D& L! w# z- \
             RowBox[{"x8", "->",
    4 h1 W  I3 N" ~. B: ^3 I          RowBox[{"Data", "[", 7 a3 r. y- \" E+ h" R
               RowBox[{"[",
    3 z* h  Z( G8 s: U4 f            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", / Z9 C- \: h  o) \
             RowBox[{"x9", "->", 3 q, O; n4 B( w3 W4 \. |# ]
              RowBox[{"Data", "[",
    & l: |, S3 S) n! \3 v. S           RowBox[{"[", $ q4 r3 A$ P# ~+ e  ?2 n3 b3 e/ ^
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    2 D& X8 n+ E  a3 U4 H     "\[IndentingNewLine]",
    9 W1 b' V7 E7 l$ r5 J8 U     RowBox[{
      s5 a- X9 [6 d* {( S3 U9 w" o      RowBox[{"m60n21", "[",
    # [5 ^7 d+ d3 d; S8 D/ T" j       RowBox[{"[",
    0 A: l$ h* q( N7 A        RowBox[{"i", ",", "3"}], "]"}], "]"}], "=",
    $ B3 m: t9 {1 f0 _! g4 k4 O      RowBox[{"u3", "/.",
      j# J8 \* U! Z7 v4 `' A) p3 a' a       RowBox[{"{", 3 w7 x( l2 ?8 r+ t6 j3 e9 F
            RowBox[{
    5 w' ^2 f/ j6 c3 M) G7 Z0 }         RowBox[{"x1", "->",
      [) T% a* y! [2 J+ l9 X1 S          RowBox[{"Data", "[", / c/ k. f/ t* B4 K) F6 ^
               RowBox[{"[",
    / S; O+ [0 R; d9 V5 b4 U3 c            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    0 K5 \. m% ]& W# a9 x: s) Z         RowBox[{"x2", "->", - q$ P8 V$ o" c9 v
              RowBox[{"Data", "[", . X, Y% q4 {4 I: J5 W1 a( Y6 ?# G! n  J
               RowBox[{"[", 5 [5 L" a5 u) j! V/ s  o% `
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    2 F+ h7 e! F. |7 r2 y         RowBox[{"x3", "->", 3 V4 C. \+ O0 j0 P
              RowBox[{"Data", "[", ) D( Z4 o+ F+ K' f6 p/ f
               RowBox[{"[",
    ( B4 x' o! k/ i5 d7 }  n( Y/ e( |            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    ( U. m: ?! H+ p8 n         RowBox[{"x4", "->", . G( [* M0 v! w+ V5 X% V& w
              RowBox[{"Data", "[", 2 n1 m* K+ m# j$ f5 R
               RowBox[{"[", 8 D; L9 j9 h: e) b6 `3 c
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    - S0 G! z0 d7 }9 b  d         RowBox[{"x5", "->",
    9 @2 ^# b# o  a/ A: s! S4 j. Y& |          RowBox[{"Data", "[",
    ! T$ c7 E$ [' b4 |/ ^           RowBox[{"[",
    , U6 b* u  x0 i% B            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    $ M. M8 Y# s. A: L# ^         RowBox[{"x6", "->",
    1 Y9 n0 p& b* r: l# b          RowBox[{"Data", "[",
    1 ~; f+ o, B- A" V+ S/ @           RowBox[{"[",
    6 q3 O. W9 u: h* {! r            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    - T. W) e# R3 A( z4 ~4 N9 k9 |         RowBox[{"x7", "->", 7 b4 h# V! f3 S# ?, `* f  f& S4 x8 B
              RowBox[{"Data", "[",
    , |4 O  P! T8 o2 e9 W, @           RowBox[{"[",
    ' p8 r- [% t6 z- |! n- B  P            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 8 }9 u3 u$ n( ]( L9 v! ?4 L) J
             RowBox[{"x8", "->",
    5 \  R. D) ]% }4 q8 X3 d          RowBox[{"Data", "[",   ~4 b& W5 X  i8 k
               RowBox[{"[", " C8 x- x0 x* f; r" M& ~
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    9 i2 F$ ^) C- q, X1 F) V         RowBox[{"x9", "->", + t& z- m: D& C8 X; |
              RowBox[{"Data", "[", 5 j4 \6 F2 _9 D& N8 m% |
               RowBox[{"[", ) s1 X! S/ s% S( n+ e9 p% b
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", ' B- o% D# ^& N! V4 m/ m# K: D' G- o
         "\[IndentingNewLine]",   L. _: y& f: }+ z
         RowBox[{
    9 [1 h+ k2 ?7 S$ S2 V      RowBox[{"m60n21", "[",
    0 E4 o6 P5 Q5 X6 q. C- F9 z       RowBox[{"[", 0 _( l; N: r' w$ m, t
            RowBox[{"i", ",", "4"}], "]"}], "]"}], "=", ; y+ [, k8 s! h9 i3 v
          RowBox[{"u4", "/.",
    - V" Q. W" |$ j2 U) s4 z$ d       RowBox[{"{", # ], t1 L( [8 ]3 e! ?
            RowBox[{
    * M" r8 x5 c' l; z$ A1 s         RowBox[{"x1", "->", , U# `0 e" J4 M
              RowBox[{"Data", "[", , O- G% V2 T" k3 ~% d; M4 D/ C/ ~
               RowBox[{"[",
    3 c. X/ X. g" n( K/ j8 L, R1 X% Y+ e, i            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",   ~, S: O! P# [
             RowBox[{"x2", "->",
    0 g1 i, Q& O& }/ A          RowBox[{"Data", "[", 7 `0 ?. N6 M4 v4 D* T* t0 M6 ~
               RowBox[{"[", ! u9 v8 Q+ Y. X
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    * d2 o0 ^$ b3 o$ J, B  a         RowBox[{"x3", "->", % X+ ^" ^$ L  v  C8 f
              RowBox[{"Data", "[",
    2 Q! n2 b3 N/ U: }2 [           RowBox[{"[",
    , C; d, e' G; g            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", ! Q4 s( X* `  M$ t
             RowBox[{"x4", "->", 8 [+ ~* {3 }0 q8 e
              RowBox[{"Data", "[", # {& g# F# p- D0 ?
               RowBox[{"[",
    % }- i  B& i' {4 ^% T            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", ( e( s/ Z# [( h
             RowBox[{"x5", "->",
    6 k9 G+ ^, i3 g8 h; ^          RowBox[{"Data", "[", 9 h' a  X6 i! p3 ]! N
               RowBox[{"[", 9 `' A1 y3 }% z8 O8 z- D
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", 2 [" d6 z# r: E1 U7 Z9 Y* M4 ^
             RowBox[{"x6", "->",
    & `& n2 z: k$ y1 e' T4 }          RowBox[{"Data", "[",
    - N' n* T6 z+ U, F, R           RowBox[{"[", " Y0 G) I$ ~0 t7 j$ ?9 j
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    / E/ s) l% t1 i- l7 f         RowBox[{"x7", "->", $ v1 Y, K; x% ~; @5 F- `/ G
              RowBox[{"Data", "[",
    ! e& F1 s8 w2 L# M  e           RowBox[{"[", . V7 D% G8 E' X! P2 x/ K/ g
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 4 s( ^1 z7 F7 [
             RowBox[{"x8", "->", ) [5 _; x7 q8 p& m) \
              RowBox[{"Data", "[", * R% D3 G! [1 K2 e* h3 A$ Q% t0 o& U
               RowBox[{"[", : R( z) n) a8 E
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    # r1 D% i; s7 b3 E3 L  y! U         RowBox[{"x9", "->", 0 w6 t$ ^. C) f5 w- E- x( p
              RowBox[{"Data", "[",
    * E6 D% H# H& @% x/ }           RowBox[{"[",
    5 u. M3 ~! t- W( u; a: v            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 7 z  t; v2 Y1 `
         "\[IndentingNewLine]",
    0 z% K+ r  ~4 u5 M& r     RowBox[{4 p5 Z" P! U. E: b1 n
          RowBox[{"m60n21", "[", $ O' v  O/ K1 O4 m" b/ W5 `' f* r
           RowBox[{"[",
    $ ^2 g1 K7 j: l  m        RowBox[{"i", ",", "5"}], "]"}], "]"}], "=",
    5 ~/ \% I1 W. I" W% m      RowBox[{"u5", "/.",
    # W  H/ b8 x0 m+ d* K8 p7 o1 m       RowBox[{"{",
    0 G% \+ U- j4 b* d7 X) @        RowBox[{* t  c. G( m/ v; n. ^$ `
             RowBox[{"x1", "->",
    - A2 K3 n) E1 Z, B9 c) D          RowBox[{"Data", "[", ) |, a' }6 a$ u, x( c. u1 U" @% e% h
               RowBox[{"[",
    7 O, l1 M$ b# ~6 G5 M) ]* L            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", , H! J5 f5 W5 R0 e' N% s
             RowBox[{"x2", "->",
    - r2 N/ K/ t  C( e& z          RowBox[{"Data", "[",
    ! s  N- c  y) F' h" U8 d; \           RowBox[{"[", , @5 \5 a7 U6 _9 |$ C0 [
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", " X2 y4 z- T+ Q
             RowBox[{"x3", "->", 3 z0 a* p; x4 y6 e6 ?) @7 R& \& r( W
              RowBox[{"Data", "[", # n& w! c- [, m1 f, X& G
               RowBox[{"[",
    & Y7 t* M! Q2 X" _0 K1 |  E            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    2 M2 M1 w# U% Q. N# D4 Y% k. f7 s         RowBox[{"x4", "->",
    % J' O. J1 p: A: t1 _+ D# D! b          RowBox[{"Data", "[", # g& V/ l! H4 c. f3 Q$ s: e9 _! k
               RowBox[{"[", % Q' `, P  O2 h4 G$ N
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    7 i8 Z$ C1 ^+ W/ f         RowBox[{"x5", "->",
    $ \9 Z. V- f) s          RowBox[{"Data", "[",
    - g/ s1 o7 @3 z! d  E           RowBox[{"[", ( a/ r* m) e/ g7 Q6 p: b) `8 g
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    ) b* {- H5 s' x2 j, x6 q" L         RowBox[{"x6", "->", 0 D+ O6 ^8 P, {
              RowBox[{"Data", "[", 3 o. `6 S4 [, R4 i, @
               RowBox[{"[",
    . W' S& }  r7 h: @) i            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    % s8 ?6 [$ t  c. L, @         RowBox[{"x7", "->", 9 Q3 J3 U2 ?! M
              RowBox[{"Data", "[", / n! }5 w- {# ~
               RowBox[{"[",
    4 X: I  u9 s4 f) V            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", . D9 i$ x( I  M: I4 u" L
             RowBox[{"x8", "->",
    " ^: J) P- M( {  X+ F* Y3 L          RowBox[{"Data", "[",
    , |7 m6 j: d. Q- P" |$ b$ C. |: |# y           RowBox[{"[",
    4 g" ~: Q' U8 l            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    . R! a6 ]; [. n* Y- l         RowBox[{"x9", "->", ) \7 |6 v1 c" F+ n
              RowBox[{"Data", "[",
    5 {* A$ ~/ n2 `1 |1 I/ I           RowBox[{"[", 5 L8 L- ~: o# F% ]! c. g; M" N7 [, x+ t
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 9 z0 ~! _& o+ A+ M3 A# f
         "\[IndentingNewLine]", , r0 ]% C: u2 \/ x# V
         RowBox[{# ?% Z1 v6 T8 ^" m. J1 p: V
          RowBox[{"m60n21", "[", + J- H% j" T8 l5 i: B
           RowBox[{"[",
    ) t, ]# ^+ g* Y# i( W7 P9 k0 E8 o& y; J1 V        RowBox[{"i", ",", "6"}], "]"}], "]"}], "=", 3 B3 Q8 l$ Z* {: F9 J
          RowBox[{"u6", "/.", - a* q1 h/ ]7 L5 K
           RowBox[{"{",
    ' M6 e& Z  T$ \! x* x3 h        RowBox[{
    : J2 A$ m7 f5 s/ h2 i         RowBox[{"x1", "->", 4 Q( P  {4 i* S8 a
              RowBox[{"Data", "[",
    # L2 }. F- w2 m2 M; o3 b           RowBox[{"[",
    , h; x& S) i2 N9 ]6 D$ N! ]" B            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    5 `9 m% d$ h) a0 U$ C         RowBox[{"x2", "->", % _0 e+ l- T9 X
              RowBox[{"Data", "[",
    ! q8 I% L. Z: h' Y% L           RowBox[{"[",
    $ p0 I- }' d' o* J& g( M- J            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    - S2 g0 X0 y& H2 j% U% F3 ?         RowBox[{"x3", "->",
    . R4 A; O  W8 A! f. ^2 I1 M* [$ ?          RowBox[{"Data", "[",
    ( L. W# `# ^; l# v& z5 H3 t$ W           RowBox[{"[",
    : O- x; ^+ R6 `/ H            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    . Q8 y" @; A. H; V1 S         RowBox[{"x4", "->",
    8 F) a. J1 J9 G% ?& b" g. |( ^( b          RowBox[{"Data", "[", ( _5 |) g; q) \
               RowBox[{"[", : B7 m7 x' ]) c& h; M$ t
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    " [& A, a! i, E0 M' l6 {2 U+ _         RowBox[{"x5", "->",   c0 @# U: _* K0 q
              RowBox[{"Data", "[",
    + k6 _' j6 |+ J' P7 P5 i8 ?. ]) e           RowBox[{"[", ) O7 l+ M" b$ G/ j' o/ x$ B. |
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", - B7 a5 v6 O6 g/ s
             RowBox[{"x6", "->", ' ?* E% D+ _; d" p! v$ I
              RowBox[{"Data", "[",
    ' \& Q8 x% h: z6 e6 L           RowBox[{"[",   |# X- d1 R) Q* p7 P3 t- R7 B
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    . ~+ l5 T9 p2 P4 X6 O         RowBox[{"x7", "->", 3 g' h! R  z9 p% O( w" d/ c
              RowBox[{"Data", "[", * C/ h# ?, U4 C% b1 d7 G; G
               RowBox[{"[",
      M( @- e  I! P1 v3 V            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ! y3 W3 Z9 {( R
             RowBox[{"x8", "->", / g4 `$ `) G0 p/ }
              RowBox[{"Data", "[", 9 {, `; W/ d& s0 p6 o
               RowBox[{"[",
    ( K) ]. l; o4 n" `) \( G            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", . D( l* J  O1 N* t
             RowBox[{"x9", "->", . v) b' o$ r% T, {
              RowBox[{"Data", "[",
    % L# p& |& f4 I) E* T           RowBox[{"[",
      y4 S( e: b$ \- L6 x) z# @! O            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    , Q& D' Z" K$ Y% _# d6 b- K: Y     "\[IndentingNewLine]",
    % H7 E, m3 f6 i; f( n$ K5 d     RowBox[{: h7 r1 S: w  J- o; f
          RowBox[{"m60n21", "[", - ?  k& u7 q$ u: k6 I2 g. F
           RowBox[{"[",
    - b' c+ T1 \3 p2 J3 ]3 d        RowBox[{"i", ",", "7"}], "]"}], "]"}], "=", , J; k# c+ U" g$ E* j
          RowBox[{"u7", "/.", $ n5 L. m% ]8 Q/ u7 [9 n% \) v
           RowBox[{"{", . ~: E/ E% b1 m1 T$ Z8 P+ H2 x
            RowBox[{
    , \7 t8 F" I) Y         RowBox[{"x1", "->", / Y4 [8 E" U8 d0 i/ |, x
              RowBox[{"Data", "[", : F9 u9 C( P% C) Y# E3 a8 S
               RowBox[{"[",
    0 o2 C8 S7 ]! x# [; ?; v  g3 s            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    & s  E' k. m% h  j/ S; N; Y         RowBox[{"x2", "->",
    % K+ S# c! l% J/ b# B          RowBox[{"Data", "[", ; V) R) C0 P- [# ~* C1 z
               RowBox[{"[", 4 O+ Y) }. y- b$ P/ E& g$ S
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", - E4 c4 ~0 H1 l# |/ m9 C1 e4 f
             RowBox[{"x3", "->",
    5 I5 Y8 C- p$ k0 n/ O1 x1 B          RowBox[{"Data", "[", 2 w& b  c- G9 w1 \/ s
               RowBox[{"[",
    " [! p3 A  }% P; i, b5 O" s. C            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", 9 Y! t, E+ @+ `% y  U
             RowBox[{"x4", "->",
    . w* L* I4 B8 [, l9 X8 u          RowBox[{"Data", "[",
    ) w1 A! z  ?/ s4 j* L' B/ ?% z4 n           RowBox[{"[", 4 I9 u/ Z8 l3 H7 T# u$ p
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    3 Q/ Z1 j$ l) T, h9 g6 {* d+ l         RowBox[{"x5", "->",
    3 O/ i% g2 P5 h. x/ O          RowBox[{"Data", "[",
    4 n/ ?. a  N' b0 r           RowBox[{"[",
    6 x5 D. D/ C' J  N7 R, p            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", 6 C  t( a2 t' |8 M
             RowBox[{"x6", "->", ! q( b6 Y, m0 E/ |4 J& c2 W* K
              RowBox[{"Data", "[", 7 I5 K& O$ V  E* ^/ r
               RowBox[{"[",
    % r9 ?) _5 s$ U' C            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", , q2 q/ o* T8 u: S" I# r- i- X  n
             RowBox[{"x7", "->", 3 ~$ O: K( g" Y7 B; S
              RowBox[{"Data", "[",
    1 Q! \8 k6 _# m           RowBox[{"[",
    ) H7 b4 q( L2 X2 ^            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    - j' C' {# X2 t3 Y5 M         RowBox[{"x8", "->", ! O& i  B, {" Z3 K
              RowBox[{"Data", "[",
    # m% T7 u5 \+ N# T; W           RowBox[{"[",
    * F( J' j1 p- F" c$ v3 o8 b            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 3 A) i) V9 [; V% O! [1 G
             RowBox[{"x9", "->", 0 V) @& a$ n+ q1 d3 R, K
              RowBox[{"Data", "[",
    2 Y/ x: x9 M. p3 `4 `3 s: h4 ~# `           RowBox[{"[",   x# m; X7 l: M% c3 x! z4 c
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    + T, K" K; b; s0 `' p     "\[IndentingNewLine]", ' K7 K) r. F; P) f5 u) q
         RowBox[{! x7 Z! q* c5 |/ `& C
          RowBox[{"m60n21", "[", , j: F$ M+ C% E8 M3 P. x& t- U
           RowBox[{"[",
    1 I7 M  v- E2 B- _3 n! G        RowBox[{"i", ",", "8"}], "]"}], "]"}], "=",
    4 W9 J" B1 t0 w( H      RowBox[{"u8", "/.",   @3 u! f$ Z) J/ f
           RowBox[{"{", 2 |5 T: r9 x: X; W% W/ P  N
            RowBox[{
    / F5 @1 }. L  s4 {         RowBox[{"x1", "->", 7 I; \% N* ^: {& R! w
              RowBox[{"Data", "[",
    - v& K" O8 q) @: m" J) w# ]: x4 d: s           RowBox[{"[",
    8 Z/ n* k" Y" o& t8 y9 u# |            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", * H* @- c. B, E" j
             RowBox[{"x2", "->",
    . f2 A  m$ J8 s6 j          RowBox[{"Data", "[",
    , w; i' m' E$ @& |+ R           RowBox[{"[",
    8 [9 [- U6 O# \: t            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    6 C  y: c1 X: }- \1 P         RowBox[{"x3", "->", . d- H: B& ~  y7 |
              RowBox[{"Data", "[", 5 z- M. j) n! F. ^$ R! Z- @
               RowBox[{"[",
    ( b( [+ g5 _2 v& a2 a; d            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", 2 V/ s' }* F1 D! s- d
             RowBox[{"x4", "->",
    & w; v6 G# P  I2 e* n' k( L          RowBox[{"Data", "[",
    6 p; b5 o# X+ {7 ]           RowBox[{"[", ; N5 C: G* t3 A- j
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", $ x, O7 @, _  f: g7 q  ]
             RowBox[{"x5", "->",
    3 M/ r# D- G4 k) T6 p/ w' c) g          RowBox[{"Data", "[",
    / W4 c9 ^/ o! |  ]           RowBox[{"[", ) y# V$ Q4 N8 @
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    8 v1 M! ^6 O. k# J' Y/ n  s- G3 V         RowBox[{"x6", "->", 8 w  K. @+ T/ S( C5 o$ @
              RowBox[{"Data", "[", & R2 a% x6 q* X
               RowBox[{"[",
    ) w+ S6 e6 t9 `            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", " H, N7 l4 k! k% Y
             RowBox[{"x7", "->",
    1 A- e! h. Z7 a& _          RowBox[{"Data", "[", ( d& P7 X0 b* I4 o# f
               RowBox[{"[", 4 U2 n- A5 E/ X! W  G! P  ^( @
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    $ O! A/ N! z4 a6 T- [         RowBox[{"x8", "->",
    * |5 d9 k7 [, I( @2 S          RowBox[{"Data", "[", + T" l% ?* P' R3 Q
               RowBox[{"[", 0 L$ K  U# c! z8 Y8 a) a" A  P
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    - _: X/ ^4 S, n* O, j         RowBox[{"x9", "->", & M5 H4 U& A* F% X
              RowBox[{"Data", "[",
    % z4 G9 b# ^  d5 N3 j. ^           RowBox[{"[",
    % d  I" G4 T  ^( _$ c9 j            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", * V3 f6 ]! l9 |, o9 o
         "\[IndentingNewLine]",
    % E# p3 H4 [( @- d& R. E" ]8 X" p     RowBox[{
    ; _: ]; c) W2 [2 u      RowBox[{"m60n21", "[",
    % B# p9 ^" F2 C7 Y- ?       RowBox[{"[", 4 {8 f( y; G: X9 t
            RowBox[{"i", ",", "9"}], "]"}], "]"}], "=",
    ( q+ C( q2 _7 o: a      RowBox[{"u9", "/.",
    8 S, _# t4 b+ ?# r       RowBox[{"{", + C; B9 k# @1 y
            RowBox[{
    * W, _9 V. P0 T1 R. r0 O         RowBox[{"x1", "->", 7 z; F/ }. h' n% R; h8 h' }
              RowBox[{"Data", "[",
    * o4 g. @9 s: p2 T2 D# W           RowBox[{"[", 1 h( K, M! Q# ~9 \2 E8 R  g% A
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ( g& }( \8 x6 v) Y! Y8 |8 ]
             RowBox[{"x2", "->", # Z4 J/ c3 h& I) p
              RowBox[{"Data", "[", . y) W" K1 [5 v9 X% A4 \2 y
               RowBox[{"[",
    ( @4 s0 t$ ~* H1 B9 A            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", ( P$ G7 A3 m. H" N3 j9 X& W
             RowBox[{"x3", "->", 3 D1 U1 L  b; @4 P2 v
              RowBox[{"Data", "[", 5 v: S5 w/ v) ?: ]. }' [
               RowBox[{"[",
    5 t9 q+ F4 e  a            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", ' k" g/ s) k! L
             RowBox[{"x4", "->",
    + a" G7 G2 P/ I. C          RowBox[{"Data", "[",
    5 I2 J8 ^. r/ G1 S" Y1 b4 ~           RowBox[{"[", $ x6 Y, p" j5 _& u! l  U
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    & W. I$ D$ \# ]! T. P; F         RowBox[{"x5", "->", 6 W' D5 k' i3 p; K' k+ j! R' M
              RowBox[{"Data", "[", # A" u5 N1 h( {  C4 w
               RowBox[{"[", ; u* m* I7 U% ]7 U! G7 g
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", , D6 n+ A; S) t% d
             RowBox[{"x6", "->", " J  w6 _4 `- r( s" ]$ j/ D
              RowBox[{"Data", "[",
    + ~( _, X- N) r: e5 l           RowBox[{"[",
    7 c' O) _/ [8 R7 t& u; t, P            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    6 P. W; _2 G! n) E         RowBox[{"x7", "->",
    & ?/ H' ]1 Z2 F2 O( P          RowBox[{"Data", "[", 3 O: P+ z, l8 F! R0 T
               RowBox[{"[", & ~  I) s) u6 R; ^
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", " I0 C6 V2 B% D* F# I3 g
             RowBox[{"x8", "->", " R" o* h" e. x+ M0 E& s
              RowBox[{"Data", "[",
    3 g' F9 k3 _0 F; F: h8 P           RowBox[{"[", " c) g4 q  b& ]& S. w/ f/ p
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 2 S& Q/ M' R' n. Q- M6 @) h7 J& `
             RowBox[{"x9", "->", 4 v5 r7 W1 S4 h$ s; i
              RowBox[{"Data", "[", , b! ?7 \& W9 U9 D
               RowBox[{"[",
    - l; x& v9 k8 q9 _( M& ?            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 0 }, s. r* i/ F# C. B$ |
         "\[IndentingNewLine]", ) h0 `: w8 w+ e' h# v: M* w
         RowBox[{  d1 f9 v% ?, I! G3 k* A6 Q5 t6 O* F
          RowBox[{"m60n21", "[", # U! O2 R5 l4 c6 M0 c/ e- J* }. p. k
           RowBox[{"[", & X. q  k! L( E. p8 r
            RowBox[{"i", ",", "10"}], "]"}], "]"}], "=", 0 o4 `: U  u1 W7 w
          RowBox[{"u10", "/.",
    2 Q: N# l, x+ P) a: z       RowBox[{"{", # {1 M7 k$ U$ y/ a& L( o
            RowBox[{
    ( i4 v$ i) e) _8 e         RowBox[{"x1", "->",
    3 P6 J- t" M: w2 C          RowBox[{"Data", "[", ( }5 S/ w  x( j- ^) l7 W4 d
               RowBox[{"[", 6 y" m8 |4 o  {' N# r( X% e
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    ! ?- i4 L: A* j         RowBox[{"x2", "->", ! Z; _: |8 K8 b1 r* e5 D$ b
              RowBox[{"Data", "[",
    3 F4 e/ i8 U* e7 n           RowBox[{"[",
    - z5 ~8 @. G. p: K6 _: L            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    , Q0 R) A* ?: H' m; L& O) J         RowBox[{"x3", "->", 4 c: a( ~2 ]- s4 s% w
              RowBox[{"Data", "[",
    ( V; t6 t% L5 t* R           RowBox[{"[", " R+ M: Z" T# B: x, _
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    # x/ l* g* }) _+ Z         RowBox[{"x4", "->",
    - h& f$ q4 G5 F& i. v          RowBox[{"Data", "[", . d- r2 i' }' J' u/ k
               RowBox[{"[", 0 r6 F0 l# N0 E& ], b, R5 u
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 2 D( d$ R+ w9 b$ G
             RowBox[{"x5", "->",
    ) f$ \' A+ V/ x# e  {          RowBox[{"Data", "[", 3 ?/ N8 b4 T6 u4 k, l+ h9 v* Y
               RowBox[{"[",
    ; N. j- _; A! b5 T0 M            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", 0 u/ Q, h" x  J9 U
             RowBox[{"x6", "->", : O$ |. @0 K; M8 Y
              RowBox[{"Data", "[", $ p+ d7 A6 k& F
               RowBox[{"[",
    ' [0 D( |- h2 q4 L' p$ `            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    8 U% ^% Z4 _0 ]1 h7 W, U. k) F# i         RowBox[{"x7", "->",
    ; P& J" F& V8 y2 w/ h% I" v          RowBox[{"Data", "[",
    ; Q5 x# G7 |5 S: ?& ?& Y! \; A/ E" F           RowBox[{"[", ( g- {: ?4 ?; ^, |
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    0 Q/ F' `  {2 M, I- m         RowBox[{"x8", "->", + T; q- i# P- {% w
              RowBox[{"Data", "[",
    3 i3 I( O' p" P4 d           RowBox[{"[", 2 V7 ?# D) ^" B; [* h: h
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", ( Q* u+ ?- t% ]- X
             RowBox[{"x9", "->", % P7 \/ Z5 V/ ~, g( O# U
              RowBox[{"Data", "[", 7 e/ x8 H4 T. {6 l0 O+ }+ n
               RowBox[{"[",
    2 H& q8 S3 y% d' O" N            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",   y* H" E) m6 s
         "\[IndentingNewLine]", / _3 q( _# s# E7 Y2 Q9 O* Y
         RowBox[{
    * C. K, z6 z! X/ G2 J0 z      RowBox[{"m60n21", "[",
    , i: w$ k' Z0 k6 T7 \+ y7 D% D1 {       RowBox[{"[", + c3 s# }! O; ~2 w( R+ k
            RowBox[{"i", ",", "11"}], "]"}], "]"}], "=",
    , j& g. _7 v0 w# d- s      RowBox[{"u11", "/.", % r/ A7 Y5 _; L' K
           RowBox[{"{", 5 A8 H8 A# m  Z
            RowBox[{
    . k# H( C8 \; X0 |         RowBox[{"x1", "->",
    0 K: t; S5 H8 H. N8 [7 Q          RowBox[{"Data", "[", 4 u9 }9 N7 b. Z
               RowBox[{"[", 7 ?6 D+ `: j. k. c2 G7 @
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", $ n, a1 O0 F3 E: c
             RowBox[{"x2", "->",
    9 X. B7 W; p/ F          RowBox[{"Data", "[", : `+ Z0 c; ^; M5 E9 X8 s3 ^
               RowBox[{"[",
    - q) U3 M7 Z7 c) M. ]            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", . c$ ~( O- N6 {/ f2 J
             RowBox[{"x3", "->",
    . h' K8 p" p8 c. c' b: z. K          RowBox[{"Data", "[",
      _) ?" s+ ?2 F0 T7 B2 `) W           RowBox[{"[",
    : M, d* f( [6 V2 U' t" j            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    1 c1 V. q; ~# H) f2 O  w0 H8 ?7 ?+ ^         RowBox[{"x4", "->", 2 M: C. Q$ r( j; n+ B! [1 Q
              RowBox[{"Data", "[", 2 i; }9 g( i; s3 w
               RowBox[{"[",
    3 f" [7 G7 }! U+ x) R            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    8 d; r9 |! t! C: _, Y         RowBox[{"x5", "->",
    . {" k/ G( ]6 l/ @, a          RowBox[{"Data", "[",
    1 a8 n7 U+ x5 V/ X5 B           RowBox[{"[", # _$ H& D' R) ]/ K5 L! C
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    , X# `, t% {4 K5 {& z         RowBox[{"x6", "->", ( @& S9 L0 z- J: z6 @" U
              RowBox[{"Data", "[",
    ( D  i7 t( `3 s% G1 o, [           RowBox[{"[", ) L( k0 e9 e9 {. v
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    5 H9 R, ^# E' [- E" g( p         RowBox[{"x7", "->", $ m6 `: g" ]( |
              RowBox[{"Data", "[", 9 n+ s1 S# a( C9 s1 R8 t4 Q
               RowBox[{"[", 9 Q4 j& G& k/ P
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    / g  G! K! F+ u! k9 o* G+ \         RowBox[{"x8", "->", 2 k. \- c5 z# E+ X; K- o6 e
              RowBox[{"Data", "[",
    & x% q# Y( y2 i/ n5 w2 j           RowBox[{"[",
    7 p3 }% w/ k3 n) A9 |* y7 a" s            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    9 H$ q. r* x$ b; i' D         RowBox[{"x9", "->",
    , l- l9 {5 u. {! j          RowBox[{"Data", "[",
    ( W4 u; m9 r( P% R! ]. ?           RowBox[{"[", " K& i4 B/ a! b
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    0 Q( }8 [0 H+ t1 W  ]     "\[IndentingNewLine]", $ F0 g0 r$ u) Y& F8 D- e
         RowBox[{7 e! r$ i5 _* B6 E6 C
          RowBox[{"m60n21", "[", / P8 t2 o( ]6 f  V: z/ T; \
           RowBox[{"[", 9 m% ~+ h" N$ l% S4 y' z) _0 W
            RowBox[{"i", ",", "12"}], "]"}], "]"}], "=",
    6 a& U7 t4 j2 |      RowBox[{"u12", "/.",
    7 J3 _' v, \8 x0 j5 g       RowBox[{"{",
    $ f: R; s( C) F+ Z, D: Z# `! P; i3 o% w        RowBox[{6 C+ r- {& A( ?7 ~2 `; z
             RowBox[{"x1", "->",
    . ~1 j6 P2 H6 x) i% Z, H          RowBox[{"Data", "[", ) q$ C$ N4 f/ ?: L* t% o1 Y
               RowBox[{"[",
    7 q% _( [! ~. B( L4 q            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    9 [" T! c1 c  `         RowBox[{"x2", "->",
    ; Y+ C2 s% U& E3 s) u6 q0 C& m          RowBox[{"Data", "[", : M7 q* Y6 l2 d( J* L! m6 g
               RowBox[{"[",
    ; F- X0 V( s/ a; o            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    9 B7 l. s5 T( H) r         RowBox[{"x3", "->", , ^* |& j6 M3 r5 m
              RowBox[{"Data", "[", 8 A6 Q' Z. ~: \: e7 ]
               RowBox[{"[",
    7 s/ l9 f" |! Q  n4 ^7 g            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    ; V' h) z- x5 M  n  K& M, n3 f         RowBox[{"x4", "->",
    5 v" X4 _' y6 l7 w% s" [          RowBox[{"Data", "[",
    5 f. N- Y4 t# H' W% T7 F           RowBox[{"[", + V/ _) d+ W* E( S9 U
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", ' f8 _* ?) ^: M& @& N9 p& R: p
             RowBox[{"x5", "->",
    2 t7 x. u# H0 s% ~          RowBox[{"Data", "[", 6 }, J! w- D& M1 l
               RowBox[{"[",
    3 c: a6 c/ U9 a' M1 r* m# G            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", 0 d: [0 N) R# F  V0 |- r+ d1 k
             RowBox[{"x6", "->", - n% r1 m% w1 C% _5 |* Q
              RowBox[{"Data", "[",
    4 l3 I. b3 \  G' v1 j           RowBox[{"[", 1 H# `9 V6 x6 ?1 m# E
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    % b- n+ T/ Q: \, L" P! a: n# ]         RowBox[{"x7", "->", # T5 S- K$ ?: p
              RowBox[{"Data", "[",
    . z5 Z8 E$ P# G: L) s  K           RowBox[{"[", * e4 w$ Q, a% y: [" p* H: U, [
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 4 Y, }; |( V1 Z6 C! P8 z4 x$ _" O
             RowBox[{"x8", "->",
    : [7 c  c9 h: f8 q          RowBox[{"Data", "[", . r2 E1 l4 _4 Q/ o$ L9 I1 X+ |/ ^4 k
               RowBox[{"[",
    0 D( \, ~. ?9 ~2 v            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    2 |) [2 X6 G( u         RowBox[{"x9", "->",
    ! |" G1 D9 D5 w4 }" J1 h          RowBox[{"Data", "[", 9 N: _# f5 _$ ^& [; u
               RowBox[{"[",
    6 }. G" s* T- p2 C% m) d            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 0 v' Q$ M; T- f
         "\[IndentingNewLine]", / n3 z, m) t, g) Q: G: f: r
         RowBox[{
    3 O% J6 l2 n3 v0 ?      RowBox[{"m60n21", "[", 2 A- {9 `" _8 N) y
           RowBox[{"[",
    " |* P$ `& S1 Y7 L9 v# d        RowBox[{"i", ",", "13"}], "]"}], "]"}], "=",
    0 R) B4 S, C& P! m( a4 d) ^      RowBox[{"u13", "/.",
    : T5 y4 q; ?, @# b5 j       RowBox[{"{",
    ! O1 F# a  `' c# {$ H# v: k        RowBox[{
    7 t, G! v+ ?( k& e/ c- O' J         RowBox[{"x1", "->", + \) y+ j8 m6 r/ e) H3 r* j1 Q
              RowBox[{"Data", "[", # j1 ^2 L3 w- g9 k7 }5 b9 ?# j9 C, p4 H
               RowBox[{"[",
    - Z. {6 p' V& i3 @' K3 Z& {) N! `            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    ! Y- ~1 j* y, W1 v8 z         RowBox[{"x2", "->", ) V# G2 N/ ?+ l2 R8 ^* R& R
              RowBox[{"Data", "[", & p* {" {- R  \; B( U3 l# Z
               RowBox[{"[", & ^  K- H. t9 P* ]
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", . }: Z4 e/ m, k" w$ J. b
             RowBox[{"x3", "->",
    8 G$ E. H+ y9 v          RowBox[{"Data", "[",
    1 s% a* G4 t( }0 j- g. N- g           RowBox[{"[",
    : b) e, L* d0 S7 d  Q% T) [            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", , V; u' X8 k8 j
             RowBox[{"x4", "->",
    " r6 ?5 C1 B6 ]& f8 ~8 h# H          RowBox[{"Data", "[",
    8 S' L( E* c# P7 t( S( B           RowBox[{"[",
    6 x6 u8 v3 D. ]  g0 m9 Q- m            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", & L: C" b: D9 F4 `4 M
             RowBox[{"x5", "->", - M! R; V* c, _9 N! J7 E
              RowBox[{"Data", "[",
    " b" {1 o' b" `$ g" y5 F# n           RowBox[{"[", & I8 d. W+ }! x7 c. l
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", . g+ J, D3 B* a, ^1 z: B$ V7 G+ v
             RowBox[{"x6", "->", 8 H  G+ L. J0 q% l5 _
              RowBox[{"Data", "[",
    * M( q3 G0 {/ n9 D" f! @! V           RowBox[{"[", ) Y  {9 B5 i# o8 s$ C: b0 f* i5 U. h
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ) c/ q% m8 ~) ^0 X         RowBox[{"x7", "->",
    2 {) o# v' k  P          RowBox[{"Data", "[",
    8 J( r% b$ q  j2 P( d$ `; ~           RowBox[{"[",
    8 l( k  r  w! P            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    ) n" Q1 S, e, I# I1 ^7 Y7 t$ J         RowBox[{"x8", "->", " b( R" s4 J% a; a* ^! U
              RowBox[{"Data", "[",
    , O+ e% a/ L1 f- N           RowBox[{"[",
    5 j! Q6 s: b' a  s1 E* j            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",   V8 h1 _# z3 F, ?  G
             RowBox[{"x9", "->", 1 H" Y# S6 _* E, ]* c: [
              RowBox[{"Data", "[",
    / D% X' P7 K2 U2 B5 [* D5 R           RowBox[{"[", ! r- Y( D7 t# H0 Y
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    " T& _* l/ h5 }& r6 u' X     "\[IndentingNewLine]",
    6 n2 ?  c/ X8 ]" U     RowBox[{4 V+ t/ y2 H3 [) q; Z$ z. n
          RowBox[{"m60n21", "[",
    ; z, a0 M( V' |3 {       RowBox[{"[", * Y- p( h# M2 `; W& X9 ]% S1 F7 J
            RowBox[{"i", ",", "14"}], "]"}], "]"}], "=",
    & P& @* V& E( {  j' G4 P& R# K5 H% I      RowBox[{"u14", "/.", 4 G4 H. B$ z3 s
           RowBox[{"{",
      C6 e) n% g' G7 J        RowBox[{
    ' F8 O0 C: ?1 y- E; y         RowBox[{"x1", "->", # C4 _# h' ~9 i. b$ ^9 h
              RowBox[{"Data", "[",
    * g# r0 I  n% V8 q, t" C0 r           RowBox[{"[", . X- Q$ U) Z% c  Z7 ]
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ! y4 T* j! [" M% b( C  o
             RowBox[{"x2", "->", 8 a; f8 k( S( u8 ~/ z3 ?
              RowBox[{"Data", "[", 4 C. K) n( f. u& z3 p' i' F2 n
               RowBox[{"[", 1 s. Q3 Z/ v3 g* e& ^8 v. S
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    / |/ k/ M. o) m: w: \         RowBox[{"x3", "->", - z9 t6 Z% r7 n# w
              RowBox[{"Data", "[", - e0 |, D5 p4 M) v$ O
               RowBox[{"[",
    ' l% e9 y9 f- b& P3 L+ o# H            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    " L" \7 m( u' d0 V6 \$ I         RowBox[{"x4", "->", 2 Z# e# U3 K9 p, m& n
              RowBox[{"Data", "[", $ w, U* B& F9 v. X# G" U
               RowBox[{"[",
    ; X! H3 c# I1 l+ h4 ?  o& G" F            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", , Z  e( p) t5 J9 r3 E$ s% a$ w, i9 ?
             RowBox[{"x5", "->",
    , O6 o$ [  c/ {- ?) I7 Z          RowBox[{"Data", "[",
    7 V( V* M4 }% V0 ~- Q# q           RowBox[{"[",
    + {8 E5 m6 _1 N            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    ( r, Y+ y9 c7 i$ C) D- v" S         RowBox[{"x6", "->", / K3 F4 y6 Q0 `/ T" ]) Q+ u7 i
              RowBox[{"Data", "[",
    ! I# a2 _  Z) K3 ^: i7 [. k           RowBox[{"[",
    , Y1 K( b. U( E, f7 n* u1 X# e            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", 9 U/ a* S/ L1 l9 A1 r
             RowBox[{"x7", "->",
    , n) r- t5 k' s# `          RowBox[{"Data", "[", 2 g7 K; X% j- m1 \2 `4 p* {: u
               RowBox[{"[", % |- q2 C# x9 {! |9 ]
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    ( N, p8 `' v; a6 U) S+ A* s9 Z         RowBox[{"x8", "->", 9 P3 M& p1 j% Z9 W* h
              RowBox[{"Data", "[", $ `. a! ~5 l8 x" [' X$ K2 L
               RowBox[{"[", % u( t% `+ `6 j- h
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", ( G3 o& h0 |0 h2 p$ x
             RowBox[{"x9", "->",
    : b" K' }# q' }          RowBox[{"Data", "[", 8 N( D1 Y/ y6 ^# R" Y$ I
               RowBox[{"[", 2 h  M; D& D! g: P# W# z
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    ' Q- X, _6 f3 b- k     "\[IndentingNewLine]", 3 k, L) i; ?  h* q' O, O* V: R
         RowBox[{
      L) y/ e3 k3 [3 e5 _( S      RowBox[{"m60n21", "[",
    + ~, Q- }$ n* ]! g) j& N       RowBox[{"[", 4 w' M/ b: Y$ E4 P% q- V4 J
            RowBox[{"i", ",", "15"}], "]"}], "]"}], "=", " L; Y4 ^3 S' D$ M% l
          RowBox[{"u15", "/.",
    + ~$ q2 h* G; O/ L8 R& O* w% L) c& U  p       RowBox[{"{",
    ; r) l6 V4 \) o& i: G        RowBox[{
    $ a9 T$ ]! O" b" O' D. q         RowBox[{"x1", "->", ! H2 X) v8 c3 w/ U
              RowBox[{"Data", "[",
    0 S+ S( V4 d7 `! U, f           RowBox[{"[", 9 w" P) J' ]' d
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    5 O8 X: c/ d4 o* {. X/ D: n         RowBox[{"x2", "->", $ G) Z1 S: e' r0 g
              RowBox[{"Data", "[", ! l. e% U- U  a; v! n# e8 W, T
               RowBox[{"[", / X1 m% j/ d. H% J" A+ |
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", 5 J, n/ ~9 R$ Z
             RowBox[{"x3", "->", / g9 T0 J- Q' D7 i5 y) m' x
              RowBox[{"Data", "[",
    * U3 s( [  H! ]* T3 H* S           RowBox[{"[", % j9 X2 B- W, \; x
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", . M8 i; l; ?# H( X
             RowBox[{"x4", "->",
    0 O6 a  }3 ]+ a# K          RowBox[{"Data", "[", * k- `4 t( v* h
               RowBox[{"[",
    $ X: E( q3 W* F7 K            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 5 k2 `; ~9 B8 R  P: X: Z, s* k% ~
             RowBox[{"x5", "->",
    : g! f# f8 C% e) m* `3 }% c          RowBox[{"Data", "[",
    $ K. ^" o8 e6 ], x9 @' F           RowBox[{"[",
    ! ]: |4 l  W8 f6 Y- \3 G8 O% y            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    , ^& m& l+ P" p7 K) k/ y  }         RowBox[{"x6", "->", # m& d" t; E% U0 Y- F) V5 p5 X
              RowBox[{"Data", "[",
    ( j& R& p+ G! ^3 R( V4 @' L           RowBox[{"[",
    : g' [  B4 N- _! c            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    5 ?8 h. }2 ^- e' u2 S. L% ~         RowBox[{"x7", "->",
    / l4 M4 m. u; \8 W5 u          RowBox[{"Data", "[", / V) }; A! c: N/ r& y+ P2 q3 v
               RowBox[{"[",   I  Y0 J, H, J' p( [# ~- s* B& ]
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ) ]! B6 `4 m7 Y
             RowBox[{"x8", "->", 3 h: _5 O( V+ w0 H$ B" [; f
              RowBox[{"Data", "[", , O' X' J+ L- @! x% l5 H
               RowBox[{"[", 1 [1 m& i0 D2 b+ Y
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    ; W* E1 e- e) r% Z( H$ ]8 o, s& {         RowBox[{"x9", "->", $ B  ?! Q& X7 k
              RowBox[{"Data", "[", : a; [$ P' H- U7 U$ K
               RowBox[{"[", 9 V9 C% v9 D4 ~/ M, c
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", . ]$ Q& M7 g2 d, T" M
         "\[IndentingNewLine]",
    + V8 h+ C( r0 q: t     RowBox[{$ e( ?( ]: `. M' E  E: V
          RowBox[{"m60n21", "[", ( Y1 N; A6 w0 [" S) s& B; m3 u
           RowBox[{"[",
    : L; w, I' v; I$ r% W) F7 a        RowBox[{"i", ",", "16"}], "]"}], "]"}], "=",
    : N1 v8 K. h: _      RowBox[{"u16", "/.", 5 r, F# B8 Z  W. }
           RowBox[{"{", " W9 {5 l. h9 Y1 k
            RowBox[{- w$ V: ]  E/ a+ u5 [$ I
             RowBox[{"x1", "->",
    : ?4 f, ^) s& G1 G3 ~          RowBox[{"Data", "[",
    9 h5 Y! n% B; k4 j           RowBox[{"[", # s( Z, x9 s! Y% g8 u. Q
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", 9 {3 \% W: q7 x% Z  y
             RowBox[{"x2", "->", 1 {7 F, A' M4 H3 @3 D  E
              RowBox[{"Data", "[",
    6 o' T- ^% w0 z$ W& ?, C           RowBox[{"[", - b4 j$ Y6 p$ g3 s
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    ! M# d: i7 `6 |" j/ Z& o* o8 z         RowBox[{"x3", "->", 1 K' P( Q; u) a2 F  S& V+ [
              RowBox[{"Data", "[", , r4 c0 X% j* s  Y. ^
               RowBox[{"[", 2 u! \. R/ M9 s) O" y. |8 l, p+ X
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", ' n/ P& n' n4 P  B0 E# `& K4 N, ?- H+ }
             RowBox[{"x4", "->", 5 P" o( B+ c" n1 D( y$ Q; J6 K
              RowBox[{"Data", "[",
    * n! ]0 ^7 r- V! q           RowBox[{"[",
    4 \7 p5 o* j( s. O- r: i            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", ( t% L( n% v0 w3 t" e0 q4 Q9 m
             RowBox[{"x5", "->", * C4 `1 g' F( ?; x) r
              RowBox[{"Data", "[",
    + C4 j  t/ U. q4 r           RowBox[{"[", . t$ y  _% a7 C0 m# x0 r
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    2 ?( Y' l" E7 h: k         RowBox[{"x6", "->",
    8 m+ v4 q4 Q$ U8 w9 A/ Y9 T          RowBox[{"Data", "[", : V9 w+ k2 Z# |
               RowBox[{"[", $ g4 v6 n9 C1 X: `+ f) C& V
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", , _% k/ J2 O# x) M8 S
             RowBox[{"x7", "->", 6 B; l0 q) f& V5 ~+ p; n
              RowBox[{"Data", "[", % V3 v! m' J2 W& n
               RowBox[{"[",
    6 h: ?: u4 C0 ~4 O            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 5 |6 v3 x7 `; I  @
             RowBox[{"x8", "->",
    3 N6 ]1 j4 \1 c1 \$ _. E. X          RowBox[{"Data", "[", % r! v6 t* K6 p6 t- L+ Z! Y
               RowBox[{"[", # _% c1 K, B3 i7 I; F9 V
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 8 o" G+ T' R7 r0 g
             RowBox[{"x9", "->",
    % _( a" Y6 w6 I6 o& B( J: P          RowBox[{"Data", "[",
    1 {$ j& x: R/ }8 \$ U# ^8 Y3 l% E           RowBox[{"[", 1 v! D  _  h: o* K3 z
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", ; A) H; R. w4 T& e, Z* h# b
         "\[IndentingNewLine]", 2 f6 V6 a4 d7 T3 ^5 p
         RowBox[{
    * [/ `% a/ d# J      RowBox[{"m60n21", "[",
    : ~6 b) h- A( U* P& b0 m       RowBox[{"[", 0 s' q3 l" g+ B& j: j: s- O/ M
            RowBox[{"i", ",", "17"}], "]"}], "]"}], "=", 7 T) a8 s8 Z4 K0 J* P7 j5 W
          RowBox[{"u17", "/.", ! _  h2 U; E# X. |' N* H
           RowBox[{"{", ! V. k5 {: |# k1 J
            RowBox[{
    6 z) n* U6 p2 m. T1 ^1 s: \         RowBox[{"x1", "->",
    5 o5 L5 S% {* F: n% x          RowBox[{"Data", "[",
    + w9 y2 t& x1 G3 y2 _  [           RowBox[{"[",
    ' Q- X- p( F5 q, |; `            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", 2 I) i) Y( ]1 j3 {
             RowBox[{"x2", "->", 3 c! E7 ^9 r$ h4 H
              RowBox[{"Data", "[",
    % T1 E' h" f1 r; v# ^. J& `           RowBox[{"[", 9 {. ]9 S2 |; c  v
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    0 d9 V: W5 Q" ^" e( [- ]. g9 W         RowBox[{"x3", "->", + R5 Y8 Q' q: M4 Q# d* [
              RowBox[{"Data", "[",
    , a$ a" k" D, w6 V           RowBox[{"[", / |/ L: l3 Z/ R7 `% Y3 P3 G
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", ) b  P, W. u2 j* r# J* T$ ~- Y2 S6 a
             RowBox[{"x4", "->",
    9 u/ F1 @  i8 f6 k5 @+ T) D: A) v          RowBox[{"Data", "[", $ h$ I0 C  a2 w3 A7 M
               RowBox[{"[", 9 J4 P8 B% p: U5 D
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", . ^8 j( U! i% I
             RowBox[{"x5", "->", 0 L0 _0 U6 h: d$ Y1 Q4 C
              RowBox[{"Data", "[", $ v( r7 T% H$ Q! p" F2 k: o" C. C0 z
               RowBox[{"[",
    ' R. Q  h3 p+ Y$ q6 R            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    * J0 h. y6 f: E0 N" d         RowBox[{"x6", "->",
    " |* T! m4 X: v. s4 O% |2 @2 ~& x          RowBox[{"Data", "[", & C7 C. a( `: T
               RowBox[{"[", : o9 G0 n* e# `* {
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ( {& r. @# L* [- M5 [: o% `$ E         RowBox[{"x7", "->", 4 a8 P9 z, k0 M
              RowBox[{"Data", "[",
    * y! [" G+ c. E; r& A/ [           RowBox[{"[",
    ' q& P! E5 [4 b$ i- K# Y2 P            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    5 \( [( k) k6 Q3 e; E5 e% \* x         RowBox[{"x8", "->", 8 A/ v: C9 O7 M9 p8 i
              RowBox[{"Data", "[", + _4 r) h, o1 O7 p" W
               RowBox[{"[",
    3 I/ X% i+ Z1 n! p& E( E            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    % f3 |) y- M) u8 s; ^         RowBox[{"x9", "->", 9 X+ t2 x% g: i/ a5 U& C
              RowBox[{"Data", "[", 6 P: I! z/ k8 A4 t$ X
               RowBox[{"[", $ e1 c/ T* H8 j/ j) I  l
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    9 P4 ]  C+ a; }( F+ L( e2 p     "\[IndentingNewLine]",
    ' m4 q0 N0 l6 M6 Z     RowBox[{
    , H" P* I. t* Z' J1 y5 F' o% `  w      RowBox[{"m60n21", "[", $ P* ], J/ |7 i: j$ ~; D
           RowBox[{"[",
    ) i) u" p: ?9 R& Y$ l        RowBox[{"i", ",", "18"}], "]"}], "]"}], "=", ; G# L" S  ~# m! ]7 Q( K
          RowBox[{"u18", "/.", + ?* P; t% P" v( Y3 G
           RowBox[{"{", 3 b2 Z) L8 }8 _: I% [
            RowBox[{) ?8 C* i' ^4 U2 h
             RowBox[{"x1", "->", , r0 n, _9 W# \3 s4 T! y
              RowBox[{"Data", "[", & g1 ^/ L0 U# u1 ^! P3 ?& c, l
               RowBox[{"[", ) d1 ]8 q* U9 |7 ]0 D, }
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ' j0 O# D; \( ^+ o2 [. X- n
             RowBox[{"x2", "->", + L9 v& z( B5 p0 P$ C, X! T6 q
              RowBox[{"Data", "[",
      f! R3 U) w* F3 j; M           RowBox[{"[", 2 A$ v, i5 G$ d/ e
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    ' A/ s: G7 m7 _2 @6 k! a) z: G( M         RowBox[{"x3", "->",
    7 [6 f4 K" R0 s( `% P1 k          RowBox[{"Data", "[",
    4 e& {0 x( u4 {           RowBox[{"[", & ?4 r* p, z; I/ h
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    - k5 x; V' }- X4 \         RowBox[{"x4", "->",
    & D3 D# ~+ D# k9 b2 M. z. l* L          RowBox[{"Data", "[", 7 d' Q/ }2 ^0 M) K8 y! z+ `6 p: X
               RowBox[{"[",
    4 P$ {9 u/ b9 i            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",   x$ `* I; T- e$ Y9 T, p
             RowBox[{"x5", "->", # d) i- z# T7 O/ P6 W  Y: W  P
              RowBox[{"Data", "[", ; w9 m: F+ @- ?) x2 y) K( j5 C
               RowBox[{"[",
    . T) j. p; _6 F6 e# B            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", ) A- m6 o9 a. j
             RowBox[{"x6", "->", * Z7 i+ r8 {% x+ D& e
              RowBox[{"Data", "[", 0 Z: T( K0 T# @1 G- Z& ^5 u7 Y' p
               RowBox[{"[", 8 d7 ~4 @- `, s# d- u' Q- {
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", ; N) r: D1 h1 M1 t1 n" Q0 s
             RowBox[{"x7", "->",
    * @) C2 @" {0 T; N" y          RowBox[{"Data", "[", : k8 k0 b$ n$ a8 x8 R
               RowBox[{"[",
    - O0 y2 a7 y& \) V% Q- M# w' ?            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ! o' Z5 V3 y0 Y4 l
             RowBox[{"x8", "->", * F6 T6 l9 o! X0 _
              RowBox[{"Data", "[", - D1 O/ p8 F1 k; S/ Y2 A6 ]* B$ j
               RowBox[{"[", $ ^0 Q+ J4 t" t4 Y1 s& n& S
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    * g# _3 U# o1 p# R         RowBox[{"x9", "->",
    ; |- J& F1 N# o7 K  P          RowBox[{"Data", "[", 9 @/ A& T- W+ M/ }$ `0 V
               RowBox[{"[", 4 S* [, P% \! a/ r& N; I* `9 j
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    ( P. A6 s  g. Y     "\[IndentingNewLine]", % M# l1 w6 b4 ^& f5 u( U, [
         RowBox[{+ {  B( S# m% g8 l# W( \
          RowBox[{"m60n21", "[",
    % w/ V/ G7 w- _4 n       RowBox[{"[", & M' l( d- G$ T  O% q( D& N0 e7 Y2 I
            RowBox[{"i", ",", "19"}], "]"}], "]"}], "=", 0 J  j* c7 j# E( u, j
          RowBox[{"u19", "/.",
    ' y9 Z" _1 Z2 y5 O       RowBox[{"{",   s  P- i. G) V1 t! K& ?' ~
            RowBox[{4 h+ H/ N( U1 @! B
             RowBox[{"x1", "->",
    , D% ?8 o' r' J" W( A8 q5 h          RowBox[{"Data", "[", 5 ]$ `" y) t. N% T8 [
               RowBox[{"[", 4 U& ?6 ^; A; L
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    5 S+ V+ e) ^2 A         RowBox[{"x2", "->",
    . k& t5 I1 [' q5 p6 @- L# e6 Z7 D          RowBox[{"Data", "[",
    ( h7 @/ f8 a9 ~7 Z2 T           RowBox[{"[", / `9 ^7 m6 S1 ^! h6 P5 ~+ N
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", % p0 [2 ~$ g6 B0 f
             RowBox[{"x3", "->",
    3 E/ k( ?9 v+ j1 x- [7 q2 S  |" m: u          RowBox[{"Data", "[",
    " a8 q( P2 v$ P: }! G& m# ~  S# z           RowBox[{"[",
    * a; N0 N) p4 {1 N2 B7 S            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
      D" J2 G( }) L% u/ E         RowBox[{"x4", "->", ) R" t# D( S0 z5 S7 D- K
              RowBox[{"Data", "[", 7 Y- j. O7 w' k& _# O
               RowBox[{"[",
    4 Z* P7 U7 a9 O5 d            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 9 I: j4 I# ~3 S" K1 {2 y5 `" S
             RowBox[{"x5", "->",
    7 \* Z, e6 R" z1 ]          RowBox[{"Data", "[",
    9 ~' u* o& i' G# h           RowBox[{"[",
    8 j6 f" h( X) x5 q& H            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    # g0 a8 g7 p+ a* t* O         RowBox[{"x6", "->", " T0 v' u$ l* ^% w# |9 t! {
              RowBox[{"Data", "[",
    * i) `" v6 V$ `: G9 d# ?/ U           RowBox[{"[",
    & U8 h, n7 Z5 s* ~5 k            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", * r, {, I3 j% G7 p, O& \, t/ ~5 v9 X
             RowBox[{"x7", "->", & O$ r, }+ O0 D* F4 Q: i0 l
              RowBox[{"Data", "[", ( ]3 k- E. n5 t# [0 y4 \. f  w
               RowBox[{"[",
    ( n* A, m0 R2 q7 S5 h3 j            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    6 x2 i; E1 }$ T% s  m         RowBox[{"x8", "->",
    " l" H/ T. ~- y5 ]+ i. g) [4 E/ f0 P( n          RowBox[{"Data", "[",
    3 X! u  X* j; M2 O           RowBox[{"[", ; ?( I5 w! Y8 \) J& ~( u/ [/ d7 }
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 5 q0 K0 z9 R9 C
             RowBox[{"x9", "->",
    ! I+ a9 A" s5 K9 ^" {2 E1 F. a          RowBox[{"Data", "[", 5 x) z5 W1 w; d  t. j3 r2 U
               RowBox[{"[", . |' A) T6 n4 J# R" S. V) ?+ g
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
      O! [4 Y# o4 _/ G7 i3 V: J5 F9 m, `     "\[IndentingNewLine]", 1 X" b7 c& t+ G
         RowBox[{7 y* h0 _5 M# F2 r3 ]2 S0 o9 ]0 `+ Y
          RowBox[{"m60n21", "[",
    - B( ]# E! y/ K  _       RowBox[{"[", " |& |' u  A6 b' p4 n8 H
            RowBox[{"i", ",", "20"}], "]"}], "]"}], "=", * ]1 [- n' ?4 }0 z6 B
          RowBox[{"u20", "/.", ' S. Z9 i+ b  y  C
           RowBox[{"{", " u" z& M# P" x4 K/ ~+ H! m4 c
            RowBox[{2 P3 e* o" `7 {8 d
             RowBox[{"x1", "->",
    + Q: S" l, ~, j5 S% D          RowBox[{"Data", "[", " r. O2 b! ~" Y7 v: B
               RowBox[{"[",
    9 C  k5 e  V) i" B2 I            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", 9 z" T1 F! }5 @3 e' z) b6 B
             RowBox[{"x2", "->", 9 S* Y  @+ U" c- X  M5 t3 b
              RowBox[{"Data", "[", . X- w* I8 Z! k' r
               RowBox[{"[", " ^, V6 L4 B! V4 k
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    & @% }+ w+ X8 S7 y$ q8 K" P) _         RowBox[{"x3", "->", + \; ]1 i+ S- d) I
              RowBox[{"Data", "[",
      k+ ]2 B) K( v& u7 }           RowBox[{"[",
      w) `: y) C' F" m: R0 l& `' r            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", 4 ?* v- U8 l5 ~  ?
             RowBox[{"x4", "->",
    , X# |* H$ J' u. ?6 \" J4 n          RowBox[{"Data", "[", $ @1 Z7 z' ]$ j. w" z
               RowBox[{"[",
    ) m( L# {5 a+ o            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", : U  z6 ^9 q6 a7 |4 Q$ `
             RowBox[{"x5", "->", . N4 X$ e8 F( D6 O& h* k: P6 j
              RowBox[{"Data", "[",
    ! g& x# T9 ~' v- D3 {           RowBox[{"[", / L& u9 @& K- V- D
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", . ]; Z% [8 U' |' a" E
             RowBox[{"x6", "->",
    ( `  N6 i3 a. _" Z1 w          RowBox[{"Data", "[",
    . y# C- V' r' J8 ]7 ]. {" n           RowBox[{"[",
    + Q: J1 `# z- f! Z0 L: C- D            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    . F: r2 ?6 A8 g* s# ^$ V         RowBox[{"x7", "->", 7 h' K' u; t1 f) d. V8 [9 j
              RowBox[{"Data", "[",
    / o# Z# c/ X# [9 G           RowBox[{"[", 7 K; E( [/ n, t$ D8 `( Y( F* L+ J
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    $ R  [  B" v1 r1 m         RowBox[{"x8", "->",
    " H# q& H  |; @          RowBox[{"Data", "[",   T0 S" x) f; N  x7 l6 V
               RowBox[{"[", 7 M' a) L% e/ K- L0 Q% _* z
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", & ^, P- w) [& y& i9 T+ L/ W* j
             RowBox[{"x9", "->",   [! k0 U+ y) w3 [9 s
              RowBox[{"Data", "[", , M1 m" u/ p# c
               RowBox[{"[", # l6 E' [7 \9 _
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    ! ]' Y0 v  ?. F- Q4 Y     "\[IndentingNewLine]",
    , M( v4 q9 ~6 d! F     RowBox[{
    1 G! N: q/ m6 n  }# ~' f1 X- ~      RowBox[{"m60n21", "[",
    5 S5 ]' P& O$ x& ^: b' r       RowBox[{"[",
    : G1 V7 y8 _6 V+ \( S        RowBox[{"i", ",", "21"}], "]"}], "]"}], "=", 6 M0 w% P; D& {/ b
          RowBox[{"u21", "/.", * a% N4 H2 w9 B2 V9 f6 j
           RowBox[{"{",
    ' G& l4 f7 q  ?; i* G        RowBox[{; A" k* c+ n2 g; U  F+ |5 N9 e2 S
             RowBox[{"x1", "->", 5 x" Y$ K& K# L) w- [, m
              RowBox[{"Data", "[", . c2 P* Z6 ~9 i5 V0 Y1 b
               RowBox[{"[", ' n% n, h% x2 p$ K+ L! ~* y
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    2 f$ Z2 o' H; R" m) X& ?         RowBox[{"x2", "->", + ?4 ?; C) T, p0 Z8 A  w
              RowBox[{"Data", "[",
    , U. \% m; f' ~" c, p5 f2 s4 M* @& e           RowBox[{"[",
    , o$ Q, N6 V+ ^9 w            RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", & v6 m$ X& T. l! I* }3 |
             RowBox[{"x3", "->", 3 r) V+ @: o; E! {
              RowBox[{"Data", "[",
    # A0 L0 Q2 \/ y/ ~. Z0 r% u           RowBox[{"[",
    ) U: S* S3 h4 W$ _            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    . v/ E$ y& e5 f) T         RowBox[{"x4", "->", ' m& s6 E5 r& K1 `4 H3 _
              RowBox[{"Data", "[", 8 X( X1 E7 i: x- w3 h) k
               RowBox[{"[",
    $ B9 I8 ^! b( t; e+ _            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    9 {+ s/ w$ }- |4 A' |2 T         RowBox[{"x5", "->",
    ) B% m+ V; D. ]  n          RowBox[{"Data", "[",
    % C% U! k* n  q) F' Z: a           RowBox[{"[",
    ' S; h+ u/ u: Y5 l' Y            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", 6 L; `2 o1 ]! q4 s& ?- V% r
             RowBox[{"x6", "->",
    & M' W/ m2 l. w# l          RowBox[{"Data", "[", ( m2 L' v, M; B- g1 o
               RowBox[{"[", 8 Q9 k# f( Y' i9 Y& ~
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    + {1 {* \8 {' U4 y8 |  v* r         RowBox[{"x7", "->", 4 ^) R  a9 k8 b; r, d4 E7 p
              RowBox[{"Data", "[", / E' R: y0 S/ L
               RowBox[{"[", & v: S0 E. {* g. a3 |
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", % R- M5 _! z! w1 l5 R: N
             RowBox[{"x8", "->",
    5 E2 C; J: M8 h$ Q          RowBox[{"Data", "[",
    ( ^6 i2 N( v! E1 c( P. e           RowBox[{"[",
    $ B5 J2 _: o: t, V            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",   k. \& O* T7 S4 B+ k& B: n. }  Y. C
             RowBox[{"x9", "->",
    8 Z8 }$ K& z% R4 r, x# [          RowBox[{"Data", "[", ( v* H2 O$ s$ l- }( Q: C
               RowBox[{"[",
    8 |" Z8 r* v/ T7 ~- S$ z            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}], - ~( N8 S: x, o% V$ [
        "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",. M* x" z$ B# K  f7 ]* J
    CellChangeTimes->{{3.5779241165*^9, 3.57792417728125*^9}, {
    , V, k& b3 b, |, i# w+ k" ]  3.57792428359375*^9, 3.577924585109375*^9}, {3.577958919491543*^9, 3 _0 D0 e- `* Y4 J5 d5 p$ F
      3.5779589224867477`*^9}, {3.5779619825731473`*^9, 3.5779620676400957`*^9}}],
    2 j8 p/ ^$ C- K' \  @# m% T% m7 Y
    " X( i/ y+ @/ ], sCell[CellGroupData[{% q% u' R8 c0 R0 Z" V9 y

    7 i; E. l- F* [# N" C- XCell[BoxData[7 w4 x- z$ k: f7 H
    RowBox[{"w1b", "=", ( R* [! H/ n" A" q$ o
      RowBox[{"LeastSquares", "[", ' _* w1 g0 ?0 T1 d& I  ^
       RowBox[{"m60n21", ",", "y1b"}], "]"}]}]], "Input",
    . @4 Y) v& r0 T. C3 ~0 H CellChangeTimes->{{3.577924598484375*^9, 3.5779246208125*^9}, {
    - X9 o' Z+ a+ R% E  3.577924662765625*^9, 3.57792466596875*^9}, {3.5779582865360394`*^9, " U' n7 l% v! s$ P" @
      3.5779582963172565`*^9}, {3.5779622900808835`*^9, 3.577962290377284*^9}}],
    * O4 r$ o1 x8 ]% I  E2 X. T3 c) r6 _  [* v5 y# P0 m/ B
    Cell[BoxData[  Y& \0 G' l* Y) x
    RowBox[{"{",
    ; a1 w$ d4 ]# `3 a  RowBox[{9 g& ~9 [9 ^- Q" n' ~+ D2 P; T  P4 `( G6 [
      "0.48228184971363947`", ",", "0.16041393254115022`", ",", # F: m, c( v2 P6 D5 V
       "0.3741982811661129`", ",", , J9 z- D7 h- X- _! A( h2 F! l
       RowBox[{"-", "0.12620581913715245`"}], ",", "0.28831860112966734`", ",", ' O% s; b! z8 B% J
       RowBox[{"-", "0.2282993884666894`"}], ",", "0.3207174990295839`", ",",
    & n# u  ?, S8 ~& ]   RowBox[{"-", "0.4666313851213302`"}], ",", "0.27551257162880227`", ",",
    , n  ?2 ^0 l5 }! i0 s" o   RowBox[{"-", "0.025873988843993667`"}], ",",
      n7 ]1 [5 l. B& ?7 \# Y9 r   RowBox[{"-", "0.1339854044819916`"}], ",",
    : U) ]$ Q. T& T0 Z3 q   RowBox[{"-", "0.15852708848338315`"}], ",", "0.3129687276967983`", ",",
    3 b9 m; N9 n; Z   "0.45723850991134063`", ",", "0.2954923840077215`", ",",
    4 ]: G+ X4 v& h4 \( {   "0.9125798890455868`", ",", "0.21159052285983104`", ",",
    ' [" f2 ~# M4 ~/ R* k  h$ `, d   "0.5575503376854456`", ",", "0.6019775648968265`", ",", * P- D- L* t: _  l5 I# H9 N
       "0.2361524780938108`", ",", "0.12782130225993923`"}], "}"}]], "Output",# H" I: \! V5 \7 b+ Q, i  C
    CellChangeTimes->{
    + W5 b5 {9 K& D, d/ f  3.577924621953125*^9, 3.5779246688125*^9, {3.5779582894220443`*^9, " S5 r3 K7 X9 o1 y) [
       3.5779582992968616`*^9}, 3.5779584995700107`*^9, 3.577959040157753*^9,
    ; t4 |. s2 E  L& ^- W6 X! A   3.5779622919996867`*^9, 3.578012447734375*^9}]5 L2 g* o4 S1 D' \$ e1 e! F/ {
    }, Open  ]],
    6 d9 L+ O& P9 H0 n( ?
    ' b5 F& M7 T  T" j& MCell[CellGroupData[{
    % O. _3 T1 N- V: g) j) W6 [5 Q9 e0 T" ]: d( W/ N0 s
    Cell[BoxData[
    ) y( e  l$ R' b0 z. t' v RowBox[{"y2", "=",
    ; ?2 g0 T. N% v2 Q% l& v; @  RowBox[{"w1b", ".", 3 r8 A' d9 X: `) @" h
       RowBox[{"{", , o& a" z5 j' O( e( R6 P$ R; u
        RowBox[{. W2 ~- h- x; A. Z9 K/ A* J
        "u1", ",", "u2", ",", "u3", ",", "u4", ",", "u5", ",", "u6", ",", "u7",
    ; z; w9 U  w- i5 t     ",", "u8", ",", "u9", ",", "u10", ",", "u11", ",", "u12", ",", "u13", ) _7 C; f$ y8 ]; q' o/ z1 u& K
         ",", "u14", ",", "u15", ",", "u16", ",", "u17", ",", "u18", ",", "u19", . ]& ~3 o8 J3 v& X# b! E$ T
         ",", "u20", ",", "u21"}], "}"}]}]}]], "Input",
    8 j, a: `  v- R) E1 H" c0 y0 y& C CellChangeTimes->{{3.57792471553125*^9, 3.577924755875*^9}, {
    - E+ ?& v$ E* \   3.577924897078125*^9, 3.57792491596875*^9}, {3.5779583101856804`*^9,
    / T0 x0 K; o$ p4 C9 e   3.5779583178920937`*^9}, 3.5779623163513293`*^9}],5 Y- Q7 p, Z$ B5 E5 {9 l

    : ]8 e; X4 M) ^* ?. t0 ]  S7 l" sCell[BoxData[
    " ]) |1 t! G- c RowBox[{9 f, F5 b4 y" G: U
      RowBox[{"0.9125798890455868`", " ",
    5 D$ T8 ?) ~. q2 {7 B* F7 i) B   SuperscriptBox["\[ExponentialE]",
    / G# R2 c$ L; d# v& ^% d4 E    RowBox[{"3.141592653589793`", " ", 2 @; P9 y' r0 B0 j
         RowBox[{"(", 5 h5 |/ R$ G8 k! J+ [
          RowBox[{
    " o( M) U" \, ?! I: o       RowBox[{"-", / l# ]; |) E8 n% B- u
            SuperscriptBox[
    8 y/ D+ e, Z7 J7 o5 ~' c2 ?         RowBox[{"(", 7 N4 h/ @- [# X2 R" r3 y
              RowBox[{
      w% H  h0 e. m) @           RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-",
    8 u- r8 r2 s1 q5 s. e; k, |       SuperscriptBox[" X, S$ {( U1 t0 G: Z6 S
            RowBox[{"(",
    8 q( B2 r% e% E  V& M2 x% t2 S         RowBox[{, C* L7 y  a! D& J( L6 G7 M! O
              RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-",
    5 L) [8 U7 w" ?6 _       SuperscriptBox[. g/ t! W7 M1 m# g0 E4 O- Z
            RowBox[{"(", & V( x. e0 R( E% Q( L
             RowBox[{% E! [/ O6 u- x4 [, |/ @
              RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", 6 a' Y1 K, U: N7 X: s! c
           SuperscriptBox[
    + o4 @/ Y. e; N' L0 L! M        RowBox[{"(", 1 K5 @$ J# \% e. X
             RowBox[{
    + H+ l/ ~% `# w1 S5 Y  g          RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-",
    ; L7 H0 f/ P: ^$ P9 v- h       SuperscriptBox[/ [9 g( C+ l6 A$ _
            RowBox[{"(", 2 Z  u5 r# @" H2 d
             RowBox[{! E2 Y1 K: T/ j- \7 J1 K2 \! T
              RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-",
    2 q3 q- ~/ Y4 |$ c! \8 s       SuperscriptBox[
    0 L/ f4 i) V. [        RowBox[{"(",
    ( g% x: A! ]$ U  _2 o: Z. o         RowBox[{. |7 @7 H6 R0 Z4 u
              RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", / q# S/ P# Z! U
           SuperscriptBox[
    . s1 n  P/ l$ A        RowBox[{"(", ' j0 c2 d/ Q& A0 X! L( |- n9 p
             RowBox[{
    ' p# X& T7 u2 f/ ?          RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", & T1 _* }, |% Q
           SuperscriptBox[; t/ E2 z) o" M, \
            RowBox[{"(", $ T7 Y& z, j6 ?
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ! Q. j# l! o3 i, m. B+ d       SuperscriptBox[
    5 Q7 a$ K; S$ f9 N        RowBox[{"(",
    * i5 v9 `- i; ~3 Q2 x         RowBox[{
    5 I1 B7 i0 t/ P1 @5 }1 z          RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+", ( J4 `9 Q" i  b3 b$ n# F( x
      RowBox[{"0.28831860112966734`", " ", 4 _0 |* R% W* j6 `, W
       SuperscriptBox["\[ExponentialE]", 3 y/ ]5 G4 I8 b8 Z& c% e* d2 G
        RowBox[{"3.141592653589793`", " ", ) S- P6 t! n/ @: t3 b1 r
         RowBox[{"(",
    $ d0 L) P" b& U! {; H      RowBox[{
    $ C7 T5 @. V: ]       RowBox[{"-", + ?1 i) t  O, z1 u
            SuperscriptBox[
    & i6 P2 N5 [1 J3 r4 t" H         RowBox[{"(",
    2 }* M/ o' m1 Y8 s! J          RowBox[{6 E' V! ~- U& s8 H! f& F: p5 a) `
               RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    " h% i6 r& g& d- u3 `       SuperscriptBox[
    $ }! R* |* W, P( W4 d+ P" {        RowBox[{"(",
    + Y, P$ T7 k8 W- X0 ?         RowBox[{% B! I' m) ?8 |* i1 L0 |3 R3 Y
              RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    $ w3 \- F4 [+ w9 R3 O$ }! ]       SuperscriptBox[  u5 _% s: t1 B2 [# p0 \
            RowBox[{"(", * f) r6 m) `. M+ X' s
             RowBox[{
    0 E# X7 \+ L* M          RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-", ! n. i6 @+ i1 w' d3 e2 R  X) ?
           SuperscriptBox[
    % S) m# c* S1 i) G1 I& b# B, G        RowBox[{"(",
    3 E8 y, ]9 s1 V0 i+ W/ y$ g         RowBox[{) m: {/ o: t2 l$ ~. a; ~
              RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    3 K: y- W& o: a  J2 D  y       SuperscriptBox[
    : V; T8 N; [9 x        RowBox[{"(", 8 F6 t& ^: f# r" W
             RowBox[{
    . d! [- `2 z# a0 d/ K2 B1 G          RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-",
    - L5 x* C8 }& ]! z+ U9 V       SuperscriptBox[
    0 b4 ?/ U- j! t& h! I6 f, H        RowBox[{"(", 7 X" A0 y+ w& h; p: M: a
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", % i2 w, v: o; a' W
           SuperscriptBox[
    9 p; y2 M6 E) |        RowBox[{"(",
    % D! q* ]' r9 c! a# H  B         RowBox[{
      I8 D/ X, C5 T) S6 A8 H: i          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    , Z3 C" P) R: [% K- @5 g       SuperscriptBox[- a2 h" Z( U( F& a: n
            RowBox[{"(", * i* P& Z% Y1 J( y3 Y
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 9 J+ \3 M; B9 w' b. ~( x# E
           SuperscriptBox[5 ?" i- S4 t1 w4 c2 [
            RowBox[{"(", " F0 B2 u/ u6 |2 S
             RowBox[{9 ^# b) @" }) r6 S
              RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    8 [+ C2 @2 ^4 N: t  "+", & @( X) n$ L4 g- n$ @
      RowBox[{"0.21159052285983104`", " ",
    1 N( i/ E  v* h* J4 k: r- H- @7 x6 Z  i   SuperscriptBox["\[ExponentialE]",
    & g$ I& d2 T2 i2 b    RowBox[{"3.141592653589793`", " ",
      V5 U0 ?4 A5 M# b% X* l- K     RowBox[{"(",
    0 J7 A0 I6 t3 I8 z0 [      RowBox[{$ G- ~# \6 {( `/ O  P$ T% M
           RowBox[{"-", " t3 J7 }, }) E2 z! N4 n$ g) l
            SuperscriptBox[
    + F! \% ~6 a' ~9 ~         RowBox[{"(", ' }( |* p( H8 J2 ], w
              RowBox[{  N& H1 q6 u7 z& c6 m4 }8 C+ e
               RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ! t  K# ?5 \9 Q1 ?0 H       SuperscriptBox[- r3 v! q% M6 ?5 a9 H5 a4 C1 C
            RowBox[{"(",
    6 v( v7 t, _/ d$ ?+ |: n         RowBox[{
    ( y" F0 |! M' Y          RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-", - Y2 E- E' S" ?
           SuperscriptBox[: F7 ~1 J  P' l- o
            RowBox[{"(", , i' z; _+ u  u4 }$ G
             RowBox[{
    7 j- ]: @1 v. x. M0 f  Z          RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",
    4 s' B  }; G; C, m) {       SuperscriptBox[
    $ I; v+ E: w4 ~  x. \        RowBox[{"(",
    * z7 b: I% V) A- ~1 ^9 `         RowBox[{7 M& \- K/ m# [2 {
              RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-", : [7 s2 ?; e- A+ D  d. V! w- Z% {
           SuperscriptBox[
    & }0 i! a* i9 o: t4 x) m/ v        RowBox[{"(",   c% i) Z2 Z# d+ r1 W  g7 n- |
             RowBox[{6 A& K7 S' E' }% ~; ~2 D
              RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", : W9 P; m& {; A: \
           SuperscriptBox[
    , r% _. m) [" e! I1 N" L        RowBox[{"(", . h; `1 J/ `7 [3 Z9 U, G5 g3 C
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ) P+ m# `  e9 l+ ]; F; k
           SuperscriptBox[! d" o/ o* c, g+ Q$ ]/ A
            RowBox[{"(", % ~* U# |+ D0 e" Y: C: U
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", + r' K6 B/ h- M( B! W$ r' ^- ]! K$ B
           SuperscriptBox[. ?* q8 j: N+ L2 J( K' P
            RowBox[{"(", / u3 u6 c# C) j' r
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    $ r, L8 r$ B& X2 ^: d! K0 C! u       SuperscriptBox[7 e0 B* q0 b( j. x0 f
            RowBox[{"(",
    4 P9 Y, z3 T. e% S0 {         RowBox[{. Z: {- G0 K! _. y- C' [0 d8 l/ g
              RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], * l) w7 \* Z9 r6 y& b! ?  s7 D: d
      "-",
    : b: V( L2 a. \  N( v7 ~  RowBox[{"0.2282993884666894`", " ",
    ; v- _+ U1 \% p( t9 c2 e: ~& W9 x4 s   SuperscriptBox["\[ExponentialE]", - m7 w0 Q3 h8 B1 J6 @8 v2 ~
        RowBox[{"3.141592653589793`", " ",
    9 z# p, K$ h; c, q  q     RowBox[{"(",
    / C/ p. z6 K: @$ f      RowBox[{5 P: H& ~: x' u4 l
           RowBox[{"-",
    / Y1 z3 R5 j2 m1 K4 ^        SuperscriptBox[& @  R( M1 j# s
             RowBox[{"(", ( G" W, k: y# G5 }) P
              RowBox[{7 J9 G- n2 x" y* q* `& ^' J
               RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-", , a( Q8 R: t7 |' Q
           SuperscriptBox[
    % |  G4 J& K) W- \( A        RowBox[{"(",
    ; I" [' K4 |. M         RowBox[{  Z* l9 i2 |$ c. X5 I/ m
              RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-", $ \& z; z1 m8 i9 t7 \
           SuperscriptBox[
    , e# \9 V2 C& R        RowBox[{"(", 7 t* Q8 u' d4 @; ^
             RowBox[{
    " W3 `9 q3 s8 I$ g          RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    5 N6 w+ j9 {8 B9 G$ H8 F# ]       SuperscriptBox[# L- `6 C& e. H" @
            RowBox[{"(", ( r, Q* D; f' v6 k- J8 d
             RowBox[{
    4 ~. _4 G4 I. v, |  e- m+ x- g          RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-",
    8 h3 K5 x- z' C* B1 k5 q       SuperscriptBox[
    ! E/ Q; x8 d# k8 Y  q4 u' q5 n        RowBox[{"(", ) j3 c5 a- H- \. g6 j+ L( Z. k
             RowBox[{
    $ j$ F1 g) T% @- Y* q) h8 ]& @          RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-", 0 s& X5 b/ U, H# b4 ?$ S
           SuperscriptBox[% |( Q+ ^# V6 t8 L- L2 S
            RowBox[{"(",
    * O1 H  Q: A$ r; M! @3 `         RowBox[{# T! N8 F: j6 p+ c! k( f. ^
              RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", 6 l# K0 m) N' N( M
           SuperscriptBox[
    , A: _% }/ C& y( Q4 [: h: M        RowBox[{"(", - a# i8 t5 Z$ I* g4 x  S
             RowBox[{' m1 d5 E5 {9 r9 G
              RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",   R! Q9 l% \. Y, j; T- G( \2 i
           SuperscriptBox[
    : Y% o* h1 \! z% c7 h# j' a/ i1 s# X        RowBox[{"(",
    9 {, Q4 @1 r6 i2 k         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", - X! J. ]3 k% @& [
           SuperscriptBox[
    8 B& B' L/ S5 b9 F) ?        RowBox[{"(", : ^' v" w7 I& H& f- U; J
             RowBox[{
      W1 Z7 r3 \8 X4 h) M7 z          RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 7 c" e  q( `% e
      "+", 7 a4 r% O- J9 @
      RowBox[{"0.27551257162880227`", " ",
    # U3 x! A* L2 v   SuperscriptBox["\[ExponentialE]",
    % b' Q- v8 c6 n    RowBox[{"3.141592653589793`", " ", ! Z8 r2 T3 ~& n# J4 B. k
         RowBox[{"(",
    8 w) }) v/ p) k: Z; O- r      RowBox[{
      Q" M) \  t1 ?% ^( d' L; d+ w       RowBox[{"-",
    # |, S, J( ?; D0 ~& {% ~/ `$ ]0 z        SuperscriptBox[
    9 X- G# U. H0 ]         RowBox[{"(",
    ; v# E; i1 v3 D  o7 P4 b          RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-", * s. `/ M2 a+ n
           SuperscriptBox[, g) Q* k: J# u2 C
            RowBox[{"(", % _3 L5 I; l* G: N5 l; T" ^& Y7 k+ n. J
             RowBox[{2 {: R; H3 {( F1 S
              RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-",
    + T  ~& n4 Y+ I* ?3 g: I       SuperscriptBox[
    % u) |, y/ ]7 \; i        RowBox[{"(",
    9 B7 i, K0 I) ^3 W9 @         RowBox[{
    ! C0 r5 _+ W" t4 g          RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", 0 V" ~# N3 [4 c0 D
           SuperscriptBox[
    % U0 o: k& H" z        RowBox[{"(", 9 c) y9 P$ l' f/ x! P) I, g
             RowBox[{! O5 ^8 p! T5 F( t# z
              RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-",
    / o* y& j' L) F4 F       SuperscriptBox[
    0 P! I: A. c1 H# [+ k3 ^9 X        RowBox[{"(",
    : {" |& j. ^" o. \* p         RowBox[{
    & o) D, D" U( N2 Z          RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", * b2 Q# D# c, ^" k5 ?/ a
           SuperscriptBox[
    ( X, q4 f, b/ J' C+ T        RowBox[{"(",
    ' s  a- _: K. s( g# Q         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", # t0 s- N, k2 W  T# A, ~) g
           SuperscriptBox[
    , \: {7 s; A# T; H+ M4 k: K        RowBox[{"(",
    ; v+ y4 p1 q* P3 Z* g1 g$ W5 n         RowBox[{
    ( f; t4 Z, O; G9 T0 B! p          RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    5 x9 Z4 }7 h' V$ D- H       SuperscriptBox[
    3 _1 {( l+ O5 B$ h3 Z/ T' N        RowBox[{"(",
    7 o. A9 Q3 R1 ?4 u         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    6 v  I% z. }) {       SuperscriptBox[+ p  t* R9 e" D/ V
            RowBox[{"(",
    . ]  T2 ~+ I, e, ~( }# g         RowBox[{2 s! K$ Z1 ~! A4 g" C" a" }
              RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ! Y, _6 Z! ^7 g
      "-", " j# Y# C3 M6 W$ \' k3 J
      RowBox[{"0.12620581913715245`", " ", & j: n  v/ B) d6 `( r
       SuperscriptBox["\[ExponentialE]", ! o7 K# D4 L+ ?; b/ ?" W6 ~
        RowBox[{"3.141592653589793`", " ",
    ; p4 O9 Q$ w& M     RowBox[{"(",
    % I0 o9 }6 \/ O  C4 E      RowBox[{  X& l; i, b+ x5 c1 z0 ^
           RowBox[{"-", 7 B% I: g! {1 h% C- l8 x
            SuperscriptBox[5 M1 x! {8 n" G& s# C
             RowBox[{"(", ( |% q9 ^* j1 O+ [& r/ t% [
              RowBox[{* @% c, Q* H+ P6 y6 a! p7 E8 ~
               RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    7 e* w4 _: V3 y) v) c: T6 U       SuperscriptBox[) C: o0 V( q4 O( U
            RowBox[{"(", 1 c' W# T4 n2 z  P
             RowBox[{, Q' ~3 O- @) Z1 T$ x
              RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-",
      M* ^! D1 d0 d+ X       SuperscriptBox[. T# B9 \! }$ I. {; e
            RowBox[{"(",
    ' [$ r0 R8 A8 b         RowBox[{
    6 Z) T( x& A  N7 F          RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
    2 w0 C- h4 E+ z, k! I0 c       SuperscriptBox[9 a3 W- v3 y8 l! h
            RowBox[{"(", / _  G, l: Q6 U7 a" S
             RowBox[{8 ^3 ?9 P" X2 K5 j0 @+ H
              RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-", ) b) c. S" D- f! l* o' k# l4 g& w0 c
           SuperscriptBox[
    3 f4 A( f' O: n: D$ {% y        RowBox[{"(",
    / M, w+ S: q- x, `; u         RowBox[{( {+ [( J9 Y! ^# y, a
              RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    ' n) a( u8 @! z) X- z       SuperscriptBox[
    - J' a0 R( D/ k3 ]0 L" b/ N' Q        RowBox[{"(",
    ) b/ l& \, }1 k         RowBox[{
    ) X! y- m! B( W+ |          RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", + [4 {( y4 [" u! t$ `8 M3 O" F
           SuperscriptBox[7 S6 i2 H1 a/ p7 t9 {) j
            RowBox[{"(", % M% l3 m& ~4 _: @
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ) ?( C0 U! c6 ]  [$ K
           SuperscriptBox[1 }- Y/ x( M: F/ u- e
            RowBox[{"(",   C7 t5 ^3 E9 U9 D% U& v7 ^/ x
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ; ^' k% d# U' F9 E& w  `) D
           SuperscriptBox[
    : E8 u" a* o) z5 h/ f        RowBox[{"(", $ Z. ]' a( y# Q% y: b
             RowBox[{
    / O3 P$ Q' B! A          RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    ' b5 N  b7 n6 `1 q% p1 @5 O) t  "+", 7 @6 D" g7 t8 Z5 x( V
      RowBox[{"0.12782130225993923`", " ", ! i" N# a5 b  f* q5 j3 {6 P
       SuperscriptBox["\[ExponentialE]", + j6 H7 B: p# p* j4 H# p
        RowBox[{"3.141592653589793`", " ", 3 V  a  l$ c7 x9 K: W0 ^& F; X
         RowBox[{"(", : Q- N9 h8 g0 \  H, |+ o
          RowBox[{2 o7 K4 P# K) n! k& N- C
           RowBox[{"-",
    $ T2 P3 r# W5 d; P. f! ]        SuperscriptBox[
    6 s7 _9 m7 Q* k0 f7 k' d         RowBox[{"(", 4 [! `# e5 J; [! j
              RowBox[{* H( q4 G1 |6 O8 f5 P* ?# K) E
               RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-", ! i# |# [0 f1 v# o
           SuperscriptBox[
    5 O* x% @9 ^9 E  i3 W  t) H9 v0 D        RowBox[{"(",
    # G$ ?5 M- d- ?, S. L         RowBox[{
    : m4 a, L9 A% x$ a2 c          RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-",
    " V7 E- C" h8 F8 k2 C" K       SuperscriptBox[# B% W, U# B- A$ n5 t. i7 K
            RowBox[{"(", 1 N1 J; v( y2 M
             RowBox[{) G: y* u5 Q+ M" G6 o
              RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", 1 W7 N7 M3 ~1 u2 K! `  d* u3 W8 i
           SuperscriptBox[" L9 k: k9 C+ o6 L" B9 Y  A
            RowBox[{"(",
    & F  d  q, S% y  c8 U         RowBox[{, m7 `7 l4 g9 a5 D3 O
              RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-",
    0 Z6 k& @5 J# E# q8 i7 ?, I- z$ g       SuperscriptBox[
    # O8 r; s: N: H$ _4 ?' L        RowBox[{"(", . Z( A# s5 V& o5 q8 W9 |' a( Q* C
             RowBox[{2 @- E. X$ q+ F3 \
              RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-",
    & \# R1 z+ Z) v8 v1 Z- I4 D       SuperscriptBox[0 M. `0 y8 y4 F6 K
            RowBox[{"(",
    ) G# K/ T" e& F: {1 g/ P# G8 L         RowBox[{$ m4 S$ w) F8 C8 B
              RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-", : I" n' A4 \+ l& t
           SuperscriptBox[' `8 h$ ]8 c5 }% S6 [, x( c/ P
            RowBox[{"(",
    $ m1 r' X- t- d, D6 ]         RowBox[{5 J! [, y5 n6 c& w
              RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", 1 V% ]6 Q$ N. ~5 X- Y' I
           SuperscriptBox[
    8 E5 @& @' }5 x) p        RowBox[{"(",
    3 N4 s$ j( |4 K* ?2 |+ e         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", , k5 b, i7 f' ^0 `
           SuperscriptBox[
    ! N& s  g3 _9 |+ f        RowBox[{"(",
    , r$ f% K* \9 Y# o) L         RowBox[{6 O0 U% g9 [6 `5 y
              RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], , g  ^9 r3 f% Z5 k) N" k& p; P
      "+", # f. ?8 u* s% T& L5 G( i
      RowBox[{"0.2361524780938108`", " ", 8 ]6 G4 }  v6 a- D3 i; j
       SuperscriptBox["\[ExponentialE]", 7 t/ E) |/ \: x$ H3 h6 u0 ^
        RowBox[{"3.141592653589793`", " ", " U, j* l( U4 H. [
         RowBox[{"(", % |  D" j, v' V  U# @
          RowBox[{' y# [8 Q, Y% i( D; o& ~0 Q
           RowBox[{"-",
    9 O& W( w& Y$ E! y        SuperscriptBox[
    3 I; L4 s$ U3 w' {# I9 ]         RowBox[{"(", 4 Y3 q% G2 l, S; Y- A
              RowBox[{7 G* |& a5 w/ ~, ~
               RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-",
    0 N7 q# R2 j4 B# r/ G9 }& V  Q       SuperscriptBox[
    + j. _. ~2 H% i% K# Q, O/ d        RowBox[{"(",
    : d- a; j. @8 u* R1 @8 Y         RowBox[{5 @; j" w, Y) Q
              RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-", - d" G0 s" a& ]& X9 f; d# r8 l
           SuperscriptBox[+ h! j; L7 F, V! B7 {
            RowBox[{"(", : {6 V0 k% h4 J0 G$ W% x
             RowBox[{7 i( g% ~3 P- W! A
              RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", 7 d( F/ |6 o2 X/ \$ V& c+ n
           SuperscriptBox[8 T/ E/ }! m. d7 J% N
            RowBox[{"(",
    & D5 z; s; @  Y4 |. @& i- {/ l7 @/ Z         RowBox[{
    ' q4 a3 {4 |$ f          RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-",
    ; u7 \0 U. O1 B! `       SuperscriptBox[
    & A$ m2 I. i7 f6 M$ J        RowBox[{"(", ) C; K/ ^/ `8 ~2 D; f, T- q
             RowBox[{! W1 f9 ?/ ^" l. F/ x/ x1 Z9 M1 ^
              RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-",
    7 k" B8 H, d6 ~$ `       SuperscriptBox[1 V- @1 i. p% `. f
            RowBox[{"(", $ g" j& V% r- A1 @% h. r# n
             RowBox[{0 a8 g9 y  |3 d, {7 R
              RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
    / [& X! x1 ]8 O% F; d2 b2 ]( K       SuperscriptBox[1 c, M# h& U: l& c! f" u# z
            RowBox[{"(", 2 X  K2 g5 Z9 M: h2 b& t
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", . Q: W" u) N% t; P0 ]# K
           SuperscriptBox[
    / B3 @2 c  I; Z& E: a0 z& x- u        RowBox[{"(", ! X8 U, T! j- e- u2 x: {
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", $ x! t) j  d' Z* b
           SuperscriptBox[
    ) N3 E4 S  [6 S$ ^% u% B. C, a        RowBox[{"(",
    9 h6 o* a  }+ v" o5 v         RowBox[{
    8 _& j3 I5 ]3 L7 X  v- O          RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], * Y) ?$ q) [  C  n' _3 c
      "+",
    . J. f/ ]# a4 u6 U  RowBox[{"0.3207174990295839`", " ", ' v3 p* p# O5 L  F  K
       SuperscriptBox["\[ExponentialE]",
    ' h; E/ j9 p# C0 \2 P    RowBox[{"3.141592653589793`", " ", ; ]! m( p& }4 k) B3 Q
         RowBox[{"(",
    ! A6 t$ J( x# U+ H+ l      RowBox[{
    / r) l- c6 j. _, G* s5 y  t5 i       RowBox[{"-", , Z4 z' t4 _. k! u8 h
            SuperscriptBox[! S, I3 \7 b/ H. z+ G' C8 a
             RowBox[{"(",
    : M" \; A  y0 [6 q4 W          RowBox[{: z% Z/ m, X2 O# W+ x5 y/ Q: r
               RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-",
    4 k! G0 U( M/ _0 m2 `& B& b       SuperscriptBox[1 p3 Y0 }5 a2 Y
            RowBox[{"(", 6 f' z; W6 w# [5 K
             RowBox[{- K3 T# c7 V( b! A3 W# S, C$ d6 B
              RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-",
    . t/ t$ Z; j+ J. X       SuperscriptBox[! s% C, Y  X+ Q' A
            RowBox[{"(",
    ; d6 ~! G8 b+ w         RowBox[{
    2 n7 a4 s2 n5 F          RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    % T3 N! R8 O6 S- N       SuperscriptBox[
    & P; M6 |8 v# {* Z        RowBox[{"(", ; E& _) K2 V) N" K8 `
             RowBox[{
    , L8 ~& ?4 y* N! w: S( Q          RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-",
    8 |; k" f7 k! L' S, j0 F* t* G: `       SuperscriptBox[2 ~- T6 ?+ H; o. j$ ]% H
            RowBox[{"(",
    , V8 I: [4 x) {$ D! w$ g         RowBox[{! m4 |; T7 f$ o! c- P% l
              RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-",
    . }% W' n! Z( `5 ~9 n) z% L       SuperscriptBox[
    % a& z3 w2 r! ~8 |0 J" O        RowBox[{"(", 3 [' t+ Q5 k! Z" r
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    - s4 a' T; w: k9 r1 ~       SuperscriptBox[. U3 a3 a0 z- o" W1 o; S3 x+ H
            RowBox[{"(",
    2 v5 a- T7 p* p7 }         RowBox[{7 r6 K2 I& a7 W' B$ I
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    3 g$ ]" x# }4 M! |; }+ v3 D7 b5 B* v       SuperscriptBox[$ g  x$ R. _7 y
            RowBox[{"(", / {4 S% u/ b4 C4 C. N# R* w7 o
             RowBox[{
    1 K- r$ K4 i' G+ H6 t+ X          RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    0 P3 q% ?- k0 a6 E3 V       SuperscriptBox[
    + W+ e0 u7 t9 u9 R9 S        RowBox[{"(",
    ) f2 q+ l) e& @. [; b9 Z         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 4 J" a" t7 j2 ]$ @$ \8 Q8 ]
          ")"}]}]]}], "-", * ~& o8 V3 G* W+ x& _9 Z9 J: p: w; S
      RowBox[{"0.15852708848338315`", " ", * w2 h3 o. h% q5 z9 `' g
       SuperscriptBox["\[ExponentialE]",   U+ D( L  v8 g; ?1 L) f! G+ M
        RowBox[{"3.141592653589793`", " ", % ?" k! x. \4 m  m/ j: d) F  y7 z! Y
         RowBox[{"(", & M5 p, _2 L  q+ L
          RowBox[{
    - z' B2 ?4 z/ g( |       RowBox[{"-", $ Z! G' U  o- @6 ?: R% H
            SuperscriptBox[0 d3 t, f0 d2 O' \- o5 s; n* ?
             RowBox[{"(",
    3 a7 a* M8 D+ [  P7 O1 M% F          RowBox[{
    7 ^6 e2 [1 z4 V. }, f5 D3 W           RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-",
      [# N0 E$ w& T, \       SuperscriptBox[
    5 {2 [" c+ E  _6 U6 a2 g        RowBox[{"(",
      E, H# S4 M3 U2 O1 O6 @, J0 j  ^- }         RowBox[{
    & x+ ?; V8 E) `  Q& a2 p+ P          RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-",
    4 p9 n$ [" j7 P( ?2 v8 A       SuperscriptBox[
    ; Z# v! f2 A( f, y        RowBox[{"(",
    6 k& ^. ~: n! `2 N! A4 S         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-",
    - v& Y1 E7 O1 a  D( T3 n; x       SuperscriptBox[
    9 s! J/ [; w* a8 P) V8 c        RowBox[{"(",
    " C3 Y, ]) y7 W$ _- @6 O/ i         RowBox[{% l6 E, _# T( w5 x" m  o7 y
              RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-",
    : m3 T* v6 E0 j4 c2 n8 S  [3 f& a       SuperscriptBox[
    3 H5 R. L) k7 ^/ [        RowBox[{"(", ) F) [9 ?# O; ~  n) n7 }% F2 x7 s9 u
             RowBox[{
    $ Z# Y1 S! u- v3 Y7 u% m$ u          RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-",
    + R0 N6 J3 {) z& h, _       SuperscriptBox[
    7 D; x* q/ s' \. X        RowBox[{"(", # g# e+ r$ w$ f# |0 q$ P% K( c5 f, Z
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    , i4 Y' [, M( y% B% @' X       SuperscriptBox[
    % L- I1 N1 r* M1 P  L        RowBox[{"(", ! T6 _4 M# t, R8 _5 n( p) S/ u
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 6 b# a% J& L3 I/ x0 o% s
           SuperscriptBox[# z; ~8 V1 l; q, A( b6 W" q- C3 Y/ A
            RowBox[{"(", 6 X8 u2 F: {& C4 @/ Z1 Y2 M- n
             RowBox[{  y, y5 p2 y8 }3 ]1 g
              RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", $ a( H6 b8 F6 g9 k, z! d  T' q6 F
           SuperscriptBox[! P  o9 f1 T# e: }8 {
            RowBox[{"(", # V  P( G' r7 q9 E2 B
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    6 F* l5 k. J) o      ")"}]}]]}], "+", 7 l; G; f2 ]1 y: k
      RowBox[{"0.6019775648968265`", " ",
    ; t% F( S- k. o- _- y   SuperscriptBox["\[ExponentialE]", 9 W1 j- O( K9 i4 C! T
        RowBox[{"3.141592653589793`", " ",
    " U. y) x; V! p4 X     RowBox[{"(", : D5 M( U2 l  B5 a- g+ s
          RowBox[{: N- I6 |0 M6 R
           RowBox[{"-",
    4 J0 c% |5 z  k9 y        SuperscriptBox[
    1 l- k) h2 S) k" U* _( x         RowBox[{"(",
    " ], X- Y( a7 Z          RowBox[{( k9 [1 a# n2 ~% |
               RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-", ! ?: n% g$ q- K, D1 P( t
           SuperscriptBox[% Y9 z1 I, R! j9 x1 q- z
            RowBox[{"(", ! P$ L" v8 B; a8 m5 u' ]
             RowBox[{
    6 E6 a% B; s" m7 ]2 R# \          RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-", 6 |9 S( {1 W# R
           SuperscriptBox[
    3 b6 t( R: A; d# N! m! k( ^# Z0 ]$ L  g        RowBox[{"(", * I3 j' x$ y9 e6 r
             RowBox[{
    * K, w( D6 u% A, F          RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    " e  q3 f  T+ O3 y; E5 y( i! g9 p       SuperscriptBox[  `" |% v5 t7 I
            RowBox[{"(", - s7 k% `2 R8 g5 g* X
             RowBox[{! E) D, l' R, r
              RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-", 4 Y8 M6 [. |* O$ Y, ]
           SuperscriptBox[
      _, C7 s0 u' U( Y% }, q! M        RowBox[{"(", 0 y, Q* E, Z( l6 N! Q
             RowBox[{9 t3 x5 p8 D( }+ H5 R
              RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-",   M# u0 v* Z& u8 S9 B" H
           SuperscriptBox[
    3 e6 c) l, v1 f: @# m: g- l        RowBox[{"(",
    * N: \' e$ z  u  t$ O7 A         RowBox[{: [/ @+ j5 D. f9 {+ }' P
              RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", 4 E7 I9 U6 w) }  \2 N" Z) g; r- p
           SuperscriptBox[! s  ~2 F& [1 ^2 f) F& {+ O+ I
            RowBox[{"(", ' T/ F; k. e. H9 |+ D& u% \" ]
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", / s- ~! J0 `# c& a
           SuperscriptBox[
    ; T0 E/ o2 x+ Z9 t" `0 a8 T" G        RowBox[{"(",
    # |. W( m0 [/ x# A9 u0 A         RowBox[{
    6 j, n& G) t: G2 r9 E          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    % Y" o3 T; m* {' I       SuperscriptBox[
    7 A/ ?& q0 Q( V2 D0 {. L        RowBox[{"(",
    0 R( W/ H  D, F         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ) L: w# L3 U% J) b
          ")"}]}]]}], "+", 0 P  ?& V6 G8 Z  t0 M
      RowBox[{"0.16041393254115022`", " ", , `; r9 w' c: L5 j
       SuperscriptBox["\[ExponentialE]", & Y6 q' L& {: y+ h5 u
        RowBox[{"3.141592653589793`", " ",
    & P" [% n  V) L$ `; N! y     RowBox[{"(",
    . ?5 g5 q5 |6 ]      RowBox[{- A) Z9 E. S) v; b, G
           RowBox[{"-", ; L$ X. z! e: i! Y) f
            SuperscriptBox[
      [) l& z! n5 i3 s  s# Y8 n         RowBox[{"(", % p. [4 S% o7 h5 D+ D8 Y# b
              RowBox[{
    4 ~6 |/ ?8 H/ p/ c# w7 |- D           RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-", $ ^; V# c( W) G/ P! v' X
           SuperscriptBox[3 p8 M$ P! ]8 V9 N5 B, O+ v: {6 R5 I
            RowBox[{"(",
    : k+ q! ^' x( I+ @, _2 C6 l         RowBox[{
    5 }5 K: d4 p1 c, ]! F; K          RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    0 M0 V7 Q) c! n$ d( v6 D& s- d       SuperscriptBox[2 J: u8 E9 R2 _! ?
            RowBox[{"(", / ?' Z' K  x7 ]/ {3 x
             RowBox[{. B' N2 a0 y9 ?  |. E
              RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", 7 }9 {2 F$ B8 @# B% L6 A* Z
           SuperscriptBox[' w$ i- }) B5 ^! L- \# q
            RowBox[{"(", * k$ g+ p* m+ a4 I: T
             RowBox[{
    " y, Q# j: P: w" O          RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-",
    7 a; T5 P! V  n+ c# _/ R. o8 ^+ {9 h       SuperscriptBox[$ b9 {" W6 F, X+ z: @, o) s
            RowBox[{"(", 5 g6 v! }  c% I/ `
             RowBox[{1 u* A# B+ k5 c: r- g0 C0 S
              RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", ; [( g: k* X" h$ B# e. |, l( T
           SuperscriptBox[
    ) F7 q2 G) o* |7 ^; }$ E. J- e: }        RowBox[{"(",
    9 ?  v* [0 \0 e1 h         RowBox[{
    6 P% |( v6 p! I          RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", " a- Q+ K: c- H$ E9 D" E
           SuperscriptBox[4 |7 n/ l( j6 _/ e8 ~5 L; b- x
            RowBox[{"(",
    8 c9 `# I/ ]6 U% U6 G+ k         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 6 L; i0 D9 b- I  H3 _3 _' o, Z7 P; v2 N
           SuperscriptBox[
    $ O9 i4 o9 m( F4 Y4 o7 q        RowBox[{"(",
    . |5 q- }/ h6 m# a7 a         RowBox[{- f. G2 {, E, l5 R- ~/ j2 x0 d& C
              RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    / U% [# L' X! x$ Q5 ~       SuperscriptBox[/ |1 b# V: Z) S$ x* {7 u
            RowBox[{"(",
    0 E. S" l9 _* p         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], - j, x$ }, i3 S' i
          ")"}]}]]}], "+",
    ' ^5 w4 i3 ~9 \/ w/ u1 E  RowBox[{"0.48228184971363947`", " ",
    4 [# O9 o/ g8 S- ]2 |9 q   SuperscriptBox["\[ExponentialE]",
    4 L% a  Z: u4 r0 B6 ^    RowBox[{"3.141592653589793`", " ", , b6 [5 ^) q- U: {# B  j3 K- Y' [) b! k
         RowBox[{"(",
    3 \4 S3 T& R* k( j5 Y. R- F  Q      RowBox[{
    : \( x$ y% S# V6 _2 T       RowBox[{"-",
    & S8 \, e! H. S- H) A' U" r9 c: U2 o        SuperscriptBox[6 {5 c5 m" d5 U- {6 V/ j" B, `
             RowBox[{"(",
    7 O8 q! c7 \8 o; d' o2 X0 u9 P, J          RowBox[{
    ' N' C2 J; v  @1 p' U7 j           RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", 0 \3 E5 ]- h2 F7 V! J1 N7 S
           SuperscriptBox[
    8 a) n9 P( B  p! B% c        RowBox[{"(", 2 O3 ]  x+ T6 z6 ]
             RowBox[{
    + v9 K2 i! ~  `  C$ \* ?$ m! v) ]          RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", $ y; o$ Q/ x/ U! S7 v# m
           SuperscriptBox[( r: z, H5 t  H: I& n. L
            RowBox[{"(",
    - A# N$ W6 S! Y5 D; `         RowBox[{: M/ [; C) z* ^1 M
              RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    & M6 _. H$ @3 Z! l6 K0 Q3 j) k5 S       SuperscriptBox[4 B+ {+ p8 N2 j  ^3 P0 F) ^
            RowBox[{"(",
    " O/ [% ]9 A# M         RowBox[{' k3 K7 M2 n# `% @( F
              RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-",
    8 c8 |; e' _: }# n, w: p% @       SuperscriptBox[$ R% C7 d( I; m* }" j! T
            RowBox[{"(", " m) e8 M* G6 E( n* J
             RowBox[{
    ' g& d5 ~3 U- l& i* g          RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-",
    9 X0 t1 k) Y: [" H/ t, b, i       SuperscriptBox[
      l  N  Y3 n; ]        RowBox[{"(",
    . C. g7 ^: I7 x  p7 j  c5 [. ~1 i         RowBox[{
    ) D6 G% Q: B. \1 E7 B          RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    $ Z, I9 Z( f9 @6 s, \6 G7 y       SuperscriptBox[! L. I9 u0 @& N% C% Z
            RowBox[{"(", 6 p2 c7 Q* V# W/ L% {# v, t/ t
             RowBox[{
    / N0 `$ x) u0 Y5 e5 Y          RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-",
    ( [7 @) \' P# }+ [6 A3 \- N       SuperscriptBox[
    , M/ Y% L) P) ]4 \' m: m        RowBox[{"(",   V2 c8 F' n" V# x3 B/ v. I5 z
             RowBox[{- ?& G  n: Y3 j
              RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    : {' f! ^! y& ?" N* L       SuperscriptBox[
    - v9 }" M9 j6 _        RowBox[{"(", " @9 e$ g# c2 D2 s& z; t
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 5 f, H9 G& [. E" X; m" F, v7 {
          ")"}]}]]}], "+",
    / F% f/ B4 b% {  RowBox[{"0.2954923840077215`", " ",   D! @6 A+ G  T: w: I. R. m  K- G% m
       SuperscriptBox["\[ExponentialE]",
    % m6 D4 M4 n/ Q7 P0 U    RowBox[{"3.141592653589793`", " ",
    2 Y# t% x, K. q; ?. w& f     RowBox[{"(",
    ) K& V/ W: V9 q3 ~      RowBox[{8 [9 ~0 g) `  @
           RowBox[{"-", # b! X" x: s* G' [' c  l
            SuperscriptBox[
    ! D9 g0 \. N3 s         RowBox[{"(", 6 N9 H" y7 k* N6 C' j
              RowBox[{) t3 d! i; C3 p; D0 K, {4 z$ e
               RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    * B7 t# @, {( @' x- d       SuperscriptBox[3 k: I9 R( ], B1 M2 d
            RowBox[{"(", . \! o! o3 S. I) f' _/ O% i* i( H
             RowBox[{3 Y% S: o0 I4 y9 C5 R
              RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-",
    : [' ~2 V3 x( @4 g       SuperscriptBox[
    - Z' L& d/ J- Z0 L6 B        RowBox[{"(",
      P% V( K3 J4 R& t         RowBox[{
    * ]- d) W4 i( A: w1 E* L0 a          RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    6 S5 {/ w& E0 o& P9 U) }7 `+ |       SuperscriptBox[
    0 ~* y5 ?! H) ^5 I- o$ E' p+ j        RowBox[{"(",
    9 K- W8 J) \, J2 D* t& `' ^3 z         RowBox[{
    * _1 t- L* ^4 N$ S- d% u          RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-",
    * F. U" g' ]+ Y/ s5 b       SuperscriptBox[
    3 ^4 Z) [- k* A7 z8 q) @        RowBox[{"(",
      m: `+ }. j# A8 c) `         RowBox[{
    2 {9 C0 v" _' C: O" l6 G) i          RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", 7 F/ b* y5 e; p2 @: S& j
           SuperscriptBox[
    : [( Z  V( ~' v! J5 y        RowBox[{"(", ( ]9 ]1 Z' e3 Z
             RowBox[{5 @- T1 I' P5 y, M
              RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
    " V) x  r/ F* d* {       SuperscriptBox[3 _0 T, `, `2 W
            RowBox[{"(", + p+ l! F3 Q' n1 b& t
             RowBox[{% t5 ]0 g4 p! L' y' [) ?
              RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
    : C; s$ C! T! z/ T& e       SuperscriptBox[' g* H6 y. F7 M" z
            RowBox[{"(",
    , }/ H1 H4 @( o6 K, P: Y         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 5 u; b# k& n8 h$ \! B. M8 n
           SuperscriptBox[0 l! f  }" b+ D$ ~9 b
            RowBox[{"(",
    : |# \5 R! d1 M! q  L- ~         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 6 p$ K/ v- B" \9 A* K( _  H  u
          ")"}]}]]}], "+", $ p" A) _. d# l5 a; q; Z: m* Y
      RowBox[{"0.3129687276967983`", " ", ( F1 ]& _% l9 t7 G$ S% W, z7 o
       SuperscriptBox["\[ExponentialE]",
    , X2 I/ F$ o7 f- X2 }) @9 [  ]    RowBox[{"3.141592653589793`", " ", 8 g3 P  c  \  w8 y5 [7 v
         RowBox[{"(", 5 O$ w3 a7 J7 c% Y" Y+ B
          RowBox[{! O/ ]: U; p  Y! f
           RowBox[{"-", ' g# J* o- i: ?& w3 `
            SuperscriptBox[
    ; F3 H$ R6 c5 a: G; j8 c; A         RowBox[{"(",
    # C6 }4 V5 \8 Z% {. C: `* P          RowBox[{
    0 R" |" N$ ~* A8 P! L0 `. }0 w- L' t) @           RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-", ) J2 Q6 _3 C. Q# v4 d, a# t
           SuperscriptBox[, n" z; E" }$ l# o
            RowBox[{"(",
    - p* v" F3 ^2 }2 H& ]         RowBox[{
    # _$ t& b$ A. o; @" c5 @/ R& D          RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-",
    # e$ k$ ~# a8 R0 s3 i       SuperscriptBox[
    / @, d; w, H+ \; E9 O        RowBox[{"(",
    / ~, M; j! v- F- w         RowBox[{: Z. l% s& S0 E3 [1 o
              RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", 7 X* J6 L2 @" f! g
           SuperscriptBox[
    " d4 J9 @* ?4 n        RowBox[{"(",
    / F) `6 I9 z+ q6 R- a         RowBox[{
    , k/ h0 S) N- g" f, W          RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-",
    # K$ N3 i1 o7 M" I* V7 h* o       SuperscriptBox[
    & H& k" `6 I. N: \3 @( b        RowBox[{"(",
    # x! H$ w$ ^0 [" V5 o  N, `         RowBox[{6 Y7 h2 K4 j* p: [
              RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-",
    4 R$ Y7 h# g! w* U* `5 v       SuperscriptBox[  q) W9 o+ n4 ?! U: R# Y, K: s; e! w
            RowBox[{"(", 8 ~8 g  i' K9 W. ?% h0 A
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 7 M% N/ ]% Q% r# n
           SuperscriptBox[) A3 g& m8 z* t6 n
            RowBox[{"(", " K# e0 m0 z, q) E* S4 @2 A
             RowBox[{' J- E% Y& c# X1 f8 s( g
              RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", 7 Q+ ]+ T6 c  K' N
           SuperscriptBox[0 U7 E; p$ u9 q7 ~' l2 J3 h9 V
            RowBox[{"(",
    # [5 l  j4 B! S% j         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    3 ?! m  G4 c# o  ^3 D% t8 H       SuperscriptBox[
    # t3 R# g& f3 k7 W1 L        RowBox[{"(",
    8 J5 f5 c$ N1 L0 m         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    , |, P6 ~0 [) ?      ")"}]}]]}], "-",
    7 X" J: A, V2 L9 W$ T0 t! R2 |  RowBox[{"0.4666313851213302`", " ", / s9 X+ F3 \$ X9 J2 _9 D
       SuperscriptBox["\[ExponentialE]", 4 _( r, F$ H2 y" a( b( A; b
        RowBox[{"3.141592653589793`", " ", ; ]* y6 i9 o) e- _$ j# E2 u
         RowBox[{"(",
    $ x+ [) p4 h5 A& }      RowBox[{( u5 y0 E# u# e
           RowBox[{"-",
    ) m% e' H* \1 {0 Y        SuperscriptBox[; }  v# ]# v( j( m1 m2 Z+ c9 m
             RowBox[{"(",
    2 l' {9 S. y# b- S+ W2 n# W          RowBox[{" g9 m: J, |4 D3 A. V
               RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-",
    , l1 `" w8 `: Y9 {) m7 m       SuperscriptBox[
    - X. C6 Q3 k1 L& v5 O" u: X        RowBox[{"(", / Y5 W6 S8 {% P, ~' J( a
             RowBox[{- W7 ^8 f: F4 P* R
              RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-",
    % G* I5 N$ m! C9 }5 i       SuperscriptBox[
    6 d% C. m& P7 P' h, C- D        RowBox[{"(",
    - o) [8 [8 Q2 v( I         RowBox[{( Y( ~: }, A1 ]9 v# N
              RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
    ; c# P: j: _+ ?9 Y6 t5 K       SuperscriptBox[
    5 _: Y  F& f1 |* {        RowBox[{"(", + H6 r0 ^- X( r! `! c, D
             RowBox[{2 ~) \8 d; Y9 R5 p" Y" Z% j; ~/ w* p3 g
              RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-",
    1 ~9 S: O; y/ t' ~9 J' R; x       SuperscriptBox[
    & ]) O; Q  [3 A& s; P4 E: e# M- V, T        RowBox[{"(", " {! I! N7 P* i$ \; [. s5 m
             RowBox[{( P7 A$ V4 I* H) d$ w
              RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-", 9 ~; F" ~# P! Y! Z7 F( M2 ^2 y
           SuperscriptBox[7 P* ^, f' X+ S3 r
            RowBox[{"(", 3 |, G5 n. W4 S% d
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    / b& b# r: I& a       SuperscriptBox[
    ) }7 [, Q5 n. y# a1 L8 k. c        RowBox[{"(", ) o9 `0 ^* P" |8 I/ r2 I6 Z( p* z. O
             RowBox[{6 [  [5 C( l/ ]% N  X! U; r9 |6 i* z
              RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", + o2 z0 w5 V5 J$ J
           SuperscriptBox[
    2 H' r$ ]6 g" O+ g8 P8 [9 d! k2 s        RowBox[{"(", & }1 D1 ]- f6 }# g$ q
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", + g0 p' X. {& E. S6 _) z$ B! w5 U& }# Y2 z
           SuperscriptBox[
    ! U7 K- w( e: r7 j# W        RowBox[{"(",
    ! A1 ~7 g3 l# W9 j" O* S# T         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    8 t3 t  ^" @4 N- o' y8 K, [9 P      ")"}]}]]}], "+", , i) c* x* @8 F0 h5 U
      RowBox[{"0.3741982811661129`", " ",
    , j: {! \. U. ]6 _   SuperscriptBox["\[ExponentialE]", / I$ F! _7 U5 Y( m6 G5 L: ^
        RowBox[{"3.141592653589793`", " ", . [. i2 u6 [6 `* g3 X9 O5 C' f$ o
         RowBox[{"(", % k3 t& w( ?/ ^3 T8 {
          RowBox[{
    * _: S6 ?3 R2 L8 s       RowBox[{"-", 6 K8 i6 f, b4 n# A1 d9 E  m
            SuperscriptBox[; w* U/ o- F. i) h5 e$ {
             RowBox[{"(",
    4 d! m  ~8 B; u- ~3 w3 p4 |: C* G          RowBox[{
    8 Y$ U# u) _  j8 y3 R           RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-", 6 V3 d# O, C! g/ _
           SuperscriptBox[
    % `2 }/ R* K& a% A: Z        RowBox[{"(",
    0 X5 @2 ~, N; Q" d$ x% e2 s         RowBox[{
    % d, n; a' A2 L' O          RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-",
    * H) K9 W# O7 [9 q, a  {       SuperscriptBox[' b% _9 r# k$ S2 s6 W
            RowBox[{"(", * i- ^) J( e. V! j) q9 z
             RowBox[{" D8 f8 c& g. u( R  b# F
              RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",
    * G$ V& _% O) @+ [. ^6 J5 ?& v       SuperscriptBox[- I7 x! Q. X+ m) U5 p- g# Y, x
            RowBox[{"(", 7 j" J9 s& ^0 G, B7 n* K& t
             RowBox[{. B/ ]5 {6 x1 e, U1 a
              RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", $ Q9 `3 \! ?8 K6 [8 M
           SuperscriptBox[8 d) a0 u( n( ^0 h/ p+ l, H
            RowBox[{"(", / G/ i0 \$ m# q4 h% ^" Y
             RowBox[{
    3 @: O3 `3 t- J          RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-", 0 T* R& ^1 r7 L3 Y1 t( P
           SuperscriptBox[
    * ~; K3 E7 l; O  `! X( [  I        RowBox[{"(",
    & Z* Q- n! }& t/ y7 x; K9 |         RowBox[{( P  d4 X& t$ o) d4 [
              RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    # k* y# s# e0 v% q       SuperscriptBox[4 u( F& b  [; `+ N8 C2 L3 N/ M
            RowBox[{"(",
    ( Z" u* U0 }' }) v         RowBox[{
    : j; {' L8 Y; R  z          RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-", ) f1 p  J. H7 O, v2 T8 }
           SuperscriptBox[1 k/ A2 |5 O: R/ d! M( ]4 r) |
            RowBox[{"(",
    : p6 v% R" {: i7 K         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    / Y5 V# H) u- i  G  H, }       SuperscriptBox[' J) B5 x; l; d4 f
            RowBox[{"(",
    8 G' c: d+ f/ s2 [6 n         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ; p0 Y% b/ {) {1 I( N
          ")"}]}]]}], "+", ! J+ `! I' l% J, @* {, u
      RowBox[{"0.5575503376854456`", " ", ; ~* Q4 t7 A, ]( Z- a5 O: g7 K
       SuperscriptBox["\[ExponentialE]", & }. o2 U% A) @/ }
        RowBox[{"3.141592653589793`", " ",
    1 p) K  y1 o5 G& e     RowBox[{"(",
    . U$ j+ z/ X4 N- _2 v7 S' F5 n0 K- j9 Q/ a      RowBox[{
    / x3 B0 b2 }; i" L! U- ]4 d9 J       RowBox[{"-", ' X# P' m2 x9 p% |) \; m7 T# U
            SuperscriptBox[9 z3 ^) |2 A  T
             RowBox[{"(", 5 E( f1 H0 k0 F1 S2 p! m
              RowBox[{
    9 y2 M8 m6 t! s( M7 d           RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-", 5 k" e( b& ^9 v3 I3 h) E
           SuperscriptBox[
    ( x+ Y$ ~7 m. Z" K' a7 i( U        RowBox[{"(", ! y& n* x* G1 Z$ g2 y2 i' J3 V
             RowBox[{
    : S( n  A0 W& \2 p1 j0 j2 O+ f          RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-", 3 w$ f0 L" z1 i  S
           SuperscriptBox[/ K5 m" `: h% |/ _( N
            RowBox[{"(",
    & ]% r9 o+ m+ o, }4 V8 P, r# A         RowBox[{  {' [% b0 K* Q# I4 P
              RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-",
    # `/ k* I, P9 ~" I# [  D# B# K       SuperscriptBox[
    3 f  D4 H! D- a) C% F5 j        RowBox[{"(", 2 p, J/ x4 C+ O; t! v
             RowBox[{
    * z3 x# Q* i4 y* u          RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-",
    - L( d6 S6 O" h) U+ D8 y       SuperscriptBox[* p' H. X- Q; f
            RowBox[{"(", 4 m4 z& s8 u. T4 |. q' U1 G+ r
             RowBox[{+ O$ b8 y6 H0 r: |8 p
              RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    3 v, Z0 O9 D/ d' W# R8 C5 ]       SuperscriptBox[
    0 {) ^" B' o/ @' p: ^" V        RowBox[{"(", 6 J/ S. y0 T1 g0 W0 i/ E
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", * D) U: a3 K: w; a4 S
           SuperscriptBox[
    ( h3 p/ z* S& d* k        RowBox[{"(",
    6 B) j; O4 y2 _! e         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    1 j/ E0 F, U/ m* P2 s       SuperscriptBox[
    8 T. X& A0 [  P* \6 J% F" R        RowBox[{"(",
    4 m/ ~, C+ `0 m         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    2 W" f$ L: n7 ]0 b  S5 ]8 T       SuperscriptBox[
    ( _+ W; V% |; `4 q        RowBox[{"(", % m5 w% s: S- i* x; g. h
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 5 K$ I: A/ J/ C6 w* N
          ")"}]}]]}], "-", % n) [+ F1 G) U: [; S
      RowBox[{"0.1339854044819916`", " ", / k/ _: ~, e, _& j; F/ j# k. q
       SuperscriptBox["\[ExponentialE]",
    + S4 S, k6 P2 h/ r5 n$ z: v6 A& u1 ]  |    RowBox[{"3.141592653589793`", " ", ( K1 J" }  T' Q, d, u: S, h$ _* h
         RowBox[{"(", * [& B4 N* f' I4 C/ S8 C
          RowBox[{" z) G# K8 Q0 Q$ B
           RowBox[{"-",
    1 L. H8 X( T- h( J( ^" A        SuperscriptBox[
    $ x1 z' f5 a$ E2 r4 y' j         RowBox[{"(", 6 W. _) V: U3 b2 F3 ~
              RowBox[{
    0 u1 B* E4 j' y$ F; i9 [5 J           RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-",
    0 T7 b/ ]1 I: j" {3 r3 B2 j' ]3 R4 Z       SuperscriptBox[0 w" a2 u7 F4 m/ O7 g
            RowBox[{"(",
      d5 i5 c5 R& a8 n: K; y3 o  z' y         RowBox[{! E% V. j9 Z+ X3 F/ [
              RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-", 5 ^; v. |" N; T/ B( a
           SuperscriptBox[
    ; x4 y( M6 ?  p& j0 o4 u& _        RowBox[{"(", : c; U- _# a& I0 M, h! H
             RowBox[{5 S! ]5 J+ ]$ y; O* M% R
              RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    / z# S( X. x6 X       SuperscriptBox[! g9 z. i- c2 Q5 @# N9 i6 I
            RowBox[{"(",
    7 x: J5 }! d. @) {5 b- T         RowBox[{5 u- ]1 N1 u+ \) F8 o6 z
              RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-",
    ; i0 r# e  Z  q$ W* O+ I) `& h       SuperscriptBox[
    ; G2 w' I0 v; h6 m$ _- E, ^        RowBox[{"(", ! H9 }# |/ z( {1 E( p6 f( i
             RowBox[{4 p6 E# ]/ j% q- k
              RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    # n9 O- g1 e7 ?8 `( X       SuperscriptBox[( e3 w- h8 g& V1 G- D5 F/ R
            RowBox[{"(", ' A$ r- M5 L; I. s
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", # u8 B  L& t7 `( `
           SuperscriptBox[
    ! ]6 D  `) V2 S8 }. h- F" R) p        RowBox[{"(",
    6 A5 ]+ b$ E- ?$ m4 Y  W* H8 i( N         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", * E5 A9 \! e/ i) G% B9 A- L
           SuperscriptBox[
    ; b( Y# ~, w/ h        RowBox[{"(",
    ; h3 b( b# Y9 b2 O% Y0 `/ c         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    # a( j* j- s" I- N" D0 q) X       SuperscriptBox[% }& {4 S5 d% t) g7 q
            RowBox[{"(",
    ( r* o* P. s4 t3 [4 y         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    , c0 b8 d+ E1 R8 }7 \# p      ")"}]}]]}], "+",
    $ f% Q& Q) ]9 O, d, H) {  RowBox[{"0.45723850991134063`", " ",
    9 V+ M  ?* d# m4 t5 ~$ C6 W' [   SuperscriptBox["\[ExponentialE]",
    ) q4 r  |/ N, s2 t' k. C- q6 ^    RowBox[{"3.141592653589793`", " ", " |; q/ ~0 _) d/ q+ `
         RowBox[{"(", 6 T; |7 Q# j+ {9 x2 [; J: ?/ ?
          RowBox[{+ z; j4 a$ E" V3 \$ A
           RowBox[{"-",
    ; \6 N. b7 F& U+ \4 `        SuperscriptBox[9 ^( Z5 T: t$ n; O0 h  a" @- D
             RowBox[{"(",
    # [, G3 {) g1 p! x          RowBox[{
    6 j- r+ M" h( b- _8 g           RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-",
    1 R7 J2 Y* e- B* [( {       SuperscriptBox[
    2 m% k5 X: W1 S        RowBox[{"(",
    2 U0 y, ?4 v% b( q. }2 ]5 Y2 g         RowBox[{
    + V* U( d9 N% L$ L0 t          RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-", 4 h" Q0 ?+ {) b8 @5 R2 `
           SuperscriptBox[
    8 F2 }, \* z4 |8 N0 }        RowBox[{"(", ! E0 t& b' h8 d2 D0 F
             RowBox[{
      z2 {; s$ y+ w  S5 n, ^  k( h+ H          RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", : c1 p. d2 X6 |9 D1 ~2 k
           SuperscriptBox[
    ! @# V) B- O$ r( ~% l        RowBox[{"(",
    / Q/ ~0 \" B- C4 M: z/ e         RowBox[{& }% q# h9 \8 E$ w$ R( _. E
              RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-", 7 _' k1 r; a; ?8 W* B: J
           SuperscriptBox[6 i! i3 S9 }5 v: a
            RowBox[{"(", / N' t- f+ ~" c" @8 G
             RowBox[{
    : G. A( z$ F1 j& g# B2 u- r          RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-", - h6 m! J' d5 A0 t; E1 A' H
           SuperscriptBox[) b% S; p( A% A0 K6 J& X
            RowBox[{"(", 6 [8 e' v( J/ y/ [# J- g
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    + w2 |+ d* X6 n& T2 q2 T       SuperscriptBox[* Z8 k2 {' D( C3 ]4 J& m( \
            RowBox[{"(",
    ( _8 `7 s! g0 T; L; n         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ; T6 |1 `. @. v) Y9 X9 c8 P, d
           SuperscriptBox[
    , ~( X0 }( w8 P- ]        RowBox[{"(", ' s  t9 j1 \8 s
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ( T+ S* O# f0 H4 T
           SuperscriptBox[; S* V. s8 ~7 a' x4 E: B
            RowBox[{"(", ( G6 r: E5 E$ f9 E# f+ Y
             RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], # q2 C1 l: r" N' _& a7 u* _
          ")"}]}]]}], "-",
      N; V8 E- y+ Z  RowBox[{"0.025873988843993667`", " ", 1 X5 \' ]  W3 H1 }* l
       SuperscriptBox["\[ExponentialE]", , ~. H3 |' m( b- W* T
        RowBox[{"3.141592653589793`", " ", 2 k+ d; U6 @  W+ M$ O  _
         RowBox[{"(", 0 @+ Y. q; T3 Z; M- u
          RowBox[{
    & Q7 E% ~, O% I       RowBox[{"-", - P: L" x) H/ n+ s
            SuperscriptBox[# b6 a( i/ e/ W
             RowBox[{"(", 1 L; a/ L+ q: _1 p5 ^1 r
              RowBox[{
    $ S* d- F) u- E9 a$ {           RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", 9 E- `, U1 g# D3 N9 [2 }
           SuperscriptBox[: _! A) I7 V7 H) t
            RowBox[{"(",
    8 b: _* p0 }$ Z0 b( a& p         RowBox[{+ i6 G- X- O5 v- e: D0 _( o
              RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-",
    . S3 E% [+ T8 E  t       SuperscriptBox[1 Q3 K% p1 N- w
            RowBox[{"(",
    % V8 r. ]# a& D  Z9 H: g         RowBox[{' P9 u, {% v# ]3 I
              RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    ' ~7 ?1 F9 O% L- M3 F7 W       SuperscriptBox[' V  X  v  N7 O# X
            RowBox[{"(", ; k4 Y& {5 M6 |- y" V& F
             RowBox[{
    * M$ M; {3 }: k# N8 R/ k# q          RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-",
    " @6 N: B3 z# C- m7 I3 H       SuperscriptBox[. s5 g5 s. G$ [
            RowBox[{"(",
    1 E5 q6 V" N5 Z$ r5 b  U         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", , ]) m; }9 p1 R
           SuperscriptBox[
    4 a& X$ g4 [! K$ a" [1 _8 g; ?, n        RowBox[{"(",
      t" w, |- @/ N         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ( S. f0 Y( a, I# ]       SuperscriptBox[
    7 f8 o. ~- T4 M9 k7 K        RowBox[{"(",
    / R8 `7 Q7 n7 `1 f" m8 w' o         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", , ^2 [, o, I$ C% j. v
           SuperscriptBox[
    / c0 \$ b3 F5 T( u% {0 G  n/ a+ j- J        RowBox[{"(",
    ) F5 ~' D" c( n3 Q0 J  c  B         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    & }( p8 \: b( M0 s& @       SuperscriptBox[
    . L2 U' S0 r& C        RowBox[{"(",
    0 V2 N7 Z: S* o7 y* M' ]' s         RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    * d: P/ b+ p" n9 u      ")"}]}]]}]}]], "Output",
    $ D9 |! M( d4 l( N CellChangeTimes->{3.577924759875*^9, 3.577924921203125*^9,
    / P3 @4 F! j$ `3 |! X8 _1 x  3.5779583210432997`*^9, 3.5779585060284224`*^9, 3.577959043308958*^9, ! b' B: X; I3 l% V
      3.577962317973732*^9, 3.578012448875*^9}]
    ) M" m! R& c. g( q  Y0 H$ g}, Open  ]],6 ?4 G$ I* h! [. r

    4 Y# i0 ^3 t) r" Z: K0 {6 bCell[CellGroupData[{# @% C. A) k  J0 v

    5 d! u5 f0 {6 k  `; ICell[BoxData[
    * a  s" l) O4 w7 m& L8 L: E; _" d$ p, p RowBox[{"y2fit", "=",
    ( V: L8 [, Z+ \' Z' ]7 [  RowBox[{"Table", "[",
    8 l$ `. _0 Q9 l( Z   RowBox[{"x", ",", 5 e; V( X( F* \# B( o- M7 {
        RowBox[{"{",
    $ x; H' T9 W, C: g  J: [& D, ^, R     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",# u* b6 R& E( y/ ?$ N" v  X4 |
    CellChangeTimes->{{3.577924969375*^9, 3.577924979515625*^9}, {* m# a& M) ^9 u, a  l
       3.5779252768125*^9, 3.577925277484375*^9}, 3.5779583246625056`*^9}],
    8 _" x$ m2 U! ~! `& y" D% P9 S* J+ b6 {2 Q' @
    Cell[BoxData[
    " I# L# t4 K( q7 ~ RowBox[{"{",
    6 d" I0 q, m9 G2 X; T* i5 ~- k/ f  RowBox[{3 X( s: B! [/ Y  c
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' ^* m3 E$ V" b& n# H/ ?$ K- _   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",+ P- b+ f/ [0 b1 X4 ]& T
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", 0 L2 _( V+ L+ Z# v. M; e& a
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", ! L; i& _6 C" F
       ",", "29"}], "}"}]], "Output",
    ; @/ U1 a, ^. M CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9, % d3 d' {* ^! i2 z4 e' ^4 C
      3.5779583268153095`*^9, 3.577958508118826*^9, 3.5779590470685654`*^9,
    : w& i- ]' ^/ {+ C, f  3.577962320173336*^9, 3.57801245028125*^9}]
    , Q0 H) ]: u3 d4 _}, Open  ]],: o7 v) Z, A  ]' U4 E% G0 J2 [: P

    ; \. {1 Y: O: x0 J& xCell[BoxData[) K5 i6 z) l/ @8 j# C
    RowBox[{"For", "[", . A. K( M) k2 _6 T# k: ?' m# g
      RowBox[{! |' c$ ]3 s# A- }' t
       RowBox[{"i", "=", "61"}], ",", ( v! A: p9 k% q  d0 k" T: {5 D
       RowBox[{"i", "\[LessEqual]", "89"}], ",",
    0 Q) F8 y' s; |' I0 V* j. A   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    5 s' A; Z" ~* U+ D4 e/ _   RowBox[{
    9 ~! W7 T( R2 a    RowBox[{
    * [6 R, H# g4 E- E' `     RowBox[{"y2fit", "[", ' i( I( h* C4 D7 f
          RowBox[{"[", / a6 z  L3 ~1 Q) o( J, {5 N) T7 Y; m3 j
           RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", 1 _$ j  c3 K* v. |  l" W5 _
         RowBox[{"y2", "/.", , r/ u' r" V: D2 z' D% \
          RowBox[{"{", ) ?4 O/ e1 p" e
           RowBox[{& m7 ?+ [$ g) P, J
            RowBox[{"x1", "->",
    2 p( i: d" @( {7 Z8 ]* i         RowBox[{"Data", "[", . M/ i4 L% W# g8 n4 U
              RowBox[{"[",
    7 u3 [7 G4 H/ P. n' o           RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", 0 D- I# B3 u5 I3 X) `# e7 o
            RowBox[{"x2", "->",
    8 M! }1 m4 {  p' m* }0 R! _( l! q8 I         RowBox[{"Data", "[",
    6 r% T5 U' h& `2 f, h2 [          RowBox[{"[", * E: |5 v  a4 H: ?4 W
               RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    " c) F  y- {/ }        RowBox[{"x3", "->",
    1 X; r) G# k$ a' G0 I         RowBox[{"Data", "[",
    . U! M8 k/ o4 k" n          RowBox[{"[", / c/ o1 i# M& A* i
               RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", / g: M; c3 B8 r: U( M0 O: }
            RowBox[{"x4", "->",
    . c" X: x+ s: H2 I, A& w) d- R+ s! ]         RowBox[{"Data", "[", 3 G1 x* ^$ l# x$ q0 x4 x8 `- ^
              RowBox[{"[", 5 s- H- ^0 P/ Z( F4 u0 c! f7 P* K
               RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", " z6 J, w' n4 N: D5 k
            RowBox[{"x5", "->",
    + t6 t! Q8 f0 H7 o& r1 P& |         RowBox[{"Data", "[",
    $ o; g; j+ ?/ z6 X0 t8 h4 l% V! l          RowBox[{"[",
      x$ A+ T4 d  R4 y           RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", & g, V2 t- F6 M* r9 D0 X
            RowBox[{"x6", "->",
    % P/ `8 F8 @. ?" |1 m2 _         RowBox[{"Data", "[", $ m7 T  N* R" h, m8 E$ c# x$ ~
              RowBox[{"[", $ r: I6 P$ `9 S7 m6 J4 S1 R- h- j
               RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", 9 H$ F( c# j5 Z- S
            RowBox[{"x7", "->",
    2 H& P) K1 {  f) {         RowBox[{"Data", "[",
    ; [* M+ U" h, y. I4 Z( [          RowBox[{"[", * j% l# h% c/ |/ a
               RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", * o- n$ j; j: y
            RowBox[{"x8", "->", " P  e9 \0 F9 t, E. s# V. R
             RowBox[{"Data", "[", 5 f- K& g; ]6 C4 m/ D. H
              RowBox[{"[", 8 L1 x+ r" H8 v
               RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", . w9 g8 c1 ?4 w2 s( P; `
            RowBox[{"x9", "->",
    4 l& m5 ^) Y1 D" Z8 V4 u9 F         RowBox[{"Data", "[",
    . K( J" g7 L' q4 y: `          RowBox[{"[", , ~' E& v$ @. k  |, D1 C
               RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}],
      M, C4 x6 K+ [0 ~  "\[IndentingNewLine]", "]"}]], "Input",
    : u/ ^) Z0 S+ T+ u- T CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {
    % E) T* [" ]; ]5 a( \; V  3.577925286140625*^9, 3.577925306765625*^9}, {3.577958329919715*^9,
    ! O" ^- |" g: Y3 V0 s8 J  3.5779583326341195`*^9}, {3.57795892351635*^9, 3.57795892354755*^9}}],/ O% K7 J$ o9 T: B9 w. D
    1 N/ y3 O) S  |8 N3 u4 p: n( J( n
    Cell[CellGroupData[{
    % }6 N# C4 B7 E% s
    & L, R" a" {9 o/ v6 b8 N, H4 d* dCell[BoxData["y2fit"], "Input",2 g" M$ s2 N- q! t. e
    CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {4 ^# f  ]" r2 X5 @, _
       3.577925040484375*^9, 3.5779250440625*^9}, 3.5779583419785357`*^9}],* l' _  ]- e$ Z

    " r& t, H6 ^% x0 }; g4 rCell[BoxData[
    + q' h0 J' r9 f$ F! @ RowBox[{"{", ! x# M; N  o- [  z/ }/ d3 U# L2 m
      RowBox[{1 C# j' G2 t" r4 J$ O$ h7 i; Y
      "0.4853171132859182`", ",", "0.4508635216665074`", ",", # T+ }5 K8 [* A) I2 ^; o
       "0.3642119241752518`", ",", "0.42852077425595436`", ",", . m. ^$ c' A9 u! T- G9 m' E& e
       "0.4712694272667798`", ",", "0.5257533056184774`", ",",
    8 u$ u% t. Z* Y$ g5 ]! Y2 ^   "0.48620658140716133`", ",", "0.41106838915591876`", ",",
    ' s) }& m: N' L- @. p& I   "0.5486894206610674`", ",", "0.007731168540073459`", ",",
    # ]: W) B0 t; {- U* \$ R6 u   "0.013872406140339109`", ",", "0.3956995051659558`", ",", 2 Q4 Z( D9 j4 S4 N$ O* n. r( Z
       "0.3663118256142708`", ",", "0.29094217358055163`", ",",
    ! e1 }, l9 Q' z( j   "0.5453093690736555`", ",", "0.44138898880777927`", ",", : C# H: k7 g9 B: i) |! v; k
       "0.42944922031163496`", ",", "0.43092890556748836`", ",",
    & `7 n& C- T: _   "0.5942402821739969`", ",", "0.330046090785457`", ",", 2 o3 ~8 c# l8 q! ?8 m
       "0.18938658036630585`", ",", "0.4263720292858679`", ",", 1 [4 _, X. M6 j. w6 e. i% A
       "0.23377136184738775`", ",", "0.02232858193309988`", ",",
    2 ~, E7 e, {' _; e$ w   "0.244364200084268`", ",", "0.5562383565309971`", ",", 7 P% M- b" e% `" T) P0 g
       "0.13114103402954333`", ",", "0.5815052048989465`", ",", , v! w4 \! n  E8 X7 f* A; q
       "0.4253455966293501`"}], "}"}]], "Output",
    & B9 V) q! C! g; z' h$ P. X$ h CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9, 2 P( i3 d# Y% p2 e  [: e
      3.577925312375*^9, 3.577958343257738*^9, 3.577958511784832*^9,
    : h/ V( J/ {. x0 I' l6 C/ \! C  3.5779590518421736`*^9, 3.5779623249157443`*^9, 3.578012452421875*^9}]
    3 C9 u1 [2 e' @3 c6 V}, Open  ]],
    ) C  K& L& \+ V# i
    % F( ^6 E# M2 y. e; k% s& ]Cell[CellGroupData[{
    8 h% p( E5 |3 R% V' l5 \: W* R) _3 y: p- ?& _* i
    Cell[BoxData[
    : N5 v# |0 c; A; h RowBox[{"y2fit", "=",
    # c8 ~0 V2 j" \: d4 ]& G  RowBox[{"{",
    3 t9 n1 w2 Y8 U" \/ U+ x" [   RowBox[{- m! e& M$ l9 _
       "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ) b& C, Q! R/ ^, H7 l    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    + Z! l0 ?, M5 D; J! `" S    "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", 4 P6 m2 ~3 y: [9 {- e
        ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    7 ]0 a  U1 U( R3 s9 P2 N    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 2 Y" g* D3 k1 E7 b+ V9 U; B6 I
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    * [( t1 N4 {# j% S: C- z, y- X* G) n    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",   [3 c7 E$ t8 {8 S4 S. x
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", - U1 {5 q& s! s
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    9 m" H( N& I1 o1 w% `    "0.48531711328591953", ",", "0.48531711328591953`", ",",
    8 D2 A5 N4 G- M4 Y5 x    "0.45086352166650845`", ",", "0.36421192417525217`", ",", 2 |2 O$ S1 t7 S! d. s2 P. Z! s; |
        "0.4285207742559556`", ",", "0.4712694272667811`", ",", ) L, Y6 A& P4 P( b/ H& m4 k* o
        "0.5257533056184786`", ",", "0.4862065814071623`", ",", 0 P- f2 I0 P* {) I( V0 j: a1 C
        "0.41106838915592014`", ",", "0.5486894206610683`", ",", ( {8 D3 d$ q7 D+ Z1 g2 o
        "0.007731168540073532`", ",", "0.013872406140339166`", ",", * `& A; S8 E: C1 n+ l. z
        "0.3956995051659565`", ",", "0.3663118256142717`", ",",   w' i. _2 i" V2 T1 O/ F; n, |+ h* w
        "0.29094217358055185`", ",", "0.5453093690736568`", ",",
      Y9 t, V# Q* ~+ I3 ?    "0.4413889888077799`", ",", "0.42944922031163585`", ",",
    & Q4 x8 F0 V* D    "0.4309289055674891`", ",", "0.5942402821739983`", ",",
    , u% i2 `, c, i! E    "0.33004609078545805`", ",", "0.18938658036630632`", ",",
    / @" A7 j, O' `, d' Q    "0.4263720292858688`", ",", "0.23377136184738778`", ",", - w% c! B" e0 }6 `( b( ^7 J3 s4 ~- z/ q
        "0.022328581933099827`", ",", "0.24436420008426807`", ",", : K% a' B4 J$ G8 R4 ?0 v+ u' i
        "0.5562383565309981`", ",", "0.13114103402954314`", ",",
    : s& }" c% n  e5 v/ q, k0 D    "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]}]], "Input",
    # W2 e# y* [' E! C- v CellChangeTimes->{{3.577959355746303*^9, 3.5779593854019547`*^9}, {) @# ?  `  c  t$ R" a" h; ~
      3.5779594223272195`*^9, 3.577959425104024*^9}, {3.57796233399496*^9, / X( ~3 o, M! _# S
      3.57796233957977*^9}}],
    * L2 V% g3 C+ l; j* {3 i3 ~
    + |2 o0 d% x8 S+ {6 qCell[BoxData[
    4 U8 F7 b& Q+ s  U, }( Y! X+ G RowBox[{"{", 3 w7 x0 k6 A4 s. a0 x/ M
      RowBox[{
    0 p# r1 u- z( Q  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ a$ Y) W8 X7 [- r( A3 O8 u' f   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",6 S/ |% b7 j! u
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", # `) g& c2 K2 x; f7 m
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", , }% X  B9 [4 h
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    ) x. h6 l$ G+ F+ l0 P  }6 f4 l   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", ; G% Z, ?+ N( h; w3 M
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    # |7 ]2 g; V* x: f- w! Z8 }   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", # s7 A# {( h$ T. G% R! d% R! N
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    5 ~9 p2 F4 X5 D   "0.48531711328591953`", ",", "0.48531711328591953`", ",",
    ! ]4 U  P* `5 i  S) {9 w   "0.45086352166650845`", ",", "0.36421192417525217`", ",",
    . r- U( w% [1 F7 {   "0.4285207742559556`", ",", "0.4712694272667811`", ",", 3 f: S( ~) {/ @6 d+ V
       "0.5257533056184786`", ",", "0.4862065814071623`", ",",   h4 ?7 \* D; l2 Z0 A0 R* T
       "0.41106838915592014`", ",", "0.5486894206610683`", ",",
    , I( Q  _" |% Y  G7 L3 e; h! Q/ ]   "0.007731168540073532`", ",", "0.013872406140339166`", ",", 8 G9 z% ?. ~5 q+ b6 W
       "0.3956995051659565`", ",", "0.3663118256142717`", ",", $ C) Y; w  o2 @8 M* R" p7 n, R; u
       "0.29094217358055185`", ",", "0.5453093690736568`", ",", : P$ O- X8 K, ~5 j& a/ ?5 o- E5 C! J2 X
       "0.4413889888077799`", ",", "0.42944922031163585`", ",",
    . Q* S: t- @& x  z8 S9 R+ S; R   "0.4309289055674891`", ",", "0.5942402821739983`", ",", 1 a3 _3 Q* e+ }1 P+ V* h2 T
       "0.33004609078545805`", ",", "0.18938658036630632`", ",",
    3 J% b5 k" V. a4 x4 p3 F# L2 F   "0.4263720292858688`", ",", "0.23377136184738778`", ",",
    6 V1 w; Z8 B1 L: v   "0.022328581933099827`", ",", "0.24436420008426807`", ",", 5 s2 m2 u7 |- }+ a
       "0.5562383565309981`", ",", "0.13114103402954314`", ",",
    - v, E% A  b7 U. J- r" V! [% d) {& W   "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]], "Output",. ?* p3 V. ]& m, A0 F! d
    CellChangeTimes->{3.5779593961191735`*^9, 3.5779594268512273`*^9, , b6 o; _$ U/ F# }9 a# Q5 {
      3.577962342060174*^9, 3.57801245340625*^9}]2 a3 ^2 O1 [" Z. u" d% _" T
    }, Open  ]],
    7 j: v4 \: J: }2 i
    & D7 z6 p. M; j% ?5 s6 tCell[CellGroupData[{
    . Q3 U0 ~2 M; d& B5 \/ q. o! t% ]# n. Z
    Cell[BoxData[
    5 n. {( G' p0 E0 Z6 v. T RowBox[{"y20", "=", ; ?& }% l$ D1 z" B- F, H( N
      RowBox[{"Table", "[", 1 v, I% l2 K' o8 g  G: `0 Q- t: G
       RowBox[{"x", ",",
    2 M, \, B$ C! ?. p! v' v' c    RowBox[{"{", 4 F/ ~& u* w- {6 N5 ]- |4 v* G* l. \5 B
         RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",6 U( Y' i: @8 D' u' `9 q: z
    CellChangeTimes->{3.5779253628125*^9, 3.577958351198152*^9}],2 ^  o! |, l8 {+ Y  g

    + Q1 S- z7 w7 |3 z! \- ]Cell[BoxData[0 I3 x' z, }. o
    RowBox[{"{",
    8 c" ?+ s3 U5 H  RowBox[{
    1 C! Z3 ]$ c: \4 B  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", $ s7 r1 p- |9 h# G( Z
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",6 _+ K; ^$ x6 }) D- d6 K( h3 q$ F
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    & P1 C! V0 G7 t( G   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", , ]+ u9 |* p- {) r6 s2 B5 s$ u
       ",", "29"}], "}"}]], "Output",
    0 A0 L; @! ~- }" W$ ~* p CellChangeTimes->{3.57792536553125*^9, 3.5779583535225563`*^9,
    1 w% N7 s; J6 w4 V8 S8 l  3.577958515653639*^9, 3.577959053714177*^9, 3.5779623443065777`*^9,
    " I" k+ I/ _- z' A6 K- p  3.578012454875*^9}]
    # d7 N# x5 f9 U) F9 U' U}, Open  ]],2 N; Y2 L) F; `2 p
    " E! A8 l- m1 N/ e
    Cell[BoxData[& N: p; A4 [* Z8 u. w
    RowBox[{"For", "[", 7 c' b4 Z7 Z2 W5 a. P
      RowBox[{+ |+ g1 o$ {( [  I* b# X* M
       RowBox[{"i", "=", "61"}], ",",
    , Q# o: d6 j, n3 s5 C* }& x   RowBox[{"i", "\[LessEqual]", "89"}], ",",
    $ S( H$ x) D6 N+ m+ Y   RowBox[{"i", "++"}], ",", / c# f1 Q  O" P) o1 G3 s
       RowBox[{0 E( N, w2 M+ p& [, Q6 m5 Y1 g  o
        RowBox[{"y20", "[",
    ! T* s* C% k$ o4 S- Q; f     RowBox[{"[", 8 a: r1 a5 u: S7 e6 G  ^
          RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", . v3 i2 }$ `( ^8 M$ O0 d
        RowBox[{"Data", "[", : f) c$ B3 n+ a. F" x3 W
         RowBox[{"[", + m1 G& D' Y0 G; J* u3 x' R
          RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",; e) B7 m% G6 c0 m! T0 j
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    2 c: e) \; o) [  3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
      V9 T0 }; R3 X  v2 q* |. C4 }8 [6 T  3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, {
    7 |; N) ]. N& I% D: w  z% F5 i  3.5779583574225626`*^9, 3.5779583606673684`*^9}, {3.577959056849782*^9, 8 d* h* O, U& [$ P/ ]" W( y# T
      3.577959058690585*^9}}],* [, Y9 p. P2 A+ o  E) P9 N( m4 F
    * f  J5 U, Q* |6 ~- d% X
    Cell[CellGroupData[{
    ! I' P( p* Z9 I' p
    ( u: |* J  Z" R; hCell[BoxData["y20"], "Input",
    3 C! B4 s: q+ `3 d# w; Q; A6 M CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {0 H2 x6 |0 ^: }4 O9 @% m7 k# Q
       3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9, 4 P4 r9 D5 V. S3 Y* \/ @
       3.5779583657841773`*^9}],& u$ F; e6 _/ v0 e7 @( J
    4 B5 m. ]: }) m9 _7 N* v
    Cell[BoxData[
    . o5 p$ Z1 }6 K& t& w. X% T RowBox[{"{",
    ) Z, \! F6 D/ N4 O3 b( m  RowBox[{. V9 i- S" i- e6 x0 A
      "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`", ",",
    / P2 P- n4 @) ^) P5 a5 _2 C) u   "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",",
    9 j/ {- S$ L4 M) W9 J3 t   "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",", ) `& H: N4 @7 h( m2 }. B9 T0 [6 V" W
       "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",", 1 Y& ^9 Z6 e6 S# D5 s7 W
       "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",",
    % r* A5 {2 R1 g: Q   "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",",
    1 U+ [- r5 I$ O0 m; J# A   "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",",   y( y# X8 E) y( |$ g( E/ e& N
       "0.323944`"}], "}"}]], "Output",( B" w0 G) @* K& o" e! w
    CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9,
    5 G$ |) R) k) |2 ~/ z. M  3.577925393046875*^9, 3.5779583678277807`*^9, 3.577958517946843*^9,
    4 X1 N- ?- F! G/ I% W* ?  3.5779590634017935`*^9, 3.577962347629384*^9, 3.578012456484375*^9}]
    , h+ D( z5 P2 n( G}, Open  ]],
    % |- I1 @5 h4 O- C; e2 H/ R! s2 O) @  R8 @7 S+ L* G  J! U3 I) W
    Cell[CellGroupData[{! G3 ^6 b8 W2 m2 ]

    / u5 u2 b# R1 gCell[BoxData[. F& H  ~1 Z$ e4 Y6 j
    RowBox[{"y20", "=", ( j1 d  J% h5 B/ \+ H* h2 F+ ]
      RowBox[{"{", # j. z8 ]( D( G6 M7 J# u
       RowBox[{
    1 `0 J1 j2 T1 s+ F% z+ j   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", . q6 d/ V' k2 q" g$ B( i
        ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( B& F( o. L4 H  y    "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    0 i/ p2 `4 |; h' Q. ^    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", 3 ?; O0 t7 ~& u0 m& V
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 9 J) ^# U6 {8 u8 k0 c5 C! k& f
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", 8 C' f# s: I$ t& i+ f  G" S: a0 d
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", " g7 W$ ^0 Y5 u" ]
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", 9 v' |# j1 s, C& Z# U: |
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", - P0 ^0 E. p5 }
        "0.507042", ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",",
    ( p8 X, p# s# W8 ]/ c# ?    "0.338028`", ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", 1 Z7 ^. f& R' N, \
        "0.408451`", ",", "0.295775`", ",", "0.661972`", ",", "0.774648`", ",",
    $ J9 I) B+ s% L0 O# |5 h    "0.746479`", ",", "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", . B3 J/ ~$ O  c9 B9 _9 m/ Q2 d0 I+ S
        "0.760563`", ",", "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", - ^# \& l1 v1 l5 j' o
        "0.295775`", ",", "0.309859`", ",", "0.408451`", ",", "0.197183`", ",",
      K" Y* I" J1 d    "0.732394`", ",", "0.802817`", ",", "0.746479`", ",", "0.380282`", ",",
    - P6 o4 M( {% Y4 B# n3 x; W0 U# \    "0.56338`", ",", "0.323944`"}], "}"}]}]], "Input",0 Y3 |# V* u* o1 ?: ~$ r, `- y
    CellChangeTimes->{{3.577959534959416*^9, 3.5779595573142548`*^9}}],
    8 p4 A, v% m7 `7 e$ e0 l2 g7 m# T2 N  N
    : C- O7 T) W2 @* z' }- VCell[BoxData[5 x" \! I1 [) W) g( n. T
    RowBox[{"{",
    8 K7 m1 k$ G9 o8 y- C" ~  RowBox[{
    7 J/ u2 c; x+ }  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", / F' V: \" c6 P( K' h! i
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    1 T$ x4 V7 p  q- ~    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    # u* G7 P+ v7 ]2 H   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", ' j4 z* k9 \; e. s
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", " _; i0 q9 r9 w
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    & _  Y, q4 u6 x   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", 5 F) ^: ?$ [$ P. e/ i5 i! n* a. S
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", / [. z+ ]) F. }9 j  Z
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.507042`", . M/ z5 S  p1 R8 E$ p
       ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`",
    3 x/ i4 }' ^2 J5 q5 i: z   ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",",3 j8 z- `. q+ d" E/ L# P# R
        "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",", ! P& p3 S2 I1 h8 o$ s7 g+ O
       "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",", 4 E4 i& ]' [8 r
       "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",",
    8 o- G+ K; u, V( p: H; z- ^- K6 w   "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",", 9 t+ k8 x* o$ R5 |: S, h- P: X
       "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",", + s4 D: T2 ]2 r4 A  H
       "0.323944`"}], "}"}]], "Output",
    ; m3 k& U# l6 b( j+ e' h CellChangeTimes->{3.5779595594514585`*^9, 3.577962351778991*^9, 3 ]& ?* l- G% K# B6 R# D
      3.578012457234375*^9}], e7 X8 x# y- `5 H+ \
    }, Open  ]],
    8 G9 X5 s9 H5 [; h' D; B4 b4 o5 n. ?7 U" g! K
    Cell[CellGroupData[{
    $ S: u8 e8 X: k% {6 K" |" g3 @2 V) m- W+ w1 a) r" c! N% L
    Cell[BoxData[
    8 o/ r' M" {$ l7 y RowBox[{"p2a", "=", ' D+ j: @4 s, a! Y
      RowBox[{"ListPlot", "[", # E/ b, Y7 j) c5 e) L1 m5 V( \
       RowBox[{"y2fit", ",", & |7 ?+ J7 u& {# @  C( v0 W2 s4 E
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    * J9 F. S8 o( y; q    RowBox[{"PlotStyle", "\[Rule]",
    6 i+ F5 }" C3 t. x* ]     RowBox[{"{",
    + G) c# W6 X3 Y6 _. }) m- C      RowBox[{"RGBColor", "[",
    3 j8 w! w. M# o' d       RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",",
    ) |2 O8 I; }- P3 \. {. j    RowBox[{"PlotRange", "\[Rule]",
    2 }" s* n& x; J# V4 f     RowBox[{"{", - q) {' X( B0 D4 o$ _% d# r
          RowBox[{; v, G' q1 R; w( R2 k/ R
           RowBox[{"{", 4 S3 P# e8 e5 H# W% ~/ H
            RowBox[{"61", ",", "89"}], "}"}], ",",
    + y, L% `% D9 e1 d, J       RowBox[{"{",
    ) r  E8 C6 f) U7 l3 B        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    9 z/ h/ E% v& S- @7 Q    RowBox[{"AxesOrigin", "\[Rule]", $ p/ @6 C. E( |  S# f- I- V
         RowBox[{"{", % N3 w& E# a( J% O6 D
          RowBox[{"61", ",", "0"}], "}"}]}], ",", 6 }5 `8 ~1 Z; A  p4 ~/ }
        RowBox[{"Frame", "\[Rule]", "True"}], ",",
    - ^5 x; {+ W2 Q$ N3 b( j    RowBox[{"FrameLabel", "\[Rule]",
    . C$ f  y" {* U4 v- }     RowBox[{"{", 6 O- b0 N7 g+ R8 ~9 y; ~  S
          RowBox[{; x: m& c7 w3 P
          "\"\<\:7089\:6b21\>\"", ",", 1 a- C4 r. \5 }6 X% R% f
           "\"\<\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\7 {7 y5 s1 O# m& E- J. r
    \>\""}], "}"}]}]}], "]"}]}]], "Input",7 ]) d; x; y, \& @4 D
    CellChangeTimes->{
    + R1 r+ P9 W' Z6 X1 R  Z  3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {+ B7 t$ q+ t+ ]/ B9 ^& P) j9 F
       3.5779583712597866`*^9, 3.5779583781393986`*^9}, {3.577958536604475*^9, $ ~6 _3 ~- w0 c1 L6 G  g1 H. X9 N) P. C
       3.5779585491624975`*^9}, {3.5779592802577715`*^9, ; g: l8 T4 z% D1 I) e7 [, o& o- r
       3.5779593014270086`*^9}, {3.5779594039971876`*^9, 6 M# R/ M, Q6 ^
       3.5779594059783907`*^9}, {3.57795949706695*^9, 3.5779595174717855`*^9}, {! f: A% N/ S9 M6 ~
       3.5779604302529774`*^9, 3.577960442311798*^9}, 3.57801246978125*^9,
    : Q5 C* L2 y( p) F7 P; p) F" e   3.578012920859375*^9}],+ d: A4 Y( x, a2 G; H. p+ O) L
    . c, Q, e! u% x5 }
    Cell[BoxData[
    ; e& d0 l3 O: E7 _& P8 j GraphicsBox[{{}, {},
    " X0 \* r: E, b; d0 }+ h   {RGBColor[0, 0, 0], LineBox[CompressedData["
    ( P6 m! B1 o: B8 @( m0 m; U9 }1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM: X- _! P) B- {2 r7 v; E
    /g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ
    6 O4 G. @, L* m# X& a, h9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P
    8 `: A1 q7 \5 {8 E3 H* P7 VofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC7 _2 N( u8 o) e, t
    qPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK( c8 T: y6 n2 i" I
    1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx' }! R! r7 D% ]* Q; O
    0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p14 {  {  w9 S, P  w' T% k% F
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH
    ' V$ ?/ o1 ^- r& R. o99yxuG0PAHw7nyU=
    ) e1 A' w0 w$ p0 s  C9 b# C     "]]}},8 G8 t1 e) t# ?  h) Z
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    4 |6 @) b  N( `0 f( b/ G" e  Axes->True,
    6 w( a) \; u6 z2 w- |7 b  AxesOrigin->{61, 0},. d! s$ t! x# W. \  ~: l1 W; |
      Frame->True,# F3 \! y6 E1 `9 A( y) u% G' P. B
      FrameLabel->{3 y% j; |  c" ^! V4 r' A
        FormBox["\"\:7089\:6b21\"", TraditionalForm], / H0 @/ }9 D) I7 d  J- \/ x
        FormBox[* ~  S, ]- R! q0 M2 k) U4 \- H' \
        "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"", % U6 D+ G# N7 R! V/ O2 N
         TraditionalForm]},
    % C$ |7 z& N+ F. F+ h  PlotRange->{{61, 89}, {0, 1}},
    # A; O; Z  z. I: h  PlotRangeClipping->True,
    2 d+ v2 c7 a6 U* }# W0 y0 K5 X  PlotRangePadding->{Automatic, Automatic}]], "Output",) q" j5 {6 Q0 K8 ?' _
    CellChangeTimes->{
    ; @9 Q" G7 P% f/ j" H+ A, A' X  3.577925144625*^9, 3.577925396578125*^9, 3.5779583797150016`*^9,
    / ^* K' x" @( T4 d4 O- K   3.577958519990446*^9, 3.5779585510813007`*^9, 3.5779590670678*^9,
    0 _1 \' U5 K. Q! n   3.5779593035642123`*^9, {3.5779594075383935`*^9, 3.577959430158433*^9},
    ; [6 l7 i/ t4 L! N! _/ i   3.5779595184233866`*^9, 3.5779604438874006`*^9, 3.5779623548833966`*^9,
    ! h; E1 e4 f; E5 u/ R0 P5 u) H   3.57801247209375*^9, 3.5780129225625*^9}]: u& z/ z: c+ r
    }, Open  ]],
    0 `, y0 p# \; h; I& `3 k# x7 Y1 ]/ v1 L/ j9 F  x2 y) z+ N2 `$ [
    Cell[CellGroupData[{4 n. H8 i$ E# `9 P! O4 i
    ( P4 y1 l/ p3 r% Z
    Cell[BoxData[: N7 u0 p% E( t5 Q( U1 _! G0 b) }
    RowBox[{"p2b", "=", 2 ~- P& ?) S, D7 I+ K
      RowBox[{"ListPlot", "[", % ~0 z! |1 _/ b2 I. W2 q0 c
       RowBox[{"y20", ",", - o) d, k5 ]  g) k; j1 Y6 B
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",", 5 x2 b4 g1 _) c2 _
        RowBox[{"PlotStyle", "\[Rule]",
    ! l! @( m2 F; a" T     RowBox[{"{",
    # m/ z1 w1 g+ Y      RowBox[{
    - B, o- l3 Q9 F) K       RowBox[{"RGBColor", "[", - E2 X9 L) h8 j" y" ]0 Y7 b  @
            RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}],   o/ Q  ?! f( v
        ",", 1 G4 @6 i: j8 Y
        RowBox[{"PlotRange", "\[Rule]", * ^. B8 M; ~# x, u" s  c+ k
         RowBox[{"{", " k: P- P. e, G1 L+ e6 I  I& Q& [( w
          RowBox[{- J4 C" V8 L! }6 f7 q+ @( }
           RowBox[{"{",
    9 c3 U/ O' k' ]3 ^! T# B        RowBox[{"61", ",", "89"}], "}"}], ",",
      N( z" m; t' c/ `1 }8 ^8 }       RowBox[{"{", 5 N' ^  T5 O3 X3 e4 z+ O4 `' m. z
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", ' H7 D7 _7 G; Z8 x  U8 O# d
        RowBox[{"AxesOrigin", "\[Rule]",
    1 x8 J$ R! {3 \0 B5 k  J     RowBox[{"{", % V6 L+ ?2 x! `1 O+ a5 h" Y
          RowBox[{"61", ",", "0"}], "}"}]}], ",",
    % f8 i' w+ ~9 H& ]0 p    RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",3 k' o  H2 A% k4 c  {  N2 R% p
    CellChangeTimes->{
    6 r6 r4 C1 E5 W, B  3.5779253991875*^9, {3.577958382429406*^9, 3.5779583843326097`*^9},
    ( T, F% v% R3 X) |2 q   3.57795855655691*^9, 3.5779595724462814`*^9, 3.57801248346875*^9}],+ O$ r* Z' k5 P8 y3 ^& f) x
    + m1 u9 b: m' G2 p9 t
    Cell[BoxData[
    8 y9 [6 t8 Y2 w" f2 i GraphicsBox[{{}, {}, 6 K, w2 G1 N4 }6 a5 E
       {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["# X0 \7 T# C5 O( c
    1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn
      b" f' Q7 [( u8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV9 Q( Z8 s* t& ?1 R1 e) K
    c/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc8 F, v2 x5 e" R( _1 M9 o  T& A' O
    iX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk4
      B/ y$ v' }9 ?6 i) [, i* K* [# VTZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO
      q. |. p" x8 T. yfzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB
      E% x. ?/ M" @TWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG3 G3 U; W/ B" `1 a3 j' r
    p0OYg4Fg/tz63VfsAdsCnzU=
    7 q  O" _# J5 z     "]]}},: l8 r# X& b- V  N
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    . M, y# E8 L5 m  `  Axes->True,- F8 A1 z4 u; O# R" o8 Z
      AxesOrigin->{61, 0},
    8 H( f# ]; l- t  Frame->True,
    & W- E' ?3 A+ r& o  PlotRange->{{61, 89}, {0, 1}},& I' H5 i9 Y- |2 i# O) @! K
      PlotRangeClipping->True,6 w" i; k/ t) G, }! f
      PlotRangePadding->{Automatic, Automatic}]], "Output",! {( t# [4 c3 A2 B$ v6 f  l
    CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9,
    + n9 `" Z# M) T7 `$ K" d. ]  3.5779583861890125`*^9, 3.5779585219092493`*^9, 3.577958558132513*^9, - w: H/ e$ P: ]- ~: u
      3.5779590691114035`*^9, 3.577959577906291*^9, 3.5779623569426003`*^9,
    & s- X' \( P$ i! k  }$ [. P3 ^  3.578012484703125*^9, 3.578012925875*^9}]
    3 |: j, F4 k+ |0 T* k}, Open  ]],0 M% j% {1 M, k. P% E) w6 X
      q1 u0 e3 p4 x( R! j
    Cell[CellGroupData[{
    - b& `% T- U8 F+ y/ c$ B$ x6 R* C$ \! Q# Z" f3 m" l# t- \) r
    Cell[BoxData[
    ' Q) U' |; O' o7 A RowBox[{"Show", "[",
    ! R7 l5 M3 I1 B) e$ {" Q+ g( [  RowBox[{"p2a", ",", "p2b"}], "]"}]], "Input"],
    8 ^( v4 I* d7 q* y: |, c# X  c* Z) b  U; n, I6 z; \+ N
    Cell[BoxData[. E0 y) f. O0 Q* G
    GraphicsBox[{{{}, {},
    ' t/ U6 e8 w1 ^7 B5 W2 U9 i    {RGBColor[0, 0, 0], LineBox[CompressedData["# U4 x- O9 g( q: j% X
    1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM
    7 X  s: m$ g  e; Q0 {/g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ
    2 ^, H8 b2 j' q5 p# C9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P
    ( z7 T) g  j6 o9 M: ^$ kofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC
    4 B6 q2 x# F1 ZqPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK
    3 Y; ^) Q; C* d8 m# G+ z# f) S1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx* Q4 V/ o" Y- z* Z3 K% Y0 b( ]
    0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p10 x7 p* m: H) J. t. y* P# o
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH0 M8 ]; D7 m. M
    99yxuG0PAHw7nyU=( C+ W2 x( Q+ t, E! b
          "]]}}, {{}, {},
    0 ~( i* L' L) @) Z- @7 Q    {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData[". s% |2 z' |  B& w9 {! }
    1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn' `2 S# Y+ G- s3 v0 i  Z
    8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV
    2 {! p' @. s1 n+ i1 Q# Qc/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc% m5 b4 y! |, v/ |& a
    iX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk4( P$ \6 q2 Z8 H# M$ \
    TZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO3 O  t* P$ [8 C' `; c
    fzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB
      E# e7 o& \1 l+ f' A( cTWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG* ^' u5 h$ [& |  z+ j3 w  l
    p0OYg4Fg/tz63VfsAdsCnzU=1 n) |4 P9 z/ W' H7 R7 b
          "]]}}},2 z) t% ^2 ~  r5 t: j! z
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    % S3 C8 M2 l( K8 E7 t. V  Axes->True,
    2 X- Z7 o/ f* F3 `  AxesOrigin->{61, 0},: W/ v6 a) k3 l
      Frame->True,
      v  ]# I% A( \( J( t  FrameLabel->{
    9 `/ B0 D- D# T# E4 [! I. s    FormBox["\"\:7089\:6b21\"", TraditionalForm],
    ; O- u; D' [/ M* k% _0 w    FormBox[* i; L1 |$ @" D, ^/ t6 q; ]! q- {
        "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"",
    : s0 ~7 b! M& p5 W+ p6 q' Q7 t3 f     TraditionalForm]},$ V3 ?$ y3 `, \
      PlotRange->{{61, 89}, {0, 1}},
    & I- [- e& w) q/ b  PlotRangeClipping->True,* t$ u' ~) X1 q  }, z
      PlotRangePadding->{Automatic, Automatic}]], "Output",7 K! P6 a% [% @9 F% a( I' f
    CellChangeTimes->{3.5779623624182096`*^9, 3.5780124863125*^9, ! A: Z$ N. p0 p; @& X
      3.578012927734375*^9}]
    " v! c1 W; u, {# Z' R/ Z}, Open  ]],  O' Y2 G, m/ L3 _, K3 Q; P

      _1 C  b! h8 z3 ?$ |9 S5 L  T% yCell[BoxData[" _3 {5 ^2 p' a9 {. X
    RowBox[{"\:ff08", 1 r4 q; {. u% @2 p0 A9 b+ Q; ?
      RowBox[{6 _8 w- w: p! R. r: @* m
      "\:5df2\:77e5\:521d\:59cb\:94c1\:6c34\:8d28\:91cf0", ".7406",
    : T# I3 ?) V. e+ \3 L   "\:3001\:5e9f\:94a2\:8d28\:91cf0", ".4621", 8 c& [) k2 B( j
       "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea60", ".5208", - K" @( [6 d: t' x5 Z
       "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:542b\:78b3\:91cf0", 3 Y; L8 ?; f4 M2 i2 [  M
       ".2221", "\:ff1b\:76ee\:6807\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\! x: o6 v$ {9 z0 a9 Y) \& G  P5 _9 [; e# ~
    \:4e3a0", ".6224", 6 M! j8 \9 z* H$ F  G' N
       "\:3001\:76ee\:6807\:94a2\:6c34\:7684\:78b3\:542b\:91cf\:4e3a0", ".2521"}],
    0 C4 k( D! D( T0 ~* D$ {   "\:ff09"}]], "Input"],! ^5 i0 k, \' ~/ b1 N. ^: T. G

    $ t" X$ I0 {# W5 W! f0 H% DCell[BoxData[: k  j6 E$ V- h6 K. G0 Z4 M6 R
    RowBox[{"{", 2 N1 v' w  Y0 h5 h' S$ Z
      RowBox[{
    " |  q5 h0 w$ Z: s  w  "\:94c1\:6c34\:8d28\:91cf", ",", "\:5e9f\:94a2\:8d28\:91cf", ",", ( L7 V; c$ X3 U5 V) d  ?: A' N2 l
       "\:5439\:6c27\:91cf", ",", * h( c2 O# a/ S- B. _& J: B( `
       "\:4e0b\:526f\:67aa\:65f6\:7684\:542b\:78b3\:91cf", ",", 9 `) q5 a4 I. {. H8 c
       "\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea6", ",", 0 i3 ^$ S2 ~# \& L
       "\:5757\:72b6\:77f3\:7070", ",", "\:8f7b\:70e7\:767d\:77f3\:7070", ",", 5 F( E) C  L/ J! n& q  u$ P
       "\:83f1\:9541\:7403", ",", "\:5757\:72b6\:767d\:4e91\:77f3", ",", 2 P0 L4 F# ~' {, a  V: `
       "\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf", ",",
    ) N% D8 j: D  i  W' s3 B$ e   "\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6"}], "}"}]], "Input"],& l+ f8 u$ ?: s( _: y& [& w) u$ o6 A  d
    ( j& s9 Y- }5 Y# u# Z% B2 g
    Cell[BoxData[" "], "Input",: @4 n2 V8 B# b. [) r
    CellChangeTimes->{3.577962834553033*^9}],
    4 H3 S" ~- P' M3 e3 {( _: r* f: s1 v( P/ |/ Z9 V5 Q
    Cell[BoxData["\:94a2\:6c34\:7684\:78b3\:542b\:91cf"], "Input"],
      A0 M; K% j" \$ ?9 U
    + K7 @0 D% L( H, }# r* W' OCell[CellGroupData[{. Q$ v8 q* T5 i8 s) _3 L

    7 o7 z9 p- O9 I+ c9 A$ d) aCell[BoxData[- P8 Z7 f+ }: j' i, |! F
    RowBox[{"y1", "/.",
    ; K1 X  z( c1 \1 V  @  RowBox[{"{",
    / E# Z5 l/ F# F( J: b* r   RowBox[{
    & F( u. o6 D7 f! N1 y6 \    RowBox[{"x1", "->", "0.7406"}], ",", 7 H; z. o# e5 K  X) ?
        RowBox[{"x2", "->", "0.4621"}], ",",
    $ X6 h) ]0 {( m    RowBox[{"x4", "->", "0.2221"}], ",", ! ]8 d+ T/ u) P* S
        RowBox[{"x5", "->", "0.5208"}]}], "}"}]}]], "Input",2 g" M+ R+ T& T' `/ j
    CellChangeTimes->{{3.57796267209435*^9, 3.5779627224200373`*^9}, {
    - H% u/ M8 c6 _3 Y  |' n) g0 |  3.5779627663029137`*^9, 3.577962774820529*^9}}],/ a! ]1 ]; X' ^  h0 a

    8 ~! A7 S( l: i- xCell[BoxData[. ]5 ?9 o- n  [, `9 O& w
    RowBox[{
    $ [# M, ^) v* |1 ?) b5 d( b$ p  RowBox[{"0.2286149508637297`", " ", ) ^7 ^; u/ F& Q' \" D  U
       SuperscriptBox["\[ExponentialE]",
    / R; B, Q- C; |' J    RowBox[{"3.1415926535897936`", " ", " I- [) c6 N: f. E& W% n5 u2 ]/ K
         RowBox[{"(",
    6 ~# f" |: P2 `1 \5 V$ v      RowBox[{
    % s- k) J, n) i1 U* ?& ~3 s8 G       RowBox[{"-", "0.17911224641499998`"}], "-", # T% l) x  D: Q5 T6 C
           SuperscriptBox[5 \/ s) p+ n- k. v( a! P6 I& F3 X: E  L
            RowBox[{"(",
    ) T& T  x  o8 f& H         RowBox[{
    * Q$ T0 m- K2 t; Z4 ~  p& W          RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", % J" P" d' [3 n( I
           SuperscriptBox[
    6 r" k$ j  V# R2 d7 |        RowBox[{"(",
    ( b9 j3 B5 S; c- E. t         RowBox[{6 o$ Y& J9 b) j4 V9 L! z2 @0 i
              RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    , D, g9 y* E7 c% {; b; v, \2 o       SuperscriptBox[( K' c$ b2 c  h3 L4 n
            RowBox[{"(", / a9 c/ ^+ V1 c  z, F# T6 K
             RowBox[{
    2 [# T. |) i2 Y/ x0 x2 B6 x7 w0 w          RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", 0 r8 ]: {! m! f: X; L
           SuperscriptBox["x8", "2"], "-",
    : i2 J4 v! u4 M1 }$ ~6 Q! P! o2 G       SuperscriptBox[7 s- t0 S( q2 t9 J& ^
            RowBox[{"(",
    9 z- E7 x+ O# z5 i! m         RowBox[{
    ! X+ U2 b3 {7 k+ v          RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+", ' |% t" m( T9 F) q, g2 L9 h4 b' z3 u' X  Z: A
      RowBox[{"0.020180806675835994`", " ", ; e7 g6 s4 K5 @
       SuperscriptBox["\[ExponentialE]", ) F5 O+ Y4 V* T4 |
        RowBox[{"3.1415926535897936`", " ", 0 W2 K& L, S0 `: Z, R) a
         RowBox[{"(", ! x; K& `2 O( {' x
          RowBox[{+ e: k/ W; l/ P& j( a; w; z) N
           RowBox[{"-", "0.105619387859`"}], "-", : j6 N' f; G8 g7 t9 R
           SuperscriptBox[/ W0 {( U8 e* \% _
            RowBox[{"(", / E# h' ~) j7 A5 i' ^% A$ j
             RowBox[{
    ; i# K# w( l, X: x& l  h% n1 {          RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-", 3 x* o) C/ X: M7 b7 a+ g2 W
           SuperscriptBox["x6", "2"], "-", , X& r; p. }8 ^( C. N3 V
           SuperscriptBox[0 Z. G: T0 f3 N: O0 U+ C+ {
            RowBox[{"(",
    9 ^$ e9 y- I8 Z% t! N( z4 h% Z         RowBox[{7 [/ `; m8 J6 E: c* `
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    " x3 l% o: p+ T; X" `: I       SuperscriptBox["x8", "2"], "-",
    , w6 ]" L) G; V6 H7 ]       SuperscriptBox[8 G# R/ _/ B! N3 a. Z4 ]" ?
            RowBox[{"(",
    ) X( Z; s. d1 x         RowBox[{+ H  U2 t2 ~+ S+ A* V% L5 p
              RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 9 f  r& ?4 m* v+ h7 B- \
      "+", 0 N4 U! \' V1 ?4 z! R& A( K1 ~# X9 [
      RowBox[{"0.13092706311748437`", " ",
    1 {6 m7 d7 C0 N   SuperscriptBox["\[ExponentialE]", * B2 k5 B* \% K/ n
        RowBox[{"3.1415926535897936`", " ",
    ( m" z$ b. G7 U( d& b3 C- w     RowBox[{"(",
    4 o. R) H% K, U      RowBox[{! o& _6 ~2 M0 Y, {( Y* m
           RowBox[{"-", "0.236605670085`"}], "-",
    3 |3 ~/ }- J# s7 c  ?/ `# |( Q       SuperscriptBox[
    * g1 }; K  X3 j2 z' [        RowBox[{"(", $ k/ y/ o7 `7 @- P1 ~4 O) e/ l0 n
             RowBox[{
    3 t/ J+ J; W! m( a& n0 P" g          RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",
    ( d& i( L  ?( C# v; O       SuperscriptBox["x6", "2"], "-",
    / o6 W5 h) D% n2 y) h& a       SuperscriptBox["x7", "2"], "-",
    ' W; ^' G. }" D) d2 V       SuperscriptBox["x8", "2"], "-", * i6 U4 z0 W2 S
           SuperscriptBox[
      [3 |8 S4 r! s' b* M        RowBox[{"(",
    $ k* ]3 O4 [6 ], m' D  L         RowBox[{( }' j6 I3 L2 _3 D  f( B& o) r
              RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], : }- J! F( H  G" \' a
      "-",
    $ ?( C1 n" Z/ a1 R, H+ i0 u: v  RowBox[{"0.033459349088924784`", " ",
    , j% [) i1 [" @* g: F3 X   SuperscriptBox["\[ExponentialE]",
    - a9 P0 J# R5 D1 `3 R    RowBox[{"3.1415926535897936`", " ",
    6 c; p  u+ |$ P% @& b     RowBox[{"(", " t8 \2 S5 x. u9 s/ x7 b: M
          RowBox[{" n) o  T( g" R' I! {
           RowBox[{"-", "0.46221081830200006`"}], "-", ( i8 j: r4 @7 d3 c$ q" g/ R
           SuperscriptBox[
    " @, Y' A1 @( U6 X. Q* d+ T0 a        RowBox[{"(", ) |% ~0 h8 ?# z* W+ r' D
             RowBox[{  X% h' N' ~- F. i9 A
              RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    % ^3 \5 j3 |8 U3 r- r% s       SuperscriptBox[: S- l: k+ V  s3 [8 [+ m$ G, m
            RowBox[{"(",
    . ~7 y4 [0 d( T# o. z, c; c         RowBox[{/ q3 I* T& {  j/ |& r4 u
              RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    - k" f/ c9 G7 r! _       SuperscriptBox[# S0 K  }9 q9 Q1 b# V3 z
            RowBox[{"(",
    0 W1 N7 _8 }2 @7 I6 ~         RowBox[{
    / s; f, _( }6 J' [3 x) E- O& h          RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",
      o1 e# r% m/ x# q: D       SuperscriptBox["x8", "2"], "-",
    & o5 }3 _1 q# Z5 q       SuperscriptBox[0 y7 l9 |4 G, Z
            RowBox[{"(", 5 o7 `' c3 k4 G  ^& T
             RowBox[{0 V8 [7 |5 j$ d2 J" E2 U% i
              RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 8 I# \4 K$ c8 r. ^# M' k7 H# g
      "+", - u& U6 b' d' u* K$ N9 I
      RowBox[{"0.39611806709006653`", " ", % w3 E( D, r# G
       SuperscriptBox["\[ExponentialE]", - K' |. c+ v6 e, x7 A5 g2 ]
        RowBox[{"3.1415926535897936`", " ",
      i$ D! @% V6 Z# B     RowBox[{"(",
    ' D4 Z- F) {; Y1 N, k: C, Q% ]      RowBox[{6 \7 p  a6 y5 ?& L# o
           RowBox[{"-", "0.5837889295140001`"}], "-", / Y/ S% C, M% A/ d2 p% ]- H* a
           SuperscriptBox[( u0 V& M! J2 L9 S/ ~0 b
            RowBox[{"(", ! S% p, X* x5 s, S- @: f
             RowBox[{
    1 S5 |' [1 g" q8 W4 Z; ]& `          RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    8 y. o% D; @/ J: F% P       SuperscriptBox["x6", "2"], "-",
    9 S# i" e# Z4 O! k. W: p& @" W6 R$ o       SuperscriptBox[
    0 J- F! j+ j$ F" b  |) n+ L" N/ E' z' m        RowBox[{"(", 0 m, C+ e- u7 j; Y' \6 T
             RowBox[{  ^. Y. Y% ]/ `* F! S
              RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    3 K( C9 Z8 }9 S  C7 Z2 u       SuperscriptBox["x8", "2"], "-", 7 L- N. \3 \' K' h
           SuperscriptBox[
    ; V" M1 e' _: x' Z6 c        RowBox[{"(",
    1 O# H3 M+ z% T3 L8 j         RowBox[{
    4 R7 i; @* F6 I& L/ k+ N/ {          RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 9 [4 t8 @! }, F) e! H' h
      "-", 5 b7 H* t. b9 a1 R( z* k6 b
      RowBox[{"0.19996885877792045`", " ", 3 y' \/ B' q: o" u3 |
       SuperscriptBox["\[ExponentialE]", % c4 K0 r2 K5 ?0 M$ E, ^! V5 s
        RowBox[{"3.1415926535897936`", " ", ' K% l, F# I$ t# {$ G3 J
         RowBox[{"(",
    6 R( f- B) N. ^2 ^: Q; H; L+ W      RowBox[{/ a; A& p7 q+ [! k- g5 d
           RowBox[{"-", "0.19030188470200005`"}], "-", 5 y$ }0 {: J6 b& n
           SuperscriptBox[
    ( @& G" H( Z7 Y        RowBox[{"(", 1 `* P$ p- M1 d6 r
             RowBox[{
    ( s$ s2 |/ m  S" G" `% F8 }5 C          RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
    3 ^! I, w' p% B! u# h- O4 g       SuperscriptBox[
    - h' h* z: h6 u0 ?& X        RowBox[{"(",
    # I+ l3 ], P+ v0 i2 Z) F, F% B: f- ?         RowBox[{
    1 O/ B$ T" J  {          RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    & E. m) O5 C. [# j7 g       SuperscriptBox["x7", "2"], "-",
    3 C* F' ^' J! y  ?       SuperscriptBox["x8", "2"], "-", 6 W& f9 w2 g7 }8 m8 x5 F5 R/ A( i- f
           SuperscriptBox[; l8 X9 z9 C8 r7 B+ M6 N  Q
            RowBox[{"(",
    6 w5 h7 M- ?% A( U( t" D         RowBox[{7 w, f1 c2 k! Y
              RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],   z) w& H2 `8 o' [0 T
      "+", # X0 B7 J- N+ B1 J1 B9 v$ X& F
      RowBox[{"0.23580523388620744`", " ",
    5 A" O: C( \$ G2 I3 W; h   SuperscriptBox["\[ExponentialE]", % v% l  w( J) q8 n) X
        RowBox[{"3.1415926535897936`", " ", 0 d2 \* H6 k% ]: e- J. e, A- Z
         RowBox[{"(", ( S6 J0 C( u$ e" u
          RowBox[{$ m0 O9 Y, Z2 h5 E
           RowBox[{"-", "0.28518780882`"}], "-", 9 a3 R% u8 _) W- l9 `6 V
           SuperscriptBox[
    : t/ M) K3 D5 _' H+ `6 _        RowBox[{"(",
    " ~" N+ A% n% ^4 y$ Q         RowBox[{
    - t  G% ~5 z4 {# [" J* R8 a5 Z          RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", : ^; ?4 q. O" S9 W* o
           SuperscriptBox[& [- ]$ P$ W% T8 R. u
            RowBox[{"(",   R( R& |/ `. ]5 _
             RowBox[{; e" T$ [; Q, u  L) Q
              RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    0 u1 I) w* c0 `       SuperscriptBox[
    : o1 A$ k  U+ G& S. s        RowBox[{"(",
    8 q$ I3 l, [: K$ C7 Z5 T, G! D         RowBox[{
    1 j* K# _6 E) M, z, ~          RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",   ?6 O5 R- E) W# S, h7 Q
           SuperscriptBox["x8", "2"], "-", # ~$ d; V' _6 A
           SuperscriptBox[
    ( F; [0 `$ M% h$ |        RowBox[{"(",
    : u) W( B3 |  A4 m7 j( e         RowBox[{3 t/ V$ ]) k0 a- ~, g9 {
              RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], + r$ G. w( r! j8 R% W
      "+",
    - x1 x( ]5 f  N+ y" N  RowBox[{"0.667027259367853`", " ",
    6 X5 B. V- u. ?" `9 Q   SuperscriptBox["\[ExponentialE]",
      H/ `4 r$ ]2 V  g! R4 E    RowBox[{"3.1415926535897936`", " ", * \4 t7 W6 L6 G2 g! `) n' Q
         RowBox[{"(",
    % m. q) K$ F1 P1 S" g$ x% ^      RowBox[{
    % C- Y2 D3 e% t) _% d2 B) e! c       RowBox[{"-", "0.11387365200400001`"}], "-", ) H5 W0 a7 }' `! I, @7 M: |8 q
           SuperscriptBox[
    4 q" Q3 [: Y4 s6 W1 h        RowBox[{"(",
    # {6 X; E: z! U" G7 {         RowBox[{
    " m8 J, H" p" i0 g; J5 U) Z          RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", . {* [# q$ V/ N+ C' j# ?# z# B
           SuperscriptBox[
    6 s+ y4 i% m1 x3 i, e1 Y& E        RowBox[{"(", # B. Z8 L- H2 U. |) l& @. r
             RowBox[{
    6 L9 }9 G4 P% d% D& S6 S          RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", $ q  k4 J* i# d3 W3 F
           SuperscriptBox["x7", "2"], "-", . Q, E  |( u6 p
           SuperscriptBox["x8", "2"], "-", . ?% m3 a) p  M" ]: b# A
           SuperscriptBox[
    2 S" F( g4 x- }: S        RowBox[{"(", 2 L0 k% a  W; j( f/ n* q
             RowBox[{
    - F7 i5 U5 D6 G( e          RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ( n' o! U& @- z% `: Q) b: s
      "+", 6 [+ Y. }* L) m6 b# B
      RowBox[{"0.25282438852646905`", " ", * }7 B0 [& E/ z- s8 X0 `/ B% C
       SuperscriptBox["\[ExponentialE]", ! T4 @6 l& c& G- ?# ?$ I0 L
        RowBox[{"3.1415926535897936`", " ", " g# ?; W7 V$ B0 m5 R& z
         RowBox[{"(",
    9 g0 Y! ]9 L% l  [/ Z0 M      RowBox[{2 ~) V; p! |! S: V! |
           RowBox[{"-", "0.11442644782500001`"}], "-",
    + R) s' U0 P/ z6 x! l       SuperscriptBox[
    2 N. |9 [# U! P9 B7 G. m        RowBox[{"(", & {3 n) I8 c# d
             RowBox[{$ p$ a! \  m5 l* e; n1 P! y( _/ n9 P
              RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    ; {  E* G7 y8 y9 f9 A; R       SuperscriptBox["x6", "2"], "-",
      E- O2 Y9 `3 }0 n. P+ J+ r       SuperscriptBox[2 g2 Z. ~8 w) }: \% c: j
            RowBox[{"(", 2 I! z0 G& Q3 [# A
             RowBox[{
    ; J( x/ K# _  p0 @! X: {          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    7 H4 K  n, J4 l  R" `# U& E       SuperscriptBox[
    ( m* @5 s1 d2 T/ N        RowBox[{"(",
    ' s. K( y2 V9 _2 O9 K! f6 }         RowBox[{* F, W! X) n' @+ K
              RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-", : C+ a. c* l6 Z) k! i
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",   ~- f( U: D5 {# }7 w0 H
      RowBox[{"0.07581214474544536`", " ", 3 l. T- n, h% s
       SuperscriptBox["\[ExponentialE]",
    3 Q4 t8 Q$ M5 S8 X. P    RowBox[{"3.1415926535897936`", " ", " c0 L. I. X/ [) h
         RowBox[{"(", ; w4 X) x* y& P7 P& ]
          RowBox[{
    ( a% h" o! g4 a( y7 q: m       RowBox[{"-", "0.21008576609800003`"}], "-",
    2 o8 j! T& o8 H; |+ z: Z+ Y3 R& J" `       SuperscriptBox["x3", "2"], "-",
    1 g! C; m/ `) x0 }       SuperscriptBox["x6", "2"], "-", " b; A  O0 z. B! p; Y$ t- ~
           SuperscriptBox["x7", "2"], "-",
    1 D1 k) o9 w( D/ Y* N* c       SuperscriptBox[
    ; e: a. z; q5 O        RowBox[{"(",
    . j# m$ f2 J7 R9 ^" @9 h: ^7 Q         RowBox[{; O4 U7 @# B% M7 f
              RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", 5 I. J* u& r: d% o
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    * t* D* |: `; N# q* N; e' J+ \3 k0 b" p1 R  RowBox[{"0.10599338351843121`", " ", 1 \  s' S5 L+ {% i+ m; B7 K, J  {
       SuperscriptBox["\[ExponentialE]", 7 Q1 N6 F* I$ r& W$ F# [- h6 X* Z8 R
        RowBox[{"3.1415926535897936`", " ",
    7 Y! g! v7 f8 v) H5 m6 O6 O     RowBox[{"(", & f+ A. R7 M- a/ J/ ?* c% U; |" {) |
          RowBox[{
    + P9 H9 `' i$ M% H       RowBox[{"-", "0.4481471925460001`"}], "-", " E" C) `7 w7 l
           SuperscriptBox[9 `: C% C& h3 b
            RowBox[{"(",
    " a  }/ r+ \. _7 X( \- `. D6 ^  e8 N# Y         RowBox[{  D* v; ?" J: M5 c
              RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    9 m: y) U: N- A( a! q  S       SuperscriptBox[- U; P7 ~( d* C7 ^
            RowBox[{"(",
    # {, y  G* ^0 ~! f2 z2 J         RowBox[{
    ( W7 d  u& T. H1 @: y; S4 x4 x% o1 w0 ?          RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", 5 Y2 |' Q* Y+ \% C- {+ e
           SuperscriptBox["x7", "2"], "-", ( r- E  S" D; L% W6 z) [
           SuperscriptBox[
    % u  g& y8 S5 r: \6 C1 `        RowBox[{"(", 4 Y& h5 ~# W- E. J! R9 h2 n8 G  [
             RowBox[{0 \6 v5 w0 \" @3 ^3 o
              RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-", ! z; m0 o8 W  |% ~  R
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", . v% X5 V3 i7 P3 x5 i' ?/ j( d
      RowBox[{"0.5008208386064421`", " ",
    , ]* n. [2 h) J3 S, y   SuperscriptBox["\[ExponentialE]",
    & Y/ ^" f6 ?/ k2 y! y    RowBox[{"3.1415926535897936`", " ", 6 t" T* U( V& T1 o# @  J7 m$ w
         RowBox[{"(",
    " _4 M& G. K" p) }/ d3 D9 [) e  C      RowBox[{
    7 P+ R0 k5 R* _( }% e( n2 `' h       RowBox[{"-", "0.08722659614000003`"}], "-",
    0 d3 ^" \* ^" j. z       SuperscriptBox[
    % W2 S' L$ A0 T/ @        RowBox[{"(", ! K/ L# s6 X0 L$ o1 G0 q
             RowBox[{
    ) q/ |+ `, H7 m& J          RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", * j0 Q* @- H6 y2 m9 W6 E3 ^4 J( b
           SuperscriptBox[
    ' R/ Z5 k  Y7 {3 k1 m- S1 N0 b& E        RowBox[{"(", , T! ^, Y# p7 p
             RowBox[{4 w! {- B. K" H& }8 z, Y" u0 ~
              RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", ' U% H8 D* G& E: T5 m" v) z3 w, j
           SuperscriptBox["x7", "2"], "-", 8 @+ ^8 `, F" {; h4 f
           SuperscriptBox[
    3 w- z: {8 A' o+ ^3 _# p        RowBox[{"(",
    + a$ W2 O( T* D  w         RowBox[{
    / K1 i/ N7 e( f* X          RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", , Z0 C6 b6 l( F& d# g
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", ! e5 K# x2 U  F$ e" X. [
      RowBox[{"0.32564305572552343`", " ",
    ; q) s, Z0 L3 R; H/ v; m0 f   SuperscriptBox["\[ExponentialE]",
    - ]" V, G6 e. u( E: u    RowBox[{"3.1415926535897936`", " ", 3 [9 s: G+ l2 w8 `! w3 [1 ?
         RowBox[{"(", " K# N- L" t* _3 ^
          RowBox[{
    , s" s" \' D1 e3 w  e& c       RowBox[{"-", "0.23738217000100004`"}], "-",
    " t: E1 I7 ^5 I1 w! p: M       SuperscriptBox[+ O9 k5 ^) ?7 X" n8 R- i: v- B
            RowBox[{"(", ' _; R* `7 F! V+ D- e0 b
             RowBox[{
    - Y/ l* V+ V& `  a7 K0 M          RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    : E) z% {# b& t. X) S1 e       SuperscriptBox[
    5 g3 ^8 R$ [) r        RowBox[{"(",
    ' b9 P' D2 F% B' E( i         RowBox[{1 e( \; G) g, I& d6 Y
              RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    " [. ?  z& X( t+ Q       SuperscriptBox[
    1 I: r8 l# G/ Z' M: j        RowBox[{"(", ; E7 E% f: R8 h/ y# D# _
             RowBox[{
    6 S, }4 ?- F* }          RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-",
    : C9 f( G" p8 R, ~5 \9 p       SuperscriptBox[
    $ v5 C$ R* @: `/ k) g) Q& {        RowBox[{"(", * v/ u( m# v- U* |
             RowBox[{6 F  @7 C% L" v" A( ?
              RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-", + V: f4 O! q7 Q% |9 k
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    & y- F! R4 \7 V) P  RowBox[{"0.6665374509702793`", " ", * |3 J$ u$ k3 _- g* u
       SuperscriptBox["\[ExponentialE]", ) n# z' T% b- N) g- S% Z7 Y
        RowBox[{"3.1415926535897936`", " ",
    4 q! B# ^. x* o6 D     RowBox[{"(", + u+ Z! V/ _2 q) y; l
          RowBox[{
    9 w+ a* R" i+ N. h       RowBox[{"-", "0.19162171876400003`"}], "-",
    ' G0 |7 F% `0 D  M5 |       SuperscriptBox[3 F) v1 @' ~; \! v& q
            RowBox[{"(",
    ! e0 q8 z4 F. J0 ^' w: u. {" b         RowBox[{4 q* c& L; `# n% O1 K$ y
              RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    7 L1 i  r& U2 T* K( E       SuperscriptBox[' r. i0 ?6 i/ y9 v
            RowBox[{"(",
    ( N9 k6 ~- K; z1 l         RowBox[{
    6 u9 `, H" m6 v# F/ h          RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
      J4 A! }2 V$ ]       SuperscriptBox[
    3 g! e0 ?5 ?! I* C: `        RowBox[{"(", $ r6 `7 V* R2 h4 ?, J: i: M: n
             RowBox[{
    5 E* l5 H; d  O" A. J! p          RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
    % u4 ?3 ~. T9 w& i; _       SuperscriptBox["x8", "2"], "-",
    4 ~) ~$ ^3 H) [$ ?/ p       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    ; K8 Y9 T8 q& x" ~6 A  RowBox[{"0.4812237524557293`", " ",
    . P( G* G+ J- }! Q0 W5 I8 J" f   SuperscriptBox["\[ExponentialE]",
    % M% {* }2 ^  ]/ [    RowBox[{"3.1415926535897936`", " ", 8 ?1 D- T6 u7 M3 N5 g  A4 T
         RowBox[{"(", % m7 s9 O, _( c% d) G+ Z
          RowBox[{
    9 m9 A6 M3 _$ b  d6 ]8 Y1 N       RowBox[{"-", "0.109748954594`"}], "-", + @  a/ [' E9 W/ ~3 l
           SuperscriptBox[
    $ d( a3 Q6 h2 z. c4 M        RowBox[{"(",
    1 Y# B$ a: {1 s/ Q         RowBox[{
    / H' e0 |% m  s$ w          RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", , [4 v" [" k* B* P& \: N3 X0 H
           SuperscriptBox["x6", "2"], "-", 3 A# n$ N' `- ?: G
           SuperscriptBox[& c0 ?/ X2 F, h8 m/ l
            RowBox[{"(",
    0 H6 J+ _( ^# N9 ~  Q- k         RowBox[{
    : U' \$ X1 b# C# |, i7 T& H4 F' ~* o          RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",
    $ t& \6 j$ j+ P0 a9 |  A& @- V       SuperscriptBox["x8", "2"], "-", * Q+ s: M4 {/ g  C: P, g/ |- o4 M4 W
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    ! h7 c/ P$ x# j' M  RowBox[{"0.176024676254045`", " ",
    / s- ]+ [: I; f! K  y; n   SuperscriptBox["\[ExponentialE]", 2 m4 k2 A( m7 Z' e% e8 J, P- i: |
        RowBox[{"3.1415926535897936`", " ", 3 _  k$ r& \2 a; M# _2 ]
         RowBox[{"(", 4 K/ K' A# v) S/ i% J& C
          RowBox[{
    6 B. n% ^: D1 W8 P; A5 |  k7 c       RowBox[{"-", "0.14616677062500003`"}], "-",
    4 D4 U7 ^* E7 ?1 t       SuperscriptBox[
    & ?( y/ W: C+ Y0 X2 s$ {7 O$ O7 }$ v        RowBox[{"(",
    4 D* L' d& L# [3 E% E0 m1 t) D         RowBox[{1 _; D; ~1 R: T0 h
              RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", / n( D9 V. x0 z! {3 o' r
           SuperscriptBox["x6", "2"], "-",
    8 V6 M6 H  C: r, T5 |/ A       SuperscriptBox[  j6 g" T' u3 U4 T( c$ r% z
            RowBox[{"(", 9 u; ^; z. B, }  R. H- n
             RowBox[{
    % t4 J  `2 }, f7 ]; U: n6 c4 D          RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    " {+ ^% g5 B( F4 h       SuperscriptBox["x8", "2"], "-",
    6 c& x* L5 B2 p: q       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    . v9 M  _9 X1 ^' }6 r  RowBox[{"0.5945873894818965`", " ",
    1 \5 j3 I! w2 _7 F4 y   SuperscriptBox["\[ExponentialE]",
      s0 B/ s( }8 a" T3 F; h9 J    RowBox[{"3.1415926535897936`", " ",
    ; h$ @: b8 U7 f1 [3 x     RowBox[{"(", 5 U/ u# n5 D7 ^! \8 c
          RowBox[{# o, P) y' l$ g4 e  p
           RowBox[{"-", "0.10407011464100005`"}], "-", ) c$ d% D/ K( ^1 B0 A) p- D  n  Z; M
           SuperscriptBox[# J% K* I+ x! [) L! d
            RowBox[{"(",
    & N9 ^& G' ~4 R$ Y, K, S% r7 f         RowBox[{
    ) X) T6 g) J; _          RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", ' {# Z  O3 O1 K$ [
           SuperscriptBox[
    / t; E! D9 F1 h* O( B        RowBox[{"(",
    4 V( g# m* p; Q( G* R         RowBox[{. }. I- B- {& y4 J1 |( r+ T) D
              RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    3 Y- R/ v1 N1 U4 a. s       SuperscriptBox[
    0 ^7 k; z/ z9 m2 c0 N# r# O! |3 s        RowBox[{"(",
    " r6 X5 N0 }, `         RowBox[{
    1 ~9 m3 ?$ Q7 X+ F5 l+ o/ Y7 h          RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    : f; J% D: ~5 {  ?" d/ v       SuperscriptBox["x8", "2"], "-", 8 f2 E* I  A9 R2 W  a
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", 9 Y* R7 {6 D! c: F, X
      RowBox[{"0.027591936509660075`", " ", 6 l- X" ]6 j+ l) C. e
       SuperscriptBox["\[ExponentialE]",
    + p* u* \6 W: h( z    RowBox[{"3.1415926535897936`", " ", % Y+ i) w9 d2 H2 b8 X1 P/ R
         RowBox[{"(", ! M% K' b6 S1 e" Y+ F5 ^# w
          RowBox[{* I) h2 T8 B; V9 K4 Q2 F+ C
           RowBox[{"-", "0.31770463544200006`"}], "-", , o4 A& P: ]4 |, `- s; k
           SuperscriptBox[1 a: A7 [7 m5 o3 Q9 {
            RowBox[{"(", 4 f6 o, V8 D- r6 Z) Z3 U% u
             RowBox[{+ O; b  c% ^( r# g1 Y
              RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    ; N& f3 g6 B" E( Y2 s0 P4 M       SuperscriptBox["x6", "2"], "-", 4 \& F8 q9 W1 F3 v2 c
           SuperscriptBox["x7", "2"], "-",
    1 N5 j& P1 B* G2 e       SuperscriptBox["x8", "2"], "-", / N2 `1 P3 L% E" |( ~9 U0 T3 T
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    ! {- w- ]( p1 ~; e$ r" w2 _9 _  RowBox[{"0.5252475961933536`", " ", " s! V. P( ]* L& f1 y
       SuperscriptBox["\[ExponentialE]", 3 e' F7 j9 a$ r" ^2 V5 b0 H
        RowBox[{"3.1415926535897936`", " ", 3 T& T* g3 R/ {- t; n+ R: P
         RowBox[{"(",
    - C  C' ~# a/ x; E  R+ S      RowBox[{: Q7 @# \1 F$ H. N
           RowBox[{"-", "0.6410867660730001`"}], "-",
    + ^9 C" z; p- W8 B       SuperscriptBox[# b( b3 @' M1 H2 Z! h% P
            RowBox[{"(", - O# H& e0 u4 U1 A" }
             RowBox[{5 t. Q, V  J+ v6 a1 o5 C- V2 Y% t
              RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", 6 W) w/ w) [$ o  ]
           SuperscriptBox["x6", "2"], "-", ) j) u$ r2 z, \, r, ]
           SuperscriptBox["x7", "2"], "-",
    / ^5 l3 W  [& v& r* J       SuperscriptBox["x8", "2"], "-",
    8 j% ?* U- T; d* w       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", & {2 L. r  t: y8 u* z$ w
      RowBox[{"0.32047284779644936`", " ",
    ' L$ ?, h8 q9 k; t) P   SuperscriptBox["\[ExponentialE]", 6 z0 d& U6 f# p. b
        RowBox[{"3.1415926535897936`", " ",
    + @3 P1 ?2 `7 {3 G8 |3 s     RowBox[{"(", + c. e8 B0 U) @! R
          RowBox[{5 X9 {4 F' {7 z* ]
           RowBox[{"-", "0.155663887074`"}], "-", ) S& \( l$ b& M8 ~! |
           SuperscriptBox[) G9 z- P3 E8 E% O$ z7 i
            RowBox[{"(",
    " K+ H  Q' r5 s- S0 K. F) b" T         RowBox[{& C5 |5 j+ o9 l
              RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-", 9 x: F' E6 h; h8 {8 J9 j
           SuperscriptBox["x6", "2"], "-", " x) [5 f- b/ L3 ^. a. F( @
           SuperscriptBox["x7", "2"], "-",
    : @/ y& g1 Q8 Q3 C$ L       SuperscriptBox["x8", "2"], "-",
    ; g" N% }! N$ w, r' z% |2 Y6 \       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    ' ^* e5 r& s% u; q8 M  RowBox[{"0.7528674241482847`", " ",
    ) P0 O7 T8 A9 }/ a5 w$ o   SuperscriptBox["\[ExponentialE]",
    3 B8 h  z! |- U! S2 K    RowBox[{"3.1415926535897936`", " ",
    & f9 {7 ^  t4 s: [* {+ Y     RowBox[{"(", ( D: k8 ~, C+ v; P  M' I& D
          RowBox[{
    4 h0 M% L, B; ?6 r       RowBox[{"-", "0.14151232428600002`"}], "-", 5 E9 q1 c5 y% K0 _8 @/ O
           SuperscriptBox[# j+ v$ @. b4 P7 ?9 j& }
            RowBox[{"(",
    / N2 G, g8 y' Y# g9 B% \, Z         RowBox[{$ E3 d. W5 A4 _/ `) I1 e2 i6 R6 _" \
              RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    3 w, M. Y8 Y  ~       SuperscriptBox["x6", "2"], "-", 2 I6 ]; m# I' k9 j8 ?
           SuperscriptBox["x7", "2"], "-", ; r& P9 d' @8 _, v
           SuperscriptBox["x8", "2"], "-", + Y2 Z7 I4 r  l* t4 I: h& ?4 q
           SuperscriptBox["x9", "2"]}], ")"}]}]]}]}]], "Output",
    : z1 C8 o! x! c; r7 j0 m# k CellChangeTimes->{3.5779628386090403`*^9}]! O5 k# E' L! A9 k* a
    }, Open  ]],, ^8 i, M% Z- @0 v" a/ e
    2 D% [& N, s$ b% q
    Cell[BoxData[" "], "Input",3 C6 t0 e% }6 ?9 e+ a+ _# V
    CellChangeTimes->{3.577962835879035*^9}],
    1 t' l/ S4 w5 m9 C- {7 T* E" `# u' H- v* W. C
    Cell[BoxData["\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\:4e3a"], "Input"],
    5 J. F, z7 ~- n4 J: Q2 ^8 w' y/ f& F* s- \  B
    Cell[CellGroupData[{2 w0 B$ ?: Y- {% o, s
    8 v, [5 ?' v: q& u
    Cell[BoxData[
    & T. y2 K- w  t1 e) V RowBox[{"y2", "/.", $ R  z+ q+ A) O
      RowBox[{"{",
    8 R0 Z! c7 `7 o& N) E. A5 a" X2 b   RowBox[{
    # j& g' I3 ~4 b. R# q( I    RowBox[{"x1", "->", "0.7406"}], ",",
    + T8 R# O5 y- s! X& O' t, v    RowBox[{"x2", "->", "0.4621"}], ",",
    ' b+ J, o; Q5 ^( X+ s3 d+ r/ H    RowBox[{"x4", "->", "0.2221"}], ",", 6 x& t9 V. }/ K# B/ y
        RowBox[{"x5", "->", "0.5208"}]}], "}"}]}]], "Input",: \& d! u4 x# Z) f, J
    CellChangeTimes->{3.577962787784151*^9}],' O* a# R+ \+ z+ d% Z5 h) ?- l" [

    : J/ q4 ?4 \" g2 a( `9 xCell[BoxData[, I3 I3 R8 B) A5 o- P
    RowBox[{
    * u, ?" n3 L& `  RowBox[{"0.9125798890455848`", " ",
    ; @8 P+ w! o# z4 J- f% h9 E: \6 }+ v   SuperscriptBox["\[ExponentialE]",
    , F' l' P4 x( v. o    RowBox[{"3.1415926535897936`", " ",   M" y, S9 y/ [, u0 k
         RowBox[{"(", 2 w6 t% T+ d1 C% S
          RowBox[{1 z1 m2 {' M6 `+ K  k
           RowBox[{"-", "0.17911224641499998`"}], "-",
      X2 G& U( G0 ~6 f- @       SuperscriptBox[
    " g: |5 @8 N8 T& T6 J/ G8 {3 i  y        RowBox[{"(", * ~" \( f  K1 o) m7 P
             RowBox[{) t$ c) E' |" a1 `/ r
              RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-",
    2 n; _; \$ l" E4 z       SuperscriptBox[* X8 p6 d' E) ]& F' I
            RowBox[{"(", . Q( z6 v3 y! R- D, R, x( M
             RowBox[{
    # H0 S6 N1 g. E2 f% m, ], C          RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    # F/ p( H% T, E5 N7 `4 U       SuperscriptBox[: U$ @- g' h# ]8 @4 M1 h: q& A6 C
            RowBox[{"(", ' t' J& G2 x+ k, ~: u& D8 }+ w
             RowBox[{$ n7 y& |5 L5 g! E% K( B
              RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", 1 l& w0 m( `  J
           SuperscriptBox["x8", "2"], "-",
    - c) x7 E! {# t; I; O       SuperscriptBox[7 [8 _# C: e9 R" C  ^) V- E
            RowBox[{"(", , }* [3 u( I7 _
             RowBox[{) E, Z+ h7 w! @- L& ^: z% B9 y
              RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+",
    " ~7 ~6 t+ D- M9 d/ B  RowBox[{"0.2883186011296682`", " ", 8 V  X  r/ T2 N3 A
       SuperscriptBox["\[ExponentialE]",
    , N1 E# J4 t/ X' e) p    RowBox[{"3.1415926535897936`", " ", ) O; B4 P( a2 ?& Z6 I' h) Y
         RowBox[{"(",   R- M+ ]3 V/ I% s! `' F. L( t
          RowBox[{) d# R- i) H* U  h6 Y9 h. N
           RowBox[{"-", "0.105619387859`"}], "-",
    1 s4 f$ W$ d5 r  L+ [       SuperscriptBox[
    % t' O2 C6 j% f        RowBox[{"(", . T2 i* x7 r% J8 |, M
             RowBox[{0 }8 f) m6 p4 y6 k
              RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    6 A( B; C. E) H  u8 f+ n0 l( G6 l9 ^9 Z       SuperscriptBox["x6", "2"], "-", + v) @; x  n- X0 v
           SuperscriptBox[" Y( `- d5 j. i3 V1 q/ |, I
            RowBox[{"(",
    ; L; G9 ~. c1 G" V8 c4 o9 {. N         RowBox[{+ p* D* y1 s1 H: _+ c( u
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    6 r) _( w+ O1 {6 g; B: z$ K       SuperscriptBox["x8", "2"], "-", 8 [0 S8 u) `8 ^& T
           SuperscriptBox[
    ; R4 \$ I/ V# D        RowBox[{"(",
      N0 _: s7 c# P; F4 T         RowBox[{& j  {* @- m% `0 m4 I
              RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 5 q( t! s$ F6 H" Q% S
      "+",
    9 X2 n' g4 W; v$ O4 H2 A: a  RowBox[{"0.2115905228598317`", " ",
    8 C" `: ^( E- l$ r; Y  T5 ]; ?   SuperscriptBox["\[ExponentialE]", " I: c2 h! w: s: f6 ]) i* d
        RowBox[{"3.1415926535897936`", " ",
    3 f9 b0 g9 s8 c! ?1 ?5 j7 r# B     RowBox[{"(",
    1 h+ U7 s" G: ?. L7 m& [      RowBox[{5 `% l1 Y7 a6 C5 R! B+ b) Y
           RowBox[{"-", "0.236605670085`"}], "-",
    1 c- e: Y  q% k! O; K       SuperscriptBox[6 w! Y: Q% R& Y
            RowBox[{"(",
    ' e, j0 E$ C  d4 ]+ c6 i         RowBox[{
    7 r5 F# }# C! F6 n5 ^' I, q/ _( Y0 R          RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", + u. r! @) L3 R- R4 r
           SuperscriptBox["x6", "2"], "-",
    - I" l" N' _& p9 Q1 E8 [1 e* ]       SuperscriptBox["x7", "2"], "-",
    ( I9 i6 z" c+ N5 a  K* h6 C) h       SuperscriptBox["x8", "2"], "-", % X5 |% l- C: v' q" T- e
           SuperscriptBox[
    ( n) X% N, C9 \/ q. K) `        RowBox[{"(", 0 ?' e! n- W1 P3 b- _6 a
             RowBox[{; D8 u$ ?. t. A. s0 s; f6 C
              RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    1 h- ]( D% t2 r4 I& N  "-", 4 o/ `* Q+ P& y4 R+ M: m4 b
      RowBox[{"0.22829938846668896`", " ", 1 e$ A' z9 v5 r  O; J1 E
       SuperscriptBox["\[ExponentialE]",
    8 o" I; B' c4 f8 S+ s    RowBox[{"3.1415926535897936`", " ", - `- l% O9 P* X) J) B9 g# C6 a" ~
         RowBox[{"(",
    : |' U' G! i6 w2 y+ h; e4 M( I3 V2 J      RowBox[{
    4 I- V% m& V5 a) D6 a       RowBox[{"-", "0.46221081830200006`"}], "-",
    + a3 C0 O: z. h* m' b       SuperscriptBox[
    * G) [( c7 I) w4 i! D; N$ m% \        RowBox[{"(",
    $ @' e1 o0 P6 P* o  J! w         RowBox[{3 C' s9 h% i3 L' H# u! F" o
              RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-", * J# r( y- [! D( Y
           SuperscriptBox[* B; c6 u6 C) |- r
            RowBox[{"(",
    4 w3 X+ R$ P# B& E1 L# S         RowBox[{2 f9 h, I' A. C2 f! J' e
              RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    2 \$ d- h9 g. K- E       SuperscriptBox[
    5 d! `0 Z& E9 [6 y  s/ [5 R- k        RowBox[{"(", + [( L8 x6 c. \
             RowBox[{
    + F% z7 K, d2 @  N5 j          RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", , r7 |% B, V: L; _. N5 X0 T6 l
           SuperscriptBox["x8", "2"], "-", ; K  o% k. D) t5 K* @- g" Q
           SuperscriptBox[' A/ ^) q* J: |8 a
            RowBox[{"(", 5 [' j$ r2 \$ `7 X6 P$ y9 h
             RowBox[{( q) Y2 k) T: D* a. t
              RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ; p, _1 q' N4 ^  j/ F) K  Z
      "+",
    0 t3 P% ]6 v% [. {7 G* C& n  RowBox[{"0.27551257162880105`", " ",
    2 O  v! q6 w; X7 M  P   SuperscriptBox["\[ExponentialE]", 5 H: o  T% n' r! j3 w
        RowBox[{"3.1415926535897936`", " ",
    : S; W7 J$ D8 W; `8 {- i     RowBox[{"(", 4 ~" W0 H- q1 i7 m, q7 Q
          RowBox[{
    & D/ d5 `, b" l       RowBox[{"-", "0.5837889295140001`"}], "-", 8 b; ~2 s9 r6 l+ r1 ?
           SuperscriptBox[
    9 i$ E8 s, P+ U2 d, D5 z        RowBox[{"(",
    9 \+ D2 W; ~* |: C0 s0 J2 G- g         RowBox[{- y: k9 i5 K9 O: I# v7 m
              RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    - ~# i+ V3 T) g; p4 q& `1 q7 }: p       SuperscriptBox["x6", "2"], "-",   x9 b- u6 m0 D7 J: C
           SuperscriptBox[
    ' Q& ?0 U! Y8 X        RowBox[{"(",   j. Q; n! ?7 w  |( `
             RowBox[{
    ( Q0 j2 [& T; w! q3 ]$ R; _          RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-", ( ?. ~! ]% ~! H4 O% M# U. i: j
           SuperscriptBox["x8", "2"], "-",
    2 J- U1 f$ o. F! N9 q8 X       SuperscriptBox[
    - {6 {+ Y+ V' u2 b% }, R        RowBox[{"(",
    , h( o, J; h+ C( U9 A  t1 l# H         RowBox[{0 H7 M1 z+ c, o9 r$ A& I
              RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], - a* n; ~. a- L5 {8 P
      "-",
    $ }9 X1 c9 F' m  RowBox[{"0.12620581913715256`", " ", 7 `( z# U# L' K8 e$ v' k  i
       SuperscriptBox["\[ExponentialE]",
    8 m# }. a6 y$ ]- B- [0 d    RowBox[{"3.1415926535897936`", " ",
    ' J- k, z* |0 M" J+ T     RowBox[{"(", * e# D% C7 l$ G* X( Z2 X
          RowBox[{, Q! A4 i  M+ C) Z
           RowBox[{"-", "0.19030188470200005`"}], "-",
    , l! E; x; f2 R) Z       SuperscriptBox[
    - j" L7 a/ Z5 `3 b0 e        RowBox[{"(",
    ! J0 w6 B1 C+ _- A2 O& P" I. W         RowBox[{
      s6 Q3 V' J. V2 }& P5 F9 |          RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
    1 N3 Y' j' O6 c  G  L# ]       SuperscriptBox[
    8 c; _$ Z7 L4 o4 u( R- F        RowBox[{"(", * }4 Q1 I3 P" U  a& W" |8 [# \2 N
             RowBox[{, o9 ~3 d3 J& n/ t* o
              RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    4 H3 Y- p" ?9 Z       SuperscriptBox["x7", "2"], "-", 4 S  I. t& A. ^6 D3 V/ O) K- [
           SuperscriptBox["x8", "2"], "-",
    / ?) l0 c1 H5 ^% l. P7 R$ `  g5 [# O       SuperscriptBox[0 l4 X& R5 x: Q: ?
            RowBox[{"(", & C- A# H, W5 B. t8 t, w! {8 _- D
             RowBox[{6 P3 M* G0 B! h
              RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    7 N0 m  l- o/ B  O4 a' ^) E/ B  "+",   X) m  n; O3 }6 ~5 W; [' V9 v
      RowBox[{"0.12782130225993898`", " ",
    ! Z/ f. g) G, N   SuperscriptBox["\[ExponentialE]", 4 s' O, |* ^8 p  D" ^0 U
        RowBox[{"3.1415926535897936`", " ", 5 u7 T1 n0 S5 B' C5 K9 ^! E
         RowBox[{"(",
    ' N6 T' V. M# w5 d3 U) G! n      RowBox[{8 I1 I+ s) G8 O6 E  g
           RowBox[{"-", "0.28518780882`"}], "-",
    9 E6 a( J& B4 p8 C       SuperscriptBox[
    ; j/ ^5 E8 w- G" z* Q" u5 K. D        RowBox[{"(", % s' K4 L5 n* ?5 Q4 o2 L
             RowBox[{- {  E- \$ y# J% T2 C* M7 L
              RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", * t! D  o3 g( H5 J/ B9 W% ^
           SuperscriptBox[. J% g3 k5 {4 V; s. t; J( m
            RowBox[{"(",
    ) P! Y) L4 a& w7 ^; V         RowBox[{
    4 T2 i2 ~& _* b4 _  z          RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-", / h5 g  ^/ c$ Z5 a
           SuperscriptBox[
      [! [2 e5 J9 D$ r. a        RowBox[{"(",
    : n2 |" ^- ^3 _+ W# ]* F- ]$ `         RowBox[{
    - H1 c- B0 T+ |$ |          RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", 3 _* A0 h! M: P* ~
           SuperscriptBox["x8", "2"], "-",
    + a! G0 w! m* W0 K( D7 |       SuperscriptBox[3 B0 T( r! x! S( P. o
            RowBox[{"(",
    - R, x( ~/ v. I; ~, P         RowBox[{
    ' m* ~, v& B. J, v3 f$ Z6 @          RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    , P) U2 I& [+ s- K  "+", ; Q" z3 }. T0 Q& u. [! e4 v& ~
      RowBox[{"0.23615247809381104`", " ", - a1 n/ |& ?' E- O! W' z
       SuperscriptBox["\[ExponentialE]",
    2 z0 `7 _4 _/ k7 e- z    RowBox[{"3.1415926535897936`", " ", 0 Q! A* l0 \2 r( A* s
         RowBox[{"(",
    , _3 V3 b# N" k: s5 s" G1 q7 e      RowBox[{
    1 w$ m& U- b0 x; E) _       RowBox[{"-", "0.11387365200400001`"}], "-", : H8 U& \! o' O: @
           SuperscriptBox[- C9 ?5 P8 Q2 O: y9 A
            RowBox[{"(",
    + v4 O2 M: l( ]9 S2 c; n9 W/ h         RowBox[{0 [- m2 n6 k& U4 @4 D
              RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",   u2 M) E8 r& v, b* u- U3 y
           SuperscriptBox[
    ' H# W9 E( q( t        RowBox[{"(",
    , d: L) N: J# H7 Y# m  E- B" ~6 ~         RowBox[{
    . |2 ~' H: r8 I* n          RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", 9 x; R6 b6 Y4 ?! K, ]+ J
           SuperscriptBox["x7", "2"], "-",
    - v/ T9 t3 @3 N2 ?' C( n       SuperscriptBox["x8", "2"], "-",
    3 e+ G, M% O, q* V  r( |" Q       SuperscriptBox[
    1 u# b! ~( v% v8 h" q, A        RowBox[{"(", - o% Z# E9 T7 ^& Y) E8 R; K
             RowBox[{: B8 q, Y3 u5 @! C1 W
              RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    * y2 m9 C4 ]) w2 q8 b/ [7 o3 B8 N  "+", 8 W2 g7 |' O6 G- ]6 `8 x& K
      RowBox[{"0.3207174990295845`", " ",
    5 j5 s( o8 Q  t3 F   SuperscriptBox["\[ExponentialE]",
    4 @/ ^1 o: n# h    RowBox[{"3.1415926535897936`", " ", 2 |. x5 |, U3 ^
         RowBox[{"(", 9 j9 K) F' P4 J# f4 h2 m
          RowBox[{
    2 L% ^; P- o# |9 L       RowBox[{"-", "0.11442644782500001`"}], "-",
    ( t* ]+ ]/ Y" V7 R. J$ ~; G       SuperscriptBox[
    ; e4 C7 X7 O! ~) u; J        RowBox[{"(",
    6 f: G3 d! o7 Q5 k         RowBox[{
    & e9 H8 x. v2 A* ]- @7 n          RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    ; N" ?3 O! Y- m5 E4 f6 P( F) A2 D: v       SuperscriptBox["x6", "2"], "-", % [' U) t& m; c+ E  k
           SuperscriptBox[
    ) O8 Z' n; V; A- V' ]4 \& \        RowBox[{"(", / S* W2 t$ w- y+ A) `
             RowBox[{& i0 j* ^0 C4 L
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    / M6 H3 k9 D3 ~1 @       SuperscriptBox[
    . g6 O( u0 L$ Z9 H% F- h        RowBox[{"(",
    + T6 p# b& y- F% s, c         RowBox[{
    9 r/ j1 ]8 l, d( `( J, Q          RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-", 0 P; F/ w0 G+ O+ W6 F. v, O
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 0 \; x8 K/ a, X2 b
      RowBox[{"0.15852708848338293`", " ", 8 `6 I1 G* l1 j0 j& O0 H8 ^# u
       SuperscriptBox["\[ExponentialE]",
    $ q/ u7 a4 Y( H$ Z" W! ]2 }$ h( B    RowBox[{"3.1415926535897936`", " ", 8 n3 e( b) }$ `& d0 [& }3 n
         RowBox[{"(",
    0 S+ Y7 Z: _8 k( {, m& k      RowBox[{
    # |" ]" J. B8 M5 T' a       RowBox[{"-", "0.21008576609800003`"}], "-",
    8 R, `5 {. K& [& i( U& `  c       SuperscriptBox["x3", "2"], "-", 9 T! K8 V. C* f. t
           SuperscriptBox["x6", "2"], "-",
    ' l) K3 I: V0 T       SuperscriptBox["x7", "2"], "-",
      `1 h9 i1 c, X; r% f4 r       SuperscriptBox[
    " j% |; [3 r$ h% H. Q& ^& M        RowBox[{"(", ( F% ?- m& T7 c; I6 V3 L% D3 s& v
             RowBox[{
    , t# y" H  s0 i+ U4 |6 L  [2 ~! [( T          RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
    5 c! n! }0 b2 h4 H* W5 x+ H       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    * X  w& |& I- Q8 v  RowBox[{"0.6019775648968266`", " ", / m9 N3 N% R  E: q! r+ t' m- |
       SuperscriptBox["\[ExponentialE]", 4 B7 O+ `: X! L4 Z( \  G
        RowBox[{"3.1415926535897936`", " ",
    + S7 u( _6 h/ p* K6 u- w0 H     RowBox[{"(",
    ; L5 W" r4 P( u8 L2 f, j2 l  K, l      RowBox[{& W" ~" l8 B) P. l+ z( g( k
           RowBox[{"-", "0.4481471925460001`"}], "-", & E. F1 ~( \; s$ f$ k. Y5 K# f
           SuperscriptBox[
    ! l0 s) Y- q# C8 |        RowBox[{"(",
    2 c: ?; K% ?# r: f2 v         RowBox[{
    4 D( l& ?: d4 C1 ^: @          RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", / _0 }" n% h! X; p
           SuperscriptBox[
    ( \7 L' R% E6 R4 O9 T- o        RowBox[{"(", ) ?. }- ?, K- c& K
             RowBox[{' C4 S, [  f4 J
              RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-",
    ) _* O& r. }3 D! O       SuperscriptBox["x7", "2"], "-", ; v3 T/ C, L- M2 \
           SuperscriptBox[  d4 _# R$ r  ]3 z/ ~
            RowBox[{"(", 6 k. D* Y6 g' w% y& W
             RowBox[{
    6 z8 a7 Y, _1 d4 Y- S          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    9 s. o6 s% A! I! Q       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", . ^$ q* F$ X5 i
      RowBox[{"0.16041393254115266`", " ",
    " ~8 D" Y/ y% w   SuperscriptBox["\[ExponentialE]", - B; k' t& T, F* B( r# c
        RowBox[{"3.1415926535897936`", " ", " W. i' w+ y; V+ e' e3 p8 X' X: h9 ]
         RowBox[{"(", ( V' K0 B5 H! ~2 \$ ]$ j# u% d
          RowBox[{5 F. l: l6 J4 O& P* M7 k
           RowBox[{"-", "0.08722659614000003`"}], "-", ! t9 S% w0 b! P6 X
           SuperscriptBox[
      d) w" o2 O: `3 |        RowBox[{"(",
    - J7 B! \& z" I: m/ Y3 [         RowBox[{
    6 R" k- T/ }7 c- g3 y4 y0 A          RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-",
    $ v4 ^; w1 B3 M       SuperscriptBox[! f% @6 x) a- U* j3 ~5 B
            RowBox[{"(",
    3 o' c7 \* z( {& y1 f) r9 z         RowBox[{# O9 ~2 {% v: A' T+ a% l
              RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    ( W* Q( u( j! J, `( P       SuperscriptBox["x7", "2"], "-",
    : |5 K$ N3 g  ~+ c, U# Q0 Q# o0 r       SuperscriptBox[
    " I  k) y5 [7 o/ B" Y( j. R6 }        RowBox[{"(",
    5 u) H+ k: }' R7 |0 b6 k: ?2 U$ n" t         RowBox[{
    # `8 r- s; r$ K# z: L1 k          RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    ! c5 b- ^7 n# G9 l0 x: ]. A       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", / O% K6 ~+ u% `, O* v7 n
      RowBox[{"0.482281849713638`", " ",
    + n" o7 ]8 e9 {! T' i   SuperscriptBox["\[ExponentialE]", # M2 F0 t  v8 U+ {: R
        RowBox[{"3.1415926535897936`", " ", , J3 }/ w" {3 R& J( s9 `# j
         RowBox[{"(",
    2 u$ G  U6 K6 Y" G8 i      RowBox[{
    ! W7 r: j/ ]4 v4 Y, C6 B% ?       RowBox[{"-", "0.23738217000100004`"}], "-", ) `$ |/ t( n; a3 c6 M  Q/ I2 w
           SuperscriptBox[$ V2 d9 I: T+ `9 {; r% z2 k- n7 d( X, `
            RowBox[{"(", , Y% M+ r: f0 B: o: {
             RowBox[{- J6 P* z- d4 Q  H/ f# I+ G: x" F
              RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    $ N5 N- J  \7 n5 y, C# L3 D       SuperscriptBox[9 t6 `3 T0 N7 t9 r9 z% C! s
            RowBox[{"(",
    1 s6 p8 i+ h6 x4 d3 A) Q' x         RowBox[{2 l; C$ {. \" s8 K2 l8 |' R: V
              RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-", ' T( O: X6 S* F# d7 Z
           SuperscriptBox[
    ; F' |! u. o# G3 z' ]  G  `        RowBox[{"(", 3 q& ~7 {3 B6 b# ~) z2 |
             RowBox[{
    ) t5 C. r: q  L$ |4 n0 j6 V' n( M( G          RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-",
    6 L. z5 U( d4 M- h$ [5 K- M2 F       SuperscriptBox[1 W/ A, H. d, Q7 N9 B
            RowBox[{"(", 8 w' M7 k9 G" m1 k: C
             RowBox[{
    0 R1 ^% d& ]/ w2 U6 q          RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    % N  z8 u% U; \0 \6 ^$ a2 g       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", ) ^( w! p% n" e; ]" Q7 `, y5 F# W6 }: q
      RowBox[{"0.29549238400772093`", " ",
    ! r9 y8 t; o* l8 l3 S   SuperscriptBox["\[ExponentialE]", ( |  ~0 T( H1 [& A# I, h, `2 m' G
        RowBox[{"3.1415926535897936`", " ", % j$ t: [; U+ l! o
         RowBox[{"(",
    . A- L/ P/ r1 S* p6 F& I# ?      RowBox[{
    8 U/ |  |8 ?2 |( a, Z       RowBox[{"-", "0.19162171876400003`"}], "-", ; U/ Q' I  d4 ]$ _+ w
           SuperscriptBox[. C0 u; F4 ?! z' E9 z
            RowBox[{"(",
    1 f- _  K9 N- p& _: j+ \+ K         RowBox[{
    0 z9 @+ A0 X, K- N* a          RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    % B4 o# X' K/ P$ m0 g8 L       SuperscriptBox[9 g, y" R) M3 c; `/ m1 A) v( C
            RowBox[{"(", 9 h' o- L2 m! l) T
             RowBox[{9 g  R+ G  J; A1 j
              RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", " ^$ G0 e, ^" E
           SuperscriptBox[) H( m4 c2 U, O0 b. e
            RowBox[{"(", : o6 [2 V) ]. q( y4 \$ X; e
             RowBox[{
    $ t- I: ]  |8 Q+ \& W          RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", 4 `3 F& n& c! I3 P( H2 ?
           SuperscriptBox["x8", "2"], "-",
    ; h- v, n3 l; W* ?- a       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", . i1 \5 b+ [0 w" i) k3 I
      RowBox[{"0.31296872769679895`", " ",
    5 v% W) b0 f2 k7 _   SuperscriptBox["\[ExponentialE]",
    0 F4 V- b& y% C) M# L4 g    RowBox[{"3.1415926535897936`", " ", ' O5 o# P. N2 x) `2 F
         RowBox[{"(", 4 q- m1 i1 U6 ~
          RowBox[{
    ; D+ R3 l2 ^" v& F. p       RowBox[{"-", "0.109748954594`"}], "-",
    - y7 \4 c; R9 u1 E0 d* }. `+ L       SuperscriptBox[2 B6 {& D. q# w
            RowBox[{"(",
      R. C8 D$ G. j& p1 h         RowBox[{" E0 P" c$ u( L- y
              RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", * s% O( y0 y2 E' l- |3 h. c
           SuperscriptBox["x6", "2"], "-", + j: F* P4 S+ i1 T) W4 R% d7 `
           SuperscriptBox[. E+ M4 R8 ^. m' i7 Q7 R
            RowBox[{"(", 7 b2 u0 E" d2 u. E+ y, g) S5 d/ g
             RowBox[{
    . A) F2 k, A' k  U          RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",
    8 h5 n" M, g: T: d! [0 D) K       SuperscriptBox["x8", "2"], "-",
    8 G/ v7 z# {1 |/ V% j       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", / b5 @7 o# [0 S& G$ x$ L
      RowBox[{"0.4666313851213299`", " ", $ h' ?" A' \$ u  b: m2 b
       SuperscriptBox["\[ExponentialE]",
    ; M8 F+ k% T1 f8 E, P1 P6 J$ o3 Q    RowBox[{"3.1415926535897936`", " ",
    8 @' ]  V3 _. L7 L2 S: i, ^     RowBox[{"(", 2 @* v& S0 d( F& D: u
          RowBox[{
    7 I  w, x5 i) b* u       RowBox[{"-", "0.14616677062500003`"}], "-", : G5 I& L8 R. E/ W2 H
           SuperscriptBox[
      h+ j8 }) k, z; y4 Z* _/ s; }" @        RowBox[{"(", - D# d* V& C( I6 \" A0 W  B6 C. R
             RowBox[{
    " t, R- l: S4 U' ]          RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", # Y4 c2 d# O0 b7 i( E+ X+ N
           SuperscriptBox["x6", "2"], "-", 2 n: z$ L% I6 T- u/ U+ f
           SuperscriptBox[" p; @6 n3 L) W1 h2 v& m
            RowBox[{"(",
    8 j* [& u  w( V2 j4 E! x1 @" J1 V         RowBox[{
    6 F8 q4 f9 J' J& d          RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", 5 j/ H. n" O! R
           SuperscriptBox["x8", "2"], "-", 0 s0 ?0 N0 S3 C9 j8 a* G* k1 P
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    0 a- I  B7 N. _0 x4 B' S) E  RowBox[{"0.37419828116611387`", " ",
    3 N' g% D0 a5 T   SuperscriptBox["\[ExponentialE]",
    , f+ l9 ~# ~6 n5 c  a    RowBox[{"3.1415926535897936`", " ",
    * V- _& o7 V) v4 ?  C" p6 o2 Z     RowBox[{"(", ' o0 \' ~9 F$ v" _9 y+ d
          RowBox[{
    ( u  M* |/ s) g4 E       RowBox[{"-", "0.10407011464100005`"}], "-", - o* h0 g8 ?+ S7 G. G
           SuperscriptBox[
    ! C- i7 _* L3 w7 K" U$ f        RowBox[{"(",
    " n# d8 W& f- \' l         RowBox[{
    ( V7 ^$ a- c# i3 q6 ]; I          RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", 6 p. S& Q* T3 `" m: o0 ^: q3 M7 o
           SuperscriptBox[
    - Z% |* {( a  F4 p1 M        RowBox[{"(", 1 A8 p, `0 V2 D0 o
             RowBox[{, t$ t" j' V" Y$ x. L2 H% o
              RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    1 `  \* r, F# R       SuperscriptBox[( u8 ?( @3 ~7 g
            RowBox[{"(", ' E  N* n. |8 c* i3 w
             RowBox[{3 r9 [5 s& P0 P4 S% i* l; R$ O
              RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    4 k6 X% c4 h2 u       SuperscriptBox["x8", "2"], "-", , j7 A" }: H* Z7 G
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 7 E6 o& G/ ]9 b3 C
      RowBox[{"0.025873988843992612`", " ", , l+ d3 q5 _  V. V1 N
       SuperscriptBox["\[ExponentialE]", ) z; @( L) @( T2 G! l
        RowBox[{"3.1415926535897936`", " ", 9 n7 l& T! w# l  g2 q, B0 Q1 K2 Q
         RowBox[{"(", ; y& m2 Q1 W; t4 ~* b) p. B; o; ?6 K# H
          RowBox[{( ~# t4 S3 {( _( G9 \. c
           RowBox[{"-", "0.31770463544200006`"}], "-", # p5 X9 U3 L! S$ Q7 W$ B1 F
           SuperscriptBox[" y1 S8 k/ D- X5 I. r# N
            RowBox[{"(", , D% N) T0 r+ H2 d& t) H. e& V& d, Z
             RowBox[{8 d- U+ X4 ^+ {. O- R
              RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", ) {, z, d# \& U4 V( G# T
           SuperscriptBox["x6", "2"], "-",
    8 D& a; u  H$ @8 |; X       SuperscriptBox["x7", "2"], "-",
      J& o+ E: l( \9 H6 R, O/ F9 W, {       SuperscriptBox["x8", "2"], "-", 5 ?9 z7 j0 C; E; M' G* O9 q# b( V+ F
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", . \; H9 }0 h0 L* A6 D' F
      RowBox[{"0.5575503376854455`", " ", # s1 D4 U2 }  d# \( u# w, _
       SuperscriptBox["\[ExponentialE]",
    ! N) F' |3 h! S* D  q7 E7 c2 Y    RowBox[{"3.1415926535897936`", " ",
    : \6 b1 j5 ?5 \) ^0 o1 y  x0 X$ m     RowBox[{"(",
      o9 m* }0 F0 w: P7 Y      RowBox[{  B' M2 Y2 ~1 G* G
           RowBox[{"-", "0.6410867660730001`"}], "-",
    ( }' ^; t+ Q. a5 H8 }& I7 p; e       SuperscriptBox[
    " a6 h1 F* [+ n4 s& }. T" N. m3 I        RowBox[{"(",
    " N% M# n- Z) O, F. d5 N         RowBox[{
    * b0 a7 @  H* j7 V% [' [          RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", 2 U, R% `7 T6 {& ?( F0 b8 ~
           SuperscriptBox["x6", "2"], "-",
    # {+ m# `7 ?% E4 o  R( T* |       SuperscriptBox["x7", "2"], "-", $ Q- u- V% [. c) p0 E9 S( q4 U
           SuperscriptBox["x8", "2"], "-", : @/ c/ C- d* ]; |+ ^
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 8 r  W4 H. A/ |: }7 U# K
      RowBox[{"0.13398540448199214`", " ", / g& H3 C8 [' q
       SuperscriptBox["\[ExponentialE]",
    ! |5 m. Q" D! Y( ^) X2 J; ^/ s    RowBox[{"3.1415926535897936`", " ",
    % K; A% ?3 d  W$ i     RowBox[{"(", 2 [% y, l0 }. h* N- z5 Z
          RowBox[{
    : [/ S' |9 B8 X  Z5 W  {0 g       RowBox[{"-", "0.155663887074`"}], "-", / M0 ]$ d* _. ^* X2 r0 A0 W
           SuperscriptBox[
    4 q$ A- o7 |' x$ s6 Y2 E% n        RowBox[{"(",
      K4 T0 I3 U% B+ @1 `& }4 B         RowBox[{
    3 k9 U: O( ^3 R- r# [% ?) y/ O          RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    3 I" y. X/ y, h3 F9 ^1 m+ K       SuperscriptBox["x6", "2"], "-", $ M. w) K/ m3 e
           SuperscriptBox["x7", "2"], "-", / @& Z# R6 J+ u* j0 h0 E' x' P
           SuperscriptBox["x8", "2"], "-", * j' g) `% L: e4 g" i% D
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", % Q' g2 `$ {8 @
      RowBox[{"0.4572385099113415`", " ",
    - G1 I3 T& y4 W. v3 \7 M" J" v   SuperscriptBox["\[ExponentialE]", . d" U4 A, G7 ?6 l
        RowBox[{"3.1415926535897936`", " ", 4 k) o6 X, b* A3 |' W: @
         RowBox[{"(",
    # Y2 H  c2 A+ }: [) F* Q+ q6 d      RowBox[{
    , X: B9 v7 C) N- b- X' }% R8 B3 W' s       RowBox[{"-", "0.14151232428600002`"}], "-", 2 |9 ?3 Y0 |5 v* r9 l, G3 q& p
           SuperscriptBox[
    & \: c+ q5 t( {$ \: u        RowBox[{"(", . ]# ~0 Z7 u1 |* Z4 l0 L
             RowBox[{
    % P5 I& b' U: k' v, ]- m: `1 A          RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", ; X5 J$ s9 E# p. L7 V3 G& n
           SuperscriptBox["x6", "2"], "-", + p$ `0 j5 Y. U) [  G
           SuperscriptBox["x7", "2"], "-", 7 Q$ W9 N2 p2 W+ o- \9 d
           SuperscriptBox["x8", "2"], "-", 0 l4 c/ @- G( I( c1 G+ v" W$ K
           SuperscriptBox["x9", "2"]}], ")"}]}]]}]}]], "Output",
    ) @* J8 p: W- n: q) p+ F" [: X! U3 G: d CellChangeTimes->{3.577962841401445*^9}]% U: j+ f3 o7 ^$ S0 |1 n$ P
    }, Open  ]]
    7 i8 R6 m7 {- Z  I* I& J8 W4 P8 M}," R8 I% E2 h; D: b2 ^, W, o3 J
    WindowSize->{1093, 659},. y2 v5 g2 e0 I$ r. t) b" Y
    WindowMargins->{{61, Automatic}, {Automatic, 15}},: P+ `/ m4 p' T( K
    FrontEndVersion->"7.0 for Microsoft Windows (32-bit) (February 18, 2009)",
    ; u" h8 j# X2 P+ Y0 r/ VStyleDefinitions->"Default.nb"7 G0 l9 B8 f- \. H5 ]4 Y2 e
    ]' d5 p1 X5 ~& X3 ^4 H; Y- G
    (* End of Notebook Content *): m, g, f, S; ~  L
    2 ]0 v+ t7 X7 {; f/ m2 _3 X3 I
    (* Internal cache information *)
    8 z1 `! _# T. \' g8 E# x4 ](*CellTagsOutline
    " [1 G  q* y* s4 e; L. |CellTagsIndex->{}6 \4 H# b7 k! h! n9 u! W3 w% W
    *)
    . W# \3 \3 Q5 F(*CellTagsIndex: y  f; g* j* }- b) H
    CellTagsIndex->{}% S( P3 n9 T8 q5 T7 ~# c& U* @" i. V
    *)
    $ R- U' ?3 L) `(*NotebookFileOutline
    $ H. }/ y$ c- G/ G" A4 c4 GNotebook[{
    * J0 @) S* q+ e8 t0 i, b4 C# lCell[CellGroupData[{1 F' P5 q7 D8 H1 H4 }' m2 p5 n& ^
    Cell[567, 22, 22639, 450, 1792, "Input"],
    - O( ]9 Q# c$ X3 I8 X. j& y) lCell[23209, 474, 21281, 449, 1703, "Output"]
    7 c6 i% N& i$ L. j}, Open  ]],. t$ j; o$ f0 a% E! s9 A" A- v' \! h
    Cell[CellGroupData[{
    7 w0 e- i) x% W; VCell[44527, 928, 198, 5, 31, "Input"],6 T/ ?  r  N9 S9 w7 a
    Cell[44728, 935, 53666, 1605, 1532, "Output"]2 c$ i+ {$ Q4 [" Z4 c5 l. [1 T
    }, Open  ]],! x5 y( z# P. E" Q! I* X3 r+ H; E: s
    Cell[98409, 2543, 614, 16, 112, "Input"],
    - U4 d" e% u* |' ]/ M  ]4 I+ b' ACell[99026, 2561, 667, 17, 72, "Input"],1 }# h8 i4 T: G8 p% Z5 {9 C
    Cell[CellGroupData[{% N) k  }! W3 o- z/ t
    Cell[99718, 2582, 885, 13, 52, "Input"],
    , }. V) X& `+ FCell[100606, 2597, 935, 14, 30, "Output"],
    ! c! T) V( L7 M/ _& L1 [$ \( \Cell[101544, 2613, 932, 14, 30, "Output"]
    1 _! J" K$ ]1 q2 R0 l- f5 g( \; J}, Open  ]],
    ( G, n7 f! |* N# Z9 ~: `2 h, X2 ICell[102491, 2630, 4236, 93, 412, "Input"],
    1 D7 F2 `0 _. e# e- ^) i; fCell[CellGroupData[{
    $ w3 B5 p7 c) z8 [Cell[106752, 2727, 90, 1, 31, "Input"],, y( E* H* {6 L
    Cell[106845, 2730, 872, 13, 30, "Output"]
    6 J) g- ]( {) @' E/ t( v8 G}, Open  ]],
    : C8 C+ x* _/ F  D/ ~  A* jCell[107732, 2746, 458, 10, 31, "Input"],6 c" ~  g  E3 _* z
    Cell[108193, 2758, 126, 2, 31, "Input"],* H* [! h' Q: ?1 k
    Cell[CellGroupData[{
    8 n3 q/ @: |4 g: t  ]Cell[108344, 2764, 248, 6, 31, "Input"],
    4 l2 r. J& A4 d7 i/ F( dCell[108595, 2772, 1007, 17, 30, "Output"]+ u. f& s3 U# x0 n4 E: p
    }, Open  ]],
    5 [# s2 y' X1 B  V% GCell[CellGroupData[{; _' `7 |- C2 t% t6 A" J4 D
    Cell[109639, 2794, 251, 6, 31, "Input"],
    3 w$ t% }! q8 ?+ U: ?9 pCell[109893, 2802, 1013, 17, 30, "Output"]
    ; f& u/ q, k* O- c  u1 C5 i}, Open  ]],% k7 U* c" q+ p3 t; Z, p
    Cell[110921, 2822, 1232, 23, 31, "Input"],) J+ L% s9 U. _& r" C/ E
    Cell[CellGroupData[{1 h  Q; z0 R1 R. S- y& C
    Cell[112178, 2849, 147, 5, 31, "Input"],
    / g: A7 I$ N% ]Cell[112328, 2856, 1979, 50, 50, "Output"]$ ^1 N1 M6 H/ \4 O* h
    }, Open  ]],
    ; W) m7 {& W) F  `; Z7 p2 b( DCell[CellGroupData[{2 S. @( @+ L" f. A: q
    Cell[114344, 2911, 195, 5, 31, "Input"],* W/ I4 b/ }2 z
    Cell[114542, 2918, 123, 2, 30, "Output"]
    5 u$ Q# F+ q' w}, Open  ]],
    * O/ ^5 v( N% a5 W0 o& b2 e/ NCell[CellGroupData[{
    8 o' S) X- f( eCell[114702, 2925, 144, 4, 31, "Input"],
    # @, W* o- A2 m0 I1 p* cCell[114849, 2931, 96, 1, 30, "Output"]- \) L- Q! S; A6 h) g7 ~
    }, Open  ]],+ F# h6 E# O! ~4 f" k5 |7 `
    Cell[CellGroupData[{
    5 K3 q7 B  n+ Q& `  X; ]- A/ MCell[114982, 2937, 146, 4, 31, "Input"],- a3 s0 y1 r. b# H: F3 ]# |
    Cell[115131, 2943, 495, 7, 30, "Output"]
    ( j/ H: W* U9 T8 y* y}, Open  ]],, Y8 j4 W8 d" Y; ~" M  J+ Q
    Cell[CellGroupData[{; r( t3 m% o+ }' }9 X% M; q% R; F% y: @
    Cell[115663, 2955, 144, 4, 31, "Input"],2 X, u+ D6 K$ Q5 |
    Cell[115810, 2961, 418, 6, 30, "Output"]0 v4 V9 i1 h5 O' u% ^3 B
    }, Open  ]],
    ) s' Q% k% [7 T4 UCell[CellGroupData[{
    + W% l( }; F3 z3 qCell[116265, 2972, 144, 4, 31, "Input"],
    6 V( T0 s- X0 ?9 \  VCell[116412, 2978, 549, 8, 30, "Output"]
    $ P, l9 W. d3 C* E, Z  ?}, Open  ]],3 K) [6 y5 |5 _' R1 \1 W; x
    Cell[CellGroupData[{
    5 a1 t  W0 g1 lCell[116998, 2991, 537, 10, 31, "Input"],/ J# F  |3 g5 U' [
    Cell[117538, 3003, 998, 14, 30, "Output"]" I( K, m' V& Q; \1 @
    }, Open  ]],
    : G7 e. W# `# u5 ?. _% jCell[CellGroupData[{
    $ i+ L6 u! V' t7 [* A% j+ sCell[118573, 3022, 2321, 55, 44, "Input"],
    ; e, v0 x; z2 w5 L2 e5 M8 Q. J) z3 J2 XCell[120897, 3079, 1541, 38, 91, "Output"]5 w; f" I# I0 a$ Q% H) o2 L& E+ \
    }, Open  ]],- h7 d0 |. u" u: G( {- l+ W9 p
    Cell[CellGroupData[{
    $ a* s5 P: f$ Q, BCell[122475, 3122, 856, 19, 87, "Input"],
    7 l+ Y9 l% y1 s/ pCell[123334, 3143, 568, 14, 91, "Output"]4 z, R3 p4 r6 f* t+ e
    }, Open  ]],: p! D  i1 [5 K9 H4 }. u1 D: _- Z
    Cell[CellGroupData[{0 A% ?6 D5 o) F! I2 {5 ?
    Cell[123939, 3162, 437, 10, 31, "Input"],
    - T& u+ F# E1 Y# b- pCell[124379, 3174, 739, 12, 30, "Output"]
    : D  A7 u& M6 I: N}, Open  ]],
    + I1 `  }2 w5 sCell[125133, 3189, 242, 3, 31, "Input"],8 a) S/ z* H; O9 l" T" I
    Cell[CellGroupData[{# [" G  e+ \2 t
    Cell[125400, 3196, 109, 2, 31, "Input"],* x( q4 f, M& K6 D  Z
    Cell[125512, 3200, 323, 7, 30, "Output"]
      N4 e4 B. a/ q5 p( F' \}, Open  ]],
      V1 O) j  p5 U/ Z1 h" MCell[CellGroupData[{
    : ]6 d& n8 U2 I+ O5 T7 tCell[125872, 3212, 526, 15, 31, "Input"],
    3 U+ z4 t$ {) @Cell[126401, 3229, 1436, 44, 36, "Output"]
    : B! |0 y7 o/ O$ X}, Open  ]],' q$ Q' j& D( l1 ^! y, h9 V
    Cell[CellGroupData[{
    ; B  Y9 V3 J5 ]$ uCell[127874, 3278, 92, 2, 31, "Input"],7 M7 L5 R0 R+ W3 |. O5 w! f2 k
    Cell[127969, 3282, 326, 7, 30, "Output"]
    3 x! ]% n8 l! R  R' i}, Open  ]],# W) U2 ^# h' R7 R7 o* G
    Cell[CellGroupData[{: @/ ~& X- A$ g# ]
    Cell[128332, 3294, 388, 13, 31, "Input"],
    4 @/ J. {- a& J8 z! w7 PCell[128723, 3309, 1381, 42, 36, "Output"]
    + v, ~0 P. s, {  {, c& u9 }}, Open  ]],; q- i; Z! w8 V) K
    Cell[CellGroupData[{& h( I0 E# y& |
    Cell[130141, 3356, 89, 2, 31, "Input"],0 j: r& B) Y- K, ~: G" `: X
    Cell[130233, 3360, 320, 7, 30, "Output"]# W: h$ F) N5 T8 Z
    }, Open  ]],9 o7 `2 C  @4 w& `* r
    Cell[CellGroupData[{, H: l; x' ?3 {2 n
    Cell[130590, 3372, 387, 13, 31, "Input"],
      Y9 u4 g* s- I4 }1 |9 e& [% KCell[130980, 3387, 1381, 42, 36, "Output"]6 S9 M4 B& L0 N% s& ~$ P5 Y- |5 \
    }, Open  ]],
    % ]( W7 E9 G7 `/ @( D' @Cell[CellGroupData[{% L  [: [/ P4 Z+ V# O
    Cell[132398, 3434, 91, 2, 31, "Input"],
    % h' U; {2 T( n( N* u% u# i( XCell[132492, 3438, 328, 7, 30, "Output"]
    ; |4 J; V/ g6 |- @( P  k8 z}, Open  ]],0 }2 @& i/ H1 p6 B1 D
    Cell[CellGroupData[{4 P3 A9 d0 w. N# |) l$ \1 Q
    Cell[132857, 3450, 384, 13, 31, "Input"],
    % C# x4 u5 A6 }5 FCell[133244, 3465, 1379, 42, 36, "Output"]
    ) u' ^( j2 a/ W- A% b9 @}, Open  ]],
    7 U7 V6 M( i! ?$ x7 b+ t" BCell[CellGroupData[{
    0 O2 i$ D/ Z7 P+ ]/ D( FCell[134660, 3512, 93, 2, 31, "Input"],
    ( }3 Y+ V# b1 y# m* ?( O! t& gCell[134756, 3516, 322, 7, 30, "Output"]6 w( D; v; @/ c0 d  f0 ?
    }, Open  ]],7 W4 v! h2 `$ s# j+ u
    Cell[CellGroupData[{
    - g8 s8 _7 g+ rCell[135115, 3528, 385, 13, 31, "Input"],
    * u. Q  Y/ b! _2 oCell[135503, 3543, 1379, 42, 36, "Output"]0 f' {3 j, v& F8 T
    }, Open  ]],
    ) ], S7 O, }! `. }  K: @Cell[CellGroupData[{
    1 N( w/ R2 _0 f/ [  j5 r  ?Cell[136919, 3590, 113, 2, 31, "Input"],
    % [0 O, {3 ]. d8 e5 O* c3 pCell[137035, 3594, 348, 7, 30, "Output"]4 }( Q# ^9 A2 Z  ?' v; @, ^% I
    }, Open  ]],: p) d; ^6 w6 e3 c9 d7 f* q& n
    Cell[CellGroupData[{
    : \0 A$ n5 y1 s# O5 a1 kCell[137420, 3606, 406, 13, 31, "Input"],# P+ q7 L- `# ~  \2 t
    Cell[137829, 3621, 1414, 43, 36, "Output"]) S$ p. c: M- k! N
    }, Open  ]],
    ' p. y* i; N6 ~Cell[CellGroupData[{6 N* b% P$ J9 U
    Cell[139280, 3669, 135, 3, 31, "Input"],
    # v  K! A$ s; M) XCell[139418, 3674, 358, 7, 30, "Output"]2 a6 Y- o8 f/ U" z/ H$ V! \
    }, Open  ]],  r" g6 S) t+ M5 u
    Cell[CellGroupData[{( W- |7 ?4 H+ p( U; [: B: ?
    Cell[139813, 3686, 430, 14, 31, "Input"],
    " K/ I9 G. r; m; a, [  C9 GCell[140246, 3702, 1426, 43, 36, "Output"]  V( i' M3 \  C
    }, Open  ]],
    ! B, _/ t6 b& h7 Q% NCell[CellGroupData[{
    & u1 g; I2 v6 \( }Cell[141709, 3750, 156, 3, 31, "Input"],$ @* Q" A- f! d9 G, \" K( O- {9 q
    Cell[141868, 3755, 377, 8, 30, "Output"]
    6 T) S6 j, h( ]' n. R, N}, Open  ]],
    ; X" v  n, n3 o5 h8 o" D. TCell[CellGroupData[{
    8 A, }% j0 B- w; P: SCell[142282, 3768, 452, 14, 31, "Input"],
    6 U; \# \; U. x) G! }! iCell[142737, 3784, 1440, 42, 36, "Output"]
    3 m( @3 Z/ G& ?) w; ^. z1 K}, Open  ]],9 L3 ]. O# l1 u. V7 M
    Cell[CellGroupData[{! C  E9 s2 \. ?0 s* O+ [
    Cell[144214, 3831, 178, 3, 31, "Input"],
    1 F0 I/ Z3 x; zCell[144395, 3836, 448, 9, 30, "Output"]6 |6 M" h1 I+ j: X- z8 G
    }, Open  ]],
    9 ?- o2 `' Y3 w, j. hCell[CellGroupData[{) u) K) C5 s( w2 u1 z& T9 V( f
    Cell[144880, 3850, 474, 14, 31, "Input"],
    & N; C2 i7 N2 t( `Cell[145357, 3866, 1510, 43, 36, "Output"]
    : N# C+ \" s$ r' Z1 X; r}, Open  ]],
    % `$ e; k% V) e3 `6 YCell[CellGroupData[{: H# p  S" T& E" B& c( w4 q
    Cell[146904, 3914, 470, 14, 52, "Input"],- l+ ?# m( p! u9 K0 \
    Cell[147377, 3930, 257, 5, 30, "Output"],
    / _3 l; Y% q" xCell[147637, 3937, 1310, 38, 36, "Output"]: P# h: K( |5 m. R7 u' r
    }, Open  ]],, x8 V* s& Z; x
    Cell[CellGroupData[{
    - d$ f4 D9 [0 X, D: lCell[148984, 3980, 520, 15, 52, "Input"],
    3 C, u: Z1 ^; B+ A3 YCell[149507, 3997, 293, 7, 30, "Output"],
    5 c# g! c$ ]% ]* b; f9 E9 zCell[149803, 4006, 1345, 40, 36, "Output"]* K9 i3 b; o  K; Z: U
    }, Open  ]],
    7 t% P7 w6 ^6 J  _& D- _/ X' f7 kCell[CellGroupData[{, o% r, ]" [, I# x
    Cell[151185, 4051, 520, 15, 52, "Input"],' M9 _' R5 o0 G6 \: @* L' y& i
    Cell[151708, 4068, 266, 6, 30, "Output"],  W% _  V% T: P( M7 H
    Cell[151977, 4076, 1319, 39, 36, "Output"]( j) I9 ~5 m8 _( j" I
    }, Open  ]],7 ?) S. ~: M2 k, n# @) u* J
    Cell[CellGroupData[{
    " w4 M/ }7 F% n/ OCell[153333, 4120, 520, 15, 52, "Input"],% ?+ p2 T' V* y( g3 @
    Cell[153856, 4137, 272, 6, 30, "Output"],
    " A7 j# ?. t! b, |' D" }: gCell[154131, 4145, 1327, 40, 36, "Output"]
    5 A% I( C- F' U/ U% w: B9 h  T}, Open  ]],
    & O/ a  t7 @6 j) \- z: N3 vCell[CellGroupData[{
    # W& x/ {0 P% m; @- t% S9 D; HCell[155495, 4190, 520, 15, 52, "Input"],
      A2 t( W: c7 s1 x( V$ P3 j- GCell[156018, 4207, 265, 6, 30, "Output"],6 C% s) |- S5 P" M# o
    Cell[156286, 4215, 1318, 39, 36, "Output"]2 a" E7 Z: e* K0 S0 b3 c
    }, Open  ]],
    9 k( U, ^; }: m/ v- TCell[CellGroupData[{6 Z+ ]' ?/ w  X: Q, n
    Cell[157641, 4259, 517, 15, 52, "Input"],1 P' T$ s4 P: p# n8 j2 O. d
    Cell[158161, 4276, 275, 6, 30, "Output"],  T/ A+ V) s( s: f/ T0 {1 S: b
    Cell[158439, 4284, 1333, 41, 36, "Output"]1 z. S( V3 O5 `
    }, Open  ]],4 {! M4 e% ?3 j7 H: L# p
    Cell[159787, 4328, 381, 11, 31, "Input"],* l9 n& m3 Q) M4 i( u5 Q+ O# L
    Cell[CellGroupData[{: C) A9 S" o3 k! r, F
    Cell[160193, 4343, 573, 16, 52, "Input"],/ n2 m1 m5 B2 w6 [5 V8 i
    Cell[160769, 4361, 278, 6, 30, "Output"],
    # ]4 J( x5 l5 I( CCell[161050, 4369, 1328, 41, 36, "Output"]9 c2 K3 U5 j8 |4 X0 w: O& Q
    }, Open  ]],! c% n- t, b& U& y( Z) ^
    Cell[CellGroupData[{+ B/ \/ [' [6 j0 b7 Q# B
    Cell[162415, 4415, 571, 16, 52, "Input"],
    . [/ D% a& {: c0 v9 R% D8 _Cell[162989, 4433, 270, 6, 30, "Output"],
    / m# s0 O- \6 o) s2 R5 f7 OCell[163262, 4441, 1325, 40, 36, "Output"]
    / ]' a; n8 ]: d$ ?; u; P; h% q+ K}, Open  ]],
    . j. z- U' V9 v6 QCell[CellGroupData[{
    6 ~- x, J" w$ l  W- S, G" O8 HCell[164624, 4486, 571, 16, 52, "Input"],
    $ K* D. U; L% W, q* _Cell[165198, 4504, 264, 6, 30, "Output"],$ W0 r  Z* l( h: X
    Cell[165465, 4512, 1316, 39, 36, "Output"]3 U+ B( j0 T/ d; {
    }, Open  ]],6 b0 @3 m6 P6 I) a( H
    Cell[CellGroupData[{7 j# l% U4 v* ^; l: p( A
    Cell[166818, 4556, 571, 16, 52, "Input"],3 S; \/ K8 }% [8 V6 D
    Cell[167392, 4574, 271, 6, 30, "Output"],
    : W7 t1 m8 ~& t( [+ s5 [. GCell[167666, 4582, 1329, 41, 36, "Output"]: U, _. s4 Y$ i3 h: T- K3 r! `
    }, Open  ]],
    $ T4 y" y: m2 h: _Cell[CellGroupData[{
    $ f$ a4 x) x, E3 wCell[169032, 4628, 570, 16, 52, "Input"],1 u/ K* H( X4 ]/ i
    Cell[169605, 4646, 277, 6, 30, "Output"],
    + L" |; K. R$ q! ~9 i3 \. y3 \% HCell[169885, 4654, 1335, 41, 36, "Output"]
    3 @" Q6 Y* k# U}, Open  ]],, Q8 f; c, C. D9 [" Q+ d* C$ ~/ r2 N
    Cell[CellGroupData[{
    % k. Z# Y5 s$ A) k5 @- MCell[171257, 4700, 571, 16, 52, "Input"],4 G  i( u( ^% h) Y" h$ V
    Cell[171831, 4718, 274, 6, 30, "Output"],+ W4 R0 J7 n( u5 `5 T* _$ u
    Cell[172108, 4726, 1335, 42, 36, "Output"]4 i+ t8 r/ m) p! L1 n/ h/ f5 V+ z
    }, Open  ]],
    . U- W) ~5 H3 \2 oCell[173458, 4771, 104, 1, 31, "Input"],: Y4 n" M4 O3 A5 t5 l
    Cell[CellGroupData[{
    ) F, a; b. s0 RCell[173587, 4776, 279, 7, 31, "Input"],
    " i  T6 O, u2 ~. O9 c6 ?Cell[173869, 4785, 878, 14, 50, "Output"]
    2 _2 i; E' t9 e- d4 S# a}, Open  ]],8 r/ m. ]. g) `' i# U  z
    Cell[CellGroupData[{
    + k; M$ X8 j8 VCell[174784, 4804, 243, 5, 31, "Input"],
    ; |3 w, E( r) G  PCell[175030, 4811, 216, 3, 30, "Output"]
    - }5 L3 ], @, L}, Open  ]],
    " A. w: f+ T" T6 ]: M# uCell[175261, 4817, 537, 14, 31, "Input"],, k7 ~+ k4 W7 ?& @' a
    Cell[CellGroupData[{1 S  a) |# G9 e" `, I9 E
    Cell[175823, 4835, 94, 1, 31, "Input"],1 B- `9 R7 b# Q) @, M
    Cell[175920, 4838, 1319, 20, 107, "Output"]
    7 R& L# h' }3 A0 _4 `}, Open  ]],
    # D- x* I$ }7 kCell[CellGroupData[{
    # x1 E  k6 T6 B, Y1 A" q+ E. nCell[177276, 4863, 464, 12, 31, "Input"]," A5 T; {. h+ f% R
    Cell[177743, 4877, 17248, 366, 582, "Output"]- p  v9 I; g/ W! k6 X7 G' e
    }, Open  ]],
    + J3 r# G2 A; c" [  yCell[195006, 5246, 32810, 934, 912, "Input"],7 Z' E7 s, D6 y  a5 u8 X
    Cell[CellGroupData[{# h$ b- v5 S2 `# ^; y
    Cell[227841, 6184, 284, 6, 31, "Input"],  ~. I( x8 F( T9 q/ M3 L; B
    Cell[228128, 6192, 961, 17, 50, "Output"]
    . A/ `2 H  B- R' C! V}, Open  ]],( H, u. V' [( |: c9 \; [2 W& I
    Cell[CellGroupData[{; U# U* s1 F  K
    Cell[229126, 6214, 531, 11, 31, "Input"],
    0 b. B+ ]% g% ECell[229660, 6227, 28858, 853, 537, "Output"]
    8 x" F8 n/ p, O& A$ i. j}, Open  ]],
    1 a, L( ]0 e. n3 J) fCell[CellGroupData[{
    1 F1 I, Z9 q+ K5 X9 M/ ZCell[258555, 7085, 281, 7, 31, "Input"],
    # J$ e8 F* u9 e! @8 t' t" {/ kCell[258839, 7094, 540, 10, 30, "Output"]
    6 F. l' }; c% L, d, [}, Open  ]],/ d9 `3 A  F! X; I0 k5 Z
    Cell[259394, 7107, 1869, 53, 92, "Input"],
    & `. e% v/ F; L) R7 e6 c; {  SCell[CellGroupData[{
    , x7 O- s4 V9 s; _6 F2 H! CCell[261288, 7164, 138, 2, 31, "Input"],, z. q1 R  }4 @6 X6 j- q
    Cell[261429, 7168, 1122, 20, 69, "Output"]
    9 K  n1 a  e3 A; w) J+ E0 [}, Open  ]],/ Y0 z$ e$ e, R. Z. j8 F9 y
    Cell[CellGroupData[{' g% U+ `& D% N/ y% c& e* b
    Cell[262588, 7193, 1816, 29, 152, "Input"],6 I  E; O! v% Y& `. P. Q% g
    Cell[264407, 7224, 1736, 28, 88, "Output"]
    ( E5 L4 i+ U' u! n4 X. w}, Open  ]],5 w( \4 r0 }2 F1 x; C5 C
    Cell[CellGroupData[{- Z, [; a% h- Z* E+ W
    Cell[266180, 7257, 209, 6, 31, "Input"],3 \* _2 I6 ?* Z7 K
    Cell[266392, 7265, 516, 9, 30, "Output"]: v6 w2 O$ g" F$ Y& u3 A
    }, Open  ]],
    , s" S# m9 _# t7 Q- D/ j$ kCell[266923, 7277, 613, 16, 31, "Input"],
    * |$ {9 p- x; tCell[CellGroupData[{  ]! G- J5 }) F0 r+ r
    Cell[267561, 7297, 157, 2, 31, "Input"],
    # J5 O+ M; Q1 S- W' ICell[267721, 7301, 776, 13, 50, "Output"]. O& [1 x4 b# \* L
    }, Open  ]],# p/ `* M' n/ M; _
    Cell[CellGroupData[{
    3 x( k& e* k3 ^  I& H6 eCell[268534, 7319, 1397, 21, 112, "Input"],
    ; i' u: v3 p* I8 o  K3 O2 xCell[269934, 7342, 1384, 21, 88, "Output"]
    % L# t+ y5 j4 ~8 C) w4 ]}, Open  ]]," z1 I+ I' ^6 I7 D, B) V
    Cell[CellGroupData[{: R) {# `, {7 A
    Cell[271355, 7368, 1208, 30, 55, "Input"],
    1 n3 Y/ u. \  f1 xCell[272566, 7400, 1299, 29, 256, "Output"]
    2 c, _+ X' k& z' k& U6 l0 s}, Open  ]],
    " L% v- h1 j$ [! @2 N5 E4 A% o7 Y) zCell[CellGroupData[{
    8 F, K! b" @; `Cell[273902, 7434, 829, 23, 31, "Input"],3 {3 O5 z0 ]' E: ~" l  @
    Cell[274734, 7459, 1053, 22, 249, "Output"]% Z6 p  I1 p$ V
    }, Open  ]],
    " k0 @, B+ b8 Z8 t( y& WCell[CellGroupData[{
    & W* h4 J0 F' B; J$ QCell[275824, 7486, 84, 2, 31, "Input"],
    ' T; k. m9 l7 y7 r6 T  `; N% x0 P# UCell[275911, 7490, 1675, 36, 256, "Output"]
    8 D( P' |# N1 T* V6 s5 _}, Open  ]],0 ?, N& V4 W$ @+ j
    Cell[277601, 7529, 131, 2, 31, "Input"],
    " e# |" B: \% ^0 i6 DCell[CellGroupData[{
    ( U5 o, b  a. R7 RCell[277757, 7535, 302, 7, 31, "Input"],
    , m# z/ ]  U/ U* u; ZCell[278062, 7544, 935, 16, 50, "Output"]4 s+ h3 n; d* p& Z- u. a
    }, Open  ]],
    + c' l/ f$ j4 LCell[CellGroupData[{0 G+ B$ A. {8 S' ^3 _  c! c4 f6 |( I. L
    Cell[279034, 7565, 295, 6, 31, "Input"],$ p2 G! V: B) D3 g3 ?7 {( S3 d5 {0 h
    Cell[279332, 7573, 244, 3, 30, "Output"]
    / {) e5 l! l5 ^  U" h$ K}, Open  ]],
    ! U1 F6 k: L! x3 ^# r4 HCell[279591, 7579, 610, 15, 31, "Input"],6 T0 R* q# k- ^
    Cell[CellGroupData[{
      @/ C+ N2 S$ L& JCell[280226, 7598, 120, 2, 31, "Input"],
    & m7 s) S6 b3 W4 |! f+ zCell[280349, 7602, 1334, 21, 107, "Output"]
    ( e6 N! u6 O" ]# G. {}, Open  ]],
    2 l2 o6 Z6 L7 Z* U4 ECell[CellGroupData[{: f1 N: c9 F& @$ m0 z
    Cell[281720, 7628, 460, 12, 31, "Input"],
    0 Z' Z+ m; W; ACell[282183, 7642, 17248, 366, 582, "Output"]
    9 t4 \, @' J6 P4 J- D0 z4 [. r' ~3 C' v% u}, Open  ]],4 q! b& [" |+ F9 T# r7 z4 T  G, M
    Cell[299446, 8011, 32810, 934, 912, "Input"],# X$ |5 M4 H, v. j7 K7 d0 w
    Cell[CellGroupData[{
    0 O8 ~+ U/ t3 L; {* J8 eCell[332281, 8949, 334, 6, 31, "Input"],' N# z% _+ A: B2 U* A: g3 K. `
    Cell[332618, 8957, 1004, 18, 50, "Output"]
    2 [3 u7 ^+ `/ A1 }' ?}, Open  ]],
    0 A. F  |' `& E# t- Q) |( ]+ mCell[CellGroupData[{
    & x9 a; s; |$ gCell[333659, 8980, 559, 11, 31, "Input"],( w1 k6 t+ r, _. R0 }
    Cell[334221, 8993, 28881, 853, 537, "Output"]1 X$ s# r% m' E* ?) ^0 G
    }, Open  ]],
    3 v  i7 v6 A( r0 l) [) _7 }5 KCell[CellGroupData[{  e8 H2 v: M7 ~4 T4 H% q0 ?
    Cell[363139, 9851, 306, 7, 31, "Input"],' U/ d: B+ P/ ^
    Cell[363448, 9860, 562, 10, 30, "Output"]
    ( C, |2 s- U) r& g( r: p}, Open  ]],% S7 O: W, A$ n9 U7 u5 ^! }8 h
    Cell[364025, 9873, 1915, 53, 92, "Input"],
    * R6 V1 b6 d0 k5 ]' R; w) ]* j: mCell[CellGroupData[{
    9 q1 ?+ g- I2 t! aCell[365965, 9930, 163, 2, 31, "Input"],
    + s: |2 j- r- ^: Y" XCell[366131, 9934, 1139, 20, 69, "Output"]
    / v1 m; O' n9 u0 O' G0 P- a}, Open  ]],
    $ j/ _3 f5 q4 F2 j- y. f% OCell[CellGroupData[{) i( S1 }! J" u) \
    Cell[367307, 9959, 1863, 30, 152, "Input"],0 k$ c' y. ^  j: V/ w; e3 e
    Cell[369173, 9991, 1761, 28, 88, "Output"]
    0 L# p9 k4 d, ?; w; S/ O}, Open  ]],6 Y5 H2 t5 H5 q5 H
    Cell[CellGroupData[{( \) H% Y5 x7 _3 @8 ]
    Cell[370971, 10024, 231, 6, 31, "Input"],
    - p( b. O$ a0 L# d& M$ h+ \7 eCell[371205, 10032, 540, 10, 30, "Output"]: n* P0 t2 ?4 r, S8 F1 Q
    }, Open  ]],5 v! A& c! e& F8 ^  V; c
    Cell[371760, 10045, 687, 17, 31, "Input"],
    1 E6 M8 t5 u! D1 hCell[CellGroupData[{
    5 I) M0 }; @& g/ {- o% W* c3 nCell[372472, 10066, 185, 3, 31, "Input"],
    * V/ f" K( K/ @9 _8 D4 [$ T1 [0 CCell[372660, 10071, 804, 13, 69, "Output"]
    6 Q/ X" j2 g& [1 ~4 O2 p5 J% C}, Open  ]],: u' R8 H; f8 n3 N) q- s+ C  s
    Cell[CellGroupData[{$ E8 V4 W0 n* y2 f: C
    Cell[373501, 10089, 1405, 21, 112, "Input"],
    . J2 s; F+ t1 W' a( [/ RCell[374909, 10112, 1387, 21, 88, "Output"]1 M; _8 _/ J! n6 t! M
    }, Open  ]],+ M  y7 z5 F* g: D# z* E
    Cell[CellGroupData[{
    1 q5 e9 B7 Z  j% yCell[376333, 10138, 1339, 33, 55, "Input"],  \9 L6 }  s9 _) H* c* w
    Cell[377675, 10173, 1370, 30, 256, "Output"]
    2 K& @. X4 p! B) N( Z" \& V}, Open  ]],
    . }6 w  ~$ b  k5 Y4 YCell[CellGroupData[{
    / Z9 A- w5 \& Y* M% cCell[379082, 10208, 877, 24, 31, "Input"],
    1 P& U* Y4 c" o1 j3 J2 CCell[379962, 10234, 1058, 22, 249, "Output"]. {% Q8 r& y3 z) Y9 K
    }, Open  ]],
    ) F' w9 j. k- @Cell[CellGroupData[{" I8 s- }, R$ P# y. s
    Cell[381057, 10261, 84, 2, 31, "Input"],
    4 J: V6 i+ q8 Z4 Q. zCell[381144, 10265, 1659, 36, 256, "Output"]
    & T$ q" Y) O: O}, Open  ]],
      D& p; p7 y2 Z9 aCell[382818, 10304, 509, 10, 52, "Input"],
    7 ]3 ^8 d) E( k8 Z! pCell[383330, 10316, 530, 10, 33, "Input"],
    ) Q/ _! X! W5 M5 W+ cCell[383863, 10328, 69, 1, 31, "Input"],# K+ z: v1 M& |+ B* W( s: `
    Cell[383935, 10331, 62, 0, 31, "Input"],. C: _6 E$ r" J8 r- i
    Cell[CellGroupData[{9 s9 z  F! ]' s* G3 [1 {& z
    Cell[384022, 10335, 364, 9, 31, "Input"],
    + s3 \2 N+ N3 C+ V4 m) tCell[384389, 10346, 13864, 402, 287, "Output"], l/ V* M' V0 r- f4 X( O2 g5 G
    }, Open  ]],
    5 H; E2 p# g3 MCell[398268, 10751, 69, 1, 31, "Input"],
    # Z; C% Q0 ?! y6 A5 w5 a5 L5 M0 MCell[398340, 10754, 74, 0, 31, "Input"],
    $ G& {* K$ x( FCell[CellGroupData[{
    : T  H( X( _7 f- s+ @' ZCell[398439, 10758, 288, 8, 31, "Input"],0 l1 ?4 U/ O  G! U( M: v
    Cell[398730, 10768, 13861, 402, 287, "Output"]: t) F0 |/ o2 ?% S6 J; y, a2 Y
    }, Open  ]]$ a& v. l. j! P- x8 ^
    }
    & N* |% f' {; K7 z& x$ _]
    3 O9 m2 i# E2 b# T*)* T. Z- f# C: t

    0 P0 f& S4 w5 t2 ^8 H(* End of internal cache information *）  S- |  V# ?1 A

    $ z% r$ \/ w) n" p/ y( f+ y& ^这个是用mathmatic做的神经网络，能导出最后的权值，就是可以写出表达式，我想用matlab做，却不知道怎么做
    回复

    使用道具 举报

    569646632        

    0

    主题

    7

    听众

    46

    积分

    升级  43.16%

  • TA的每日心情
    开心
    2013-11-6 20:46

    • 签到天数: 9 天

    [LV.3]偶尔看看II

    自我介绍
    爱好数学
    8#
    发表于 2013-8-30 20:15 |只看该作者 |招呼Ta 关注Ta
    可能不能导出系数
    回复

    使用道具 举报

    9#
    无效楼层，该帖已经被删除
    -___        

    0

    主题

    8

    听众

    44

    积分

    升级  41.05%

  • TA的每日心情
    开心
    2014-4-24 16:04

    • 签到天数: 12 天

    [LV.3]偶尔看看II

    自我介绍
    wahaha
    10#
    发表于 2014-2-4 16:33 |只看该作者 |招呼Ta 关注Ta
    者。。。。这是神马
    回复

    使用道具 举报

    返回列表 发新帖
    高级模式
    B Color Image Link Quote Code Smilies
    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩

    • 电话咨询

    • 04714969085

    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问：王兆丰

    GMT+8, 2026-8-3 23:26 , Processed in 1.936125 second(s), 106 queries .

    回顶部