快捷通道

QQ登录

只需要一步，快速开始

  注册地址  找回密码

数学建模社区-数学中国

留学>>
返回列表 发新帖
查看: 10725|回复: 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
    问题完善一下！或者把代码贴上！! Z" y+ k  |2 h% Z1 E
    回复

    使用道具 举报

    琳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 6 L$ L4 Y% V6 A- s
    神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗

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

    . M- i+ w! V3 d% v1 ZCell[BoxData[{
    2 W0 C) _$ h4 j  k% x  I" I RowBox[{"r0", "=", "0.2"}], "\[IndentingNewLine]",
    $ f3 ]0 }7 h, N: D! b/ y9 F RowBox[{"M1", "=", "1"}]}], "Input",
    * a7 v3 h' ^# X) ? CellChangeTimes->{{3.577844361578125*^9, 3.57784436678125*^9}, {3 G% O- Q3 i( n/ D5 G" X+ f
       3.5778457908125*^9, 3.57784580253125*^9}, {3.57784602534375*^9, 3 u5 X5 }9 h& a# H2 V  o) b- a
       3.577846109453125*^9}, {3.57784617128125*^9, 3.57784619321875*^9}, {2 v5 E% `' M! T2 `
       3.577846583984375*^9, 3.577846620984375*^9}, {3.577846653203125*^9,
    / ^1 v: Z7 S8 m' y- Z8 L   3.577846691984375*^9}, {3.577846779953125*^9, 3.577846794921875*^9}, {
    0 @- u0 J0 ]# ^. ^/ U: Z! ^1 A6 g" J6 I   3.5778470791875*^9, 3.577847088921875*^9}, 3.577847409671875*^9, {
    8 A5 |$ L  I- z5 K   3.577847477203125*^9, 3.577847523203125*^9}, {3.577847586484375*^9,
    5 n6 f9 [7 ]) R: ^! F9 j   3.577847600640625*^9}, {3.577847649140625*^9, 3.57784770196875*^9}, {
    % Q8 }( P, h' I- A7 U9 d   3.57784774896875*^9, 3.57784776490625*^9}, 3.577847981546875*^9, {" t& @. e# @" @9 g) r" A3 R: ]
       3.577913312890625*^9, 3.577913360109375*^9}, {3.577919262828125*^9,
    - \& T+ |4 t  g3 n5 J   3.5779193133125*^9}, 3.577919388484375*^9, 3.5779605095479155`*^9}],
    % T! l5 C0 T; M: x5 f4 w1 h, Y
    # d% w' P" v- I& u' ~Cell[BoxData["0.2`"], "Output",. W3 x! {% @4 l5 @! a
    CellChangeTimes->{* c  {# r9 @7 s; Q+ S* n8 `0 H$ A
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, ' s) l0 Q3 I& |8 V# {: @( q
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    7 l# E0 S, o7 t3 t   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9, & w& F" E% C7 t# Q( c
       3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {
    : \+ A3 ~% {# ^9 J# `+ k* j5 C   3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    & V$ a( ]! R. g& L6 Y! n5 s   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    % @" ]& H7 ?8 c/ G( {4 v5 I   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9, & X4 ?1 ?, t- k/ x$ j
       3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    # q+ ?" T. }1 G& V4 U   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9, % W5 m0 C0 W7 k8 a( e
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,   d( ^( b+ ^  l, P$ \! C) d' a: @0 H
       3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9,
    9 w+ D$ E% A  x% A   3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, ) Q$ r6 X7 ^. L
       3.577960510686717*^9, 3.578012149296875*^9}],
    ! Y5 b& Q$ Q! a6 h
    ( h: S4 S! C0 @, a" m" J# l) CCell[BoxData["1"], "Output",
    ) f+ G- h) v- P2 B$ v0 N CellChangeTimes->{) j" a# \: S4 |! o! A0 a2 Z
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9,
    4 [! N$ T9 A- }$ J+ Q, l, [- M: w   3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    2 _6 X( m( i1 ^8 J   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9, 3 U  o2 B+ @8 M8 Q: b" v
       3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {" m- d" q( @% J; ?
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    $ Y$ I8 G7 n# [8 C) P4 g  Z   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    1 `& L: J) N0 I. A8 D9 W! S/ L   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
      u4 p& r: O" c# X# Z1 W3 Q   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    0 l! y3 t! y8 o2 j' e& y6 N3 x   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,   c4 q+ m( d* j; h9 f5 C
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9, / \2 h( {# @4 a4 J- W$ `
       3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9,
    ' B2 i! \# I7 u   3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9,
    ! V! x: _8 O8 U, C: }7 ^7 ^   3.577960510686717*^9, 3.578012149296875*^9}]
    2 B2 t! a; W6 H. ^# a9 m}, Open  ]],  ?# v9 r2 m+ n, g* H8 C5 V

    % M2 b* P4 ?1 e' M& r- F5 qCell[BoxData[7 f  B/ F1 _$ D% u  U2 ^& w/ M" g
    RowBox[{"For", "[", 9 n8 n$ r' G3 w3 q: K+ v" B8 c
      RowBox[{
    + }! x- u8 f& B" j0 A: j- O* X   RowBox[{"k", "=", "2"}], ",", ( d. j9 l5 b8 {
       RowBox[{"k", "\[LessEqual]", "60"}], ",", , I/ Y7 Y1 Y5 n1 Q7 s( K) o. R6 X% O
       RowBox[{"k", "++"}], ",",
    0 P- q' A. m- L# {   RowBox[{"{", "\[IndentingNewLine]", * u  m3 o, u, u! M$ A: z
        RowBox[{2 j3 i; B" ~1 g9 @6 x# a& c9 R; o
         RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]", / Q6 A# l& \% w, u* v8 n5 y
         RowBox[{"For", "[",
    1 Q- E. y& R& h& ?: g      RowBox[{
    - m- B' w4 {6 M  y$ Q, p       RowBox[{"j", "=", "1"}], ",",
    2 C# {* q; G8 i0 ]* ?6 A' x       RowBox[{"j", "\[LessEqual]", % Y3 Z8 K" [! n) {+ d
            RowBox[{"k", "-", "1"}]}], ",", 9 p* N" I, b1 h$ q* `% O0 f9 A6 p
           RowBox[{"j", "++"}], ",",
    2 j  y; w4 R6 y       RowBox[{"{", "\[IndentingNewLine]",
    . x) m0 f' P9 L/ m0 s( @0 t        RowBox[{
    + m& J) A" V5 }, U: |2 [7 u         RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]",
    $ @, a3 t& B* ~% L7 o/ V         RowBox[{"For", "[", 6 ~1 H7 t4 t& o$ ?
              RowBox[{
    " X3 ~3 N, Z# h* D) I7 c           RowBox[{"i", "=", "1"}], ",", 6 {1 u' P3 o0 s+ J! x" h
               RowBox[{"i", "\[LessEqual]", "9"}], ",",
    - l, p# h; K! E5 @9 A! I6 {           RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", ' G8 O3 }! \5 _' m
               RowBox[{2 z( @* u! b) T
                RowBox[{"r1", "+=", * s0 q1 }8 n) L/ m# A1 h/ m
                 RowBox[{/ y$ u: g' k! Y6 D/ T1 V
                  RowBox[{"(", & b' m" k* t( U6 u/ k  _
                   RowBox[{
    # r( z  n3 G! i9 C, x                RowBox[{"CM", "[", 0 k, n7 }3 V7 U5 t0 F
                     RowBox[{"j", ",", "i"}], "]"}], "-",
    3 \: r5 `! `* \! @                RowBox[{"Data", "[", * S! d' G: z7 u: g  J; ]! U) B
                     RowBox[{"[", + e0 _" m- R' H3 j
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*",   N: [( ^; ~3 U1 H' X
                  RowBox[{"(",
    7 r# }5 ~3 B# {* R5 q  P               RowBox[{
    & g- r; q5 O! y9 }: z                RowBox[{"CM", "[",
    4 u5 F& U7 e5 S6 u/ k7 Z" ^                 RowBox[{"j", ",", "i"}], "]"}], "-",
      K& ]% I* m' A8 f7 [3 a7 X                RowBox[{"Data", "[", 0 O8 k- |/ V! ^5 H; ~5 t" O3 b
                     RowBox[{"[",
    ; L, [( k6 |* b. X$ h                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],/ @8 p1 x" E0 T* Z3 `! p
               "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]",
    7 t8 M2 [3 d9 J& e         RowBox[{"r1", "=", 9 N9 I8 L. i/ L) _5 r! l
              RowBox[{"Sqrt", "[",
    0 E- g8 n) T$ E7 s* K* q, l' g           RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]", 5 n+ p1 l" ?5 ^: Q5 Z8 _
             RowBox[{"If", "[", " ",
    3 e6 d2 Z( L  c4 f8 d. t9 D0 q9 P          RowBox[{4 O' w. G: j; `  t6 T
               RowBox[{"j", "\[Equal]", "1"}], ",", + \1 N2 c3 Y+ i4 m' B. }
               RowBox[{"rmin", "=", "r1"}], ",",
    $ Z8 v& S, X% b5 l           RowBox[{"If", "[",
    ( [, Y: |* J+ ]' \. r5 T) Q            RowBox[{  Q& X) Q; j5 k: E8 R
                 RowBox[{"r1", "<", "rmin"}], ",", / N( K  w) P( c% G
                 RowBox[{"rmin", "=", "r1"}], ",", 7 b- _# X. r: g( e- s; V! f7 U) v
                 RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}], 8 w5 r' K2 h! F% ]
            "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";", 8 e7 p+ k4 u7 a
         "\[IndentingNewLine]", 9 r' f2 c' Y9 X7 s+ U+ c$ ^3 ~
         RowBox[{"If", "[",
    7 p+ P0 j# b+ {. D( ~* @3 I& N# k      RowBox[{
    5 `& p0 i8 `) z* w! |0 H2 c       RowBox[{"rmin", ">", "r0"}], ",", " Z" g/ E, f# G, Y5 T6 M
           RowBox[{"{", "\[IndentingNewLine]", ; ]- X* e& _& `9 F
            RowBox[{* f8 j  m% E/ I% n: k$ e! a
             RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]", " o2 O5 w/ F4 T
             RowBox[{"For", "[", ' O3 ^) N7 S0 q* t
              RowBox[{
    % O/ s$ w: ]; j: }6 q( t           RowBox[{"i1", "=", "1"}], ",", ! D) T3 Y! J7 Z0 @# k6 p
               RowBox[{"i1", "\[LessEqual]", "9"}], ",",
    : r/ a& H) b- X; M; c           RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]", ' x, A' q0 k# r# H
               RowBox[{
    3 `) a: b9 S* k+ C5 K% F. C            RowBox[{
    . n6 Q; d1 l  I! h/ q6 f: S             RowBox[{"CM", "[",
    - Q  K5 V, O& r5 o; v: z, E' _              RowBox[{"M1", ",", "i1"}], "]"}], "=",
    % `2 A' S7 d) ^$ s/ q             RowBox[{"Data", "[", % c! X5 C0 c0 h! h0 Q* ?, C: C
                  RowBox[{"[",
    ) B' M3 ?+ B4 L2 ]               RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}], 2 M% f( r" M$ Y; _9 q4 P1 `
              "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",", $ ~: ]1 d  D2 x5 N$ h
           RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}],
    + c( [: Y- }* P- n! p' y    "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",
    7 e; Z3 W8 {, ]+ n! e CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {
    ' M  B: z& L& P& R8 b4 s! ~7 d   3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9, , S# g9 b" Z8 j" S$ m% v7 u
       3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {% O' b1 `4 Y, _8 H  ?- N5 n; [% i) K
       3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9,
    - C# J$ t) g% e7 x4 V* R/ n! _" @   3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {
    / N  U" S2 T1 j5 `   3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9, 7 ]7 b' E) e1 {: U# y2 X
       3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {) M$ w9 N; `, S2 {% }' [
       3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9,
    - j5 c2 x* a" o0 i0 {   3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {
      m* p  K+ B5 \+ _4 k   3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9,
      R( G  o9 t" {& b. N   3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {) z. a( V! r/ y1 z, x% q. `1 R
       3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9, ( a3 V! S4 k9 u5 m
       3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {
    ) q! H% D6 i# n0 G% I2 N% [   3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9, ( N4 \  c* C# @8 v% n  N
       3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {5 R8 M4 A* \# j) {6 ]% V
       3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9,
    . I7 X7 k- |# `# P4 ]- J, J   3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9, # z, d7 I% L% ?0 F+ `# f) @
       3.577958821991373*^9}}],
    ) c* R, c5 X( I" L, C) D' G* B+ ~' B: m3 |# I4 g6 J* D
    Cell[CellGroupData[{% @" C! u; g9 p2 T$ a. Q

    + v  j' ^  x3 g! t5 O9 xCell[BoxData["M1"], "Input",
    , @1 e4 j( |4 _ CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],4 t, \/ A# w! J3 ?( ]) \% i4 k
    - }" ^8 g3 y  ]+ ]
    Cell[BoxData["21"], "Output",
    3 p, \7 g# m7 L/ S9 D( t CellChangeTimes->{: F. X4 ^' ?* g9 v$ P. y
      3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {! f/ a1 A3 q( j2 J8 f- [* D/ N
       3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9,
    8 O! {7 _2 Z2 J- |4 s   3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {
    ; h7 l  ]' m4 Z, O7 H   3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9, 9 u: j9 r& Z9 m5 F6 s& b
       3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {, ^) }" Y" c5 f
       3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9,
    5 P2 X7 |) t: K5 z- g) C; J6 r   3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {
    , Q* q( n; A1 b( i* n9 k- K   3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9, " g( X* a* K+ n7 x- B0 K: l5 Z
       3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9, $ z( o+ C- M3 ?' r, T7 i
       3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9, 6 t, q3 C( }8 ?* \3 j6 f% u. t
       3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9,
    4 H" O! B! U7 S6 `- Q, C1 a$ {   3.577960515600726*^9, 3.5780121541875*^9}]) @0 ?4 S' m' z+ _) i
    }, Open  ]],3 O4 o# j2 M9 s  m) a
    ( U; r3 D% _. ?% D8 g8 W
    Cell[BoxData[
    8 m; ^. m* b0 N2 g RowBox[{
    7 B) S1 F2 o- R' o  RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[", $ U3 h0 E  b! c! r3 J
       RowBox[{"1", ",", "i"}], "]"}],
    0 f! D2 O3 F3 [  RowBox[{"\:5230CM", "[",
    - Q; g2 ^' j: J& w2 _9 ^. r! W( O   RowBox[{"21", ",", "i"}], "]"}], # D) t$ o* G7 U- f% R8 n
      "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\
    3 o( X0 h; J+ ]0 O2 O* T\:51fd\:6570u1\:5230u21"}]], "Input",
    9 |4 n# j2 a. x: V CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {. y3 [. G* z1 l' g  g
      3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9,
    $ b* p( R& P6 p6 W  3.577960526583145*^9}}],5 G# Y2 y- C- |2 l3 ]/ c% t2 V/ M

    6 t! C' G! D4 I2 s8 h- a$ t2 sCell[BoxData[9 C, G; D$ g% \( l+ @  V
    RowBox[{"Clear", "[", "Delta", "]"}]], "Input",
    0 E0 ?9 p- m/ q2 G CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],6 ?" g8 A* L" [9 Z

    ; [; l5 u% Y* e% ^9 B3 RCell[CellGroupData[{) Z6 x) F( S) J- {
    # m/ N- e& M4 Y/ x, |) M
    Cell[BoxData[
    9 f! u. M. L8 h( } RowBox[{"Xa", "=",
    & V9 ?0 Y( D; L: O  RowBox[{"{",
    1 v/ O8 a0 o. k" V) b   RowBox[{
    " b, w  D" O/ h1 r0 X   "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7",
    7 P; A$ j: J. t$ r    ",", "x8", ",", "x9"}], "}"}]}]], "Input",
    . L1 L5 v4 e- Q. f4 ^& M  o) l: k CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],: K# b; X$ J5 m* I+ [
    ! ^8 m0 e: F/ {5 B1 z( `
    Cell[BoxData[
    0 S2 P9 v5 O3 \, l" M RowBox[{"{", : R& Z9 O7 H% M) E, u
      RowBox[{
    0 y2 m9 f1 G* C6 q, l, Z% a' \  "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",
    1 n" l% _9 l+ f1 T* |0 _$ c) v    "x8", ",", "x9"}], "}"}]], "Output",( R  U- G1 k* B5 A: _( B+ l
    CellChangeTimes->{$ [' ?8 z- {! K. E" u2 [7 z
      3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9,
    * H8 x- _  S6 t! N- v; r   3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9, 3 A9 H5 A1 O' y+ ~8 ?: L8 \
       3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9,
    5 `1 f& J! E4 X: m   3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9,
    * x3 k9 z; ?+ K! J/ [( {$ E   3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {9 I! R4 ~" O+ n2 y1 H- M
       3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9,
    . n* a# p# g/ f2 ?: d3 W   3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    ( R' F6 j# u7 }9 A* S8 ~   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {
    . t! a1 P6 S5 ^4 [   3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {$ y  K$ i  w. `1 w" W  b8 j
       3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9, + Z6 _9 ]; l) s0 d' y" P
       3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9}, " K4 i* L! P/ F
       3.57801215725*^9}], B% B* N/ y8 J. B4 O0 p
    }, Open  ]],
    * g9 F# g1 e6 Y5 B
    - V: y! P" U3 u& d1 E) k3 C" KCell[CellGroupData[{# a& H- y6 t6 u0 G+ r8 l
    0 t) L% ^; _5 t# |5 g# m1 j
    Cell[BoxData[
    $ t1 X" P. S: D: {, U# X RowBox[{"Ca", "=",
    4 l- ?3 t4 ]) L  RowBox[{"{", 8 g* F  V7 u: i+ h- O% P' @7 W; J/ _
       RowBox[{
    + t; s5 N$ q& y2 o0 l: C% W   "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", * `, I" Q; d) a; v  ^' z) ]
        ",", "c8", ",", "c9"}], "}"}]}]], "Input",
    1 M  A2 l% g3 }! o CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],6 Y' o0 Z9 m9 ~& _6 Y

    & d) Z/ g) ^2 a& B( U" FCell[BoxData[
    ' f7 V1 q7 X" m/ Z. U RowBox[{"{",
    2 p4 y# i8 b  v! v$ {. O5 T  RowBox[{
    1 }. ?5 e0 S$ v  V2 z9 R& e  "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",4 ?8 m" c% V" w4 u' b1 w" {9 e
        "c8", ",", "c9"}], "}"}]], "Output",
    4 o: T$ |% D  y CellChangeTimes->{
    3 K; S- r& P5 I' T5 g1 w: _  3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9,
    # s) e7 w2 I) u# V( N   3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9, ) M4 s( ?8 H3 {1 J6 ~. L
       3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9,
    ; J/ R  P) @6 l5 T; d   3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {
    0 o- I4 R- x% Y  \, ^   3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9,
    & T: i- X% y  d+ _1 J/ V   3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9},
    9 J, |) t; @' e# P( a  c% m   3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9,
    $ b' v2 V4 c( f   3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9,
    " m. _, @* E. q- Z# Z7 y   3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9}, ' c' o. |0 u1 n8 l
       3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {* u2 C& F* Q4 j# h. c0 k
       3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9, & q  i; U2 W+ [0 q5 F6 Q; u
       3.577961904604212*^9}, 3.578012158671875*^9}]
    + ^+ j4 |& M# Z3 |: `}, Open  ]],0 j* l* {9 P$ P' h! b- m8 N* Z/ q
    / [0 @" W# n1 [0 s. w
    Cell[BoxData[
    * D$ l7 I$ T  _, i. C/ x RowBox[{"For", "[",
    7 [. z  I5 Y( M' Y9 Y+ l; n( q  RowBox[{) U9 Q  k2 E' ^: ]' O9 U
       RowBox[{"i", "=", "1"}], ",", : f% s7 p( z4 }; B& t& B0 _
       RowBox[{"i", "\[LessEqual]", "9"}], ",",
    2 v3 q4 E& s1 G: C3 D; m' H2 w4 q4 M' q9 E   RowBox[{"i", "++"}], ",", . M, X% I4 N; V4 `
       RowBox[{
    4 F: W) I9 |5 F( c  V    RowBox[{"Ca", "[",
      t" B1 ~# \/ p     RowBox[{"[", "i", "]"}], "]"}], "=", 9 f; J) p: U5 F
        RowBox[{"CM", "[",
    9 T! U. e$ ]8 ?- I5 z7 G( M* T     RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",+ [- y2 ], O, E3 o" t$ S% d
    CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9},
    7 [0 R, E* x+ p' ?/ [   3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9, - i$ q3 c8 C8 x9 ~8 D! [- A# f6 L
       3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9, 3 w1 E2 I9 I5 m; y' c0 B
       3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9,
    0 k3 h) w% H& _+ L  K  }   3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9,
    * f3 j0 ~9 @' u, v% J8 T   3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9,
    , m8 h( ~4 G4 U! s) r   3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9,
    - x' H7 R9 U5 i1 B9 Y# m   3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9,
    ! d0 j2 f& E$ @   3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9, 8 r. i! ], K0 W7 T7 |, p3 z
       3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9}, 5 W. I) V9 C0 J5 H
       3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {
    ( q& F7 f6 R; ]4 e3 `" [% G   3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9, 3 {& v6 ?, r6 [% A' |! g& d
       3.577961906897415*^9}, 3.578012176296875*^9}],
    1 L. K9 G9 c- s1 w  \9 l& q5 l' w* x. z2 S' t9 F0 S/ c
    Cell[CellGroupData[{5 V6 u, g& d5 V

    7 p+ y* O& g- V' p8 hCell[BoxData[
    0 [7 J/ S$ _) M; H" ~1 Y RowBox[{! O6 p  Y' ?, n, J3 J6 U& I+ e
      RowBox[{"(",
    4 n% ~& X  T, k6 r   RowBox[{"Xa", "-", "Ca"}], ")"}], ".",   |' u0 y/ C9 _: s- b, U+ ^" h( B, w
      RowBox[{"(", 6 Z1 [4 z$ k7 b2 S
       RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],; @2 x( L1 u; p

    , d) m- `8 w# h/ k8 w7 r5 ]$ h' t+ {Cell[BoxData[
    8 x. Z) b+ P/ O( I: U8 w RowBox[{9 a( `9 t, q/ P: V
      SuperscriptBox[5 x. @, O* U$ m0 q& |5 }
       RowBox[{"(",
    7 A; `; T8 e# `    RowBox[{1 J5 O$ M  s6 K( N
         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+", - V) P5 P3 u! I& E" g
      SuperscriptBox[
    4 r6 \: J3 m2 s& `9 _   RowBox[{"(", * @) Q! i; K( I7 ?1 c
        RowBox[{9 P! d" x0 G1 t
         RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+",
    5 R$ P9 _4 o( l# Q0 N7 U  SuperscriptBox[
    % g7 X! ]  D3 \2 o   RowBox[{"(",
    + M% a( ?& v0 j9 M8 F, K7 p    RowBox[{
    / l5 q5 I! O. n, ^. A3 }- t3 G     RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+",
    8 ?; g+ T: V, R; a  SuperscriptBox[
    . ~, q, A0 B9 J& r) g* U6 h   RowBox[{"(",
    * _" F; ]' H" R  o    RowBox[{
    9 {, k9 o+ _9 I% x( i3 i     RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+",
    $ f4 o1 n8 A7 \1 B# `" d. M  SuperscriptBox[
    / Y& _8 j: f% Y# _) G# K" K   RowBox[{"(",
    ( z7 ?" O+ H, g    RowBox[{8 j* P6 r& `" w8 {, t. I3 Q4 e
         RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+", * o8 d& }; s, E, u4 n' ~
      SuperscriptBox[
    9 o! q$ j0 F# \8 s) Z, R. d   RowBox[{"(", 0 {& z1 E* r% H
        RowBox[{
    : y. w% T% H- _2 O" t0 K/ l     RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+",
    7 {3 I+ {3 B/ \- q8 I5 [  SuperscriptBox[$ g0 A" k5 A, x. p, c
       RowBox[{"(",
    # i; r; I. r' H+ y2 E, B, A" C    RowBox[{/ U! H2 [' c5 n6 ?
         RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+",
      ]$ y# Z% K! p. {  SuperscriptBox[& v8 \$ {! ~9 H- P% ]. k: u
       RowBox[{"(", 6 o  F9 I4 [% ^% J7 p, C, v6 w7 [
        RowBox[{
    / Q6 h3 w; O6 g- ]& O2 Y     RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+",
    ; n: P; t0 D0 s9 E  SuperscriptBox[
    : M' W1 n  h6 `8 d$ U: ]7 ?   RowBox[{"(", 0 O  y: \, _- n
        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",
    . R' z, J0 v0 Y% ~5 j  w8 x" s/ q0 C CellChangeTimes->{
    ; G3 W$ q' m! u5 @' h1 ~$ I  T  3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9},   ?+ n/ I6 k" Y, k& i" d4 i* X; c3 L
       3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9, # @2 o9 o. K7 l9 k3 w+ ?' d
       3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9, 5 J6 i* e; _- F+ _9 H2 v
       3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9,
    9 }6 }' i- x; q: {! m   3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9}, 9 j3 p( I5 _+ Q* x4 Z$ u
       3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9, 0 @2 {3 [3 L, [/ V; n" L/ U' U6 A
       3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {
      s6 e( j1 H% ]; A   3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9, * Y+ v9 U- D0 f+ t: Y5 K! c* v
       3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {% h7 {1 n, J# _/ x
       3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {6 Z- \$ |  {9 b0 j; X7 E* L
       3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9, 7 D" R4 G$ E( ~4 _! W
       3.5779618537169228`*^9}, {3.5779618846049767`*^9,
    , Z/ i1 l( Y2 h/ R* f   3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]
    2 e6 {8 A" K! v) k% u}, Open  ]],0 x2 A/ Q8 B' y! Z0 T
    " l% {3 G4 v4 J; Q+ ?
    Cell[CellGroupData[{
    1 |' W& b; W9 H" W9 B  A/ Z% ~$ N
    * n+ J0 |. ]* m& M" MCell[BoxData[0 z  z4 `- [' `( W, Y0 O3 t
    RowBox[{, J3 n, w4 M) {: z4 Z* z. j" w% K3 w% B
      RowBox[{"Ca", "[", ) I  z- G' i& A. x1 j) x
       RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",
    ! K8 o. t% l( d6 \/ Q CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9, 0 C4 t  J2 T: k; p9 a
      3.5779616465173616`*^9}],
    $ M" ]5 W0 ^$ `
    ( r0 j1 }1 i% dCell[BoxData["0"], "Output",5 x1 \( W8 ]' ?- L) Q3 }& w
    CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9,
    . N" ?- U, Z2 j$ ?% \  3.5779616484049644`*^9}]
    ) h! \: o% g, z1 ?  B0 B) Q}, Open  ]],0 I: }( \' x2 S2 o, P

    " @9 n4 _5 z( d3 yCell[CellGroupData[{7 V  z, s2 [& Z) L. ~! x6 h$ V. k
      f, ^* N; A! u5 u# U% r! S* A+ r
    Cell[BoxData[
    $ P# _- `. \5 d RowBox[{
    2 I1 J7 B5 u7 U( f  RowBox[{"Ca", "[", 6 x& F. f0 e4 {- {7 e# U8 u) m
       RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",
    : Q& Z5 V3 M8 {8 S CellChangeTimes->{3.577957376235614*^9}],
    ) d( ^; ]+ |2 K- L4 Q2 H. R( ~! P% j: l( m3 F$ r
    Cell[BoxData["0"], "Output",
    + G, G" g3 [) Z) ]6 c! O8 x CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]9 K1 f, R2 ]: q; H+ v1 |
    }, Open  ]],' T( e6 f# i5 S2 [4 J2 W& ^

    # F, o) J) K9 Z2 }: n8 F& uCell[CellGroupData[{8 E3 Q. @+ C* e0 p4 ]/ f9 h; Q; i

    8 H+ J! Z0 @( D" H  ~, nCell[BoxData[
    5 l3 }2 l! r8 \+ j( L RowBox[{
    - M$ K2 s* o9 Q5 M8 w  D/ K/ l- u  RowBox[{"Ca", "[",   o2 A) t) [* |3 v% q+ T
       RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",
    ( U2 b. w* }6 ]$ D1 G/ K CellChangeTimes->{3.5779573112927003`*^9}],
    9 T  f3 z# [& y* q% v& a0 n. N  _* H, y4 ]# p* l% t6 U1 U/ a
    Cell[BoxData["0"], "Output",9 s5 ^. }$ f4 W3 ?" N0 y' B) W% K
    CellChangeTimes->{
    # g& `6 N# {; r  3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9, 5 h4 i- _: ]4 y% y0 l
       3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9,   U% K2 e. s' g3 E- p
       3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9},
    , s' V3 O8 E6 |! n0 u# q   3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9,
    % \' N! j' o. ~. u/ |3 x8 e7 y   3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9}, % q) q2 X* ~  D. F" e
       3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]
    7 c0 T, f* A  J6 ^7 W. y}, Open  ]],5 p0 c: ~, h" h# ~8 H0 x4 y" e
    . s5 p! r4 u0 V) t0 G: O5 ~
    Cell[CellGroupData[{
    0 E+ K2 f5 ~! n( M% C) O6 e
    8 T" w) G2 a7 N4 A5 D, p: fCell[BoxData[
    . r' O5 a: ^! v RowBox[{5 i- b& ?5 w% b/ Z% ~
      RowBox[{"Ca", "[", 5 J& W  |# R! \' X; p4 G; p
       RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",4 Y' A( n8 |9 J4 |, _
    CellChangeTimes->{3.577921461734375*^9}],
      I0 ~9 Q: |% |4 _  H8 f+ Y+ M: ]5 \# J8 b! a, I
    Cell[BoxData["0"], "Output",2 ^9 t) _, E. J. i# }
    CellChangeTimes->{  K" U! l' J& t* p# U
      3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9,
    ! Z: j: {9 S5 V/ A   3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9},
    3 \" b* z/ V2 g9 O! }   3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9, ' v- u+ r4 ?6 `8 E4 ]& ]
       3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9,
    4 B- q# f& M1 K3 U   3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]
    " a9 [3 n$ d* A, ], r2 @}, Open  ]],
    / O5 t! u" b, ]) i2 x% N: M/ F9 W- {4 w! l) i& h$ l
    Cell[CellGroupData[{5 S; x% k. d. Z, {5 }% p5 D& e& }

    " A2 `6 l4 t& k: cCell[BoxData[8 w, D0 p4 F- d- n3 T+ p
    RowBox[{
    2 D% b+ c3 v  q0 w  RowBox[{"Ca", "[",
    2 O3 E. }$ U1 f% y, r3 d   RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",% j6 W4 B9 `4 A9 L
    CellChangeTimes->{3.577957303118286*^9}],7 ^# U$ t6 \% Z8 Q6 ~

    9 p4 ], s" B# aCell[BoxData["0"], "Output",
      z* U: {- s) [" C' \ CellChangeTimes->{9 x6 N: }% b  G, }; j
      3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {
    + v4 v- e6 `0 R; \" r9 q2 M   3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9, 2 J3 W, I+ W* T+ a
       3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9, 9 H3 k, J8 I: w2 v9 V, k% p6 N
       3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9,
    / F& k7 o7 f4 [) r% o' F% E) b9 L   3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9, , B2 O/ b. ?+ M! c0 H6 ^# L
       3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {& y3 i) {; b1 U4 z
       3.577961889378585*^9, 3.577961912965826*^9}}]
    & s% B. ~' z6 S" J; b9 _}, Open  ]],8 M6 ^6 A$ I: d) c
    ; w( h* U  o0 N2 z' o
    Cell[CellGroupData[{
    8 M- ?1 |5 _- X2 m6 Y0 J0 v- }! I* h6 y, b# \, H/ _
    Cell[BoxData[! M0 d6 p* A6 K4 ^' C, w8 ?
    RowBox[{
    : n, |8 K2 p5 M: |! q6 G' |3 h  RowBox[{"Ca", "[",
    : }9 j7 |" t+ E  U1 [  t, w4 w/ y1 m   RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",
    3 Z' v: {2 n* P3 F9 S. } CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {- P: d0 L& [! S" g9 C. e
      3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9,
    ' h# g- |# h6 j1 ?* _  g4 z  3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {
    # ?1 Y/ F& W# z% y* {& c  3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9,
    5 Z- W9 Z; I  M. d% y8 U- C3 M8 d  3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {
    7 ~& P: W9 J" c  3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9, 0 t- r9 p3 d! b
      3.577921435703125*^9}}],. \0 \' l9 z9 B; a9 Q
    ! B" T: f; n6 ?, _) f5 r. W
    Cell[BoxData["0"], "Output",
    3 I: T; r2 ~( v: n: R' q% ^ CellChangeTimes->{
    9 e8 j/ w" W5 u6 Z. G# D' c; X  3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {
    5 ]$ t( [+ ~( _- p* B, @3 f, V   3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9, - _) m9 e0 D; K% j
       3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {
    0 u* U( |7 p8 K' J# F+ K   3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9, 5 _% ^' v$ ~; a" i( C! O& i& Q/ l
       3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {
    , b& M0 B7 t& G7 X" }3 `, Y   3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9,
    8 `7 w6 a) C, O! |5 l4 A' j/ v- z   3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9, 0 D4 V( V9 }, {
       3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9,
    - M! ?- y3 m5 K: [& p  F   3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {
    : ~7 f- H! G) q' a- t   3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9, ( A! K" c3 `4 {) r4 \5 h% o2 K
       3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {
    ) l( ^" d, F; C3 l: T   3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9, 4 N* j. D2 `: ?: E  e; ^. I  t
       3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]
    9 n& j) m3 D& D6 W; M; l3 Q/ P}, Open  ]],
    # u9 q" T* J4 x& M! n+ p( J3 i# [
    , v/ p& \, t, d- s) R; W! U# LCell[CellGroupData[{- `6 e+ d# e/ v+ X: x$ L3 z5 x5 s
    3 D4 Q* J7 I3 p) {
    Cell[BoxData[
    / G: l7 F2 m& `" V% Y RowBox[{"Delta1", "=",
    # e) W2 l9 r9 x' D  RowBox[{/ n5 L# N; {: ]( H; @1 U4 [/ q
       SubsuperscriptBox["\[Integral]", # \6 P. }5 G: {/ ?+ r4 l0 S
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    ! O! f2 e  W3 G. _0 M) x1 X3 {7 h   RowBox[{
    5 w8 y# [1 ?$ u7 U/ F    SubsuperscriptBox["\[Integral]", 7 [/ F3 H" p" B' M
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    $ j( c/ T7 M# h+ o5 Q    RowBox[{6 v' }/ B* [7 ?" E
         SubsuperscriptBox["\[Integral]",
    ' T7 a# O6 A& v* S- S* ~3 \' t      RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    8 o$ j: U% f4 U; i) @     RowBox[{
    5 L6 U$ v/ F2 l! V4 V. c: [# ^      SubsuperscriptBox["\[Integral]", " ]) X1 X- \. t( G$ G
           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    + g3 P8 }, y5 G" y% O* @4 s% Q, W      RowBox[{) J  R, g/ p$ I, T; F, W. _
           SubsuperscriptBox["\[Integral]",
    4 D2 ]7 v  b6 g& L. H! }        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ! u; m/ G9 n3 G" j' s3 q1 U
           RowBox[{
      R! P& l+ \$ n' v+ N3 v        SubsuperscriptBox["\[Integral]",
    8 N5 ]4 {, F, A         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 8 _0 y6 n) \' @
            RowBox[{
    5 K* |1 |% P  ]( _) F8 ~: x' i         SubsuperscriptBox["\[Integral]",
    * u$ M/ N7 m# h4 [  N          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 3 q; l1 c" h- Z' D) J9 l+ g' }/ O
             RowBox[{
    0 F1 w* T* k1 K! a2 [% e6 X          SubsuperscriptBox["\[Integral]", ' f/ v& C+ m$ j3 c3 n" ^' S8 e
               RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ) s, H! o- Y. ^% ~
              RowBox[{
    * O4 d1 S% P5 r; Z4 |           SubsuperscriptBox["\[Integral]", 5 g" k2 _5 a8 H7 \
                RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    & ^  Y0 L8 c* o0 ?$ O# M# o           RowBox[{
    7 a) Y7 {0 Q5 H7 {            RowBox[{"Exp", "[",
    3 m$ ]5 Z9 T1 {5 W  p             RowBox[{4 @3 q6 m% m. S3 M
                  RowBox[{
    / T+ U- o0 l: f* D; {* ?               RowBox[{"-",
    * z. _3 F& R* E8 {( ]                RowBox[{/ `8 O7 B0 D/ a2 @
                     RowBox[{"(",
    4 h4 K9 h+ D7 b2 q) k                  RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 5 ]! n8 _: L/ R! N2 B6 {  M
                     RowBox[{"(",
    : {4 D% K' g& X                  RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/",
    : ?, T- W* f; U              "Delta"}], "]"}],
    $ ~* [) m+ o0 `6 ]. n            RowBox[{"\[DifferentialD]", "x1"}],
    & ^, f: G2 R2 V6 X& g$ W# F- x) T1 t            RowBox[{"\[DifferentialD]", "x2"}], + z7 V) U" {5 D0 p! S+ U
                RowBox[{"\[DifferentialD]", "x3"}],
    ) h: z# N  E- z1 }6 z            RowBox[{"\[DifferentialD]", "x4"}],
    & L' h% F% g: `, f3 T& r) g. S            RowBox[{"\[DifferentialD]", "x5"}], " P7 {4 }! G! }4 E* Z0 T
                RowBox[{"\[DifferentialD]", "x6"}],
    7 Z5 r9 s' X; Y  j) L" t! _: ]            RowBox[{"\[DifferentialD]", "x7"}], 9 ^( C) I/ Q& o5 i
                RowBox[{"\[DifferentialD]", "x8"}], 6 I! Q' v# I) w8 N! K% b" v% s
                RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input",
    ! n1 R; |: b2 S! Y CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {) W& @' j  T4 y8 v! I7 }, a  S3 V
       3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9,
    % `8 L: o: o: P1 Y   3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {
    ' c  q# p8 s: H+ V3 `, B9 [   3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9,
    $ N6 Y' \# k6 c, x# V9 f   3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {$ s/ f' @. X5 |! [- E
       3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9,
    " j7 W) |8 [- k9 S8 v2 Z   3.577918964453125*^9}}],4 Y) x% A- p/ r3 @1 v1 @  ]3 q

    0 Q( R4 J$ g& }& a9 L$ uCell[BoxData[
    1 r! }$ o2 D, O# a RowBox[{"97.40909103400237`", " ",
    0 W9 Z2 ^3 l! K' c4 I  SuperscriptBox["Delta", "8"], " ",
    ' n% `- Z. N& O3 q1 O$ |8 x  RowBox[{"If", "[",
    2 G1 |8 M" N0 r! J% c% \( T, w/ \  e   RowBox[{9 X) P$ w( M# d, I8 ]/ K
        RowBox[{% t' v6 q4 A7 F; ~
         RowBox[{"Re", "[",
    ! D7 h% E8 ^& a      SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",", . h0 n5 U! K2 w9 N% O
        FractionBox[' T! T: A8 X7 U% c& c2 }
         RowBox[{"1.7724538509055159`", " ", , b( M  q% g$ [; p; B
          SuperscriptBox["\[ExponentialE]",
    9 `; l" M( R% M6 @  V  L       FractionBox["1.1102230246251565`*^-16", : Y- @5 u: I6 B4 Q- f" u4 }" L
            SuperscriptBox["Delta", "2"]]]}],
    / R# [& n8 |4 D% m0 i) u/ T     SqrtBox[, ~0 K, @  M6 A/ T5 r
          FractionBox["1",
    ( s( W' b3 u) v2 z# S& s! i+ H       SuperscriptBox["Delta", "2"]]]], ",", 1 ~. ]& r4 q5 a% I
        RowBox[{"Integrate", "[", . y( Y6 J: h" G8 ~
         RowBox[{# G3 T# N: G5 Q* P9 [9 C) c  s4 P
          SuperscriptBox["\[ExponentialE]",
    % K$ h0 ]2 [) `3 V/ J/ N4 p' I       FractionBox[5 _! p1 w* m8 l/ j. i! I3 i
            RowBox[{"1.1102230246251565`*^-16", "-",
    - H7 i, D  u: `2 F         RowBox[{"1.`", " ", ) l3 b8 Y, Y+ e+ a8 e1 j
              SuperscriptBox["x9", "2"]}]}], $ R* Z1 j5 y& o% |1 N( R
            SuperscriptBox["Delta", "2"]]], ",", + P% F5 N8 L! h5 C
          RowBox[{"{",
    6 P. N; Y+ J/ ~- S0 P4 [' o6 }% W/ m       RowBox[{"x9", ",", . b/ ^- i6 p0 Y! w; l& I+ `
            RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",",
    # v* w" e( J) |0 ]# @" U      RowBox[{"Assumptions", "\[Rule]",
      ]+ x( K- B6 s- i       RowBox[{
    2 T2 @" A$ P6 \& y, Q        RowBox[{"Re", "[", ! W/ i% r3 A" I9 ?" d8 k: I1 e6 W
             SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}], . W6 R4 m' u7 `7 M  s, T
         "]"}]}], "]"}]}]], "Output",
    4 {+ ^1 V8 @# K6 I. O CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9, 9 ]: j6 ^4 x; V" m. v- Y
      3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9, # p9 x3 z) @- y+ @2 K
      3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9,
    5 e' G2 {/ O( j! d# q  3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9,
    6 S- l# d5 Y. q" f5 b2 w) m  3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9,
    ) v/ N8 s( N, l( ~0 }+ f  3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9,
    5 G8 }4 \7 D$ V2 I6 o1 s) s7 z  3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]7 f2 ?, n: o4 O2 T/ ]
    }, Open  ]]," j2 R$ N; {# O, G( Q/ E; k

      h+ d) w( @' w3 J8 RCell[CellGroupData[{
    # |$ M( C0 X' m5 g2 R. d' \9 q" V9 C. G! x% a( J* E4 D
    Cell[BoxData[! b# m; y+ ]' _/ A( \& r# u, T8 _2 r% \
    RowBox[{"Delta1", "=",
    ; Y, k% ?, _* a& L) M# s  StyleBox[
    & |) b4 L$ e! A% V   RowBox[{"97.40909103400237`", " ",
    $ a' {9 U( }0 |    SuperscriptBox["Delta", "8"], "  ", ' M, \5 `" D4 A: R
        FractionBox[' T* p- y1 g9 L
         RowBox[{"1.7724538509055159`", " ", 6 q3 `" y$ W3 S& _# t
          SuperscriptBox["\[ExponentialE]", ( n8 E0 A1 v' w7 \" F% `7 O
           FractionBox["1.1102230246251565`*^-16", / i& s& y) N  \* P# a* g: _/ M; K
            SuperscriptBox["Delta", "2"]]]}], 3 ]0 i9 p8 r# [; `: }6 \
         SqrtBox[+ o1 |# E! D( _/ }& \0 j  o
          FractionBox["1", : ], M3 C: J& U5 }  I+ K; C1 d
           SuperscriptBox["Delta", "2"]]]]}],$ ~- C9 ]) P1 o* \( }
       FontWeight->"Plain"]}]], "Input",  ^, G7 e# X7 p
    CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {
    / I) y' z+ N& V) q   3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9, # n( T3 L& f: Z$ d0 [
       3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {6 I9 L5 n$ ^4 ?+ o1 r! C7 [, c
       3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9, ) W) m, u6 Y" i  p, r  V
       3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9}, 9 S2 D) m7 {8 w4 i& t+ Q& A
       3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],
    $ h- m$ @8 h: m/ a+ ?
    : S( D1 c4 v& j& I. Q3 }( sCell[BoxData[
    2 D) L! @3 c# _- k! E4 c1 O FractionBox[
    3 L4 Q, e: k6 b3 l$ _( q( E# k9 M! j8 o  RowBox[{"172.65311851642346`", " ", & l& d/ X% m0 X4 C; k
       SuperscriptBox["Delta", "8"], " ",   b4 ~' a& [1 ?! e  r( ~+ F
       SuperscriptBox["\[ExponentialE]", 9 E$ O. t# Y3 q5 z! m
        FractionBox["1.1102230246251565`*^-16",
    " y% r, Y7 |/ h1 a3 _* L     SuperscriptBox["Delta", "2"]]]}], 3 K+ V- H6 Y1 C* W( q/ M; J
      SqrtBox[- S* U; q! E9 j4 j- _
       FractionBox["1", 9 N- Y7 |* F9 B% B; T. _/ _
        SuperscriptBox["Delta", "2"]]]]], "Output",
    ( ?4 g$ R0 x4 G: S CellChangeTimes->{
    8 y* u( c" p8 g0 y5 ]: y- A5 b  ?  3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9,
    0 ~4 H9 x0 Z1 B8 q, ]( I: v2 a   3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9,
    # [, x) y1 L+ v- l* O! e7 v   3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9,
    0 u( p- m; c5 U   3.578012166234375*^9}]  S8 M" ], ~' X
    }, Open  ]],5 S3 {' o! o) `; S
    9 N! [9 Z6 }  f/ e0 Y; I
    Cell[CellGroupData[{3 V; i/ ^0 Z5 z# ?& x  v: H0 ?
    4 `" _9 H7 a8 I2 ^7 C
    Cell[BoxData[
    0 K% x& q/ z# S8 H RowBox[{"DeltaX", "=", ; t1 L3 U! z  U: r: L0 ^2 w2 m
      RowBox[{"FindRoot", "[",
    ' C0 k4 B: y8 B# c   RowBox[{
    : |2 N0 }5 ~) P! t& b    RowBox[{"Delta1", "\[Equal]", "1"}], ",",
    $ B1 G& y2 f% y- ?    RowBox[{"{",
    8 P7 T! N! i3 o* F# z     RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",# t/ g% }. ~5 t; c" Q3 {; S1 \
    CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {
    . f$ T9 n4 L" n5 l   3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9, 1 A7 }% z' t3 y
       3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9, 5 o3 j5 H4 o3 u% R! C$ y
       3.57791921584375*^9}}],
    2 \% y, v0 w0 K" W  J3 \! s! K+ [7 r5 J, H
    Cell[BoxData[
    ; S- i$ I* h% U5 x! S, ` RowBox[{"{", 7 m- `* [) a! w# {, u
      RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",
    & f" Y* E. v% A% { CellChangeTimes->{1 ~6 G  y" c8 `' y' t4 B" a' T
      3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9}, # l( q9 y3 h8 h% |' }4 Q
       3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9, 8 h1 C% H/ I, ~4 m) D8 J
       3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9, ! ?' |/ o: q, T" h
       3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9,
    / c& E. ^2 i7 T& M  Q0 ]   3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {- H/ f9 y1 [' t+ E$ m0 V3 }  W
       3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9, 7 I+ z8 @" ^; u) W
       3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9, + b8 N6 j) e' {, \! X
       3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9, 6 J5 F+ b! d. M
       3.57796070150625*^9, 3.578012167703125*^9}]2 h4 X7 V9 K) ~
    }, Open  ]],/ r! E7 y# K" x( l

    5 ]; b. Z# q7 X7 d# `  UCell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\
    ! S0 u5 ?) |( h) t; m\:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",
    ; W7 X4 P6 g$ q3 V CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {' D9 v1 O& \" i7 |# w
      3.577960705312657*^9, 3.577960707621461*^9}}]," O, @6 ~8 `, U  q4 N; A$ N8 C* L
    ( |; T& e! e3 Q* R) B
    Cell[CellGroupData[{2 x7 m9 n: O, R& f* w* R) d
    0 Z4 H3 e2 w$ B
    Cell[BoxData[5 F. @9 J6 y$ m$ L4 h9 }  U. y
    RowBox[{"C1", "=", "Ca"}]], "Input",
    : l& Z5 V, ]) |( b3 f CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],. C  I' t  L% K6 i& M' {: L
    , J9 s. E  s* d. E/ W: m4 }
    Cell[BoxData[
    % y& ?3 i9 v2 ?+ ~. }$ D0 P9 J) N RowBox[{"{", # q% i! }, r% i! g
      RowBox[{
    - A- j5 y' E3 v" g3 ^( P4 K' \& h  "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",",
      q0 J3 n* P* i" P" X   "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",",
    1 B/ ^7 E, i9 ?) G* ^7 M   "0.`"}], "}"}]], "Output",2 r, _  k" ]1 |$ |
    CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9, 1 \2 r4 e5 t! [5 M6 ^# D3 r# N* K
      3.577960710273465*^9, 3.5780121855*^9}]6 }: l5 |& |) M: f* u8 i
    }, Open  ]],
    . H+ g' t$ C7 B1 O/ l: v" \2 y" R; H; y
    Cell[CellGroupData[{
    5 n, e) @' q8 b0 ~% U/ i7 Q- o% c/ H1 c- U
    Cell[BoxData[
    0 q2 c# A2 T8 `0 U5 |7 w3 U RowBox[{"u1", "=", 9 l, t; V, |4 N$ \$ ]* N
      RowBox[{1 N3 I) Z  E. [
       RowBox[{"Exp", "[", ( o% P) M0 a4 G6 M! j1 v, {
        RowBox[{
    / X2 t  A; O( o5 O$ l& y     RowBox[{
    # K; s  a# P! x- W* l  f- c8 \  q      RowBox[{"-",
    % f9 v1 r: Z' H( H/ F, c6 a) B       RowBox[{; N* ^- Y4 A3 X- {7 i
            RowBox[{"(", % ?4 {9 x( l5 m) [! i3 e
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 3 a% g$ w' Y8 K8 l
            RowBox[{"(", : I' o, B6 N5 k
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],5 J0 r9 T9 ?0 j
         "]"}], "/.", "DeltaX"}]}]], "Input",* `6 c3 _- s6 [# f# [
    CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {0 d( a9 P" a; C  @8 l. c
       3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {
    ! F  [0 \$ Z3 x7 O   3.577919193484375*^9, 3.5779192326875*^9}}],
    ) {& m; `' C, s% i$ c
    ( ]5 w* y7 `7 h; Z+ H% ?% @1 cCell[BoxData[& l' J: P+ j( i! D, e
    SuperscriptBox["\[ExponentialE]", # U  C$ ^3 [3 ?) @
      RowBox[{"3.141592653589793`", " ",
    6 d# s# r3 x5 R0 ?" m- t   RowBox[{"(", % V/ l- |/ z2 A" t" ?9 @, e1 H3 C
        RowBox[{
    , O6 g7 C, |7 z$ h! V% b# m     RowBox[{"-",
    4 d: J  N* J. ?% h, b& A+ s. l3 T      SuperscriptBox[8 D; o6 B1 [) g- @" C
           RowBox[{"(", 0 }; F8 [) c0 W# Y, u+ R8 s' h2 [6 s
            RowBox[{  y$ O- }  v% o
             RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", 2 `( p2 M/ H; m" C2 p* U
         SuperscriptBox[1 G% r7 h+ I0 @3 Q
          RowBox[{"(", . p# K, X  g  o% E- z" V
           RowBox[{
    1 C9 w2 l8 w; \; F+ X# Z! a        RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-",
    " u$ P+ ]) @* H! _' E. \! M# N- \1 f     SuperscriptBox[) b: @# O. K5 ]! A( E3 a
          RowBox[{"(", , G" q3 W" d7 p$ A8 |5 W0 \
           RowBox[{
    % ~& F) ~0 Z( C8 Q; S        RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    ! m5 h! k4 h# f/ y     SuperscriptBox[& r) Y# ~/ O" j5 D
          RowBox[{"(", 6 `- ]2 u0 l# s$ w/ f0 q4 H
           RowBox[{( d5 p( |% F& b
            RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-",
    4 x6 n" I% _$ Z7 j( o* ~     SuperscriptBox[
    " M8 Q' p" c, p5 f  T      RowBox[{"(",
    - s6 g1 m) j+ Q' J8 o       RowBox[{1 \! U; g$ M7 D, Y- \# e, W2 i( u0 {
            RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-", 4 ^6 C  u& `# G0 y6 `
         SuperscriptBox[. [3 X! Z# n0 q! w6 M. A4 k: S
          RowBox[{"(",
    9 j' c  I8 X, K' d' W8 w( I" b2 f       RowBox[{
    + \: {1 [# y5 ^2 g# s# F# R# S# Y) h        RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-", " G+ I5 M8 U# G& L5 e, O
         SuperscriptBox[3 ?- Q4 N1 k+ E) l8 g: ~6 [5 l
          RowBox[{"(",
    2 r/ l2 L( s! S0 T! c7 m       RowBox[{, s% P- e2 @- |4 z
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-",
    1 s7 Z" Y* A- l$ S6 {. r% i. g( K+ z: r     SuperscriptBox[
    8 u9 m' `, w% ~5 ~/ R      RowBox[{"(", % ?" C& i* v2 ?& }- X% y5 t
           RowBox[{1 N% F: `7 M3 }; G+ ~
            RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    4 E% c1 e0 }; V8 ]     SuperscriptBox[
    , ?5 ?) [7 ?* C  Z9 p1 S; t+ l% F; `      RowBox[{"(", , g, a6 Y: o: i% x  E
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 4 a( E' S* U. |; m
        ")"}]}]]], "Output",# h  \/ }& m  r9 X: p
    CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9, 7 u) v7 ^, B. F: N/ x+ p5 w
      3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9,
    ! [% W* V( S6 _$ J: d  O8 P1 ]  3.578012187078125*^9}]% l, \7 t% Q  }2 U3 R) t; A
    }, Open  ]],
    0 {6 S' ~! u! ?7 \  ], x6 D( N( M. W5 A1 u
    Cell[CellGroupData[{
    ! f* y  r) \  [' T  M7 d% m, q( ?* n% ?! X7 Z
    Cell[BoxData[% n. K# ?8 V+ J
    RowBox[{"C2", "=", "Ca"}]], "Input",
    / H1 j; Y& \% M CellChangeTimes->{3.57792047321875*^9}],1 D7 i$ ^  w7 k0 Z4 _

    * u5 t2 s7 a* L2 G7 {6 b7 \3 ?Cell[BoxData[* x( M) N9 \2 L% l8 C4 j; S
    RowBox[{"{", . y) b5 W! Q7 z& a
      RowBox[{
    - ]) Y: X7 V  S+ [+ z8 N  "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    0 z3 U# y! d& G% {& Z4 b* o   "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}], 2 p) T+ t5 n2 i, V4 O
      "}"}]], "Output",8 _1 t$ z& ?2 S2 t; w
    CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9, ! K4 {1 f! u$ h' q
      3.5779607401163173`*^9, 3.578012204671875*^9}]7 @3 s. q- k' Y
    }, Open  ]],
    ! p$ J, N% X+ k8 O  @/ \
    # @/ O. @/ m6 Q7 v+ s* _( i. UCell[CellGroupData[{5 ?$ Y$ d* j  y
      Y% x% L* f. E* k- r
    Cell[BoxData[3 u7 A2 {- K; K$ K
    RowBox[{"u2", "=",
    3 b3 @" B# U: K+ v) x: F& B. J  RowBox[{
    - f) s( W6 V2 ~  ~; j* F   RowBox[{"Exp", "[",
    ' n4 H* x  R  A- k; k# y7 ]    RowBox[{
    4 ^; P+ u% P* f. p& H6 Z     RowBox[{; p7 J- y" D  Y2 J2 m% t
          RowBox[{"-", - ]5 F% y8 H' V
           RowBox[{/ x  o* J) i, u2 q# ^% u& I4 a
            RowBox[{"(", 2 o. P+ h* E! ?7 b
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    4 c( F  [8 w9 J, V% j        RowBox[{"(", ; [4 u2 o( V+ `/ ^2 s) R& r
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],0 l6 |% X% J1 _) ]- M* ]# u0 \
         "]"}], "/.", "DeltaX"}]}]], "Input"," v* M* E/ y; J+ e
    CellChangeTimes->{3.577920484109375*^9}],
    3 I2 D7 P* U& I0 ^! f) T' k5 g3 V0 j. R7 f* z0 F# Z
    Cell[BoxData[7 R3 c. E* C5 L. T- V6 u7 P0 R
    SuperscriptBox["\[ExponentialE]", 7 U: `  r8 ~8 h: n  {8 Q3 z
      RowBox[{"3.141592653589793`", " ",
    , \+ L3 x- }9 F! P' b   RowBox[{"(",
    ' _! |9 G' j5 b/ S$ P5 }: V; Q' L    RowBox[{
    6 C3 u# e) ]# p     RowBox[{"-",   V0 c0 L" f7 O+ I
          SuperscriptBox[
    / U) D, L/ p( D( i5 d4 {       RowBox[{"(",
    9 w3 v1 R" t1 ~8 p" U$ `        RowBox[{' H: f4 F5 c- ^5 t. {" K  ~+ _1 R
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    / l$ S2 V) p- s( g: n6 x# y     SuperscriptBox[
    3 J3 F& x; `+ }( d7 u9 U3 S      RowBox[{"(", 3 N* g' ~* I8 T3 |7 }+ t
           RowBox[{
    2 P4 [: h' M  ?% Z3 l+ D) M        RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    , W1 o; I# g7 `     SuperscriptBox[
    # G" r# i0 ]2 Y, K; V2 |      RowBox[{"(", & l  V4 V8 E7 b
           RowBox[{
    ! M. E( [+ \( h8 @% R        RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", , g' [# ?) S4 O! ^6 k! X1 p
         SuperscriptBox[% ^4 Z. g/ f  ]0 R1 P. s
          RowBox[{"(", . p9 P  P1 X! G; b: a
           RowBox[{. V9 ]) E, p  z2 ]9 P  S% D: _
            RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-", 6 V# {$ Y8 Q; A7 M! D% I
         SuperscriptBox[% J  W, x( X7 }8 I% U
          RowBox[{"(", 4 f0 }) i3 f3 a+ R8 M& ]( p5 R$ b
           RowBox[{
    . K( o6 J! l& N+ b" b        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", / E' m& }/ }  y; P
         SuperscriptBox[4 r/ p& K0 |' B
          RowBox[{"(",
    * ~# L3 {4 p. u1 p1 m       RowBox[{' K# n* N4 E$ z- J
            RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
      a& P. p0 ?4 _; l1 C     SuperscriptBox[$ s' v7 J  _  \
          RowBox[{"(",   S( T- m2 m- f8 j' M6 r
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", : N' t5 v4 b2 T+ K9 S4 `; w+ x+ R
         SuperscriptBox[
    3 \0 e1 e9 X  G; i      RowBox[{"(", 8 s& X1 L8 C6 a- k; x
           RowBox[{
    3 i: _3 ?$ h0 F$ V8 N/ r" S2 S        RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    , C9 n  k! i( \' V0 X' |3 s     SuperscriptBox[# e( g. u: F- Z) Q6 l4 e
          RowBox[{"(", * S- X3 g5 o8 B
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    1 V- n; V, L- H: _7 T) w6 k    ")"}]}]]], "Output",
    ( d, Z, S& }/ x4 _% d CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9,
    : |+ r! ~3 z) @) V  3.5779607413955193`*^9, 3.578012205484375*^9}]" ?. [7 g) `+ W2 m  O
    }, Open  ]],
    7 T/ o9 @6 ~9 B: Z1 o9 y' T$ v  W3 r" ?1 V" ]+ ?
    Cell[CellGroupData[{
    . B* M% W2 z5 Y5 C5 a. v# c( {# J9 Y. F  e( H* V
    Cell[BoxData[6 I- A2 P) ^9 ~! W. Q6 \! D
    RowBox[{"C3", "=", "Ca"}]], "Input",5 a5 u; l. @; P- o2 J: c* x0 _% j! f* M
    CellChangeTimes->{3.57792064125*^9}],' }' ^- {8 x4 k8 N

    # _, U/ C3 Q; ?! t- oCell[BoxData[
    4 x- }& L7 R* b. m; l; g RowBox[{"{", " D( S- ^' P6 O
      RowBox[{# n6 r8 m- b' K6 K$ h' W- S' R' d
      "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",",
    - x6 @; u5 p/ n* [8 O+ y   "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}], 2 ?9 ^4 T9 v! G( L$ j0 A( U7 l
      "}"}]], "Output",# p/ Q1 [! v0 `6 s0 p1 ^
    CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9, 2 L. Z) z5 O$ `+ I5 K# @
      3.5779607642027593`*^9, 3.5780122103125*^9}]: j! _, E+ }" m2 d
    }, Open  ]],; Y+ p* `+ V# m4 s: r
    0 o% i8 Q; n# d- ]& D4 f
    Cell[CellGroupData[{" I% Y! L7 l0 A: y3 w* Y

    ! I& o5 Y$ Q" Y/ j" ]# UCell[BoxData[  O0 T5 o. S; S  e2 T0 n( ]
    RowBox[{"u3", "=", . _1 P( ~) f) A. n. w& ?
      RowBox[{6 ], s6 Q4 }$ l6 B
       RowBox[{"Exp", "[",
    * \/ g& u' e1 L  ~1 F    RowBox[{- u2 S3 {& K. `4 I3 d
         RowBox[{
    - M9 [4 n! B3 _& t      RowBox[{"-",
    + D+ a. T& @# _6 ~. K* g& ~/ B2 u: s* L       RowBox[{0 R$ x2 J1 J! _* K; L9 {# G
            RowBox[{"(", / x+ I. {& V' C' b3 {
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    6 b; r- l0 p6 ?, T$ X  D5 {        RowBox[{"(", % y( |  y+ T' G2 `) G' Q
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    * \- U8 Z6 k, G' }4 k+ \     "]"}], "/.", "DeltaX"}]}]], "Input",+ w4 t. i3 _% p
    CellChangeTimes->{3.57792064921875*^9}]," F0 Q4 h9 o4 A0 }6 e  m/ Y) d
    4 w- o6 k# g9 E) Z4 ^, l" t$ F
    Cell[BoxData[
    ( p" j, u9 T8 [ SuperscriptBox["\[ExponentialE]",
    ) ~+ ~2 J& ^# h  RowBox[{"3.141592653589793`", " ",
    . O% r; T) A8 L   RowBox[{"(",
    ; q) ^3 }# c) b5 n) X' G# Z    RowBox[{' z) Y( j4 q* G
         RowBox[{"-", ) D- D* ^' x! i; o- W
          SuperscriptBox[, u4 N3 Y6 L& R4 t" c5 S
           RowBox[{"(", 4 m9 l  O, y9 w3 O9 w
            RowBox[{' {: m$ R0 V$ t0 h
             RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-", + Z7 o" O1 S3 E( d* R9 U2 z( T
         SuperscriptBox[8 r' Y) X/ h* ?7 h! S
          RowBox[{"(", 9 e2 G& \! w% `: C2 g, B( D
           RowBox[{
    * h+ \4 }; m2 ]        RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-",
    - I3 N: {4 H3 B/ {; R& K     SuperscriptBox[$ S9 _9 c+ a$ _
          RowBox[{"(",
    7 p! R% e, h3 [7 D$ C  ~, E       RowBox[{
    5 y# K6 w9 A/ R. b8 E* L        RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", * ~" T$ D# O  ^) M" t
         SuperscriptBox[
    & ]" z. x# }/ D8 C      RowBox[{"(", , E7 L! z4 p; b. R, d
           RowBox[{6 {: N2 v, L* S8 X/ G
            RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", $ ^' C- F. a1 _: R7 I) u$ t" i6 w
         SuperscriptBox[
      O8 ^& ?3 g$ J* b$ Y      RowBox[{"(", 8 {) G. ^! h$ I. c$ w5 l
           RowBox[{, d+ ^5 F! Q# p2 p8 D2 o7 W
            RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-",
    8 ?# D. T0 s& ]' F' K0 R0 B     SuperscriptBox[2 J7 t5 J3 r+ i% @9 w4 z2 C
          RowBox[{"(",
    : y  p, |  n9 f- K! S- u       RowBox[{
    $ _+ D' B- U; q" z+ ]9 I8 L: s- p        RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    % _( H2 i: u+ P     SuperscriptBox[
    + V- I0 x$ o, T5 L2 F0 V8 f      RowBox[{"(", ! w7 }- A4 r6 o6 D) k& ]. h1 S* Q7 F4 M7 H
           RowBox[{! {1 W' O, P  K. s) ]" X" v# N) f
            RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-", / Q8 r& G; X2 d% f3 w
         SuperscriptBox[
    7 t5 Y8 p. y- n0 t, Q      RowBox[{"(", $ a1 d3 U# n1 ^" s) O* C4 P
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    9 \) [' E! |( d3 g1 W     SuperscriptBox[
    ; `! a4 f) I  b6 |& j+ A4 y      RowBox[{"(",
    ) [" C( ]. r  N# k9 W       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    / |7 e4 e7 }9 |+ a! K    ")"}]}]]], "Output",  S3 @, f' P4 h0 `* [9 {
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9, # Y% @& T) h# G: C2 m
      3.5779607654819613`*^9, 3.578012211515625*^9}]/ m2 x/ T5 Y# R- o. R  u
    }, Open  ]],
    6 f% a& q$ C: g- b" [% ~5 `  K
    " J7 j4 R2 Y" w3 KCell[CellGroupData[{3 o; Z' @/ k& d1 o% a

    ( U$ ~% j" \/ A+ I0 J) V0 lCell[BoxData[
    8 z. o- z: S. U9 K RowBox[{"C4", "=", "Ca"}]], "Input",9 Z8 e; A  X! R4 {& A- e
    CellChangeTimes->{3.5779207559375*^9}],1 H3 t% u0 d% j1 F5 M. B% f

    & @5 e* C; ^! P8 v6 S( ?7 l5 U7 zCell[BoxData[' e0 {9 H/ w& D3 L- s* }
    RowBox[{"{",
      \5 l( f' Q9 V, d  RowBox[{
    " X" X8 `/ J( C5 b9 i  "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",",   B5 P$ w4 c2 @/ w5 x! B- Y$ l+ x* u
       "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}],
    1 u. X8 d7 O) t* N$ k& g  "}"}]], "Output",8 ^" A' P7 N3 _
    CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9,
    4 I8 Y, @1 @' D2 }  I  3.5779607861363974`*^9, 3.578012216171875*^9}]
    2 s3 l6 Y* k+ y  ?3 J& w3 Z* ~# z1 a}, Open  ]],+ b" x, V6 d9 H: {2 ?& o. y: ?5 w
    ) j0 r" Q- }6 _0 B# r" n- Y# J
    Cell[CellGroupData[{: n/ C) [1 k2 C  e- L

      X& X7 E1 l2 g8 _0 b! ]" H( Z. i0 gCell[BoxData[! @  }8 U1 j6 a2 Q
    RowBox[{"u4", "=",
    # x+ A- P5 j  \  RowBox[{5 h- p/ g( v9 e$ |
       RowBox[{"Exp", "[",
    * @3 E0 |7 y$ w$ w" {    RowBox[{: w* ~( i* o/ r# o, T
         RowBox[{
    $ e2 f& [& F9 D2 B( {      RowBox[{"-",
    " M* G, v& Y! Q0 h: g% G# `1 t7 n       RowBox[{  ~$ g2 s9 X- {( m* q* d
            RowBox[{"(", * L9 W$ d9 z" g! W5 `- ]' ]1 H3 }
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", " Z* ?" y1 Q) U8 ?. z
            RowBox[{"(",
    3 ]% T# T6 {# A$ v1 H  U         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],! Q/ E$ A; l& ]& _, A3 K+ I, N* W
         "]"}], "/.", "DeltaX"}]}]], "Input",* ]  z. C7 Y* R8 F, Z. c' v* I4 K
    CellChangeTimes->{3.57792076325*^9}],
    $ x  w* A- z% o1 I, A' f9 D- ]/ O8 c. T! `, g1 f. N/ `2 }$ u5 u. d
    Cell[BoxData[/ A1 e7 q2 u" l+ }8 V# w, ^5 l; i6 C
    SuperscriptBox["\[ExponentialE]", 5 \" B5 W+ N, k& \7 Y1 Y$ b* R
      RowBox[{"3.141592653589793`", " ", / }" @$ w4 T# J5 O
       RowBox[{"(", ! z* j* c! l/ b8 x! A
        RowBox[{
    & ]' h' Q" k' N% z3 G3 U" X     RowBox[{"-", " P8 M, H2 r6 u0 j
          SuperscriptBox[2 y- z- A. q1 j. }: j- I
           RowBox[{"(",
    , w0 z3 ?5 j$ w5 v7 R        RowBox[{
    . V2 Z3 X! o, Z; K$ f1 J         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", # R. W6 D6 h8 V
         SuperscriptBox[, ]7 u1 c- u8 v  L( H
          RowBox[{"(",
    / [1 ^* ~2 b0 S       RowBox[{
    0 B, D2 Q8 c- z        RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-",
    ) v8 K! `- P& q) @     SuperscriptBox[" ^  }7 j% N3 R0 _: j7 W
          RowBox[{"(",
    7 d; q$ v" V1 D1 E3 K& d       RowBox[{
    , d5 ^3 s$ O2 w8 L2 x4 O        RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
    + d( p" o) H3 |" H     SuperscriptBox[
    ) o8 e, ?4 q  G6 }7 x      RowBox[{"(", & m3 E4 b% p3 w/ v7 W: e. _
           RowBox[{
    ' j+ h+ o! Z( R( x: w; q+ a        RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-",
    0 ~, q1 @0 V9 v# f: c     SuperscriptBox[
    0 `5 z$ F7 A; i: q  S8 p      RowBox[{"(",
    ! b; t& ?7 L9 }, z       RowBox[{
    $ P# _# N0 k1 I; H2 {; f1 |/ \7 u        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    " K5 O- m$ g( q0 C9 Q% [! J" K     SuperscriptBox[
    1 z! H( K; A+ K. v& X$ g/ }      RowBox[{"(",   b- ^4 f& p5 ~$ G  R$ F9 k( s
           RowBox[{( l) t- \7 ^" v3 i) o/ H$ t1 r
            RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", & j0 @/ ]  L- c# T4 B
         SuperscriptBox[
    9 L7 P4 @# L4 O      RowBox[{"(", 6 j. g) B5 _+ H5 h
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    $ P8 f9 c4 B+ K3 s3 {: W0 Z     SuperscriptBox[
    : [1 @. X* @6 c; |: t" n$ P& x/ i      RowBox[{"(",
    8 D' d& c  d1 D4 K+ j       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ! }" G; p9 ~% h2 a' r& O: c- }
         SuperscriptBox[; i4 k  R  J+ G) ]: T( x
          RowBox[{"(",
    : x6 t4 d3 c  K       RowBox[{" R8 l& _0 T- P6 }% M
            RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}],
    0 x' o& x2 f/ P2 N6 h. d. N    ")"}]}]]], "Output",
    . y! ?  g# o" ]7 C/ |% T CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9,
    ) V7 Z# E  Y3 D3 \  l  3.5779607873531995`*^9, 3.5780122169375*^9}]) z$ }# V, \# C; U
    }, Open  ]],% l) S+ u  s# }- _# s( j$ _% D& d+ I
    " _2 M: y0 e/ i! ~9 e
    Cell[CellGroupData[{7 v' A& c' D/ z2 a# t  a' i4 C

    ' G) [; l: n7 C( K$ I( l1 qCell[BoxData[& a$ s- T! z) L. C9 t& l
    RowBox[{"C5", "=", "Ca"}]], "Input"," W5 Z$ }  D2 m  j( v
    CellChangeTimes->{3.577920860671875*^9}],
    + Z* W: i8 j% L7 H2 J. }( T/ L4 H0 `! [
    Cell[BoxData[% D7 ?( ~! \; \( G* S, Z7 ?
    RowBox[{"{", ' h$ P! l! H# |4 _6 g3 Z6 o) B: j9 y
      RowBox[{! v5 L) s+ y! f4 z
      "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",",   s; w$ S, u$ b4 {0 @  @4 _  v
       "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}], - l! f' A& V/ g2 Z" T# o/ `' z
      "}"}]], "Output",9 X* A# Y/ B( p/ ]$ u& F2 O- e0 k* n: L
    CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9, + y, ?. ]" q2 l0 a3 {) W0 p6 }; i
      3.5779608137328453`*^9, 3.5780122209375*^9}]
    . p& @0 C+ m* S* U0 {; r/ g$ B* p}, Open  ]],
    - R; _* b$ x) S' }& i7 X
    * f: L8 ^" Z, j! C# T4 vCell[CellGroupData[{
    % S$ Z: `7 `* M! `; E8 C& [' X! x4 _' p/ _
    Cell[BoxData[, H# r8 m2 F! o7 v0 B
    RowBox[{"u5", "=", / G+ s1 K0 Z% ?/ f; D. e
      RowBox[{, i: G* ~4 @( F( |% n
       RowBox[{"Exp", "[", / |. Y; a2 f( J! W1 p* J) g
        RowBox[{
    6 V4 ], T* N6 R7 s6 h     RowBox[{
    : h. n' A- e, U      RowBox[{"-",
    4 P4 T* v! Q, y       RowBox[{
    # v5 [# ]+ [5 `: p. s- ^4 C        RowBox[{"(", * C7 x6 L2 x! [$ P  c- d) p, p
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ! K+ b. v, {; W" U- \& W! r1 C        RowBox[{"(",
    ; D! W* `9 J  x) T& W         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],. Y9 b$ `( O- k/ i! K4 i1 ~
         "]"}], "/.", "DeltaX"}]}]], "Input",# f' W: o) m# A
    CellChangeTimes->{3.577920869375*^9}],; {% K3 s; B; R7 L; x* {( A  W/ ?

    7 }5 I" @6 |0 \  F; ~Cell[BoxData[
    / A2 n/ S5 b* y' r5 X SuperscriptBox["\[ExponentialE]",
    ' L. v5 {2 T$ @* q$ o; n  RowBox[{"3.141592653589793`", " ", / h; K+ K, [2 f, ~
       RowBox[{"(",
    ( |3 @# o' L! y4 Z* o    RowBox[{
    3 U- f- k6 |8 X" _/ N     RowBox[{"-",
    . {( g* ?( |9 b3 _# B8 c      SuperscriptBox[
    1 o' g; Z; ^( x' Y( v6 D3 f9 m" u       RowBox[{"(",
    4 d3 y5 `& }. S: Y$ s3 v6 M        RowBox[{; U+ e7 C" x& ]- }) h
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    6 T; H5 B+ ^# t4 @     SuperscriptBox[! ~2 k( |5 d9 m+ i& ~9 h
          RowBox[{"(",
    , @9 J- i6 G& p% }& \( D1 H9 h/ m9 w       RowBox[{2 q3 \% b$ H, {
            RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    7 A9 z. o* e4 J     SuperscriptBox[& B3 x2 |/ T! g  a
          RowBox[{"(",
    5 S* P5 M- ?0 ]' K: l$ G0 T% R       RowBox[{
    - @2 h+ x6 V& g* O* f7 ], E- _        RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    2 X" {6 w2 {+ Q     SuperscriptBox[, V8 S/ A" E+ y4 p' X1 R+ a
          RowBox[{"(",
    ; ?' g( e: M5 X& ~       RowBox[{" ]# l$ F0 ^) z+ @4 v
            RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    . B0 M2 C. @3 y1 ], L     SuperscriptBox[
    : e$ z2 F: Q! A3 f      RowBox[{"(",
    + H, B9 G/ Y+ \5 E. k  c, I       RowBox[{4 E9 f2 {+ N1 A0 x& }, n! m+ h
            RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-",
    4 G& ^: w7 C5 a     SuperscriptBox[
    . v# i  M' Z' T) r      RowBox[{"(", ' G, G+ S# A' [$ _
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ! r7 l" K8 s# f# P) q
         SuperscriptBox[0 X, S- P4 V- K, f$ n7 E" i0 W
          RowBox[{"(",
    ' R6 O2 @9 r) g( f) h* e       RowBox[{
    8 n9 |# S' ?0 \        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 2 \3 X3 n* s, q9 v; y
         SuperscriptBox[6 c$ o% h' K/ p+ s7 }$ }
          RowBox[{"(", ( @8 |& n3 @, {6 _: s
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ' I4 ~7 h) x, x0 z$ F6 `# E5 r1 A5 \     SuperscriptBox[
    " z6 |2 P2 w. V4 U      RowBox[{"(", 9 w& r! B; a; ~; [4 U/ O( R
           RowBox[{3 G% [  q/ F0 y" B! q5 X6 z
            RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], & s. v! v" u2 Z5 |5 Y+ Y( {$ ?
        ")"}]}]]], "Output",
    + E( |* R9 y3 @2 a/ O7 d CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9, : W2 H, q+ F9 |4 U/ u2 S
      3.577960815043248*^9, 3.578012221953125*^9}]
    " V' V6 L" H* c}, Open  ]],; R* A% s( L, s! g$ w+ d4 ]  O

    % X# k# C: z) M2 V9 m8 I* s7 f) p' FCell[CellGroupData[{& M1 K* C, m2 {' L

    ( @  n' K% f, Q, YCell[BoxData[
    9 u+ U& c* h% G RowBox[{"C6", "=", "Ca"}]], "Input",
    + u4 `+ g) }' j- \, v CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],' y2 K& y8 r1 X8 P4 \0 F3 ]) i
    * T  U0 x9 L( {4 s6 |
    Cell[BoxData[+ r8 ?2 q0 t3 h) z5 ]4 y, C+ @5 M
    RowBox[{"{",
    $ n) u. d4 H4 J8 V" Y8 s. b  RowBox[{# j2 @) ^* @" [
      "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",",
    # k  q  u8 L; @   "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",", 6 O8 C2 C5 S$ |. G" g
       "0.494866`"}], "}"}]], "Output",1 w  `% S9 R4 y1 C
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,
    0 J  t0 K1 E" j   3.5779608373044868`*^9, 3.578012227359375*^9}]2 A% E/ m2 `- i* q
    }, Open  ]],2 a: Z! m5 \" Y; @4 @

    9 B8 S# `, t' Y0 HCell[CellGroupData[{
    * Q, k- P& O2 a. ~1 Z) h% \% m: p( y8 Z! F. t* T" a7 Y2 W
    Cell[BoxData[
    0 j5 r' q$ Q+ y, q& q4 s RowBox[{"u6", "=", ' [, f) M" d4 L
      RowBox[{
    : ~: q' S& a5 I9 l3 P. E   RowBox[{"Exp", "[", 8 I9 n- U" `' f1 \' n
        RowBox[{( ^( @$ [' h$ I
         RowBox[{
    7 ]* U! E+ ]" I7 Z0 \      RowBox[{"-", 2 |; G5 q& {1 _- _
           RowBox[{
    , m2 H6 R  i/ ]: \8 h! u- ~        RowBox[{"(",
    8 R0 F7 y1 p" N' c& u% h% u0 r         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    / k0 S* D% [5 g3 q/ U, A5 {        RowBox[{"(", % N$ @$ p* e" ^9 K9 |" n
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],( a- E: d7 V1 u
         "]"}], "/.", "DeltaX"}]}]], "Input",& v+ F2 n" V% H; d0 c! f" N1 h: I
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],
    - \/ T$ h9 d! R& o2 }4 j3 }/ y: T8 Y1 d( E
    Cell[BoxData[' m2 `: p* S' F) w. g4 m5 M. T0 h
    SuperscriptBox["\[ExponentialE]",
    , M! _/ q( g% x7 ~& |  RowBox[{"3.141592653589793`", " ",
    5 A6 A  h; p5 v0 C   RowBox[{"(", $ i0 l0 [7 `+ ?& p
        RowBox[{# a; P  W+ J% h* x! g  p
         RowBox[{"-",
    8 e  G: N7 G! v5 @      SuperscriptBox[
    6 c* m/ v7 z9 Q' B       RowBox[{"(", 1 ?# o3 p- \+ x1 ?7 c
            RowBox[{
    . ~" z# d! z: {5 y         RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-",
    & N6 Q7 ]% {0 M1 {% X     SuperscriptBox[
    - _6 ^- t# z+ Q8 |% X      RowBox[{"(",
    / s/ |% X9 ]$ ^( w( o" [       RowBox[{
    ( r% ?" S  P+ V( T5 z& n        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-",
    , g9 Z2 N3 y4 i+ Y, q) T& N2 j( z     SuperscriptBox[
    + D' n8 E5 Y" M6 m5 W9 y1 d5 m      RowBox[{"(", ; ~7 Q0 H0 H7 K7 [$ ~' G2 q8 o
           RowBox[{% O: ~: N+ W* X! s, M: S2 Z" m
            RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",   w7 s7 I. P* ?# g0 ^( S4 _2 r1 w
         SuperscriptBox[
    / K7 c) T. f' U+ }9 t$ h2 j      RowBox[{"(",
    2 @7 v( \1 Z) `+ A       RowBox[{
    $ r* ^5 _9 \7 f4 @, h; \        RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-",
    4 Y  u$ X& L% a4 `     SuperscriptBox[6 t% \- \) i6 x8 Y
          RowBox[{"(",
    # U$ Y% R* ^( K& c+ q8 U$ [       RowBox[{. t2 @$ j/ w6 ]
            RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-",
    4 o. m  v6 X: g     SuperscriptBox[
    5 \7 e/ Y) k! D' v# h      RowBox[{"(", / Q$ b% F+ `/ O! X5 h/ M
           RowBox[{) \% G5 S1 V" Y0 ]8 [8 s
            RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    # g4 a. v% S' y5 D- @# r3 H! Z  z" ~     SuperscriptBox[
    7 \, y) A) m: V' l* u, [      RowBox[{"(",
    * q8 D/ G6 m0 a5 }% r2 B       RowBox[{
    8 s9 Q  v0 x2 [3 ]9 G        RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", ) T8 V1 F; B0 Z: y- F  p% J
         SuperscriptBox[
    ; I8 e! d, g  N8 J1 B6 R- Z      RowBox[{"(",
    2 f/ @. |5 _5 G( X9 f6 _5 n       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ; K7 Z) D3 a! p0 S# K2 |# q
         SuperscriptBox[+ B- @6 H+ ~* c# u! R
          RowBox[{"(", 3 O* c; q8 m# D6 U5 K8 n$ j
           RowBox[{
    & C( Q3 a6 {5 z' w, o        RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], & m! M, r7 `% S( {. ]2 ^6 s
        ")"}]}]]], "Output",0 Y8 g- E5 k# v* }. Q+ H5 D
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, 5 M1 M5 @4 [5 |& o& k! n, T" i9 v
      3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]
    ) \% g3 I0 g! `; K+ K}, Open  ]],
    ( r" r7 f8 r+ R: n3 x( U) \
    ( ?$ ~- X1 C$ x0 ECell[CellGroupData[{
    1 _% T7 R2 D! ?1 X
    $ }  q" e% A- ACell[BoxData[+ @, V  R6 k6 H/ R+ b  @; ^% J: i
    RowBox[{"C7", "=", "Ca"}]], "Input",3 [  O+ H$ W4 ?5 `* j+ R: `
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, - V2 N8 ]4 l( n! L
      3.577921316125*^9}],2 v1 Q8 Y# |1 c8 F* S6 N! b

    % Z7 D9 N, Y" X' V* x& cCell[BoxData[* [9 k, J* V7 |% j  t
    RowBox[{"{",
    5 s- f# k+ Y4 h9 v- W) O. |  RowBox[{- u* i4 o5 K- x& d
      "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",", ! _3 `0 a5 Y( ~
       "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}], $ b# g+ T! p5 K2 v0 x0 y" Z
      "}"}]], "Output",
    7 e* T9 H4 Z8 X0 k% J: C CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    - G7 A  L! T) s  3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]' w0 |  `2 b2 l+ |4 s, z
    }, Open  ]],
    3 H/ u1 J3 C7 ~: j( j. B. x* {- F+ |2 w- j) _
    Cell[CellGroupData[{
    , t& \' E3 e4 g  G- ^1 t# @+ ?* q$ q: L: Q4 A$ S
    Cell[BoxData[% _1 j2 G7 ~! B1 c) B3 ]4 n. c7 o
    RowBox[{"u7", "=", 9 b6 L+ q# k6 d) w2 M
      RowBox[{, J+ ]6 X+ r! z
       RowBox[{"Exp", "[", & t7 _. G& m  I: |3 \/ u8 K
        RowBox[{
    5 ~7 F: H4 d) p8 L     RowBox[{
    1 Q0 z' `; a! L7 l: I( N; V      RowBox[{"-",
    3 v8 N& h7 R9 s  v) ]( V       RowBox[{8 G! d4 L. K: F: p) ~- Y7 a
            RowBox[{"(",
    ( y- ~+ ]+ h! L% L9 k. C         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
      X$ X& m; I1 v& l$ [! m- c. @4 a( v        RowBox[{"(",
    6 t: v0 ~9 N# X6 E: ]) q& R% \9 e         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    0 b! d6 I3 K& `; u; {  [0 r     "]"}], "/.", "DeltaX"}]}]], "Input",, C/ D: h, }& e7 D* h$ R' D
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    : A0 w3 x* A/ D% y# L- o  ^5 F  3.57792132028125*^9}],- c' e/ U1 {2 ~: P. |

    ( C5 J$ m9 X7 A8 D; l  a, hCell[BoxData[
      I5 v- m$ A( g5 l6 X SuperscriptBox["\[ExponentialE]", 8 o% I2 A& E- g; f1 i% z1 x
      RowBox[{"3.141592653589793`", " ",
    7 t# n- @) M8 y. ^0 k   RowBox[{"(", : ^$ f# j9 u; W( g4 X
        RowBox[{# k; K1 U" W6 S) F, v# l: u5 Y$ O
         RowBox[{"-",
    9 O+ X- X* W6 U. |$ E      SuperscriptBox[
    6 |1 l# N. c  N  H2 h+ G+ Z       RowBox[{"(",
    ) D6 Z) b8 \- S9 e5 N0 {1 U        RowBox[{
    ; }; P% j# [" O1 `" a3 _         RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-",
    / P: o9 U# ^& l6 H     SuperscriptBox[
    ) z0 m- D' @) P. @6 A) Z      RowBox[{"(",
    " D+ L# j) l  z7 s" U/ B& k       RowBox[{
    4 E/ f! P9 j1 A1 m* E, t4 t        RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-", / n* D$ P5 b- A/ ?9 F: w0 L
         SuperscriptBox[* O) S4 {5 U6 A/ A$ ?+ M" ?
          RowBox[{"(",
    ' n" V) y4 a4 v: t       RowBox[{* S. P+ `. }& [0 l5 P$ j1 P! v
            RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-", + o1 m% c$ |* X( R% F- H2 g' d7 }0 R
         SuperscriptBox[7 R& a+ U' B1 G# {6 J
          RowBox[{"(",
    6 ^' d/ @' l% x; _       RowBox[{% C0 A1 F& X" _& P
            RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-",
    ( `% P% |( J; y4 y) z     SuperscriptBox[& Z; V; T* f0 Y: `# G) a
          RowBox[{"(", 5 j: D' `% k4 N# B
           RowBox[{: [6 R. G0 ]4 T3 i
            RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-", * M0 p+ x3 Z0 I$ k
         SuperscriptBox[% }7 |1 v4 Q' G1 G4 M3 t4 S$ c9 h: A" P
          RowBox[{"(",
    3 r9 ~8 k6 R! l2 i' C1 s$ n       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    & z. J8 {3 r# W8 n0 X     SuperscriptBox[) ?' E: s' M0 G
          RowBox[{"(", ( F# o; z) S' h6 z0 Q
           RowBox[{
    : W, j1 L. B5 w) E7 E        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    - M2 u) U6 k" N, Q* u     SuperscriptBox[- `$ x0 Z1 {6 Q" M
          RowBox[{"(",
    2 D3 q7 I6 J( B* t       RowBox[{6 \* P+ G: l, S! L* U! v
            RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-", , `0 J) O0 m6 ^' d( a( @  a
         SuperscriptBox[# u/ v" C; e4 ~6 N5 x6 m
          RowBox[{"(",
    9 E2 R. B" h! J9 U# i       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 3 }3 c+ P: F9 |- y* |
        ")"}]}]]], "Output",7 ]( V( a  z8 f$ g
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, 5 P8 z- `# w& B. d0 r
      3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9,
    : j* v6 Z, h4 m' _% L  3.578012251359375*^9}]' ?7 q* t9 `6 [. h
    }, Open  ]],5 Q( r# r. S# c" J2 S, g
    2 u: w4 X( A" w/ m
    Cell[CellGroupData[{% b/ l6 j# U1 y  m: n+ ?# P; @
    1 L6 V  L3 Z5 A- V4 f
    Cell[BoxData[
    * u, a8 m* ?7 X% j! ~ RowBox[{"C8", "=", "Ca"}]], "Input",6 p; K7 S7 j' D
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    $ t" ^( P( r1 S; \+ C1 {4 a( d  a  3.577921316125*^9, 3.57792141421875*^9}],
    1 h" Q  E5 e, A; L( L1 Q
    4 G! j% s0 g8 Z0 u& p3 y) c' MCell[BoxData[
    6 k7 Y0 ]# P$ _6 Y3 n+ N# ~$ p0 Y RowBox[{"{",
    ; R% b0 E  b; K1 X  RowBox[{
    * ?* ^  a' F, v, o8 C5 d  "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",", ' T! N- H. W) @  ~- {8 f0 Z
       "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}], ) s1 v1 `$ L, A) X+ n4 J
      "}"}]], "Output",
    # i& P5 t, [5 c  I2 s+ {0 g0 J2 a# o CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, $ b4 O) j% |6 n3 o
      3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9, 5 p2 m* }# e8 N3 H- s* _: V
      3.578012260515625*^9}]) F- P5 l0 d; }
    }, Open  ]],5 E/ H( Y% m- F* P) G" |. R

    - K' k0 k; u  O) [/ N# iCell[CellGroupData[{
    * n9 p/ m9 B9 Y/ Y+ o: l) t2 w, I: f8 E
    Cell[BoxData[* u8 `5 \& W; K+ @9 L, U
    RowBox[{"u8", "=",
    ) q) m5 w4 w5 Z/ M  RowBox[{
    8 X  S* W, b$ l4 w% Z7 h   RowBox[{"Exp", "[",
    ) P1 p5 \( B6 N$ C* \; u( b    RowBox[{
    : Z& `" o* F" O' z: j- c2 e& n     RowBox[{
    . M* C; N  e5 K5 d1 {- Y* J      RowBox[{"-", 5 V5 O0 w; l3 O
           RowBox[{
    ' {- W, k$ f  R+ A        RowBox[{"(",
    / J* A0 i4 K! V& j6 U2 e' Q  P         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    4 Y- |6 y  U8 {/ L# H( t        RowBox[{"(",
    7 [# N: L! w% j9 B& ]" D0 _         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ P, V3 u$ |0 f9 n& k5 o
         "]"}], "/.", "DeltaX"}]}]], "Input",4 M, m. a% G  O
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, # k0 ^- S. z% K/ x2 j  ^
      3.57792132028125*^9, 3.577921416921875*^9}],
    ' h" L1 `' F2 d9 i* y
    ; g; C& z0 w' U& E- uCell[BoxData[
    4 |7 }. q4 j* B1 A) G SuperscriptBox["\[ExponentialE]",
    4 }0 ~5 C$ S* K  RowBox[{"3.141592653589793`", " ", 7 ]. M! z: Y/ p1 ?
       RowBox[{"(", 9 n6 |. _4 `" R" E- ?4 ^
        RowBox[{, _$ Y& L: A' z* O
         RowBox[{"-",
    8 |) E7 x2 B$ ^! T. [9 u      SuperscriptBox[
    * A4 W' c  ?2 `2 [- ]       RowBox[{"(",
    " F, B4 K" k& I% ]( o        RowBox[{
    ! p$ q! u! S3 X- W$ p9 T5 B4 d         RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-", . q. K# w, d/ W% i
         SuperscriptBox[$ _/ `( V+ O2 _9 R# q, L% ~& {, q
          RowBox[{"(", 5 _' {) ?+ r0 e$ r: m0 {1 X
           RowBox[{
    6 _, j6 I0 g( \  m2 \* @        RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-", 1 M% Q3 e% A8 ]( L5 ~
         SuperscriptBox[
    5 ?6 s0 `" E' o4 P. r% F      RowBox[{"(",
    ( w, {6 d6 _; {% u5 s       RowBox[{
    5 n( E+ T* p* n/ n4 Y) U. ^        RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", # Y& f, T* _" i( Z
         SuperscriptBox[
    2 ^! X' P5 {  P# F' Q! \+ c      RowBox[{"(",
    ' E* E2 N& m( T% v       RowBox[{
    ) z: q+ V* z/ K& x        RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-",
    ( s# i. V) \( w: m     SuperscriptBox[
    5 ^4 O+ K9 @9 [9 U      RowBox[{"(",
    4 P, [( p+ T& V# @  d* v       RowBox[{8 o8 c4 n; `* G
            RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-",
    3 \7 X/ z5 b' N9 R6 X1 R     SuperscriptBox[
    . `3 J: a" t5 d) e- F8 b      RowBox[{"(", ; ]7 y* w: w) Z) J) f
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    & e' {7 k0 I7 s* D1 Y     SuperscriptBox[/ B4 j- o0 ^6 G. `+ n& P0 `6 _1 l
          RowBox[{"(",
    2 G/ O6 S/ N& ?" F# `0 d+ g       RowBox[{! s8 O: Q8 H4 z" M) K
            RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    1 _, r! d% k- P: x     SuperscriptBox[
    : b& {( \" R2 I# t( k1 W# P8 R# H      RowBox[{"(", & H/ y! V9 g' a: R0 B' i
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 9 E3 Z) _+ Z4 X% U) Y8 y
         SuperscriptBox[0 E. r& |/ \. m
          RowBox[{"(",
    4 ]3 Z6 i$ h% q9 f       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    : C$ K- u- ^; [# X  J    ")"}]}]]], "Output",( k' Q" N2 Z8 k9 y- r  x  A
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, 6 G) x  T+ x7 [9 n
      3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9,
    & P- Q* W- F0 ~: ?' U  3.5779608945565863`*^9, 3.57801226165625*^9}]8 W5 ?- P' `; N( c# x
    }, Open  ]],
    ' v% A6 O6 ^9 S, {
    6 }/ p: q# _- e% S; JCell[CellGroupData[{
    ' H5 J& R5 V7 w* H
    * s+ ~) x0 ]/ Y/ V: m8 bCell[BoxData[
    ( |( b- |; y- c! c4 \ RowBox[{"C9", "=", "Ca"}]], "Input",  s3 H6 w; L) l9 Z5 V9 p7 `
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    9 ~& c6 F2 n. e* b& ~  3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],
    % Y4 ?% `  O$ F7 C
    + T# T# A/ g  rCell[BoxData[1 }0 i8 t) l: S5 |
    RowBox[{"{", 5 [# w+ H% z7 K9 e! k- U7 [8 D
      RowBox[{5 I2 L" J9 I( e. _( ?# }
      "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", 7 @2 ~! E7 b6 Q5 M/ @2 N& ?
       "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}], ) f1 c2 {* q% ~0 H6 R
      "}"}]], "Output",
    $ r* g' Z/ c$ r) V& `, M' {2 A; Y. ^ CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, ( s) p" K7 k" {: I5 d
      3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9,
    # ?& V; j+ j  e+ H! @; f' f; \  3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9, * D9 ?0 y* L8 n  a. v
      3.578012268234375*^9}]4 U9 W5 P$ B- ~
    }, Open  ]],
    0 H0 ]- X8 k$ {
    & g) A) K! p6 i. ~: ]7 UCell[CellGroupData[{
    % D9 c. `3 F4 L* [  v3 \' @, A9 H: O# I  K; g0 b
    Cell[BoxData[/ W: t$ C& e. J# r
    RowBox[{"u9", "=",
    ) {: g! |9 [' c4 d3 j  RowBox[{6 u8 ~! B& s. o+ ^% [
       RowBox[{"Exp", "[", ( e' Y: i* N/ K' v
        RowBox[{
    : X7 }; M2 T: \     RowBox[{- V5 @8 m. A5 k5 y
          RowBox[{"-",
    ' p" d& X" v3 C6 b: s* Z/ t0 P2 n& A* W       RowBox[{
    3 Z/ m$ e9 Y" g% E  d/ g& Q) N8 S        RowBox[{"(", 9 l& Y+ {# s8 g- i. x  ^' N" |
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    4 D0 F0 n8 {8 S6 U2 i1 B        RowBox[{"(",
    4 g8 z! I. f) M2 ?; G         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ! V/ G" ^! B. d: \     "]"}], "/.", "DeltaX"}]}]], "Input",
    ! V5 }% E0 |: C7 O) l( r CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, 7 V3 i* M/ G; _8 u: Z
      3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],
    . i4 i0 w1 `1 M& {9 H
    & q6 B" N/ P6 y8 M2 e" A7 lCell[BoxData[
    $ e% b# {5 P& e) b+ f, S2 G SuperscriptBox["\[ExponentialE]",
    9 R2 I5 o1 x; V3 r. }  RowBox[{"3.141592653589793`", " ",
    + N3 M! r+ S: k# _; o   RowBox[{"(",
    2 A) {! [7 Z9 v; J5 G    RowBox[{. ?- f# F1 {1 ~' w7 h- }7 J
         RowBox[{"-", # p; D; C+ |- g3 f  }% k
          SuperscriptBox[: z' n: z" v0 r( f& }0 l0 a
           RowBox[{"(", $ I* K# H5 A" ?7 Q
            RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-", $ `  c& d# d" {1 y' [" i' }# O7 S
         SuperscriptBox[
    4 h% ^. ?* {2 H) e      RowBox[{"(", ! V$ y/ Q: P, c/ Q3 I% O
           RowBox[{
    : w( J4 b7 |- T        RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-", 4 W! w# X" `/ ?2 N2 h
         SuperscriptBox[! h' s" X: q% v- z( `5 O8 l
          RowBox[{"(", 6 r2 g+ U2 D/ O9 Y1 B6 u
           RowBox[{
    $ y+ @" P+ [1 y. ^( ^        RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", 2 W) w* R) O( A1 E
         SuperscriptBox[
    * s5 t. N% a# d8 t( `      RowBox[{"(",
    . s0 @6 ]+ g4 u$ z5 s5 T       RowBox[{" Z8 n3 l! O5 U: g$ x  O) q
            RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-",
    ' l* e- K% \4 H4 m( ]4 B8 W     SuperscriptBox[) T3 e; i) x) r* R9 N
          RowBox[{"(",
    + ]9 }& P4 k% M$ Y5 w       RowBox[{9 J) [: \; F7 c- K& g* D* i; _& o
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    % }' T/ D- j' Z     SuperscriptBox[, G8 }* T/ D! w6 w: C
          RowBox[{"(", ; l8 i! ^% s! [# T, y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 3 X. h; j% Z0 ?/ F4 T
         SuperscriptBox[( z% O$ L; P$ _! T
          RowBox[{"(",
    % I% D" y) h$ Z2 l$ _  j       RowBox[{; B; f8 e( ]5 P9 f; i, n5 V: f
            RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-", 7 E. h& H6 Z  N  u- @3 L
         SuperscriptBox[) n, X' H- y; p( z
          RowBox[{"(",
    3 p. b; d0 V, |3 E       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",   w) N: l$ f) x
         SuperscriptBox[
    4 G$ m/ g9 T% R  E0 R% X) R      RowBox[{"(",
    / T1 Z# ^+ n9 W: B  Y  @1 b- b       RowBox[{. f8 W8 x& l+ Z0 \" c' M5 ?
            RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], 4 A0 k9 H8 X) }0 l( t" D* _
        ")"}]}]]], "Output",
    7 S+ ]7 w# a' s* L CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, - J' B2 Z, F: t6 ^& P, L- t& f
      3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9, * K+ L: E( s. Y2 T' g
      3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9,
    " V% t: n( F7 G3 U% a9 f+ d/ n! e1 Q  3.577961530421959*^9, 3.578012269125*^9}]
    ( u- ~, Y, T; ~$ Z( G+ P}, Open  ]]," S/ t$ H. W3 c" }/ k, Y

    3 {: {0 u3 U& dCell[CellGroupData[{1 [% H6 u- P/ |$ w7 w* g
      Z& a2 q" N$ q; g
    Cell[BoxData[{& X$ S8 O" {9 |5 u
    RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]",
    ' S5 T  H. [! _  ^4 r% ? RowBox[{"u10", "=",
      Y: p3 d- X; q4 V  RowBox[{' ^: W. ^5 V( Z. m& `2 ^4 C  C
       RowBox[{"Exp", "[",
    + z; z  X  {; g; h    RowBox[{/ |# b% B) b4 b0 b  D; R
         RowBox[{; z7 j$ X" @" }0 |+ n  M1 v
          RowBox[{"-", ( t4 f0 I9 x4 g6 {
           RowBox[{6 O, T, w, P0 i3 _
            RowBox[{"(",
    - H, g# i4 d1 Z8 k' s' Q6 E         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ( L7 b% ~: |. @, i        RowBox[{"(", ' p" e0 i& Q" s$ A
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    . a) ]7 M8 a0 n$ X( _1 C. c) t     "]"}], "/.", "DeltaX"}]}]}], "Input",2 Z3 P& ~- M! c
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],
      ^1 P: @& S( F$ ]; T
    ; `1 r9 e' B6 E/ nCell[BoxData[  I: W1 a) v! p3 s" F. ]) l' v
    RowBox[{"{", 0 q  {  v. N9 }/ K+ O
      RowBox[{
    ! B$ }2 m1 ?$ {9 {1 K5 _  "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",",
    4 a! @" z. Y' I! {, N1 D* {( Q8 G, ^   "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",
    " W" {; R2 c' C: R# h0 k2 @ CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],+ O2 |, n% i9 a$ L$ S$ z4 o6 b
    9 {/ _  |; [) l9 `) E+ t( \
    Cell[BoxData[% L) Z( h2 ]; N: J3 ~/ k
    SuperscriptBox["\[ExponentialE]", 3 c  ^* Z  t# l. N1 k1 @
      RowBox[{"3.141592653589793`", " ",
    6 Q1 i3 v2 t0 f( O3 x6 w" O1 W3 ~   RowBox[{"(",
    . h2 z8 w) H1 T! G    RowBox[{
    6 t  P* ^& V1 t4 F4 o1 }     RowBox[{"-",
    . S5 o. t7 `' K      SuperscriptBox[
    ! R% a  c% b9 \( [       RowBox[{"(",
    * g/ \5 r2 R+ n  I/ g2 r) j( J        RowBox[{; J5 Q$ g) x( E( V9 O; e" i
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ; f! r* m* T/ e( T) p4 L     SuperscriptBox[7 u) |+ w* ?/ l; _
          RowBox[{"(", ) K9 z1 q4 {1 [
           RowBox[{3 g6 @" q! R0 ^0 Z6 y$ ]. O
            RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-",
    % r5 H" x( E# B8 H6 [     SuperscriptBox[
    $ K0 F# u( A, W  d' Y# s# K- _) Z      RowBox[{"(", / W8 a; s* w1 r
           RowBox[{9 q; |" R1 Q" P. Z
            RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", , o% q& w) x9 u9 d4 ^+ c# g
         SuperscriptBox[& H: C( Y1 g3 {6 U: [
          RowBox[{"(", ' |2 B! W8 d) `* B4 X0 e: O
           RowBox[{
    ( Z! d  x4 |9 z$ z        RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-", # j+ H: s2 i5 u# t- O% J
         SuperscriptBox[. z" v, T: Q. P- K2 Y
          RowBox[{"(",
    ( u( [6 Z& r  S* K! Q9 D       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-",
    . ~, c& x  Q* ]. H7 a     SuperscriptBox[+ ^" j0 n+ b: q3 e
          RowBox[{"(",
    & B) B4 x, J' y! K- y1 k( Y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ( ~, E1 G+ i& A$ s3 N6 f     SuperscriptBox[
    9 a# q& ~& }! j5 g+ H      RowBox[{"(",
    0 }7 k# T4 ]2 l+ R5 ?, F       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", # F! B0 C1 h) O- `
         SuperscriptBox[3 k1 Z) i4 \( h. \% p& F* B, Y
          RowBox[{"(", + H% s2 g% W5 t0 N" W* D$ Y3 F) ~
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", - {2 |& e( U5 c# `% ]; a
         SuperscriptBox[
    & N+ s2 f7 B4 |5 q$ K. M      RowBox[{"(",
    5 I/ V7 A- l0 a3 B* W7 ^: c9 M       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    5 |8 ~. C9 x  Y! J7 v, m    ")"}]}]]], "Output",, l- u* W4 h1 @; h  f8 t
    CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]
    4 ?# |! H: m3 C& x# J2 j/ G}, Open  ]],
    / V* \2 |1 s5 B6 d( S; @/ o7 b5 i
    - V$ s. d) K; [6 k4 lCell[CellGroupData[{8 y: k* f3 a* E( E* s

    ; g9 g$ b* R( c, J  W- V' T. T. JCell[BoxData[{" ?1 |$ X, ]% t7 @
    RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
    ! G& g. E, S0 n$ D RowBox[{"u11", "=", 0 F3 c2 Q, W8 p7 i7 c
      RowBox[{
    5 J$ b$ q9 E( i! r) G   RowBox[{"Exp", "[",
      c+ \$ F  M+ ]  s    RowBox[{
    , n8 y- T% Z( ?( I7 l     RowBox[{1 H2 ?" V0 j' W
          RowBox[{"-",
    * b: M1 M8 |: ]+ p8 {       RowBox[{. Y3 w( k# O# q8 R$ z+ O! ?
            RowBox[{"(",
    $ T( a6 Y1 h9 T' r6 ^3 d1 L2 [         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 8 D" f* i8 ^- o- x
            RowBox[{"(", 0 J9 b0 Q# T, J% h
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],7 ~5 A. m: m; }8 h# z
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    4 o) r. ^: K$ N CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    9 r; b8 r2 i+ z: k# ^  3.57796154237158*^9, 3.5779615434011817`*^9}}],7 I8 k# @& K: D* z+ l) y$ g

    ; q7 c7 M; W4 G/ sCell[BoxData[
    5 W4 Q' x# \8 n RowBox[{"{",
    ( O8 v1 o' V5 U  RowBox[{
    4 j0 W3 D5 A  e7 G" w# x  "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",", 3 n7 |' r: W+ g2 o6 [
       "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], ; G% B( B1 W9 |% t: J, c
      "}"}]], "Output",$ P+ d) p; n9 m
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    ) N+ ^* a3 w: }; b- |# }  3.57801228203125*^9}],; j& U( F- J# k- w0 U  y

    7 n6 L# L/ ~0 ~! m7 JCell[BoxData[0 `' [. C1 q6 X9 G4 w0 S9 q
    SuperscriptBox["\[ExponentialE]", * A+ M4 M) Q5 ~# |! H2 P$ E
      RowBox[{"3.141592653589793`", " ", % U0 N0 x/ a6 F  \3 N
       RowBox[{"(",
    , v' G: x* f1 [3 F    RowBox[{7 G8 O# S9 A$ A' ]5 W
         RowBox[{"-",
    1 V2 R' c, e; W! z1 `# b      SuperscriptBox[2 Q# P; X' t9 H9 V, `! B9 O
           RowBox[{"(",
    $ s2 F) F# e# w1 k        RowBox[{) x7 H3 f# s. g2 [, G% G% ]
             RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ; r/ ^8 h! P+ p; z4 s* F5 n     SuperscriptBox[( V# H+ K4 b- b9 v  N
          RowBox[{"(", . K( H" S( O4 [0 @
           RowBox[{5 E1 ~* X- m1 Y0 z2 R* s6 W
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-", * g- j1 H7 y9 [0 I% C' V
         SuperscriptBox[
    + K( B. E$ d, c2 m: f4 Y& v* H      RowBox[{"(",
    " t; y6 o6 }- U. z2 O, l% i       RowBox[{
    0 b' q2 u' l7 k4 F& k3 `" f        RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-", 9 |1 q& Q: `! _9 L6 u$ a+ {
         SuperscriptBox[
    / I7 r$ b. y% g. m- I) C4 `4 q0 l" j* a      RowBox[{"(",
    ! f: n" K* ~7 t& k" t       RowBox[{
      H9 O7 w" @" ]+ c        RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-", 4 j# B9 d1 w% c$ r
         SuperscriptBox[! U( H( \+ o" ^' @7 r
          RowBox[{"(",
    ' O3 m: I/ [' x% x9 |# ~% K       RowBox[{
    " L5 ~9 O! c  F* K2 Q3 ?- S        RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    + ]$ G8 E$ v. z- ~0 K     SuperscriptBox[+ X5 a; W  p. w! L3 z
          RowBox[{"(",
      |9 l/ k; t' Q# e( H       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 6 }4 K5 X  O# B8 i8 p7 k  B
         SuperscriptBox[, q7 x% `0 B! K! \# J2 A: j, m1 K
          RowBox[{"(",
    ! g& U2 P* c/ P4 |* q+ W( ?6 S       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    8 }# O4 s- }0 H# E3 Z1 I7 }     SuperscriptBox[5 I0 `) `+ I( V2 Z9 Z, N* F" X
          RowBox[{"(", ) e) D- c2 H$ `1 N+ b& C9 r
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", . c' M8 H0 ?' r4 S
         SuperscriptBox[, u1 q1 Y0 Q" X. b
          RowBox[{"(",
    3 E. _; W8 B8 I% @) x6 y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    8 |3 S$ }$ @. F    ")"}]}]]], "Output",
    ' B- @0 Y; l, K) F) ]) e CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, ! m- F' s- w4 ~, C
      3.57801228203125*^9}]9 |4 t# X0 s; a: G+ O
    }, Open  ]],
    % G/ D" P) d* x
    8 J- j3 V* |5 I% D* V5 |; zCell[CellGroupData[{
    9 f! M' V& S2 P6 ~: Q* B0 w! g; r' y$ V& R1 {9 B5 j6 @. Q
    Cell[BoxData[{
    - {* g/ k0 @8 T8 g7 |1 Z RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]", : \4 E0 ?7 G1 B6 X* G! k
    RowBox[{"u12", "=",
    ) _; W/ }4 R% _  RowBox[{
    - a3 b& x. _4 [   RowBox[{"Exp", "[", : b) P; C! W. p+ C# c& H
        RowBox[{  e5 P) T; Z5 k; n2 \
         RowBox[{
    2 k' {9 C  M: [9 ]! Y2 c      RowBox[{"-",
    8 B! i& n7 b, I- p6 Y       RowBox[{
    4 y6 F9 {8 f, o% H% j# z        RowBox[{"(",
    , E3 |' o0 [- H, p5 P' O" Q         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    1 i+ W# _7 b0 g; Z5 X5 a3 q        RowBox[{"(",
    - m5 {4 i, c+ P' Q         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],% s' T' D/ m; B' v# t5 }7 O8 e, j
         "]"}], "/.", "DeltaX"}]}]}], "Input",5 j% u% R5 ?- N' u
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {& p# w. o! U1 `# J9 d/ s7 ^
      3.57796154237158*^9, 3.5779615576284065`*^9}}],+ u6 ]  \2 R$ ]2 H9 E; x

    ( z/ a9 p4 s+ M7 G( Q& y, ICell[BoxData[
    / {& P0 U, S2 p; Y5 J- \ RowBox[{"{",
    ! X: j* K8 v5 _1 s! a  RowBox[{/ y! t" P9 e: }' H: K
      "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",", : `7 S# o% @8 M, l2 s, i+ }0 E
       "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}],
    . \! O( K7 N% t4 R1 [  "}"}]], "Output",
    : s; P) w* L4 t+ e' X- j CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}],2 M9 A% q: f4 l" D( h  C0 u$ g
    1 ]# _2 L; [+ z% [) ~+ J# H+ Q& n& Q
    Cell[BoxData[, F: a( t3 [* y0 j. P3 C$ a; L  c. e
    SuperscriptBox["\[ExponentialE]",
    3 c- ~( A: y) q3 e4 {+ D  RowBox[{"3.141592653589793`", " ",
    2 F2 W4 O+ d  C4 [9 d   RowBox[{"(", + V) [2 a# V  f) o1 ~
        RowBox[{. l4 {0 w9 t7 P0 B1 d' P4 g3 S
         RowBox[{"-", 1 R0 s; U7 w2 l& b4 w
          SuperscriptBox[/ q7 u( D9 J) q9 F7 v% U# R
           RowBox[{"(",
    4 u! f* s! v# u, c+ q3 }        RowBox[{
    # A5 h+ L. V( P9 C! K         RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-", ( X, \+ D* K: w3 P( s- v
         SuperscriptBox[
    ; P) N' `, |5 }- r  F      RowBox[{"(", 4 ~! r. `6 Y+ K
           RowBox[{9 F& m. G7 W3 ~, A$ M0 i9 K
            RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-", + i3 U2 H& _4 Y! r& O# ^' ~
         SuperscriptBox[% y- w+ }% B9 w* ], w2 ?
          RowBox[{"(", 5 @5 l( I+ V0 x4 V3 j
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-", ' K' Y) a8 x6 x# k  n# }" T
         SuperscriptBox[$ n' F+ K* _, y( y' I
          RowBox[{"(", . {  F8 k, u+ O! `
           RowBox[{8 w3 W" B3 q( V- F0 e
            RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-",
    $ s1 }# x- o/ C& D0 u     SuperscriptBox[% D! Z3 R/ @$ G0 O. a& ^# n
          RowBox[{"(",
    ' h- @5 b0 V$ x0 j3 G, T( h. r' k       RowBox[{% {6 L# P% }" g* M' }" `
            RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-",
    % b8 m- n6 p3 A/ \5 V7 [" h     SuperscriptBox[8 ^# O3 y! v7 p: K  n6 w
          RowBox[{"(",
    - v/ S8 }2 t' p# R       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",   S. Z% s4 T- O* D4 ]5 R2 N, Z2 ?
         SuperscriptBox[
    + G# ^# z, e+ I0 K2 V3 D      RowBox[{"(", $ W7 z* b$ b/ D0 Q, x& X& ]5 T. p
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 5 h- E/ l8 S% N' ^+ l- v8 r
         SuperscriptBox[
    1 o- C0 D& Y' y3 E* \      RowBox[{"(", ; s; D& s+ V) `/ e4 O- H
           RowBox[{
    & O! ]0 ?7 U. t& S+ `7 R# n        RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", 5 t5 y* H# e+ v/ i6 m  Q" @
         SuperscriptBox[
    % t$ S2 _. M% J( B* g% z" O- r& l      RowBox[{"(", 5 |, H3 S; \8 m: R  l' c( F, G+ ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 5 N  R3 g$ n  L; U" }4 ~' I! L
        ")"}]}]]], "Output",
    3 w0 G5 G  s( P# Y- n. i CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]
    * W( U) b9 P! c1 u" g% Z4 E" L. ^}, Open  ]],/ u6 P# x0 L8 Y) m1 v, R

    8 R& r9 W& R7 q0 j/ o+ P6 wCell[CellGroupData[{+ a/ z+ J7 Y) Z+ v8 j$ U5 G/ M- |
    0 S1 z( W" k+ `$ a+ g
    Cell[BoxData[{
    * Q: u5 D5 k$ _" z  z RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]",
    : ?8 V4 l; B5 f& A; F" N, A RowBox[{"u13", "=",
    , P1 Z# ]9 `2 m' a2 p6 H8 m  RowBox[{
    ' ^4 y) r& `' r7 ]- L0 Z   RowBox[{"Exp", "[", * }& j+ a" V* S/ u# @
        RowBox[{
    " R% y. F8 M  W     RowBox[{4 d/ L7 k  O9 ]: e: n
          RowBox[{"-",
    ( T. o9 o/ t! C; A  w, p' B       RowBox[{
    % ]2 v- N/ {. O1 H9 n/ W+ l6 C        RowBox[{"(", * S9 p) T- b7 H6 V3 ~0 J
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    . ]0 I1 W. v. Y4 s. f        RowBox[{"(", / b+ W- j" N2 @  R$ Q3 |
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ' K/ a) Z0 ^$ N, H     "]"}], "/.", "DeltaX"}]}]}], "Input"," C( ?, U. ^! S4 `
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    8 B  ~! ~! p9 \0 r) K7 d  3.57796154237158*^9, 3.5779615599684105`*^9}}],
    7 k1 L  n* k0 F, B+ ]' i9 q9 y. s: J  ?
    Cell[BoxData[
    2 D; w- M( G: G7 v4 | RowBox[{"{", % i; N8 v7 X# R  F  }# q' o, Z
      RowBox[{+ h2 m& i1 D7 S7 l' u- W- G
      "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",", 1 V, F* t2 Z, o1 ~' n1 _
       "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}], # ]6 j8 {( p% b( r
      "}"}]], "Output",
    : t! z+ T) m4 N; g* P CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],
    ; X+ t* p, s0 {) h) L, S5 s8 o6 }( x) b/ B* e# }( M! ?. L
    Cell[BoxData[( i- ^: R4 J5 I6 P7 ^$ d
    SuperscriptBox["\[ExponentialE]",
      k0 J4 e$ i$ N0 @; O3 M# k$ }  RowBox[{"3.141592653589793`", " ", 8 Z. P( _5 z7 N" g# J
       RowBox[{"(", 2 K. r3 U" b+ V' T9 y- Q9 |
        RowBox[{
      A; I4 O: y0 z  _6 X     RowBox[{"-", 3 Y" k+ L# E4 b
          SuperscriptBox[
    $ v1 c; ^! _+ G$ s: K       RowBox[{"(",
    0 N3 S) O2 N, m: n  T9 Y        RowBox[{
    5 [' [! l& [& o' A  q' p2 M         RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    # I5 D  B2 e7 Z; V+ V- [& ]/ o     SuperscriptBox[3 r) [9 |/ |3 }: H( e. }6 S* w' d) F* t
          RowBox[{"(",
    & [- N0 y8 i! l       RowBox[{9 F6 Y, i; T3 i3 F8 y2 ]
            RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-",
    4 x5 _) ]: `5 n: H. K2 v" X, U& T     SuperscriptBox[; z3 a" S$ T$ d- o3 {
          RowBox[{"(", ! s9 I2 h( H9 K! V  q8 Z# V5 K, z  T
           RowBox[{
    : C! ]7 o2 S6 X; _/ T7 U# Q% h        RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", 2 L% m1 G3 ]$ \# e$ a  h
         SuperscriptBox[3 g6 B1 u# s: O. y% V, L
          RowBox[{"(", $ _5 x: ?) e& I7 b( v
           RowBox[{
    7 k1 H5 N, [, X% l% f        RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-",
    ) ]& t+ U; q) f; k' [     SuperscriptBox[
    - H. x1 k7 K2 S$ y3 M. J0 ?: Z      RowBox[{"(",
    9 y; ?* O4 f1 q% E       RowBox[{
    + B6 @6 }) k' O) N        RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-",
    ' q1 H" x8 K+ w6 ^8 C" j     SuperscriptBox[; t. ~2 u- f$ |% g4 _# Y
          RowBox[{"(",
    7 Y) _: S" V0 s' c7 J: ?       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 3 W& d' J3 i1 T0 J$ b8 J6 d/ c" y' L
         SuperscriptBox[7 a' K: [6 N  B/ X! D+ d9 E3 N: P
          RowBox[{"(", 2 a9 B. [1 N2 Z+ @' t
           RowBox[{
      B3 N1 _& I; `5 m+ J        RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", + A! d1 S9 p8 e% }3 j: u
         SuperscriptBox[
    1 S7 u) q4 K- e0 N      RowBox[{"(", ! T- B+ a: b3 M" a6 G5 }. \
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    - `5 R! i! v; ?( X- s5 t: w6 q# V$ E( {     SuperscriptBox[, X/ ^/ z% [8 F2 i) E8 n# J1 i
          RowBox[{"(",
    1 j6 Z+ z5 ^% H       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ; F9 q5 d9 g0 [# p7 P% j
        ")"}]}]]], "Output",
    8 t& k. C2 T. i" K9 B' w/ ~8 r+ ` CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]
      W: R2 I! F% a6 @" Z}, Open  ]],
    2 W3 E& }# d$ f7 `2 `  Y" j
    8 |1 `% _4 A+ ~& b. A' zCell[CellGroupData[{2 X/ t6 k: P3 z) a6 s6 ?& Z+ Z
    5 c: E( j) q) ?/ s
    Cell[BoxData[{+ i8 D4 P8 s$ L+ f! u6 Y7 T
    RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]", . z: L! Y8 k# H: Q% j/ l
    RowBox[{"u14", "=",
    # |) F/ J- k, t( v; x: r  RowBox[{) s5 |9 a2 n$ |0 r. V" ^* U% W0 E
       RowBox[{"Exp", "[",
    " |% q" A7 X3 R1 [% G9 S3 M    RowBox[{
    8 U6 K  a6 v( s' Y2 E/ }     RowBox[{
    9 J' k/ B, k3 D& o& n4 \1 w      RowBox[{"-", 8 T) `7 Y) w" T: L& \
           RowBox[{
    $ C  U. H$ S# z, o- n; C3 s7 E        RowBox[{"(",
    2 h# o/ W1 H1 |$ y         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", % U- J. B$ Y9 ^) L
            RowBox[{"(", 1 t# x2 q4 x, d( s
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],1 F: j/ A* \1 B+ ?
         "]"}], "/.", "DeltaX"}]}]}], "Input",* J: k. ^# w- I$ l, h
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {7 |$ d4 b3 f3 G# q4 o4 x4 U: |
      3.57796154237158*^9, 3.5779615663176217`*^9}}],6 \& s; i% X/ |; ~" b' p
    - k, A$ V5 j( N, F
    Cell[BoxData[
    % w( d6 o  E  S: @$ a RowBox[{"{",
    2 J9 K. J% V+ f" n8 {$ y2 B; A% ]  RowBox[{7 y% M6 a  j6 U$ _0 n6 U; R9 M
      "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",", $ r" }* F/ \: S, f
       "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], / Z6 \$ u" h/ T5 o2 P1 T% ^9 s
      "}"}]], "Output",- }8 S) \) I9 a$ M2 D
    CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],
    % l5 B% d) C( ~, e0 x; y. l/ Q3 B6 Y
    Cell[BoxData[
    1 q4 J$ W7 e8 T$ {& x, }+ e0 {- | SuperscriptBox["\[ExponentialE]",
    & _$ _  [0 t8 j' Q2 K  RowBox[{"3.141592653589793`", " ",
    & M+ E, y% a# g   RowBox[{"(",
    9 x( \" Z/ N, z7 D, A- }2 u2 |    RowBox[{
    , H6 [$ L7 {0 j! r     RowBox[{"-", 8 `) j, w8 z( T
          SuperscriptBox[
    ; O9 ^& t- l) o( o8 j2 _       RowBox[{"(",
    5 z9 r; T* }* O( h( B        RowBox[{- ~, i8 ?2 q: R* M* E0 D% J& z( E8 r
             RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-",
    : d; N/ b% b  l9 a+ j' ]     SuperscriptBox[; H. a3 {1 r: K$ s8 b
          RowBox[{"(", 1 y( D+ h. a$ {# f9 S! I
           RowBox[{
    9 u% c0 Z0 A' @5 ~2 U! o; O! z        RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-", 1 }1 V% o% @; p2 I" @( I, S
         SuperscriptBox[& ~. C* B, @( r
          RowBox[{"(", & X5 p; a, b" K% C# o
           RowBox[{' {* e$ N* H0 e! C6 [7 R
            RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", ) f2 ?/ g8 e: m1 k
         SuperscriptBox[
    2 @7 O) _! c/ A: ^+ s4 n' d      RowBox[{"(",
    6 X: s$ R! ~8 V3 K7 Q       RowBox[{
    6 [, x9 g: O& D+ X1 B8 q        RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-",
    - m/ p9 g3 n- D2 [+ f% s     SuperscriptBox[% v2 A$ I8 S9 u  Z% U& a
          RowBox[{"(",
    . N* Z" {0 D0 p       RowBox[{' L$ c3 [8 w# G
            RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-", 6 b. p, e6 S% Q' j. [# R/ h4 m  X
         SuperscriptBox[
    ( i# I  I& x1 `5 a- N0 U; U      RowBox[{"(",
    0 Q) G' c) ^2 y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ) y* x$ F4 D, P6 O+ r& h     SuperscriptBox[
    " `9 N8 T3 c6 `8 ?$ k3 E      RowBox[{"(",
    6 b5 @& N  N. v1 Q/ w' \; G: V# U       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ! G& _8 @( \0 s- x* I4 @. V
         SuperscriptBox[
    8 b/ L* {$ v- i$ [      RowBox[{"(", # j) j/ }4 w6 S; B; y8 g; S
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 5 X: `- b. {0 h. _6 ?) i! M
         SuperscriptBox[: K; e9 U- L& i' n# C  f4 o/ L
          RowBox[{"(", . f; m; d* L+ M6 ~1 P
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], * B' i" k! G3 Z) h5 Q' O
        ")"}]}]]], "Output",- q8 m) k# o! G  I* a. n
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}], a  x4 E* F: @: j
    }, Open  ]],/ j6 _0 [+ N  j1 l* H6 E
    + `, I5 S6 _5 k! g+ |. M4 m
    Cell[CellGroupData[{5 |: D2 I5 @0 U" d! b
    ' e' y2 }; e( I8 A& h) n1 J
    Cell[BoxData[{2 ~: [" J4 o6 y8 O6 V! {
    RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]", 3 |4 T' F5 N1 F6 F2 w2 A4 r
    RowBox[{"u15", "=",
    3 Q( d, }4 H: S# m# ]. A6 e  RowBox[{' P" g" ?0 v: |* `& G* r
       RowBox[{"Exp", "[",   H$ ~: j8 T* z3 u5 i" T
        RowBox[{
    ' I) n2 @4 P* P4 K. w% o     RowBox[{
    0 P" g: o! f8 z3 m      RowBox[{"-",
    / W3 K3 M* C7 R9 p! j       RowBox[{
    / V( I9 H% _, X, c        RowBox[{"(", 9 x1 m7 H# b  [3 R
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ! `2 s8 Q7 ?* b: c0 J
            RowBox[{"(",
    ( _9 K' c  C+ ^         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],& K$ `/ P3 [, M( `9 F% _
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    ! Z, a. `" r% O& f: c, o, t4 } CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {' t, v) F8 r- g" q3 _, [" ^- L
      3.57796154237158*^9, 3.57796157098203*^9}}],6 b" f6 b8 ?1 H' F+ k7 f9 E9 r
    - Q4 M8 K! V, _' q
    Cell[BoxData[
    , Z& B' ~, a3 ]; J RowBox[{"{", 1 N  S" U4 E( i- Q2 L1 r
      RowBox[{
    / P1 I) K9 `, l1 x  "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
    ! R$ N2 M8 s2 o, O6 y6 f   "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],
    7 T# j8 {3 S0 c2 s  "}"}]], "Output",
    & T# s2 n  X2 G7 s CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],
    + m  n  _; L. d6 U7 Q1 v
    / E# m* g. ]; A( qCell[BoxData[9 ~+ O4 k7 m. U
    SuperscriptBox["\[ExponentialE]", 5 D6 R2 S4 G. }- p
      RowBox[{"3.141592653589793`", " ",
    9 B7 S1 C! x( h2 N   RowBox[{"(",
    - ~2 C, |( h; p7 C: \& R    RowBox[{" P' u6 m; L' r" D: b
         RowBox[{"-", " C/ Q" w3 s7 H6 H& t
          SuperscriptBox[
    # F3 k* y. I9 n; L" t+ W1 W& _3 T       RowBox[{"(",
    , K- ~$ g4 i" U! h- }! }& B! }        RowBox[{
    ! o! w( x" F# K( k: j6 x& k7 e+ E         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    % O+ g9 G8 d. m" h; E     SuperscriptBox[6 h! @2 s* ~/ ^9 k8 P& B, t* C
          RowBox[{"(", # o5 e# U7 [8 T: c) G# w
           RowBox[{( u" M8 {4 }0 o# r: m0 A
            RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-", # n7 @$ N: n* x! h
         SuperscriptBox[: A* b& [2 F3 B1 h+ Q
          RowBox[{"(",
    , y6 p5 o- h9 x- l       RowBox[{
    . A( }" U: |$ ]        RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", 3 @9 o, ~0 W$ g' j7 J
         SuperscriptBox[
    9 v  p  Z/ X1 V& |( B9 h+ ]7 ^      RowBox[{"(", ( F& ?7 h$ q, n
           RowBox[{+ U3 [8 ~' g5 S3 P
            RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-", 0 e7 @- k8 @( _6 T& E) o! [; K
         SuperscriptBox[( n- f1 E* c  s& Z$ G( G% T" Y
          RowBox[{"(",
    - e4 r4 C1 d9 U       RowBox[{$ L; `: ]9 k/ Y* E, K3 H* v# U2 A) O
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    % _4 [. t. A" {8 ~# {0 z0 j     SuperscriptBox[
    1 U9 O- T" a5 `, ~      RowBox[{"(", " Q' C4 N$ K/ }5 u. u# |) ]8 Y  [
           RowBox[{! [, T4 P/ @) M% H' g8 N
            RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", % S: a+ Z" A- g" q) V9 n# B" H
         SuperscriptBox[9 s4 T, S/ ^2 e+ p& O; {3 z5 o4 {
          RowBox[{"(",
    9 C6 N# M7 Z  u4 F) b" _% _       RowBox[{3 L" _- s3 E  h% p* L
            RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", % g8 R5 N9 t: s# u. z# r
         SuperscriptBox[: D8 y4 ^# J& C0 L& o. D+ i
          RowBox[{"(", + Z* H7 N) _. K( U2 b
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    , _2 F1 [( W7 w5 d" r( z4 ?: \     SuperscriptBox[5 f% V5 u& h( p. o) J5 N6 B
          RowBox[{"(", ( {, h- I; {% {- ?- O
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    " \" Z- v3 y* n2 w) M# r# _, f    ")"}]}]]], "Output",
    , L! B* L* |0 E" Z- y$ R" z3 B CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]
    ! c6 k! U  s, p$ L. Q}, Open  ]],
    3 g  @! C3 S& |+ E8 {
    2 k' Z  b0 ]5 R' ACell[BoxData[
      U0 r! x- g6 t" F  Y) g RowBox[{"For", "[", # G9 Y4 J$ D+ {
      RowBox[{2 a) d* r" ~8 M( L# P1 H
       RowBox[{"i", "=", "1"}], ",", / N* o. l1 Z! ?
       RowBox[{"i", "\[LessEqual]", "9"}], ",", 0 t* A$ U; r% W' U
       RowBox[{"i", "++"}], ",", 8 O$ M. F9 L# T2 a) ]
       RowBox[{/ N/ W# i" f9 }/ p/ C; T# f
        RowBox[{"Ca", "[", 5 K, ]+ a& ~7 C2 \4 p& t# Z! D
         RowBox[{"[", "i", "]"}], "]"}], "=", $ g3 ]! H  r+ A! Q$ k! h2 s0 S
        RowBox[{"CM", "[", 6 G4 X6 q/ r4 N1 m0 a& K0 `2 ~
         RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",4 A* ]( @5 q8 u% L8 g
    CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],
    ' B! J2 o. }1 O! T0 [
    ) m1 k( k# @2 `& J+ l" D/ dCell[CellGroupData[{8 n: P! h# P/ U8 ^( [
    5 P0 z' \6 d* M! H( _0 c
    Cell[BoxData[{
    6 a: O" G1 X2 s& R9 p RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]", & E* Q% y% {3 y6 N0 W
    RowBox[{"u16", "=", 7 `+ c  q4 C  e$ C3 o, i# J9 ]6 E
      RowBox[{
    7 ^* E8 Q$ ]. A+ m5 K   RowBox[{"Exp", "[",
    7 j" U" d/ _- X  N1 O: v' j7 I% ^5 O3 S    RowBox[{: A9 A/ j: Q/ M) l7 _0 X
         RowBox[{
      F+ P1 x: K& Q; m, L4 }4 }      RowBox[{"-",
    , ^) S- e( r& `2 Y/ k6 R0 G6 I       RowBox[{1 C6 d" i5 V3 `
            RowBox[{"(",
    + q/ S' @% t1 {7 F4 U& C         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 1 H' V. f2 A5 V6 k8 X
            RowBox[{"(", 6 Z% L$ b' G% Q- L& X/ `
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    9 |) S$ t6 Z: F' o+ d. B7 m& |     "]"}], "/.", "DeltaX"}]}]}], "Input",
    . P, N& ]# D8 X1 }7 k  a CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    & ?  E3 M. p' U% Z# ~  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9,
    $ f6 L4 I9 q( A3 l  3.5779615751004367`*^9}}],; O' t9 g# C9 }4 P2 j
    6 B5 H4 r! B! C) X- V2 z
    Cell[BoxData[
    5 v7 j- E7 B4 S0 G RowBox[{"{",
    " {& d1 N0 v3 k# p2 A  RowBox[{: s" R3 F+ A3 u0 F" ^3 y7 v' Y- {
      "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",", 4 S2 o. f  j8 y! R
       "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], " D* W0 @# f" d% R. G
      "}"}]], "Output",
    9 h$ {# e4 M  ` CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],
    0 I; x# B! F0 E, D0 U
    ' o# R6 c& P3 q' ]( CCell[BoxData[
    " v( j5 b+ C! d- A% Q; v SuperscriptBox["\[ExponentialE]", 2 i+ S# B* x( i* _7 @7 A' A
      RowBox[{"3.141592653589793`", " ",
    & O/ f( A2 b7 x6 T+ V/ h8 \/ N$ O( m   RowBox[{"(", 1 z. @5 T+ ~# f' h
        RowBox[{
    * J7 V  x, B, S- o/ a7 U& E" O     RowBox[{"-",
    1 r6 b3 W: z' u5 W      SuperscriptBox[
    9 F( k4 t  j, V       RowBox[{"(",
    * y' `& z' \' `% D  d        RowBox[{9 J/ W* b4 }2 `7 Z1 K$ Q
             RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-",
    6 V4 D* L2 M- o" K9 l     SuperscriptBox[
    * ]# R2 y& [. t6 Y" W8 b      RowBox[{"(", 2 G9 g5 o+ b* T( A$ U) X. E( p
           RowBox[{" D( ^; a) ?9 M( T3 P
            RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-",
    / j: r3 j. k2 b0 W" C7 i7 }9 z     SuperscriptBox[0 f+ H3 s% I  c$ K) p7 b$ \
          RowBox[{"(",
    / Y; L% P& d+ o. K% a: u/ K2 |       RowBox[{6 N! Y( Y/ o. a7 x" l, e' f
            RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-",
    ! U; f9 l& k+ P8 H# w5 p     SuperscriptBox[3 `2 ^8 W9 |! j' C: X
          RowBox[{"(",
    7 w4 W& M+ Z% W( f* _) Q; b       RowBox[{
    3 \. n$ w; O& T$ u; I' m        RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-",
    ' q- n0 H6 T4 |8 A8 k. u, o     SuperscriptBox[
      p$ ^- w  c1 a4 j  R  c      RowBox[{"(",
    . Y; i+ W+ [+ T: O       RowBox[{( t  X! H/ a9 ~+ @
            RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-", 9 Z, w3 x! d/ x) [* p- ~
         SuperscriptBox[5 t8 }% y$ i3 W5 J" \
          RowBox[{"(",
    0 [" ~3 {( `4 h5 W9 h) U/ a0 H. E       RowBox[{) C1 T% ?# H. n+ O
            RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", - R- k. P! n  E: ?( v* l
         SuperscriptBox[' T) [- n/ [5 V% J; \5 x  L; ?
          RowBox[{"(", . A& U2 H( \/ F9 L- M
           RowBox[{& I% [3 O7 u: O
            RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-",   m, C1 u" @+ }. g, T: Z* a2 d
         SuperscriptBox[9 v! l' e* W' T* D2 r' ]) H6 R  Q0 r$ U
          RowBox[{"(",
    : h! {5 @& Q) ~0 \. \! @       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",   t% z; b. p! `% r- o: {
         SuperscriptBox[
    : w/ P# x; m% O# S      RowBox[{"(",
    4 m5 H9 M+ l6 j1 ?6 Q: C* O  e7 M       RowBox[{/ C1 z( R2 g) b) \7 z: H
            RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",
    5 W: L) R5 U! ~ CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    " y6 k# C7 h3 C}, Open  ]],% T8 T, m" H% k+ V' i! c

    " }. P% Z5 K6 r2 NCell[CellGroupData[{
    + N2 l% t3 ~* C; z5 m4 E" K9 T6 u) L$ @7 x; a: z9 D
    Cell[BoxData[{
    7 r- C3 C4 t0 n' l/ X! X RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]", ; w' ^) D/ B) o" h1 n
    RowBox[{"u17", "=", 2 W. l+ J% Y. N4 e
      RowBox[{9 i: g2 _0 L6 f# M; [
       RowBox[{"Exp", "[",
    : h1 j& o# p. G9 N& B9 z    RowBox[{
    " g. e. d$ V$ J9 }5 J' z$ B     RowBox[{
    5 e- b, [& Y2 A& V; d$ g( E. k      RowBox[{"-",
    ) k; y' s$ t# J; x  B0 W/ W       RowBox[{' A7 _# R1 \6 a4 U  W" l
            RowBox[{"(", 4 D# P; d  ^- \0 q+ p2 c$ v- a
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ) E1 M# R4 \+ G  x: x, B9 I        RowBox[{"(",
    ( g/ S6 d& `- z: X4 q/ m, I' E         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    5 v1 ?# O2 g: d& U. ?% Z1 x$ D     "]"}], "/.", "DeltaX"}]}]}], "Input",
    / H. F. _" `& V2 D8 T( ~6 B- B CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {$ N0 j) h! R8 |! B+ K, _
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9, 0 R# }' Z. {6 L1 D' D4 J
      3.577961578953644*^9}}],
    , ~3 l# \# ?4 B# l/ _; T) v$ s, K6 p6 N' U# ]4 a
    Cell[BoxData[
    . J. G3 t' m# Y RowBox[{"{", ! L+ T0 I) ?9 A3 ^; z8 }; t- S4 L
      RowBox[{" f: |, R2 h8 t" `
      "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", 8 \+ a' T3 ~& C$ S- A
       "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}],
    ! @$ g  h' p8 z$ S4 b3 S6 U0 ]  "}"}]], "Output",
    ) u+ h" A+ }: t2 p6 i, q CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],2 M+ }9 x' a) M, ~* ^, D
    , b/ k+ d; V) f7 j& {8 x4 F
    Cell[BoxData[
    + M9 M6 P* E& Z' I3 _2 [0 a6 M SuperscriptBox["\[ExponentialE]", * ?! B1 I5 c) m- w# T+ o
      RowBox[{"3.141592653589793`", " ", 9 A! ?: L- r+ k5 m, Y! ]
       RowBox[{"(", * V$ l7 M: [- m1 Q  A
        RowBox[{
    6 M# Z4 I2 i2 x, }     RowBox[{"-", : K9 {  T' L8 i0 d
          SuperscriptBox[2 L, x# ^- x& B; J3 p; F
           RowBox[{"(", * n* Y( N5 G# Q
            RowBox[{
    " w  M) B, J' g! w0 Y' J         RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-",
    " y* o/ g" t6 B6 G4 t0 A! ^" e( c5 }     SuperscriptBox[
    ; W; p8 ]. y* E# d      RowBox[{"(", $ k3 j/ Z) F; d1 S
           RowBox[{' x3 P. a; r5 r
            RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-",
    - X) z! C3 W8 C8 H7 ]# }     SuperscriptBox[
    ! q* a; k/ ]6 u" W& a' R      RowBox[{"(",
    " S+ h7 Y/ d+ ]9 g/ A6 g* i' I- U0 X       RowBox[{
    , g8 M, j( f! O        RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", 2 U6 P1 b( D! f3 s
         SuperscriptBox[$ C" K  R1 H0 Y  E6 W$ D4 Z2 z
          RowBox[{"(", / s( e% u4 Y4 O! ?4 ]% ~
           RowBox[{
    / q  O5 i3 ~" T5 }/ S" Y        RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-", * o. V+ J7 L" t+ E9 V" r
         SuperscriptBox[" s, ]3 I6 m/ E' N* X/ A
          RowBox[{"(", * H4 x6 e$ p" X7 k4 k: S
           RowBox[{4 g. N4 @1 X1 q6 y3 c
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", - K0 B9 i3 h5 W8 H
         SuperscriptBox[
    . f; u4 h' P+ {2 g      RowBox[{"(", 4 r: p1 p/ X+ `; R
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    2 \( ^& h& F1 g6 y4 ?     SuperscriptBox[
    . D: f4 M! T$ a% Q% q      RowBox[{"(",
    9 x; y2 T* T* G% d4 ~% Z       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ) V4 d+ A; S, s# M, ^! k! W% Y
         SuperscriptBox[) n0 m0 l1 W* e- \* T
          RowBox[{"(", ) L6 s0 B; @0 ~! J* t: R: s- w
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ' l: n0 M$ U/ {     SuperscriptBox[  d5 Q- L# y) j  f3 e- }
          RowBox[{"(", # [4 Q$ A0 H+ O( s, O& m1 E
           RowBox[{
    ) w5 @; B8 L8 p2 o, A% g: t        RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}],
    6 c- t7 m7 X! ?5 H    ")"}]}]]], "Output",
    ; _( b( M. @* E1 N& j3 V. z/ k CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]
    9 J% ^1 K$ l- `) X. P2 g) Z* F}, Open  ]],
    9 Q" x) p* A: l. u* G0 j0 F: Z# b6 K
    Cell[CellGroupData[{
    ( x% M+ ^+ K' b
    7 }. ]) j' c- @0 `Cell[BoxData[{
    3 g0 e0 Q8 s# B2 O RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]",
    7 U) D* M. q* \6 E9 c5 O1 F5 Y% y, _# P RowBox[{"u18", "=", 3 A# z6 ^' h; @6 c, U# ~9 q
      RowBox[{
    - c' h7 o" t, ^: I9 t' q   RowBox[{"Exp", "[", 0 k; s0 y. E* t: E
        RowBox[{; X  P# l; w2 @2 M  U: M9 M
         RowBox[{
    , E3 g/ ?7 o: a+ _0 O; W      RowBox[{"-", ) m& |* l) b/ }. N7 J; b! q
           RowBox[{% Y9 H$ U3 p1 O. M- n, v' K
            RowBox[{"(",
    , L' ]+ L1 L7 Z1 h7 C         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", : P8 S4 A, n7 Y( r1 d5 N
            RowBox[{"(", 1 D& M$ F' x' P% s* A5 t
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    $ V6 s3 ~3 s- K     "]"}], "/.", "DeltaX"}]}]}], "Input",8 S3 I. J8 ?/ |+ V  ?$ i
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    & ?' G3 g, D- A, I# o8 P8 g  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9,
    + C1 w9 X) ~4 A5 A  3.5779615828848505`*^9}}],
    : S/ A$ V* _! b  x$ e  i+ |$ r; x0 M4 Y% r: n
    Cell[BoxData[/ Q7 s4 g; s1 V. k& E# f( W
    RowBox[{"{",
    ( U+ o$ B- a  d3 f/ _! K  RowBox[{
      U, S6 E8 l7 ^- r& K/ J& j  i  "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",", : J# C" Q4 ^7 W$ k
       "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    & E8 j+ Q5 Z1 |7 f- y* t& a: Y  "}"}]], "Output",
    9 J; f% O% s2 }( v, O' ^4 ~; y CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],2 E9 W7 \$ M  {3 h4 p
    . S0 N2 k% H) n9 H2 g" b
    Cell[BoxData[9 I' I) o" g. ~" k% D, O
    SuperscriptBox["\[ExponentialE]",   t% M3 f& p% a7 Q
      RowBox[{"3.141592653589793`", " ", , S2 T! U1 w$ s, \5 [+ B7 @
       RowBox[{"(", . q1 k. U) R" g: ^0 q9 S$ w
        RowBox[{
    # i' \5 o5 h! A; L0 I     RowBox[{"-",
    ' m8 z1 ?1 X# B9 }; Q      SuperscriptBox[
    " o9 q/ m1 r/ D/ K       RowBox[{"(", % b6 m2 U( O: e% F2 U. ?
            RowBox[{1 Z5 H) ?! J. W) \
             RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    # _3 t7 |5 G2 s# q, a     SuperscriptBox[
    9 Y8 J7 j, K7 P% S% K& y      RowBox[{"(",
    9 ]2 h  y6 Y- C- G       RowBox[{! X/ {: [4 Q, D1 r
            RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-", 1 m5 n# j7 ]# }1 [
         SuperscriptBox[$ {: F5 u6 }: B, b
          RowBox[{"(", & [9 `" t0 P% B" N& @7 D
           RowBox[{/ z2 J2 L# r: [7 @: H/ ]: Y
            RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", $ q+ D7 l3 N8 H3 q( c$ o  k$ K
         SuperscriptBox[
    + c, o' i' A7 y8 S+ J: v" M+ Y      RowBox[{"(",
    % h1 P1 S& s* I       RowBox[{
    3 c, \; Q2 ]- _        RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-", - F: W% A  B9 n( k% e
         SuperscriptBox[/ C* G# V1 z! c
          RowBox[{"(", / Z8 z$ B+ Y& _/ a/ j
           RowBox[{
    + Q& ?# S& V" C( k        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    4 F/ T1 P+ D1 s! u* b     SuperscriptBox[$ y2 q+ ?% ?& h. C$ h) _
          RowBox[{"(", 9 h* v" g; Q7 x- Q+ S1 v# l8 d
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", / \4 V! o" s5 ?9 x+ i) a8 h
         SuperscriptBox[2 }+ Q8 ~  n$ ]8 i. }& I. e6 E
          RowBox[{"(", ( O' P1 H% D% n6 B; H* ~  @
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 8 I: f6 `2 `4 |: s  ~, _7 R
         SuperscriptBox[
    $ e2 z0 X; a- R      RowBox[{"(",
    + }# B; v5 V2 H, S& C  P       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ; R5 i  o$ H! [, {     SuperscriptBox[
      [; p! v' e/ g6 p' W  A* f2 W      RowBox[{"(",
    8 `, B6 ]6 k# d9 f2 ?       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 8 F: q/ E3 h" J
        ")"}]}]]], "Output",
    ' U- m7 z+ W. ^6 c' k% {3 A9 A CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]
    / E3 `  B) C& I9 I: V& y! B}, Open  ]],
    " Z- y% F* [, E, u7 t; C4 t9 n* G3 K* d9 g7 m8 O! U  f- T
    Cell[CellGroupData[{
    ( ^' b; [1 m! G' j* {
    * K6 Q  m5 a( N7 DCell[BoxData[{" E9 E' j6 S' b9 ~6 C9 Z* @) w' l' H( t
    RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]", : x* i/ O/ ?" V: ?" G$ Z
    RowBox[{"u19", "=",
    ; e$ x' |) N( q) O9 X  RowBox[{* G  s! `  q3 X5 C
       RowBox[{"Exp", "[",
    ( Q% D& `8 i* ?1 {1 D$ m    RowBox[{7 n- l$ Z# b" J8 _# g' q' W' p
         RowBox[{
    4 Z7 g0 E$ L/ d; o5 J      RowBox[{"-", 6 e  M5 r: U% S% S0 p4 I6 {
           RowBox[{
    - w# X; a) a" E, z  O- U+ \2 S        RowBox[{"(", & c1 i; o6 s: R/ {( x( V8 V
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 3 K" E: p% F3 D$ ^5 J) P2 Z
            RowBox[{"(",
    # |6 ]% f* k+ _         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    2 \) u8 }7 ?% L  l. i! ]# l0 }" p& B     "]"}], "/.", "DeltaX"}]}]}], "Input",
    0 H# V5 r, P* c  {4 U" n+ f CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {% O  V' t" s7 X
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9,
    ( I! u. c  u( b% f: y7 ~  3.577961588890861*^9}}],
    4 L. q4 U0 r- d  l/ v# c. u# ^0 c% n6 ?, Y& v; K
    Cell[BoxData[' b& X' w& r+ @- R8 m1 W4 D1 q
    RowBox[{"{", + E. X. k' v4 y9 r+ U8 [
      RowBox[{% A9 T: i1 o; H4 H/ s& ~- U- ^
      "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",",
    4 O# z) k5 [9 ^5 I9 I" |* K   "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}],   y& Q' f7 f- U' d
      "}"}]], "Output",! f# v$ ~5 y7 C; l
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],
    * M/ `4 i# n: W" e: A1 X: K
    9 b9 t4 R7 C8 L2 ECell[BoxData[
    " ^* p+ ^/ E* f4 M( \ SuperscriptBox["\[ExponentialE]", , ]5 a5 z2 M( d9 {% u
      RowBox[{"3.141592653589793`", " ",
    3 B4 |4 \2 E! K1 o$ K/ y0 Q7 k0 D   RowBox[{"(", - h; M8 y" e$ x4 G4 r; C0 v
        RowBox[{
    5 T) n$ ?/ t% d* K% J$ \2 s' u# [     RowBox[{"-",
    0 Q3 G2 a# \- H% j8 @% W1 u- L      SuperscriptBox[% e' h/ |  v& k1 d5 J
           RowBox[{"(", 7 e9 t% ^. ?) H" g
            RowBox[{. ^, j8 d5 C5 t; v  r6 Q
             RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-",
    2 m( W+ f; V# ?/ H, r; ], Y     SuperscriptBox[% D0 a9 O5 G) f" h5 W$ V& a0 Q7 A
          RowBox[{"(", ' r; W" @7 _" r! g* E# n, w+ M
           RowBox[{5 M6 \' ^: s& d$ r; n1 V
            RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-", 7 p& _5 Z3 a2 U9 {4 y* }1 Q
         SuperscriptBox[& d3 E- Y+ W4 _# {6 h
          RowBox[{"(",
      h( \7 s* ?& @5 l% S       RowBox[{) S+ [" q9 [1 X) g, c& t
            RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", $ P4 o9 W, B# t$ y
         SuperscriptBox[5 u6 K$ D& g8 W! l- V5 {  c" C1 W
          RowBox[{"(", 9 \$ u7 _+ Q# h% q/ J, w+ z% U
           RowBox[{
    & U! k+ o: q* U* h+ ?) l        RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-", 8 v# V1 J* Z3 ^* O8 {' {" Y% w& X
         SuperscriptBox[
    - ?& n) Q$ v2 ^      RowBox[{"(", / M$ F3 g' @5 m5 h
           RowBox[{
    1 A" H7 D: k( T6 [: G) q        RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-", ( X/ v) a/ M% ]3 n  k# B
         SuperscriptBox[
    2 P" J. f( t- h$ k3 P9 e4 ^" f. d      RowBox[{"(",
    2 U5 p: {- L0 m7 E* O       RowBox[{
    9 W" a: v: r: j        RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", ! z+ C6 o4 G- d' }' A4 T$ J
         SuperscriptBox[: v) G- i' z) o, t: k
          RowBox[{"(",
    ( a: K, N' \/ P: U, {1 c       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 5 d) i' k4 v$ ^) u8 q( m2 `
         SuperscriptBox[
    " e3 X5 A0 P" w' Q) U# ]      RowBox[{"(", $ K! ~9 q- T/ [# b. y
           RowBox[{( U7 X# b/ w7 X7 _) x* i+ E
            RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    3 R6 _; S2 \( e5 n( a1 T/ y: h     SuperscriptBox[
    # Z4 \1 p8 N& \$ M- W      RowBox[{"(",
    ' x5 r2 O  m1 ]) Q( i& K' R# r: m       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ' E- A  I8 p# W% X    ")"}]}]]], "Output",/ m: K# q) {) T  g9 ?
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]
    9 G/ ?# j7 _3 _; b}, Open  ]],
    2 m# }. r  @, p7 y  c- O4 M0 s+ n! n- N6 B. K
    Cell[CellGroupData[{
    6 [, H+ h+ r5 P1 N- b2 T9 W( U+ W+ |) t3 L
    Cell[BoxData[{
    , C7 M2 w: c. Q. t RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]",
    & V& ^$ h. f" @0 t! j2 w RowBox[{"u20", "=",
    * x" f' w) a+ p8 O4 ?- _  RowBox[{( U# o( @0 ]( K4 e1 p8 c6 u
       RowBox[{"Exp", "[", $ \- {7 J, D$ z, o2 _
        RowBox[{, M! {/ D! Q5 r' A) P* |
         RowBox[{; R! }3 ~; j" [) M
          RowBox[{"-", 9 h  r4 y% L1 V
           RowBox[{( p/ k" K( ]' o# o( c) O
            RowBox[{"(", ' J6 l( w) ~, F: d6 w
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ( l3 y0 Z; M6 O, @
            RowBox[{"(", $ I( W2 u  l9 i% f% m; {5 j
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    # q4 C+ a8 J+ |' g- {     "]"}], "/.", "DeltaX"}]}]}], "Input",
    ' X6 }* q6 U' {7 y) k CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {- a/ \+ `$ X7 d2 r
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9, ; }2 _% A; C1 v- W5 m4 h
      3.57796159382047*^9}}],
    # t; H: D! u6 v9 [  |
    ' I( A$ x* P% B, g4 LCell[BoxData[% }# n4 Y; _0 {. D" _; L
    RowBox[{"{", 8 \: `, N! N3 D$ I0 o
      RowBox[{
    - p& i" M4 p3 V% A9 t  "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",",
    3 D0 S: G( @+ p, r- @' m   "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}], ; [: Y/ {, ^5 k! U) F% y! d# [
      "}"}]], "Output",
    ) ]% w9 N3 P" _9 W5 z CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],
    3 y  H! i- q* J" O# P: U" n! t* Q2 C) {. h! d
    Cell[BoxData[
    . I1 V  y+ ?9 q" \$ M; Q SuperscriptBox["\[ExponentialE]",   h0 C! ^$ I. C2 B
      RowBox[{"3.141592653589793`", " ",
    9 I8 f3 k4 x# y3 a: e/ X4 M$ }   RowBox[{"(",
    1 _! }: |9 s# u# O0 W, ?    RowBox[{
    7 X2 `$ r7 g1 m+ e2 {: l     RowBox[{"-", ; w3 L) d+ C: G+ u: i7 c# u4 S0 l+ j& h
          SuperscriptBox[
    9 s; N; V) R/ W) o  C2 b       RowBox[{"(",
    3 O: v6 s: [0 T2 ]. I- v  B6 F        RowBox[{# Q+ S+ g  I/ E/ a) m( K2 `4 M) p  W0 ^
             RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-", % X. v0 g9 h9 |' Q6 N+ `
         SuperscriptBox[
    - g" M/ p' u  z$ c) R- |8 b      RowBox[{"(",
    9 c5 ~7 ^4 ?) e       RowBox[{
    $ @+ d4 {: V, ~( r        RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-",
    2 M3 Z( x; `$ r; c% S     SuperscriptBox[1 f: e9 G6 p2 c) A; V& g! {6 {1 V
          RowBox[{"(", ' W5 b# R8 v  R, F; S" c
           RowBox[{
    - V4 G: d9 v/ C& t" x* D, [, Y        RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", 1 Q% v: }6 H, Q/ P
         SuperscriptBox[
    3 l8 \' Y" U) J+ q( @      RowBox[{"(", ' q, o! D$ J1 [' d
           RowBox[{
    ( E9 u1 R* ]9 T        RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-", + M- E& [4 G& }+ ^( M' z; [3 q
         SuperscriptBox[2 p0 b" N. r* c. E6 D# V
          RowBox[{"(",
    / [1 @+ d5 [, e) B' W* ^$ D       RowBox[{2 M* O2 b) [& c: l
            RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-", 4 F2 f' V0 v: e9 F3 @8 J2 L  o
         SuperscriptBox[
    " x$ Q6 Z# k7 ?6 w3 @- U: U! u      RowBox[{"(", ; K& l# N- e; C) O4 w; r
           RowBox[{5 _# b8 v5 j% }$ z7 e
            RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
    ! d( h7 W- A7 m- y6 }/ ~: y) ~     SuperscriptBox[6 s) S* C# k- H  I
          RowBox[{"(",
    6 v1 B8 j3 U2 e% f" Y7 k2 }5 q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", # U1 \5 \/ U/ ~. o
         SuperscriptBox[. B6 s$ P( A1 {  ^3 F4 f: C
          RowBox[{"(",
    9 W  [9 X) m# C9 e5 o, k6 D       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", + X& D, a4 J% S5 L1 C2 L9 F4 @9 c
         SuperscriptBox[7 c8 m/ j& q  _$ V& w. h$ d  P
          RowBox[{"(", 0 L* x" [: e6 S+ w4 z* m! S
           RowBox[{& I2 E" K1 N; s$ S% P6 t/ Z
            RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], - R* d% v4 K$ J: I$ o
        ")"}]}]]], "Output",7 i# A- J, C2 c+ K
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]% `$ n* V* F& V+ t
    }, Open  ]],
    " c$ U; G4 @# t5 q, u, @
    % F% N5 R6 A$ w' B! y+ e: RCell[CellGroupData[{
    ) V+ f) g! l, s% x
    $ J' S- J5 a& s  r; y# Z+ A8 ECell[BoxData[{* O* Z7 D1 N$ Q7 G
    RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]", 9 z5 @- D* Z, H; d1 s1 Y
    RowBox[{"u21", "=",
    ( P9 m* H  ?. b6 d: M* ^  RowBox[{8 z2 ^- C. Y4 P
       RowBox[{"Exp", "[", 2 k5 V. h' |/ |  i% y' v- |0 y
        RowBox[{: E2 H! Q$ n$ J2 v' }- a4 q
         RowBox[{) ]4 E2 k4 `( O" D: B
          RowBox[{"-",
    0 U: ]  U9 f1 J7 _; G- c3 E" N! `4 I       RowBox[{3 n3 _' O/ `3 z5 _$ A% _5 R) C
            RowBox[{"(",
    * j( H. [3 ~: d2 G         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",   ?$ _' l1 b- E4 b* X8 H
            RowBox[{"(", 4 c, b" n! |; V* J+ `: {
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    : d+ U$ Y% a, F, f. b; {     "]"}], "/.", "DeltaX"}]}]}], "Input",4 [( o% R$ o2 o& Y+ J
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {. {* V( _) [" m' i$ X4 B
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9, ; {! f& w# Q9 b1 N2 A  A/ u0 f: U
      3.5779615991556787`*^9}}],
    4 N. Q7 G# w6 D8 ~( C) }2 n
    4 b; y, {, m$ Z) t9 ?0 lCell[BoxData[0 p% p. ?+ c0 m  I% r
    RowBox[{"{", , H0 H( {2 N0 }# {
      RowBox[{
    4 z* Z7 l" z# v2 B% ]& |2 Z  "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",", + d% T6 u, j6 \  P$ o
       "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}],
    7 ~1 V# t5 m% R4 R  "}"}]], "Output",0 \: N1 i: p# ]+ h/ n, b& k
    CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],
    * O2 V" _! n: W  f' k
    ; ?, G- O# P4 l4 F1 {! c; e& HCell[BoxData[0 @6 A2 @" R' K; V% R) O" ?! j) P+ d
    SuperscriptBox["\[ExponentialE]",
    + r: @  ?) ]% G! c( m  RowBox[{"3.141592653589793`", " ",
    % O" W! x$ i5 D   RowBox[{"(",
    ) a* _9 z1 O7 H4 m& s* u- W+ _1 v    RowBox[{6 Q% |; S5 ^6 L( E9 E: b; T
         RowBox[{"-",
    " ?3 H! {% G* ?* G3 a( R      SuperscriptBox[
    8 \( ~$ X. D" H: u9 O5 p' ~4 R! U6 F       RowBox[{"(", % x4 [3 b: A+ l. x3 `" Q/ m; e
            RowBox[{
    9 k- n. f8 a5 C: V; N" I+ k- ~         RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-", - g) ^5 C* \5 Q; q
         SuperscriptBox[9 O( x- L6 W' D6 B' r" }' z
          RowBox[{"(",
    - `, \( B* u) H7 |; W8 q( ^- H       RowBox[{$ U0 b' O8 K8 a+ V& ]2 c
            RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-", 7 z) f& c$ [2 U
         SuperscriptBox[# M3 D9 e  g5 V% x
          RowBox[{"(",
    % Y" p! ]! `/ h) W) F       RowBox[{
    4 m1 L* q0 W% j6 B9 b0 K: Y        RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", ; O1 w/ s) d* r$ D" [  Z) T/ v" p( \
         SuperscriptBox[
    + v6 L: Q( K( N2 _      RowBox[{"(", / T2 o# H  n2 }1 Z  _; C7 B
           RowBox[{
    ) y+ \+ S9 k& H$ e2 W" M8 e        RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-",
    / t- b1 x% ?7 Z" l     SuperscriptBox[# p. C/ R& ~' T) g1 D- J
          RowBox[{"(", . o; J- @4 E9 ~
           RowBox[{
    # Z! s* n* s& |: N* _        RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-",
    7 u( F0 ?( E3 V3 E     SuperscriptBox[
    9 m/ [6 a7 B0 f( {6 q  p      RowBox[{"(", . i1 b+ b2 T" _1 c8 G
           RowBox[{
    1 `9 J+ A  i  a" [$ b$ w        RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    * j3 Q, E7 X+ c& K9 m     SuperscriptBox[/ {4 p; N( A1 t) A( h- w, J/ D
          RowBox[{"(", $ ]) C1 i* d( X$ `0 W
           RowBox[{8 k1 O" Q9 r+ |4 b! \
            RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", % M" y. _! P9 f4 {$ v1 Z
         SuperscriptBox[4 u/ m$ c) f- g% _" i5 Y0 n
          RowBox[{"(",
    0 {& o, _) x- U0 v7 z% R5 \       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ; {& L) {0 q9 W' V% X- J  j
         SuperscriptBox[) g% ^: j% _' H) D
          RowBox[{"(",
    ( x$ Y! c5 N8 q4 T3 c2 ^8 I2 c       RowBox[{# A+ F; d4 M4 d! T' [2 K) x
            RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}],
    3 q. d9 r; E  C, Y4 k  r    ")"}]}]]], "Output",
    / ^, \0 t4 j0 ~+ B/ x4 M CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]
    . t2 H, G# {+ ?3 E* L}, Open  ]],% e6 F  S8 q7 n
    0 C  D& {- m/ T" ]% J
    Cell[BoxData["\:62df\:5408wi"], "Input",
    5 `# E; ~4 O" m, H" Y CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],1 R5 ^. I1 E" r# Q; z  s  V- u9 w
    * }+ D( |  U* M4 S6 o) E
    Cell[CellGroupData[{0 |1 @! A( R9 D- V5 f: z8 L
    ( _( G& b0 d4 @* w" O, ~% |
    Cell[BoxData[
    $ B  K. }- @1 @4 z8 a' R- t RowBox[{"y1a", "=", ) }6 F6 g5 _" g7 S1 i+ W4 S, G
      RowBox[{"Table", "[",
    % a5 R$ E* B; s9 z# Z3 T% R) R   RowBox[{"x", ",", " o9 T+ m5 N6 J" F* E
        RowBox[{"{", / Q& Y* d; @& ~, q
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",( f& w: _$ h' y2 ^; W) N4 f+ w
    CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {
    # k5 A- ]8 L/ ]$ n2 }  3.5779226649375*^9, 3.5779226810625*^9}}],, ~. L! d# V8 q9 m$ ]+ R
    4 l& {3 {. Y# l+ c: M7 w
    Cell[BoxData[
    % i7 r1 v! \8 i* T( x9 s! w RowBox[{"{",
    " D' B+ W( D* X) ~6 h) m  RowBox[{
    " b0 m. q+ Z$ {% p" A5 }! s: S# d  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    " k; x5 E1 l  U6 B$ I& t   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    5 {3 i& n. K  q" b# a    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    ( o- z: o! v% d   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    ! ]4 P  S( Y+ x. `   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    5 J8 ]8 {! }) b5 b1 h6 D, {   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", $ A7 s- X  T; ?- t! p
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", ' h9 z: V# T) ~4 {
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", ; T9 u: ^2 u  e1 D) X: W
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    ( ~- P1 L1 O7 E6 \4 ]0 C# G  "}"}]], "Output",
    ( H2 B* }% d4 n  @4 m CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9, 2 B4 z, A; T" ?2 W3 I* i$ S
      3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]
    " n+ Q0 X) O2 J}, Open  ]],
    ! P+ P7 T" X( N4 x) |/ `4 C& M- t6 t# n
    Cell[CellGroupData[{
    % x7 o0 [7 V$ q, b
    1 I8 `0 @% ]5 X" h: {Cell[BoxData[
    . J1 g8 B* l7 }4 t RowBox[{"Data", "[",
    8 Y8 B. [/ R4 L- @2 [9 `  RowBox[{"[",
    : n1 M6 k$ |: Q; q+ c% T+ J/ _5 Q   RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",
    " H' T2 l" l! O2 i# W2 c' s CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {8 X  D3 K! k, t2 _% w
       3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],
    2 Y! i& J; u8 g0 o
    - q4 Y% n. a2 }1 hCell[BoxData["0.899882`"], "Output",9 R, U8 A8 c5 E0 g0 P8 j
    CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9}, , g, D. |) {0 Q+ k% `
       3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9, % [* S& ?% ~6 ]+ z& \' E
       3.577961929080654*^9, 3.5780123419375*^9}]
    - m' ~; V4 i& G9 H2 X}, Open  ]],! w( K7 `$ Q4 a: ?

    ! y+ `  J& W: F& q1 D  j1 yCell[BoxData[. W) V* b2 ^8 w; y3 H; e% d
    RowBox[{"For", "[",
    5 k! g2 P. B/ e. B" J6 \+ Z1 a  RowBox[{
    6 N1 @) W/ N# Y2 V; H* ?   RowBox[{"i", "=", "1"}], ",",
    5 M: W; a( a* X   RowBox[{"i", "\[LessEqual]", "60"}], ",",
    5 X( L- t9 x7 f$ X( G: c! e   RowBox[{"i", "++"}], ",",
    / o! m7 s8 X/ w   RowBox[{
    3 [0 V+ [5 t' ]. v: g3 |' C7 F    RowBox[{"y1a", "[",
    $ p  u6 b" X5 a7 I" a1 M; w     RowBox[{"[", "i", "]"}], "]"}], "=", 0 c* l3 a) }! h( U: Y. |6 l& S( B1 C
        RowBox[{"Data", "[", 6 q" \4 T0 \' L8 N1 s* B: O
         RowBox[{"[", 7 P2 W- a5 [- G& S7 G
          RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",% W+ ]$ m/ V# K
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    % C. i* `! l7 [$ d+ A- A   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    2 [) M% D4 L1 o, c) e6 t& ]   3.577922923203125*^9}, 3.5779588839702806`*^9}],
    ) I. f5 @3 \# c# W7 d% [+ v$ \, p4 {7 F# n6 z
    Cell[CellGroupData[{
    , M$ l! g) F! S  y& a& V4 i% J& _) z' |) E- d5 @. i6 b+ M" I
    Cell[BoxData["y1a"], "Input",, j- M9 ]% f, D6 i8 `# k  P
    CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],
    , ~9 B1 z) M/ B4 H! ?* U) h* ?- k$ f( M! s* w3 F7 W- `
    Cell[BoxData[
    * N/ `" \- D$ z; ~& ? RowBox[{"{",
    ; L; b5 D2 Q8 A4 P8 P+ v  RowBox[{$ ~; w- P) K  Z5 A  z
      "0.277091`", ",", "0.220259`", ",", "0.899882`", ",", "0.265607`", ",", ! V- {/ v2 ?; Z3 V7 c3 _
       "0.642226`", ",", "0.306243`", ",", "0.186985`", ",", "0.175501`", ",", + U. _0 O3 F3 b' N# k# S
       "0.147821`", ",", "0.352768`", ",", "0.23881`", ",", "0.095701`", ",",   c" r; e' F4 A3 R3 \, x6 m8 ]
       "0.162839`", ",", "0.335395`", ",", "0.160483`", ",", "0.398115`", ",", + y# @% [" o7 H9 `3 l" v: C
       "0.157833`", ",", "0.315665`", ",", "0.492344`", ",", "0.638398`", ",", + }/ i* W& t; |7 m% a
       "0.392521`", ",", "0.362191`", ",", "0.114252`", ",", "0.401355`", ",", 5 i1 [8 R% q* m( {' K
       "0.827444`", ",", "0.676973`", ",", "0.331272`", ",", "0.845701`", ",",
    / |  v# u  S3 M3 V% J: ^5 K   "0.287102`", ",", "0.`", ",", "0.050059`", ",", "0.254122`", ",",
    ; x5 h* c- ~% S  v8 [2 T$ F9 X6 J7 D   "0.086867`", ",", "0.659894`", ",", "0.317138`", ",", "0.605124`", ",",
    ' G' e5 Q+ G9 ~$ h  Y1 `   "0.32126`", ",", "0.595406`", ",", "0.555359`", ",", "0.333333`", ",",
    ! l% h% R1 Z0 a2 q   "0.149588`", ",", "0.493522`", ",", "0.224676`", ",", "0.410188`", ",", & E) b+ F. V8 u; o' C! U
       "0.668139`", ",", "0.102179`", ",", "0.380742`", ",", "0.319494`", ",", 0 j) Q1 X# P" _
       "0.031508`", ",", "0.292108`", ",", "0.329505`", ",", "0.337456`", ",",
    1 t" k5 ~6 \- w' W. u   "0.766784`", ",", "0.676678`", ",", "0.541519`", ",", "0.064488`", ",",
    1 q" k+ M( q" h2 L4 u( n   "0.463192`", ",", "0.388398`", ",", "0.262367`", ",", "0.290931`"}],
    + v, e! t& |  [' r' I" N  "}"}]], "Output",
    / _# q6 z7 ]' w: j7 ^1 U% v2 N CellChangeTimes->{3.57792293246875*^9, 3.577957577756765*^9, . G. [6 j% N2 m$ B6 d, r
      3.577958888806289*^9, 3.5779619425902777`*^9, 3.5780123438125*^9}]8 Y$ \) o8 _7 ?( @- ?  g
    }, Open  ]],
    + l' i, e8 w3 f% z* ^7 c0 \. N9 B, Z+ o
    Cell[CellGroupData[{% s/ k/ W+ u5 `5 _( X& d$ r
    0 K1 r8 y' C7 y- o$ h2 c$ ^/ i* \
    Cell[BoxData[4 `( L2 i, K- T2 n% N8 f
    RowBox[{"m60n21", "=",
    9 P4 H3 y. q/ I' ~  RowBox[{"Table", "[", ( F+ \3 z7 @; }2 G+ i- j. S# r
       RowBox[{/ V* z0 W$ q  p" {; Y8 D+ ~
        RowBox[{"Table", "[", % X% V& U1 ]/ }( i
         RowBox[{"y", ",",
    # V/ D8 t! D* N1 V      RowBox[{"{", & R% {. ]! T: I9 `
           RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",", 2 O+ t5 {* E* h
        RowBox[{"{",
    . \6 _7 R0 H  _2 R# _& |     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    ! v" M' U$ w% z0 |, G! G, }7 p, g$ Z CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {+ [. F$ U( l. q+ O
      3.577924052828125*^9, 3.577924101671875*^9}, {3.5779619669419203`*^9, + L. w% r9 @) g
      3.5779619706547265`*^9}}],% K: v. S9 |% v" V+ d

    * V. T) z2 h  r" e/ ], G* lCell[BoxData[
    8 A7 E; J! B+ U8 M! I+ A. w RowBox[{"{",
    # A- O* S1 c& G! i4 q7 E7 ^; ]  RowBox[{
    + d8 ^, \+ u, E4 K* g# v- s. ^1 k   RowBox[{"{", . c* j! O* s, x$ U$ N! v, B0 H
        RowBox[{- I2 g, T2 j# `) P2 ~/ J
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",' C& }6 \; J5 e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 \' q1 V9 G: {     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 X" W6 o; K; X$ C3 i  W     "}"}], ",", , H* \4 e0 A" ]8 q
       RowBox[{"{", " n- i* ?7 R0 I* w+ H
        RowBox[{3 q  S7 {- l8 [& }1 `9 }
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ q- F& [: c1 K/ q
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 Z5 y* [2 h* J; e. w     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. D( o3 x& B: N& o  s( n
         "}"}], ",", 5 X3 j0 `4 \  Z6 e) C8 H2 ]
       RowBox[{"{",
    4 O0 J+ y" Y4 c, R: e    RowBox[{
    " e4 R- ^5 ~" L+ ?% Q+ W$ F, X! d2 d    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 `  c9 a. N, E2 U! s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - `4 R5 Z. W+ a) n7 ^
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , Q7 O# h0 T: ~, ~     "}"}], ",", - f" L# r4 z( n* @
       RowBox[{"{",
    ! H2 o! o+ |$ J! o- y7 h- Q    RowBox[{: e( E# w4 t( {4 T5 ]9 G
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ O2 `  g, Y: A" V
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) K* {  K6 f, a/ O
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    6 M) m! g' Z3 i     "}"}], ",", : R0 W- P5 e, [# j% k
       RowBox[{"{",
      R+ a; \: h  ?1 }    RowBox[{
    7 N9 B9 d9 {* y2 p2 P4 J% x) `    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 Q. d, u( ]0 T5 {0 Q$ F2 P6 N
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    + q9 h/ a- E. i  r0 X     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],* ]% r$ ^9 D; n
         "}"}], ",",
    8 b9 o7 l, E9 Y2 N   RowBox[{"{", 5 \6 T; |( I6 N- d7 ~' U& f
        RowBox[{
    % z) _, [# M, K! O9 O" e/ }3 ]    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 g8 ?1 j, w3 ?; y( G      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , |4 w( Y1 \. t: [$ K+ J! ]     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) h; g% I& F) N+ x( w' D
         "}"}], ",", , ~7 V  u9 [, V/ `. ]7 t# Z3 m
       RowBox[{"{",
    * Q1 m. J; N( G4 c/ Q9 v    RowBox[{7 D$ n* I1 z# J$ i" N( r" N5 f5 l
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 p6 o) ?- n" x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " R9 H! k/ O2 ~! Y9 F     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 v0 [# Z. h) S; q* u
         "}"}], ",",
    & R! }( i& n, ]5 c! K   RowBox[{"{",
    % ]5 J, n# a9 o' Z9 v' A& q7 O3 ~    RowBox[{
    7 E1 Q% C+ I9 G% j( V  D- q0 _  z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : }  X% a$ m/ m6 w% C' T+ W4 S* D      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( u% G* s% q) G5 S& M
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, n2 n& @" \# z2 |1 H* x( G
         "}"}], ",", + f$ |. @+ x/ c2 O- c5 L3 S* g
       RowBox[{"{",
    ( T) M( v, n, t1 Y: R5 I+ j9 P    RowBox[{: N6 l$ u# x  I
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    1 a$ F" g7 F. W. O7 c0 r' y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / M- `& k, V1 a     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ q0 ?) k9 L6 f
         "}"}], ",",
    4 S3 w. K- A$ W+ }  g% L3 d   RowBox[{"{",
    ( r$ t& J& I7 f& N0 ?    RowBox[{
    ) L$ R/ t: S+ f: I. A1 t$ F    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! w0 W% N8 n1 T      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", : R! U  q& g6 L+ Z- e1 R  P; }5 E
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," m' g6 P' l9 T) K+ d! J
         "}"}], ",", ( X9 I- B1 \: L8 l  S( K
       RowBox[{"{",
    % d; i* G' [& @    RowBox[{' L4 p+ M* p* b- F. U3 o- y9 x
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 D! z7 |9 b. J& a
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 N3 W3 O! f! u. A% b, _
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    0 C" R- K( U; e, k+ r5 I     "}"}], ",", 9 [: {1 D) t+ t
       RowBox[{"{",
    ) T8 U/ v' G, z3 o3 S0 d! `    RowBox[{
    / }5 _; Z& D. i  c- E8 S2 Y6 R    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ t' G7 s( W. ]3 B7 L! I$ O; |1 R
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 P. i7 r" C$ S% B) m: g; M
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ; b3 Y/ @, f" W3 h/ U     "}"}], ",",
    $ r8 w  C3 m# T4 s   RowBox[{"{", 1 z5 |: R0 [) _4 j4 O- H
        RowBox[{+ ?& g- L! |  `
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 l- e( P0 A- K$ C- t0 x, T5 u      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - |' h- q9 W+ }( k6 f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + i  ~+ A% F7 D0 W& O8 j0 z     "}"}], ",",
    : U& o5 U7 e- Q   RowBox[{"{",
    " b) H1 \9 l: m  p! \) {/ E* g    RowBox[{
    / u( U  R; A4 K    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",: A1 @( X6 m: X" K
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 `) a$ p. b# k" b4 `
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],$ [8 [6 Q4 h2 Y
         "}"}], ",", " j$ x: f' W1 \
       RowBox[{"{", # H4 _) G% t( n% e% W1 a1 l
        RowBox[{
    6 a& n2 G; e& e" ?    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 u+ m$ C* l: b$ Z- u( v; S  G9 K      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 ~  k' \% I; ?3 ]0 H) Y! D& z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " L  G1 G# }: m9 m5 }* u+ I     "}"}], ",",
    # g$ i% T5 G5 o   RowBox[{"{", 2 W# L2 V7 q3 p- Y' ^
        RowBox[{- w! w& C) ^7 M3 Z, A, i1 D
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & R/ ^+ ~+ q' S! |8 N      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! R# G8 L( M% W- H9 u# `. j
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 F; D5 L) \6 ~+ c1 ?6 X$ U
         "}"}], ",",
    " s& F. x& K( b8 C6 b! ]% j   RowBox[{"{",
    : E! |) K2 K1 N, e, \4 I# [    RowBox[{; w6 S' F% d- B* [. j  N( R
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / S) J3 ?/ A% s0 S/ f9 x. [! \      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 C3 J( @2 K! {     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( k8 d8 p% [7 {& U0 ?     "}"}], ",",
    # q) d  v# Z5 x$ \  y   RowBox[{"{", 0 Y$ L0 {" ~; U4 _  d3 `, t# Q  n
        RowBox[{
    5 t5 u0 p# U2 s* \3 B/ U- y! V    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 i' m' ^3 }0 n2 r) g+ n6 d% ]
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / s: J' d. `9 \
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],3 i5 f8 U- C" s4 a0 J* N3 z. ^
         "}"}], ",",
    # }* {, J! Z7 b   RowBox[{"{",
    " u$ t# |' F5 \$ x, f6 @    RowBox[{4 M" E  I: g% \: L
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 c- S2 r5 n. o6 ?: q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / [; \; c. T* Y5 |
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 l  D& g5 T4 _& Z; ]     "}"}], ",", * e  L) K' b$ p& E3 X* o
       RowBox[{"{",
    ; C/ L3 g! B7 e) u) b: K    RowBox[{- o' U1 d; f  I. ^7 x- A% h
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    6 {7 c* ?, v0 L      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 4 B0 q& q: T# j) x6 q8 c3 F7 d
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : x' L' Y# e/ |& y     "}"}], ",", - s. \: z' x3 ?7 y- v
       RowBox[{"{",
    / ]; p) T6 y, l6 K* i& C+ r( }8 M    RowBox[{7 U" N1 j5 R# [' e* h( v) H9 U9 V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : {; Y  Z' J7 _& C' S; B- ^      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; l  ]; G. b; i+ n: E4 j7 `% o+ n
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],  O- H/ A3 `2 S  F
         "}"}], ",", 9 U! N9 |  _9 j& _9 {0 K
       RowBox[{"{", 1 i( u# q/ s: L4 o" j( p
        RowBox[{
    . L. C& }/ i4 v9 `5 q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 j. a0 _( T5 v2 }/ w) c      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 z% ^0 y7 d3 \
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 l: D3 u! [6 S     "}"}], ",",
    . w8 q* c- ~7 v4 V0 X! F: W2 w   RowBox[{"{", . C& e+ v: Q3 k: M! a
        RowBox[{
    - {. Z' J! N9 W) T. p7 u  R/ ?    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 |1 u! k0 C# y' t9 F
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! _, C" q2 \7 j/ w" h8 I6 l+ s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) m( ~2 h2 f, e( F7 h+ ]     "}"}], ",", 8 Y, M8 ~" [+ A9 B& |
       RowBox[{"{",
    9 l8 M, K# b. [7 z* O    RowBox[{
    4 g; j0 h9 c& |0 G" n( b% g    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , u7 j& [+ a0 h9 H) Y, a      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", , D& b3 U$ y" w9 v$ }
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 O7 q# {+ J% k8 P. q     "}"}], ",",
    $ d1 s& U: Q  Y7 ^$ ~7 P0 ?   RowBox[{"{",
    $ V! w  N$ S4 _    RowBox[{* o$ M1 d2 Z: l$ Q0 w! H% R- M/ y
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 {$ O& x7 e% @( j0 r
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   H3 ]$ L( [2 P% O/ _3 ~% T
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    - A/ r; V7 f1 q) X( J9 z     "}"}], ",",
    7 Z7 y) G' K+ _+ ^+ a0 T   RowBox[{"{",
    + j2 D. ~  T% O; i# Q" `    RowBox[{
    9 }8 L/ v; A  u8 H- i9 j2 ?: K; K    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ H$ B/ e6 }$ t) X7 a+ i# j
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 2 }6 I; t6 E: U# ^* d
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],% _4 \* q) v' D* G  y& T
         "}"}], ",", ' N! b6 l# ^$ k0 N2 I; B- o
       RowBox[{"{",
    $ s7 I" Z' R0 @) @& H: n# x3 S    RowBox[{& O7 {6 b2 m# ]% {" {5 F
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 w- y0 n% R$ K* L3 B$ }9 ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 E& u; z, w3 W$ X7 J
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 {8 k1 C9 z0 }% ~  d! n% w: l% a
         "}"}], ",",
    4 Q. ~3 B0 t; ~; V9 U   RowBox[{"{", 9 S4 A/ u/ |% w
        RowBox[{
    ( V, F( O. D0 r% z6 n6 ?    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    1 B3 m7 ?* P. a4 m: Y" l# S! r) w      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    + G3 e: Y& z" a6 r* t( |& L, A: i     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! G$ M& B$ z, E8 \
         "}"}], ",",
    2 x7 @5 o8 T, z! v- \   RowBox[{"{",
    9 b( {: r+ r/ L' H    RowBox[{
    8 Y* `* t! @' S0 w* K8 n2 |    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 q; F6 k# p, l1 E% @* ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - e5 N( H7 c2 d6 w! K; F) f
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 F- J; V9 ?7 r7 `; V3 B     "}"}], ",", 1 O' @, z& M  E1 R  X
       RowBox[{"{",
    $ k1 m+ J4 Y2 H6 c( c    RowBox[{
    3 j0 t& E1 w4 O  ^) K. ]    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % {$ u/ q% s) }! Q. h      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", : G' c0 r( ~- s( W7 B
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( w/ ?) }/ ?1 c# H) |
         "}"}], ",",
    * R9 J8 a! X" d& @* w' k   RowBox[{"{", : W+ ^" L8 s6 l9 Z7 j  ?
        RowBox[{
    8 e% b4 W8 O0 l  |0 ?8 p! H2 K    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& {8 s0 Y/ Y: ]- H* d! c, Y
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " C$ M; l6 }3 H) P' E# F) f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 h. a8 z7 C: t  d" q3 j! ?- t# U
         "}"}], ",",
    2 r6 k4 x$ m9 m  r7 D( J" v2 N   RowBox[{"{",
    ) U( h* U/ N9 [7 E7 B4 t    RowBox[{6 [9 G( K9 v- L6 X3 ?* h$ ^
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- i! w( i* @* o: S8 _. e; B
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    0 ]1 v0 V6 I- r/ n, }! \9 T4 s     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / Y+ E3 k# j) d9 V     "}"}], ",",
    # n- s7 F  ]4 q8 o- N* C# y4 n2 E& s7 Z   RowBox[{"{",
    " L* r. j  \; j; J6 Q    RowBox[{6 U7 J* f1 s+ ~4 c: w
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 v4 X4 `+ T. _0 _! @5 Y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . R* V4 M7 D6 _
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & X5 S' s- \0 G+ ]8 A     "}"}], ",", 1 Z! L! T$ Q& b
       RowBox[{"{",
    6 i. O0 {, ?; q) W, O: P+ @! S' V    RowBox[{
    ' J' [) Q$ L: l! _6 c    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 t4 u, V+ a3 N6 I1 ]' l
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - A+ a/ u. G7 D5 v$ V5 ]* v     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
      m2 m3 E' j, D) m; o" i+ H     "}"}], ",",
    8 V1 V2 k6 I7 T5 U7 ?1 {. \   RowBox[{"{", ( v3 \7 }2 f# _: m
        RowBox[{
    ' [8 Y3 R0 k+ ^* t: @1 Q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 X4 Y% P6 |% N! {
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " S; x" U5 C# h8 F7 [- h1 j
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * S2 [& y$ x- y5 v, p9 a0 l% K' n     "}"}], ",", ! O! J" r. s* o: A9 F
       RowBox[{"{",
    ! @' j8 H  S! O% \6 K3 A, K! x    RowBox[{
    0 D, Y$ U2 U) q9 P2 D7 I    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! N2 e% h9 a8 }  _) Q+ c" Z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    + @9 _! L! B( `* Q) R6 a3 O     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    3 J& C4 N* k4 y8 ]4 T     "}"}], ",",
    / h0 ^$ v7 Q% r/ p+ \   RowBox[{"{",
    8 z, h. B# ]. l1 B( a    RowBox[{
    2 s+ r5 M. p6 c! q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",' X8 `) `  x4 x3 G! E
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # R2 y/ R9 t& E% d+ t; C
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " K! r) q* Z3 G& F' U5 Y4 S     "}"}], ",", 4 h' m. B$ h7 w
       RowBox[{"{",
      S0 i! R& x! `; ]0 d6 n& q7 k2 S    RowBox[{
    : o' S+ p/ o2 m" I    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 F7 I: p! \4 u0 X. v" }      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : p+ e. e8 Y  ~9 t" u- ~     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 U+ |$ D" ?) d; R" k! F/ t7 D
         "}"}], ",", + K' y2 b. m+ [9 |9 R
       RowBox[{"{",
    0 l8 B2 `" K' l( a! v3 v8 [. [4 X    RowBox[{
    $ S3 ?! t" [( h2 J    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",8 R# Q, G1 F; l  s! m/ l
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 y5 b$ l5 w( H9 d' \) `% N
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. v) J3 u3 a6 z/ O6 z0 ~
         "}"}], ",",
    / d0 |# ?2 V5 m   RowBox[{"{", + a; V# j5 p" G& h
        RowBox[{
    $ S8 [* f# c. j* i    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 {: X2 o- e7 n% z! A' ~
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' V6 F5 }# q1 I2 ^- I5 j     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 x) w1 T0 H& P  P& E
         "}"}], ",",
    * L& M; b. }0 x: r" c. c+ e   RowBox[{"{",
    1 L/ [" @* ]" B& o( j    RowBox[{0 Y* O3 C3 u4 }8 t5 a5 |
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",# a. `6 F5 I5 e# E& ]+ L
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / z7 A9 O9 R  i5 ~1 n, Y0 u! u& b
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( u" [) _5 K0 }7 _, `     "}"}], ",", * M4 X/ M3 R: x/ N* y( J' p0 c
       RowBox[{"{", 1 H( W3 @" p% H8 k7 k1 ?3 A
        RowBox[{
    * M% }# b4 @% A8 X5 y/ I4 d' t& I2 c5 d    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ F6 t; u% n- z) \( \$ W0 {, I' J
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 J4 B# S  [# Z" ?- K; [+ b     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , k6 a( M. v3 S/ W     "}"}], ",",
    ) K/ S( n' _3 T. F3 ~5 Z. I   RowBox[{"{", ; y4 x7 I% }' u3 _8 v7 {
        RowBox[{
    - J$ q6 I; [& v    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- i' c7 m' i* [( B$ x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    9 T) W- e( d% W: Q     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],- Y! X, r1 h: r9 p; R- m/ L' l
         "}"}], ",",
    7 S" i$ F; Y0 N2 _5 A   RowBox[{"{", 8 h0 p+ `5 V8 u5 r  J$ t
        RowBox[{9 s( i) S/ b- B' o2 T
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) c$ ]( L1 X; K. W( j# P
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + A" s  E2 V5 B
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; t/ ^# S0 F" I5 i
         "}"}], ",",
    " V  B3 |- V( b9 a" f8 W- \3 r   RowBox[{"{",
    ; U8 T2 }; i0 c' s) n    RowBox[{$ j7 p0 O; j  p; \2 U
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) T. R8 S8 h& {3 @1 X, Y  j; L
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' }- G" n+ @, b0 a8 x& D( S% z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ; x" |& H7 B: ^0 A' ?& ]     "}"}], ",", 5 n$ }1 l( B2 T5 u( M9 y, {9 G9 l8 f0 K
       RowBox[{"{",
    ' A8 s$ M! B, S0 T0 K; B    RowBox[{$ H2 p( v- g; n+ ]8 \( I8 p9 J
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. g# c2 @: {: I! k
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' ~$ d4 p( H# S     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. V. W+ T4 U1 s# [: R
         "}"}], ",",
    6 m6 c6 D. U$ z; }) k. ?$ G! L   RowBox[{"{", 6 ^8 C8 R% s$ t8 P1 R: ^
        RowBox[{
    7 A" Y/ m6 P! N$ T5 ?    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 Q. t* L1 _" M, o( B2 e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    $ I3 l( m9 A; X8 V, I     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ k9 O) q, P4 a( r7 v$ c6 @, g0 e) Q
         "}"}], ",", 0 M6 w: c% C" T0 P, g
       RowBox[{"{",
    1 }- H. o7 K  k4 G5 x    RowBox[{
    * g/ M. K$ H3 Z6 s' ~0 O! R    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& b# E; i7 n) F; E+ B
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; Q5 h# Z% d, d( r. u
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & {/ ]" {4 n' {3 s9 d     "}"}], ",", 2 w- T' p# o$ L2 _
       RowBox[{"{",
    ) _; {) v# y& e0 ~    RowBox[{1 q& J8 Z8 P2 e2 v% D& v$ x" f% g6 ?
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , ?3 [) ~: X3 x: x) Y, |# L2 ]. g4 {      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", : r- G4 E; @2 c. n4 U& ~
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ \5 W9 k6 D' k7 a
         "}"}], ",",
    $ W# a* G$ l! P4 j' {2 s  s" d   RowBox[{"{",
    ( r) n4 a2 ?% ]    RowBox[{
    $ g& b( s5 b. X9 o2 t& |    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",; Z7 Y' L8 ~4 Q+ h6 k& p( M
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 U- x8 r, R1 Q* f- ^. g     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : b) {! Z  |9 M1 B; x! D2 l6 H     "}"}], ",", 9 d+ E) h" z( d3 ?9 B4 d8 U
       RowBox[{"{",
    . _7 ^0 Q* A" ?% R) B    RowBox[{. z2 _$ ]8 v( h" r
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - J/ W9 s$ Z, w$ `7 U      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    4 P, w9 W: L  _  b     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ' z9 J* m3 p& J5 j- B     "}"}], ",",   j& X/ e& }4 M0 Q1 [' x" x
       RowBox[{"{",
    4 M+ r/ }9 E3 |4 \+ ]; L. D    RowBox[{2 P% P0 M5 w- y* Q- f4 U
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- Z8 v# I% h) H3 ]+ ~5 U+ ^( D
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 G; q$ |, c& V
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 H- k/ Q3 L, \* G' a, O     "}"}], ",",
    * F; W+ z0 W/ b& Y   RowBox[{"{",
    + s, K; @! D. c1 H% c0 h3 @9 h2 @0 q* ~    RowBox[{
    ! w3 E! l) X; u9 v( I; ~    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) }) R, a0 g- O: G7 \, X9 f2 s$ z) R
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 R" p( U- J4 M
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + g% }( }2 c# B- ?3 h( A$ c     "}"}], ",", $ }: r* t+ Q1 s/ F
       RowBox[{"{",
    1 o, L$ S; @* W! w" i    RowBox[{5 F$ P( ~! }, \2 U
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' Z# j" b( ]: ~7 G2 M, l+ j& R      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 {) n. z+ F% s1 k5 W  @/ w6 N     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # D. Z& u1 u5 @' X' {9 O- a4 u     "}"}], ",",
    & e# m. [2 u5 b# B& Z   RowBox[{"{",
    6 C% f; g9 ^, n) q* _4 Y& y    RowBox[{% t5 ?; _; t* H8 Y; d! Q
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 I+ s8 M3 a( f. O& p* c8 Y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( }% X- l4 b# r4 x
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 b; S. S( o8 C* |) l     "}"}], ",", 6 C' {# L+ I! J
       RowBox[{"{", ; w" J' ^9 {% @- S0 v3 T* C- s- _
        RowBox[{+ \* s0 o  v$ A' z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 I8 G# P4 t6 P/ k) _  B. j      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", $ L# x/ L' ?3 S, S
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 r+ v1 P2 s! x* d' k     "}"}], ",",
    1 g$ }# b' j1 {* N3 G) F" B   RowBox[{"{", 2 ]' k7 p0 @# ^
        RowBox[{4 L- B* A3 J2 T( ]! n- ]* n' X
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & ^" _, h. I- t0 }$ x      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; H& a% P6 M% u+ s7 ~; B! r! Z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 @) E: ^7 y! \7 l+ P8 m) R6 ~
         "}"}], ",",
    - C6 T# i' v& n9 k2 k) u' J5 l# e   RowBox[{"{", ' }$ Y. @/ _2 U3 x) P; `8 `
        RowBox[{
    5 A- p$ a& L8 l: O; T    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* |% O) w$ `. U0 d# a
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 V7 c9 y( R8 C& O7 I3 h# D8 S     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    - {- Q0 ]" V3 ?  V0 {2 s) z     "}"}], ",", 4 S% s4 z4 ^1 s8 X5 d0 L
       RowBox[{"{",
    1 A. T( e. M- S    RowBox[{
    ; d% p- N: J* Q! C# [    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",1 _4 H# Q# ?. }, F( P/ g
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", , i. y: d7 J9 a  r! |. ]9 l9 B
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 {* L# F9 x" g2 O, w
         "}"}], ",",
    1 _. O" E' }. I  O5 I& j   RowBox[{"{", & p/ _7 n/ R5 i6 o( Y
        RowBox[{
    : w6 ^, N8 m6 a/ l+ F    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . g/ Q8 Q! n3 q- B5 p      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", % g8 k; Z6 I) x$ u" a/ K4 C0 o
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % m- g5 @. f# D- a7 F5 X- y9 d     "}"}]}], "}"}]], "Output",
    ; ~8 L# K" _7 o$ g4 }# y1 d CellChangeTimes->{
    ; B" s; D$ j1 [1 a$ h  3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9},
    % }2 b7 U& Q$ s0 V; L4 F+ ?   3.577957579987569*^9, 3.577958891536294*^9, {3.5779619459910836`*^9,
    5 }' ^1 r' w  x; H$ r, f   3.5779619748823338`*^9}, 3.578012345453125*^9}]2 T# E" }8 V% _2 s4 a& i0 ]' g: R; c
    }, Open  ]],+ R1 E  m+ A3 r. L; r; C$ R

    5 i7 {1 A! Q/ T# u0 d2 aCell[BoxData[
    9 _1 H# H5 ]. H' [ RowBox[{"For", "[",
    ) w) v9 w, x! G- J' v  RowBox[{
    3 o6 b) d, y; P) t; c   RowBox[{"i", "=", "1"}], ",", # U; x. A8 T/ ^$ L
       RowBox[{"i", "\[LessEqual]", "60"}], ",", , f6 B4 P! k$ S) T% B7 g/ P
       RowBox[{"i", "++"}], ",",
    , a+ m- R  l2 o   RowBox[{"{", "\[IndentingNewLine]", . y- n8 G% @  v5 ^/ Q8 C+ N
        RowBox[{
    : m$ N1 D4 w5 m9 {% M* l+ f' I     RowBox[{
    . P: r; O0 `; ~2 R      RowBox[{"m60n21", "[", 8 \$ ]1 d( ^* g  |  P
           RowBox[{"[", # V  b; @7 T( g
            RowBox[{"i", ",", "1"}], "]"}], "]"}], "=",
    5 n% g3 \5 c5 T+ N6 O      RowBox[{"u1", "/.", # D9 |4 @4 B* z. x# V( @: d" a* P
           RowBox[{"{",
    9 C2 c" F- D: A( E0 N        RowBox[{: ^& q5 O. k% ^# I
             RowBox[{"x1", "->", 4 S6 H9 p8 [4 _% T$ b/ R+ ?
              RowBox[{"Data", "[", 8 _+ ]8 l6 S+ h8 C7 v8 }8 O' u; u
               RowBox[{"[", # ~- d1 D: E6 s: h4 X
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    0 x$ V/ K( X; `- N         RowBox[{"x2", "->",
    & S) ^7 R1 p2 _, R          RowBox[{"Data", "[", 3 p! D+ _4 i0 B5 s+ D6 Z1 K. Y
               RowBox[{"[", + K* E& j3 |* ~
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", ! W8 }: {# z# l/ F. r3 r+ P2 U
             RowBox[{"x3", "->",
    $ ^9 R+ K5 Q5 b3 W9 i  e$ S6 j  R: {          RowBox[{"Data", "[",   c& w0 f4 c/ s, s/ g
               RowBox[{"[",
    $ e6 |1 t( ^* }, a            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", ; n$ a7 V2 ]! f0 S; S- j, b" t, j
             RowBox[{"x4", "->", . c% e/ G# `) y# N1 y* R! y. U# K
              RowBox[{"Data", "[",
    % a" n2 f& \7 b! w  d* O           RowBox[{"[", $ t6 t3 i3 L7 B
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", : j3 ^2 h+ z3 p! r$ `8 g3 w
             RowBox[{"x5", "->",
    . b7 W. p4 R& X& W) R          RowBox[{"Data", "[",
    ( `) ]; B8 Y" |: V; f$ I  J: s           RowBox[{"[", & G5 B- t) L/ n# Q/ P! {  l5 {
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    / H! p* L' t! R2 H0 T3 {         RowBox[{"x6", "->",
    . E5 p1 h0 h: }' E/ H2 g( b          RowBox[{"Data", "[", $ w& l, x  O+ E7 t0 s- ]
               RowBox[{"[",
    3 _3 r% z+ @1 v6 s6 g- S  i2 C, Y            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", # {* n; ~) M5 ?8 r
             RowBox[{"x7", "->",
    8 G+ ^$ m* K* {+ \          RowBox[{"Data", "[", 3 O" G4 l/ a- r" @
               RowBox[{"[",
    " g! A3 U! m$ `" @. Z& w5 b' U. ^            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    : H5 D5 _  w1 p9 p' H         RowBox[{"x8", "->",
    - l0 R5 s& T8 h+ _  @3 h5 Q" [4 N          RowBox[{"Data", "[", 0 v$ p( t3 s, w; i6 N
               RowBox[{"[",
    " o% C: J0 r4 K6 w            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    ' L- S/ f1 |4 E/ o6 K3 }         RowBox[{"x9", "->",
    + y; o6 h" n, V" W0 f4 F* ?          RowBox[{"Data", "[",
    " d& D2 m# J: L7 P           RowBox[{"[",
    # |! \( B5 F7 d3 p9 H5 F( o' X, {            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", * f" H% j0 M: g
         "\[IndentingNewLine]", ! ?9 q( I: j+ s
         RowBox[{( A6 Y* Y5 h0 K# {
          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
    * t' Q1 ]( a1 Z7 @7 t神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗

    7 n  W: g/ U9 C6 H& q5 U! D(* Content-type: application/mathematica *)3 ?$ {  s0 [% Z8 y
    0 z3 W/ `$ u5 N4 q/ d1 P
    (*** Wolfram Notebook File ***). Y/ c1 x$ L' e* z* \) r' d6 W' s
    (* http://www.wolfram.com/nb *)
    ' C' A8 z. B7 e; f( {
    + Y) A4 d" B& E(* CreatedBy='Mathematica 7.0' *)3 L2 X" l1 ]; y% L" c8 E% n5 H
    7 {, g$ D% w3 F
    (*CacheID: 234*)
    9 E. Z3 ]$ L' W: Q1 H. i! }0 ](* Internal cache information:# k+ n( t0 ^5 A
    NotebookFileLineBreakTest
    & f! M8 {% @  h9 Q6 Z. BNotebookFileLineBreakTest
    5 L; ^# q8 `( P$ B! NNotebookDataPosition[       145,          7]$ V. j! M2 [0 [) c
    NotebookDataLength[    423629,      11534]
    * F# \: S0 z+ ~; LNotebookOptionsPosition[    412607,      11173]- R, u& L/ l" E# Q, h1 V2 s
    NotebookOutlinePosition[    412953,      11188]' \/ s% s6 u4 }) d' K. k
    CellTagsIndexPosition[    412910,      11185], \$ t# P, S3 g( @2 t
    WindowFrame->Normal*)
    / k3 w4 L( n* [. }( P' {" ^; h* A: c6 o. `6 n+ |& X5 ?
    (* Beginning of Notebook Content *)
    $ Z7 |. N1 M! s6 d/ YNotebook[{$ s- `# |  q2 g2 Y9 t

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

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

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

    8 @+ b/ @8 {4 @3 l# f: YCell[BoxData[( d5 i" v6 z5 W+ d9 @; x8 N
    RowBox[{"For", "[", $ p0 |0 s" K1 i/ S  P
      RowBox[{5 n( \& E3 ?; n& w0 h% U
       RowBox[{"i", "=", "1"}], ",", % Z) Y, w4 {' {" J- E* |
       RowBox[{"i", "\[LessEqual]", "9"}], ",", 3 E4 M0 D; P. M! h
       RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    1 v- z0 C1 B  f1 K   RowBox[{"For", "[",
    , n  l2 P. Y% E( i& r! ?    RowBox[{
    + u& T* l+ m6 q. t) h     RowBox[{"j", "=", "1"}], ",", 9 [" H( V7 J- g! h+ z8 Z
         RowBox[{"j", "\[LessEqual]", "80"}], ",",
    " g. G6 t2 }7 N5 u; v     RowBox[{"j", "++"}], ",", "\[IndentingNewLine]",
    4 P5 u9 i7 a) q, E8 [, M     RowBox[{2 Y  R3 m# k2 }! C
          RowBox[{& B4 R; |9 V8 {
           RowBox[{"CM", "[", + L# |2 l7 C; i% g
            RowBox[{"j", ",", "i"}], "]"}], "=", "0.0"}], ";"}]}], : \3 L) [# \3 t2 ?3 }
        "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]], "Input",
    0 B& e# W# P/ j# I, P3 `& I CellChangeTimes->{{3.5779132504375*^9, 3.577913285203125*^9}}],; p+ R$ E: C+ o( T! K, `3 e# p
    * A/ D( X7 N5 e& k3 M2 J0 u
    Cell[BoxData[: }& U+ c1 q4 f3 _
    RowBox[{"For", "[", ! g+ G, l/ M) S0 S) I
      RowBox[{
    " W5 n' u7 C3 c/ a1 M1 Y4 ?7 ~   RowBox[{"i", "=", "1"}], ",", 7 F: @' O6 ], l
       RowBox[{"i", "\[LessEqual]", "9"}], ",", ; B  Z+ ~0 w) `! J% f  e' l8 x
       RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    / n' S! L- L) n9 ?6 [1 z+ D( A4 W   RowBox[{
    9 u- O: y) \- H  F- H    RowBox[{
    * \5 f0 t& W  l- A! v% L     RowBox[{"CM", "[",
    0 E6 B# G* K8 W, ?. ~) ]      RowBox[{"1", ",", "i"}], "]"}], "=", $ F* `2 s- l8 `' B) Y( [, z
         RowBox[{"Data", "[",
    ) O0 t- g% o0 ]& h      RowBox[{"[",
    * h# P4 |- Z, X8 g6 {       RowBox[{"1", ",", "i"}], "]"}], "]"}]}], ";"}]}], $ E2 ~. d  |) D+ T
      "\[IndentingNewLine]", "]"}]], "Input",( z5 ~& h; J2 I
    CellChangeTimes->{{3.577844179875*^9, 3.577844181703125*^9}, {
    - ~- W" v+ R8 M   3.577844217765625*^9, 3.5778442320625*^9}, {3.57784429953125*^9,
    / B# m  [8 K( r4 S* L7 p  p   3.577844347875*^9}, 3.57791328640625*^9, 3.57791338828125*^9,
    $ N# Q: t5 M6 H3 K   3.57791344209375*^9, 3.5779588070933466`*^9}],
    & r: U& l3 ^4 L) N+ A1 z
    & \+ I& K4 {( g7 V3 PCell[CellGroupData[{/ d. j$ y8 E; g) T7 H/ A. o

    ( f. G1 I5 e4 o4 T0 N3 I  aCell[BoxData[{7 }* j# z7 M! i0 h7 _1 n; l
    RowBox[{"r0", "=", "0.2"}], "\[IndentingNewLine]",
    5 @* s% t. ?0 Z. r+ Z RowBox[{"M1", "=", "1"}]}], "Input",
    * I* z% E. [* ]1 L CellChangeTimes->{{3.577844361578125*^9, 3.57784436678125*^9}, {2 [" T& v3 S3 d" L. `3 p
       3.5778457908125*^9, 3.57784580253125*^9}, {3.57784602534375*^9,
    1 E: \6 X6 Z+ p3 H$ @3 d   3.577846109453125*^9}, {3.57784617128125*^9, 3.57784619321875*^9}, {
    * O" l, [; l" j( k6 i9 C" F   3.577846583984375*^9, 3.577846620984375*^9}, {3.577846653203125*^9,
    : v' W1 X! ^- y8 P   3.577846691984375*^9}, {3.577846779953125*^9, 3.577846794921875*^9}, {* C" z" s' m* {+ w2 j# p4 A
       3.5778470791875*^9, 3.577847088921875*^9}, 3.577847409671875*^9, {
    + l" ?) @: `3 @" K) [  n" O9 U   3.577847477203125*^9, 3.577847523203125*^9}, {3.577847586484375*^9,
    1 ]: H) Z2 l4 b! ?1 r& r  R! B   3.577847600640625*^9}, {3.577847649140625*^9, 3.57784770196875*^9}, {9 c3 ?# V2 h8 p  \/ s
       3.57784774896875*^9, 3.57784776490625*^9}, 3.577847981546875*^9, {2 ~" t0 ]! }/ R9 n8 B
       3.577913312890625*^9, 3.577913360109375*^9}, {3.577919262828125*^9,
    0 R2 D; e/ Z4 F% D1 h   3.5779193133125*^9}, 3.577919388484375*^9, 3.5779605095479155`*^9}],
    ) Z2 ^0 u6 Q3 j) V9 {
    # w3 E9 F% Y$ I# [& p5 ?/ _Cell[BoxData["0.2`"], "Output",
    2 j+ u8 V3 X( R* O CellChangeTimes->{* w$ e6 Q: t$ Y9 v, M
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9,
    . r1 r' d  U. |2 Q+ x   3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    . ]: V! b6 H1 ]. |- i0 @   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    ; ~% m: f, t& f2 \* m: K$ m0 Q   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {$ r. x' E1 v5 D2 R- ?6 @- S
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    : z) y- C6 j7 W, W  R' \   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {8 O0 P; q% A$ z5 f9 F6 Y
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    # t1 z8 {  p" w  `6 m; }" H   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {4 {. T' E! \6 Q2 L- g4 {8 |8 {$ N
       3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    " h* v% ]( ^# k   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    * [$ I# A( F' }0 Q6 i! x  t' \! C   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, / K: Y7 `5 }3 T3 t5 t6 T
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9,
    0 f' O# Z0 ?1 {" h$ b0 j( @   3.577960510686717*^9, 3.578012149296875*^9}],$ c/ {) a# f4 r- _% A

    0 l6 |7 I2 n7 n! i: X9 rCell[BoxData["1"], "Output",
    # i5 [/ ?! x: q: [ CellChangeTimes->{4 Q# v+ `) ]* G8 w
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, + K5 e' U+ i8 j+ Q0 P
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {) X* N' q( I$ ^9 o% c1 V
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    0 s8 b# p# B( A6 G1 [9 R   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {
    6 |( y) L" e4 p( c& e9 _7 v0 e   3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    ! n3 D8 p# e0 m/ j   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    . {/ L, L( G* T# A" e3 z/ Q( V   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9, ) }* v, }$ b/ U2 w4 x! g
       3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    # ^0 K( B$ H/ E1 |2 Y' |' h0 ]) }* q0 R   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9, 0 v# G* o) D/ V
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    " {& v6 \/ P' t% Q4 a   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, 1 ~/ ?" a4 S6 k! \' {8 O$ N
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, + H/ Q# e5 [9 M% _% n, c
       3.577960510686717*^9, 3.578012149296875*^9}]1 i1 M" x; G7 Z- h: A% o
    }, Open  ]],
    " t5 v/ i7 w! }3 _# Z% p0 b2 t4 B, D8 G  }1 ^
    Cell[BoxData[
    & J/ ^$ z  i' q# u  V3 J1 o RowBox[{"For", "[",
    ( }  Z/ f1 Y5 L  RowBox[{8 |; O$ {; f% ], n$ T; d
       RowBox[{"k", "=", "2"}], ",", & ?6 n0 H  j3 z
       RowBox[{"k", "\[LessEqual]", "60"}], ",",
    ; G- n% E/ Q% I3 @, f   RowBox[{"k", "++"}], ",", 6 [. ~; e: ^( }9 y: }
       RowBox[{"{", "\[IndentingNewLine]",
    ! n+ E& r0 C/ y5 H/ |4 _& E/ L    RowBox[{
    1 C1 n, x9 B- A" p8 T     RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]",
    ' G/ F, k& x9 R* }" W! I5 K/ h* m     RowBox[{"For", "[",
    ; t$ b; P/ n6 r& w% z& Y' q      RowBox[{+ X+ M. o- k2 u/ n$ S6 l
           RowBox[{"j", "=", "1"}], ",",
    4 y- V' T5 @9 b' N       RowBox[{"j", "\[LessEqual]",
    8 u, H5 z  P. d# X& i0 U) c' G        RowBox[{"k", "-", "1"}]}], ",",
    & n" \& w1 I; @) M, C: T$ o       RowBox[{"j", "++"}], ",", # E) R: J" {2 `$ g, i3 i
           RowBox[{"{", "\[IndentingNewLine]",
    " G2 n$ h3 g/ Z        RowBox[{) H' M+ Y$ D8 g, B' ?
             RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]",
    * D& w4 s# V4 h9 N: S- p         RowBox[{"For", "[", " t' A- V+ M' ]2 c
              RowBox[{* ]7 \- {  O2 h2 S0 ]% u3 `
               RowBox[{"i", "=", "1"}], ",", 6 l* _! `9 U6 B  p! k
               RowBox[{"i", "\[LessEqual]", "9"}], ",",
    ) e. O. U6 Y3 S; R) p# l1 A0 M           RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", ) I# h9 K: b3 A+ r: V  l- p
               RowBox[{( Y' m8 C, Y6 H
                RowBox[{"r1", "+=",
    7 E, K: C% S& _: j; ]             RowBox[{
    % G2 e& w, I( j              RowBox[{"(",
    9 m  x  N$ {. s: m3 k, m/ e               RowBox[{
    8 l4 ?8 `7 g# B                RowBox[{"CM", "[", ! x* ~8 O& O( M* ^- V
                     RowBox[{"j", ",", "i"}], "]"}], "-", / _5 U' z% g, U0 |
                    RowBox[{"Data", "[",
      i: U: q' F' ?& T% i3 D' p7 M                 RowBox[{"[", 8 ^, d) X- U1 X! Y
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*", 0 K* J: u$ {$ n  T
                  RowBox[{"(",
    : ]' S# _9 x) k5 n/ K' n               RowBox[{
    " v" M) h7 d7 S: y# S6 w  z# M                RowBox[{"CM", "[",
    + O: w" L: l* l( Z5 i& _* ^                 RowBox[{"j", ",", "i"}], "]"}], "-",
    2 ~: p- o& E/ ?% O" V* v                RowBox[{"Data", "[", 9 d1 L1 W* i7 |8 N- R$ _
                     RowBox[{"[",
    & I8 T5 Z) K  C* P; e' O3 |                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],: O2 o9 Z+ M7 Y' T) P, d: T
               "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]",
    # n4 K! Q1 d4 p9 G         RowBox[{"r1", "=", & E- H; \4 [1 L$ R. s7 \
              RowBox[{"Sqrt", "[",
    . i* u5 k) p0 s  K/ H8 d           RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]", * y/ b3 U. p( B
             RowBox[{"If", "[", " ", % H& p! Q1 [! \* u9 q  t0 A) C
              RowBox[{) G' g. V4 z, u; [6 B) E9 }% H  a
               RowBox[{"j", "\[Equal]", "1"}], ",",
    0 Z6 k$ j7 X2 O0 N# x           RowBox[{"rmin", "=", "r1"}], ",", $ \1 a0 m( f: ~4 u$ u% w7 b
               RowBox[{"If", "[", ( O) u- G# v3 s) T, R, H8 M
                RowBox[{, d8 v$ J3 R4 p+ w1 ]- [
                 RowBox[{"r1", "<", "rmin"}], ",",
    , Z' X" T% O. b! |* b             RowBox[{"rmin", "=", "r1"}], ",", 9 R8 B$ o$ U) f  K
                 RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}], 5 _  C( b& }( u! _$ N
            "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";",
    , O, ~9 o9 T7 }. X/ E" G2 }( |     "\[IndentingNewLine]", 8 h( @2 Q6 O9 w
         RowBox[{"If", "[", 3 o) b- z3 o* [
          RowBox[{) e, ^" ~' Y( L+ H4 S1 X
           RowBox[{"rmin", ">", "r0"}], ",", 0 E' E1 T8 s2 r+ F# t9 r
           RowBox[{"{", "\[IndentingNewLine]",
    # T: b0 L. m& y- r, f0 G  _        RowBox[{
    5 [2 o/ e( G6 L- G% J         RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]", ( _; V1 g2 m, Y  s) b- k: M5 g
             RowBox[{"For", "[",
    * K5 k3 T4 H) w6 D4 N5 a          RowBox[{/ c! i2 n' A' l8 Z- e
               RowBox[{"i1", "=", "1"}], ",",
    / J# Y9 E( y! s- l: F9 c           RowBox[{"i1", "\[LessEqual]", "9"}], ",",
    " x0 i0 U$ V  I3 B0 P+ p7 W           RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]", ( y# {, {" Y2 [9 j8 D+ D# W/ \
               RowBox[{4 Q2 Q: p3 |0 }
                RowBox[{, D3 I8 g+ N  L  r7 S7 E
                 RowBox[{"CM", "[",
    . l: g* a& B+ W9 y              RowBox[{"M1", ",", "i1"}], "]"}], "=",   r; Z) y7 {6 ]. h- s7 ~' _
                 RowBox[{"Data", "[", ! M' a- t3 ^, J; i# D
                  RowBox[{"[",
    * J! g; s& G! @* ?               RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}], % K3 c  S4 c- ?3 n' m0 l% |0 `: b
              "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",", 5 [% N) c+ T- e* U# W
           RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}],
    $ S" g5 k/ S" y6 X. v! @( H8 p    "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",
    4 _% p# m4 _2 G! R5 v2 t CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {5 C% t% S3 l; N: b
       3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9,
    # y8 ^0 h9 r: z# J   3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {
    8 D) |/ m0 O# J$ E' R3 Z1 U   3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9, 9 w) ~2 f6 D1 K$ E; d
       3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {
    ) L' n$ t0 K. r& G3 I$ \- I   3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9,
    ( q+ ?/ h% u  `" m3 y& A- y   3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {0 r0 v, c( R. Y# x- A4 p
       3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9,
    4 W2 o* _) \+ e6 O& j% X   3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {
    7 i$ Q  N0 a9 _5 G  O" p   3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9, + P. \, b: P4 l9 n! k' e  x7 f
       3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {
    ; y2 T& f! E. E' r. F& V. J   3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9, * R* Y5 ^7 k0 z/ A9 ?4 ~4 q
       3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {
    8 o9 c1 h& _6 _- Z/ ]; K) i# P   3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9,
    ; }* Q3 F: d8 ~* D0 e$ Q* K. o* ^   3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {
    * U1 r8 g7 M; N1 V- }; q! S   3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9, . l2 C( H) l$ L! y$ a
       3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9, % [9 I1 L% h6 R) V& q
       3.577958821991373*^9}}],
    9 c/ N) N) u7 H. ~" g+ f- t  n( I  G! D$ I, {+ i  V
    Cell[CellGroupData[{' W3 X: d; M* N5 c# G& S# [( u) k
    6 Y! j: y2 m/ v; E/ R+ J
    Cell[BoxData["M1"], "Input",
    ( R; B& |3 S( j& Y- {: h" L CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],
    7 H/ p1 F% X8 c: a+ u" P( o' Q7 n0 M' h: M% W" [' D
    Cell[BoxData["21"], "Output",
    + \$ \0 ^" {# B) A  L CellChangeTimes->{
    4 T, x6 c8 x2 d7 z  3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {- {2 T' ~$ r4 p$ p% o
       3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9, 6 @# _; b. R1 N0 [
       3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {7 r) K# K' \! v& I% u5 o
       3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9,
    % v) f1 K1 i$ N& {9 I. m$ d   3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {0 L  I9 E# m* T& [8 n& }
       3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9, ( h3 T: ~( A: ^, w1 C" k: U
       3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {
    9 Z) u* J% [% z$ u  I3 l2 g# F& f   3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9, 9 k" J' y5 ^. D, ?. Y6 U9 d
       3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9,
    . [- N$ r3 w. p7 y   3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9, 0 ?2 }/ a' [; V" h8 `2 G
       3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9, + l1 ~% D- y, E/ G7 k& P
       3.577960515600726*^9, 3.5780121541875*^9}]4 l6 p8 Z3 L6 T
    }, Open  ]],' V  R0 ^. E) M3 k1 e

    & G1 P4 L- h6 S! F# bCell[BoxData[% N+ P3 l5 `9 F- f
    RowBox[{
    # Q+ N0 S3 ~/ M  RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[", 2 G$ q( r/ w$ G% y3 I4 g3 Z/ a
       RowBox[{"1", ",", "i"}], "]"}], 4 z7 `! Q' J3 V$ E* G
      RowBox[{"\:5230CM", "[", - r; X) |! _/ Z* _7 G# s
       RowBox[{"21", ",", "i"}], "]"}],
    ! z  \4 f3 |2 |- p, F$ I' Y" z! F" F  "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\
    " M( K5 S' J* P" w5 [$ M\:51fd\:6570u1\:5230u21"}]], "Input",
    * O7 W. z: q& K) I CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {
    9 Y4 ], z. k" |1 d/ `  3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9, 8 S7 I/ h9 m/ C4 }$ o& B
      3.577960526583145*^9}}],, N7 n% n3 E+ O" f5 V* M+ j

    ' A) ]" E6 ?7 g! t! J. R: CCell[BoxData[2 K9 {- T( I+ ~  t7 M5 ?+ x
    RowBox[{"Clear", "[", "Delta", "]"}]], "Input"," P! _3 t- b/ }& b% d0 s2 Q
    CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],
    : P2 v* Q2 J9 d* n2 O
    ! c/ J2 Y# s( K0 U$ o/ jCell[CellGroupData[{( w% h! a9 @" D; M

    0 m9 M  i) J  c$ B) g# B) CCell[BoxData[
    3 Q! X# F6 u" `0 k# H4 R1 P RowBox[{"Xa", "=",
    2 v; U9 n2 H. a! w6 O/ z2 K  RowBox[{"{",
    # y9 h! K' E9 P3 i% C; f   RowBox[{! N: a/ J% f) `. C! `: e/ L8 d
       "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7",
    1 ]4 Z% ~; i8 A, d; U! U- Y    ",", "x8", ",", "x9"}], "}"}]}]], "Input",
    8 @+ @& o3 p' O9 K6 y1 ~ CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],
    9 B0 u/ N: K2 ]+ H
    # J. p; t% l# V$ c6 hCell[BoxData[
    & F  V* h# Q$ Q. n6 A2 W. j: d% e% w) J RowBox[{"{",
    " s! l4 J+ x- F7 l+ F/ d% i  RowBox[{+ W/ x: n6 ^/ X* h
      "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",
    " N6 w: @% f7 O* @5 A7 |    "x8", ",", "x9"}], "}"}]], "Output",
    & E9 v7 ]. X3 R CellChangeTimes->{$ d- Y' O# R/ ^, w8 {+ T
      3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9, - |9 D! O$ N" X9 F# K
       3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9,
    # }5 I8 k" Y- b  D- s9 p7 t   3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9,
    4 S6 H  @/ N4 @: }/ _5 S/ f3 R   3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, ; z( W/ A5 Y) o, a: m
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {2 Y# c+ V- @! }
       3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9, 5 `' n5 C' _  Z. a7 H
       3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    3 S2 q$ r' z1 c1 m8 C7 o0 B   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {  h4 H! |8 z  g8 k( t0 s) A" g
       3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {
    / k- X  r: O4 Y: l   3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9,
    $ C+ M" F$ |# X8 ^   3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9}, 0 i( m3 z. j% N; t6 O" s$ ?5 X: j
       3.57801215725*^9}]0 T: b+ n4 _& m
    }, Open  ]],
    0 _9 g9 p) q5 b1 t$ b
    ; J& Z$ w+ v) D: A, Q" o& W6 X3 `Cell[CellGroupData[{
    8 m4 A: e. `) X9 Y; ~( y2 [% C  O! ~- {1 u; o
    Cell[BoxData[
    & S* k2 K$ Y/ ?5 K RowBox[{"Ca", "=", - M, x6 C" R' t% l+ k5 q" V
      RowBox[{"{",
    1 H% T, Y& F! m7 W   RowBox[{
    ! g; J/ U5 j/ i: _- q# O/ P8 G   "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", 4 \3 v0 g* t# c1 A7 |
        ",", "c8", ",", "c9"}], "}"}]}]], "Input",* Y6 _# {7 f% q! m0 @- G( {
    CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],
      S" X2 \3 Y# Z7 Q% E/ E) E& T5 e. z
    Cell[BoxData[. b: V6 d. h8 ~
    RowBox[{"{",
    $ b9 b6 J/ p) o( g; k# ^) ?8 o  RowBox[{
    . ]0 [" S. C" s  "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",
    8 P8 @* Q8 b) a    "c8", ",", "c9"}], "}"}]], "Output",2 V9 |+ \; D& Y5 g
    CellChangeTimes->{
    0 t2 I; ]2 B* p, U  3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9,
    6 u* }9 A- E0 G# ]9 O) X7 k2 |. z   3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9, % u( i3 r7 l, n' ], l
       3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9, 3 o* i# N# Q/ J' [- J7 {& q
       3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {
    3 L9 _- R4 r7 [   3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9, / w! n; z9 e3 d
       3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9}, $ L7 L8 `- N9 `
       3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9,
    ) v) _8 @$ Z9 c8 B   3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9,
    / _: z5 Q6 Z, i* ]- r: w  }   3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9},
    0 z! j4 `6 W+ v. ]! J   3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {1 r2 L  t5 Z( w5 B# h/ z  D
       3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9,
    # O8 p) v6 R5 O- s# S   3.577961904604212*^9}, 3.578012158671875*^9}]. O3 d  X& Z, i2 h- ?( c1 m
    }, Open  ]]," I8 N* e3 n! Z" r1 d  X

    1 ~- e% l# [" C1 m" E1 _Cell[BoxData[0 h$ y! D% o% F
    RowBox[{"For", "[",
    2 b8 i! p& [6 s" x  RowBox[{
    # W: }; v  F* x" I) A; I   RowBox[{"i", "=", "1"}], ",",
    2 G; l: Y6 K! \, P( A   RowBox[{"i", "\[LessEqual]", "9"}], ",", ; C& K0 w! c4 q- K( H
       RowBox[{"i", "++"}], ",", 2 k; I  x5 }$ @
       RowBox[{
    0 ^, j0 R9 c) h& Q4 a  e    RowBox[{"Ca", "[",
    0 b% Q% A- F( k% u, R# k& `     RowBox[{"[", "i", "]"}], "]"}], "=", , R1 D& P7 {$ }& x) q: ?
        RowBox[{"CM", "[", " z  D$ o+ d) n  ^- m5 k
         RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",, t: N- t) n! Y+ y3 h
    CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9}, % y5 ?: o$ T2 O* r; I( A* v
       3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9, + |& v; L" d$ {0 S6 d! C
       3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9,
    ' C0 k" _$ J) [( o. }* f; r# ]   3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9,
    7 ?- A3 ?% }- G" q( X7 a   3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9, , w1 r) G8 Z6 d" J
       3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9, " p; `2 \& E3 S, n% O2 T
       3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9,
    8 A2 b9 f: a' x% ]6 }0 s- k   3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9, 4 J5 w9 g7 w' ?  ~% Q6 ]
       3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9,
    : \4 w8 Y, ^& y5 N0 I$ W$ q   3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9},
    % B/ L6 d) X; M) Z5 n3 p   3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {, f$ x6 L6 O- Y0 W
       3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9,
    / D  }. _( x, ?, a  X8 k   3.577961906897415*^9}, 3.578012176296875*^9}],
    3 Y( D8 N3 o9 m) e/ ?$ ]1 ?
    2 r7 c2 S8 E/ O% z0 jCell[CellGroupData[{
    + E- I  P- a* a
    ; z0 h, m8 @% n5 GCell[BoxData[3 K3 Q) X" A( {# z! u
    RowBox[{
    " E4 ^5 ~& \4 d1 [% T6 B  RowBox[{"(",
    8 S" K1 u2 V% a' {  g" e0 m   RowBox[{"Xa", "-", "Ca"}], ")"}], ".", . T4 \* W6 J; t3 g& S' Q( M+ p6 e. ]
      RowBox[{"(", ( j& ?: W; F, K+ B" t. O' j' I
       RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],
    : o0 J( r9 ?% d8 P
    0 i5 X+ y) b6 @* wCell[BoxData[
    % j7 F0 H+ b* t7 ~ RowBox[{
    3 G0 @/ ?3 @7 k0 i8 _  SuperscriptBox[
    , \+ K# u! @2 ?- U+ z+ ^3 X! @2 n1 k   RowBox[{"(",
    " z; E6 l" H9 j0 b4 Z! W$ J2 C5 t    RowBox[{
    , Y: D4 U. g( a: F$ B     RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+", $ C( y9 o% ~0 L8 J' o" E" c
      SuperscriptBox[  E9 M8 b- m+ Z0 j) ]" I
       RowBox[{"(",   @1 C- k  O% ~  P# Q" U
        RowBox[{' v; k* k- V; e7 L5 K& D9 c! w
         RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+",
    4 F$ K1 s. W) h; P  SuperscriptBox[
    & }1 r" E# H# S0 }9 n$ _7 K   RowBox[{"(",
    ) n, n* |7 {, R: a: ?8 v    RowBox[{0 V) F  N# ^/ s6 W7 s2 E
         RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+",
    : ~' P& i5 e: b! c5 W+ D4 B  SuperscriptBox[) |( U2 k+ }! G% z! |0 V7 a
       RowBox[{"(", + Z+ f# W  k2 G  `  w
        RowBox[{; h3 s% s1 e% J: O* {
         RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+",
    ; d4 S+ E9 s, L" S6 c  SuperscriptBox[
    ! u2 w2 z& V# @$ ?+ P5 u! s1 c   RowBox[{"(",
    - z3 j/ V# q1 |2 u% B* m    RowBox[{
    6 W, a. ~  m' {* R. A$ N     RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+",
    % Y1 ^" F- r& Q1 Q) p9 i* O8 U  SuperscriptBox[& T: I# Y8 r3 Q5 L* s2 g
       RowBox[{"(",
    ) Z4 V7 J  S+ K/ g7 f: A6 X' [    RowBox[{
    $ o, ?: ~8 L# z- u5 }+ ^- b! ~& @7 E     RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+",
    , W. X" V' E$ X1 @0 M4 m  SuperscriptBox[7 s, Z6 }( \  J! I. X) u
       RowBox[{"(", 5 S: i3 b7 X3 I5 d2 d
        RowBox[{
    8 @- f5 ~- n3 g, v$ B( y     RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+", 1 \# z1 j( x8 |; P1 {& W3 y4 q3 F9 f, B4 X
      SuperscriptBox[% B/ M, K8 t1 c0 {# V
       RowBox[{"(", . U% r0 m3 A9 K# N5 k7 h
        RowBox[{
    1 B$ t3 j+ h/ Z     RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+",
    + r2 [& F. T/ @  SuperscriptBox[
    & b4 U3 o. O+ ]5 d   RowBox[{"(",
      R- O: w. O; z: a1 U6 q+ h    RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",
    & C1 }( f) c' T CellChangeTimes->{6 m, V' X0 q" d9 a
      3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9}, ) @" _) c; p+ @! s/ V3 v
       3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9, 0 C( T5 |) r4 w' N3 ]! _. D1 ]
       3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9,
    3 ]1 i# ^% u8 d; y8 q" ]   3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9,
    2 }; y" Q* T1 `' c; S  D8 g/ W+ `   3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9}, % _" O% T# i1 m2 Q; c2 y5 o$ Z$ G, |5 E
       3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9, 8 G  a; Z/ k& R0 A  W1 u
       3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {
    + C; G5 M. N( ]2 C- M   3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9, 0 ~; v- p3 R5 C$ i2 h3 a
       3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {
    6 D( i0 v* f3 j# {' ^& k' T   3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {5 A& |6 ]$ }3 h, t1 `. U
       3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9,
    0 H  E. B! R+ x9 b- `: y4 |   3.5779618537169228`*^9}, {3.5779618846049767`*^9, $ j3 H5 a  ^7 s' W. s% G
       3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]
    3 V. @+ N/ ]9 n4 y, V0 ]& }5 M}, Open  ]],; n3 p/ ~; W  y7 L2 T  N) L  V

    1 @3 G" P* `  v  VCell[CellGroupData[{
    " s! e# V9 [* N8 P) {9 I8 f8 o3 i( O4 I" S" Z) n6 j/ I
    Cell[BoxData[
    , P$ r" x# H" _/ n* e RowBox[{
    * A- x: ^8 g& r" B  RowBox[{"Ca", "[", 4 P! G. H8 b% j" U* G
       RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",
    ' r2 H; l  z2 v3 K* G$ V CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9, # N! I3 r$ c8 s5 Z0 b, n
      3.5779616465173616`*^9}],* `' o( Y/ r( b- C# I1 v, @, y* ]

    ( d7 w0 `/ d% D0 n1 C- ?3 Q/ cCell[BoxData["0"], "Output",! L( O( s  H$ b% a
    CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9, ) E: s. b9 v/ U' ~, t
      3.5779616484049644`*^9}]
    / V  V$ o# Z6 U}, Open  ]],  u0 }  W+ j3 s/ J
    9 [  ^7 a0 Q" S
    Cell[CellGroupData[{
    4 u1 b! z' s+ J2 f" m
    % [/ ^( `1 K0 O4 u, h0 nCell[BoxData[0 [. F+ [' b9 L6 d" u
    RowBox[{; T: v) J. n% ]1 x( X% x
      RowBox[{"Ca", "[",
    " x4 I2 F9 w2 L3 Z   RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",
    , a4 \& q  z/ {) ~# ~& E/ `) X CellChangeTimes->{3.577957376235614*^9}],
    ) @+ |# n9 s! b) b& y7 w
    , W! q, P& f+ S  W6 e# nCell[BoxData["0"], "Output",5 P0 C$ I: I$ f& S; x4 D0 k
    CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]3 P" k) P, J  I; D* h
    }, Open  ]],, B& g- M9 Q" w# U& y
    / P- {; P1 @7 h0 d1 K. \. Z
    Cell[CellGroupData[{4 A+ U0 }1 }) f! i2 N
    ' r) Z( |( ?' Y
    Cell[BoxData[
    9 T; k( _4 d7 I RowBox[{
    6 {, b5 E, L: {  RowBox[{"Ca", "[", 0 {" e  L% V% M  K+ H
       RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",( ?) y# q; Q* r6 x" O: ?
    CellChangeTimes->{3.5779573112927003`*^9}],  H- T! r/ g) d
    ; h; N7 K1 x' Y* Z
    Cell[BoxData["0"], "Output",
    % p! d1 l; p, U% t% q6 G) a CellChangeTimes->{2 Y. M) J5 S4 x& e3 |
      3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9,
    ; O+ i) l8 `" v9 g   3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9, % K# E" v3 p) r, t7 E
       3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9},
    " t2 R9 ^6 ~$ {5 n( ^7 A   3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9,
    2 X# M/ k' S7 \4 U( k   3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9},
    # `* q. ]7 l+ d2 z   3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]- o2 s- ^' e- ]
    }, Open  ]],
    5 D, [$ }% O: o: k$ i! p/ s0 Y- C4 B' M7 k( }2 o
    Cell[CellGroupData[{
    ; {9 x" G8 s0 Z$ m% M1 _! a# E' A& w" h( Q& O3 [0 L
    Cell[BoxData[/ @# E! y& A3 G$ `% U* E( I
    RowBox[{1 j$ u2 R* i( i4 C% F5 E. e& `
      RowBox[{"Ca", "[", . f% f  \+ G& s1 M/ O8 O* g/ N
       RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",5 R- M: h* K) \; M, y9 r
    CellChangeTimes->{3.577921461734375*^9}],
    ; p) ^) l/ S$ r& ]
    $ {7 i( }4 q( a8 ^) xCell[BoxData["0"], "Output",; I4 N! u" u: h) d! q  R
    CellChangeTimes->{/ `. e5 Y/ G6 v; L& {4 [( V" P
      3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9, / T1 k5 ^: U  W
       3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9}, # O8 d9 _$ s  J
       3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9,
    - r6 }$ X5 x4 _& X& X1 k   3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9, / p- T/ f8 L: W! [* Z. S
       3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]9 u9 z3 V3 c- T* N
    }, Open  ]],  i. Q, @0 v6 I3 m' J0 h
    " _0 _! D3 i; x) ~$ t
    Cell[CellGroupData[{
    ( ?' _& J5 g9 A. o9 w: X0 Y
    5 K! V' T/ Y* R9 `) T% eCell[BoxData[- R6 ^% L: n' _: e# z& Q5 ]
    RowBox[{0 [' ]8 V. H' e9 i  ^$ O
      RowBox[{"Ca", "[",
    2 }$ }& k& D& m9 }; W- }' H   RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",: q' C. F" _3 H/ i& k, b$ y& U8 |
    CellChangeTimes->{3.577957303118286*^9}],: e2 }2 a2 F! {& L" F& o
    : o7 X- T7 g! D
    Cell[BoxData["0"], "Output",! Z3 O8 b7 L4 r& h
    CellChangeTimes->{
    1 ]( ~/ }6 J; I  3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {" C* W* \  @. `" m- e
       3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9, ; p! b; ?" R# Q. K' c  X# `, L
       3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9,
    ( T- o$ Z$ b  B, J   3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9,
    & }0 y1 A1 n  k1 D. i   3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9,
    " g5 F0 C) T* J0 r% Q$ t   3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {
    ; [# Z1 V. {5 y- z   3.577961889378585*^9, 3.577961912965826*^9}}]8 D! B; L- }( I+ G  D
    }, Open  ]],' @) ?7 W# l4 Y* N2 G: f
    $ C& s2 r. _4 M, W  o, V
    Cell[CellGroupData[{
    0 s6 ]+ Y+ w. {! ]  j
    # {* F( i. |  p: G5 f4 _Cell[BoxData[
    - N, ^# X+ Q9 \0 \' F9 y RowBox[{8 r& ~) y$ W- t3 [# A
      RowBox[{"Ca", "[", 6 ?7 f$ T1 S3 Q: s/ h, J: v
       RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",7 C, g1 x$ A; A2 ?
    CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {
    : ]  e9 _+ N4 z4 S- T, f0 q# u  q0 p  3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9, ( K; B3 o! z: i2 R9 J8 u% n
      3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {
    . a; b, n- b; B$ s% }: b  3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9,
      J) k/ b2 D( \  3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {! _! X( B4 `) e& Q" x, j
      3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9,
    + U0 t+ m! R$ u  3.577921435703125*^9}}],/ X, n- J2 k, v: q8 A( d- B
    ; p* M! Q2 C( \6 f& m" b
    Cell[BoxData["0"], "Output",7 {, @- {- e$ m2 \, M
    CellChangeTimes->{
    & G  w+ j. P3 t) }7 |& b  3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {" S/ V+ p0 A3 C* j7 _% s4 s
       3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9,
    ' W/ w' |* J3 ?7 Z( R8 y2 ?( Y   3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {
    5 I/ @  A( L5 N, ^7 l   3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9, 5 H9 n5 I& X4 F3 Q
       3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {
    ' L1 q) e/ ^0 u. y   3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9,
    / ]) C; _7 i5 h   3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9,
    " g0 X4 Y% M$ t3 }0 m. P- @   3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9,
    3 K# b. l7 y# P1 y   3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {" d: W$ V6 R# Y' C
       3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9,
    7 \3 E, ?1 u. Y+ t' V) v   3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {9 a( i: g; e; w* I, H
       3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9,
    7 M3 O: y3 I6 G& m/ H   3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]3 e; A7 l. w1 x. S, A
    }, Open  ]],
    / ]1 z4 ^" q* J- F$ V+ m" E) e) j
      x' a' ^# l3 T5 L: k- C" m. G1 a$ pCell[CellGroupData[{8 e( U6 \! Y$ q& s% x8 x, F

    / h2 |  k  a% x% C% B$ {( ECell[BoxData[+ U: R3 O! n& b0 I  R
    RowBox[{"Delta1", "=", 5 t/ ?+ \6 u% s4 O6 ~
      RowBox[{
    3 G" W2 }8 y! v, u  P   SubsuperscriptBox["\[Integral]",
    6 V! C4 ~5 G" J1 a7 z8 l    RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ! A( T( i+ i" r% y
       RowBox[{3 O7 G/ _( L# N. C9 g6 G
        SubsuperscriptBox["\[Integral]",
    . [! p; M) Q. i5 F: X) b6 \. o     RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 1 O. P2 b. d) _
        RowBox[{1 Y& x7 G7 p& @
         SubsuperscriptBox["\[Integral]", 6 b# p# G& H& _
          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], : N) ^+ R0 \9 H. Q$ v
         RowBox[{
    - e0 I  a3 G! B% o      SubsuperscriptBox["\[Integral]",
    8 O+ V; I. L) D" r       RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], % M) K: L8 Q+ p# k1 m/ B) ~+ ?* Z: O
          RowBox[{# D4 S! F2 R" z' s# n9 c! H2 _9 d
           SubsuperscriptBox["\[Integral]", . s' g* Q8 O- ^# L
            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    ( _! a9 H7 T" `* w1 z* d       RowBox[{
    + v& G2 ]0 b1 T" v3 }) I; U1 X        SubsuperscriptBox["\[Integral]",
    2 Q4 G/ L: E5 c! \) ]         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], , k8 i! g8 [$ x+ O8 Y' l' e8 V
            RowBox[{$ B" o+ W  r' g/ |
             SubsuperscriptBox["\[Integral]", 6 w1 ]6 \% m4 x4 m8 O
              RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    & X5 }& C2 Y0 v4 n3 C, _         RowBox[{
    ) ^# w. u  A7 ]7 t2 b( d- f% K! i8 v          SubsuperscriptBox["\[Integral]",
    & {: Y3 M5 o. p& c& a3 T           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 6 U6 u! ]2 t* H% R
              RowBox[{
      Q  b  w  ~- Y6 W" d           SubsuperscriptBox["\[Integral]",
    5 K! i6 |% p& ~5 h8 ]  f, i% p# I            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 4 d( w: d. D  A3 _: H8 m- A
               RowBox[{) O. S9 g3 ^6 u9 F! h7 D/ @
                RowBox[{"Exp", "[", 2 v3 O8 W! m7 t% N8 N; X7 U3 [& Q
                 RowBox[{
    2 a7 o6 P8 o* j; U$ M. C              RowBox[{; C+ `' U* O6 K% ~
                   RowBox[{"-",
    $ r& N" `; e: U% o' n                RowBox[{/ y5 S) R$ r" J" ^8 X# T
                     RowBox[{"(", . G( \$ T$ u  k8 J% Q. u6 v
                      RowBox[{"Xa", "-", "Ca"}], ")"}], ".", . n2 }7 o, y9 l9 g: R3 n
                     RowBox[{"(", ; c9 @; I- G8 l, A4 ^) E8 G
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/",
    3 [7 B& L8 e% c# V( n3 w" E! h5 `              "Delta"}], "]"}], 8 ^* O0 f* v9 V0 k0 {$ U. C# X3 C8 ^
                RowBox[{"\[DifferentialD]", "x1"}], # N2 e* R4 r8 M3 l
                RowBox[{"\[DifferentialD]", "x2"}],
    9 f" @' ^3 h" N  i            RowBox[{"\[DifferentialD]", "x3"}],
    * [: V& m- h* X& X6 a# C& n) l7 \6 f8 {            RowBox[{"\[DifferentialD]", "x4"}], 3 ?% j" [0 e6 j2 |7 K6 d5 q1 [
                RowBox[{"\[DifferentialD]", "x5"}], $ e/ j5 {& ^' w. o0 d7 a- `
                RowBox[{"\[DifferentialD]", "x6"}], 5 ]" h# v6 t3 l( q! k- e
                RowBox[{"\[DifferentialD]", "x7"}], # v) r0 u" e" N/ B
                RowBox[{"\[DifferentialD]", "x8"}],
    0 y9 }4 E# J9 c4 [3 ^! b            RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input"," n( H) D+ f2 F7 {$ o8 T
    CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {
    2 I& R. [! O( u* r2 \2 N! F5 F   3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9,
    & K1 `' X- c. S4 [0 l   3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {
    % \2 b' B8 b8 g; x   3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9,
    / R! V8 d9 D* |5 W: G1 g   3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {" D% `+ m. R+ T* P
       3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9, & w7 _% D+ O3 y0 y- K: B' J! F
       3.577918964453125*^9}}],
    2 a- N& \' t/ E
    + b! e! q8 ?0 v2 R/ v0 kCell[BoxData[6 A! J6 e4 ~* M2 |/ T9 R& O
    RowBox[{"97.40909103400237`", " ",
    . d1 N* |. ~: d: c$ f$ x+ `. [% y  SuperscriptBox["Delta", "8"], " ",
    9 S5 j4 L! h" M( Z1 x$ ?  RowBox[{"If", "[",
    6 l5 e& [- T6 B* _# N- C, i" L/ `2 \   RowBox[{* i. @* d( [' F$ y+ c5 d& y
        RowBox[{# H: r4 f3 ]8 `6 w6 G
         RowBox[{"Re", "[", $ D! ]& H$ K! `& l9 E
          SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",",
      J/ t5 |. d3 w    FractionBox[/ \5 N' a( z& N, D3 \3 T) z
         RowBox[{"1.7724538509055159`", " ",
    9 ]5 P3 E1 X9 b( R0 M      SuperscriptBox["\[ExponentialE]",
    - e% E% r' Z7 f1 k+ h8 ~, w: i4 u; ~8 |       FractionBox["1.1102230246251565`*^-16",
    2 t1 @! y3 y/ z; x6 V: d  Y6 a        SuperscriptBox["Delta", "2"]]]}], 3 {1 b9 s% ]' J6 o
         SqrtBox[
    * q" s- e6 `+ D% R( d6 A" `8 t      FractionBox["1", 9 h9 t; ?( E# Z3 g
           SuperscriptBox["Delta", "2"]]]], ",", . [, g8 _3 j* t" R0 {3 V
        RowBox[{"Integrate", "[",
    : r- @! W6 X$ d% L6 s     RowBox[{
    & W. ?+ R% B# t) T      SuperscriptBox["\[ExponentialE]",
    * y, _& V' d& T       FractionBox[! h$ q& [4 h4 a7 d
            RowBox[{"1.1102230246251565`*^-16", "-",
    . Q0 w# C2 L2 h; F+ @' `2 O         RowBox[{"1.`", " ",
    * l: g7 v8 r7 E" [$ K6 z          SuperscriptBox["x9", "2"]}]}],
    8 c' y1 L# g7 N. _6 O1 \, R        SuperscriptBox["Delta", "2"]]], ",", . i/ _3 N, o) F5 ?2 ?- }
          RowBox[{"{",
    : P5 m- c, X& |- ^3 k+ |" z       RowBox[{"x9", ",",
    $ |  B" i0 q3 i3 u        RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",",
    + c, y2 d7 T) s      RowBox[{"Assumptions", "\[Rule]",
    9 _- h: D. u: @3 ]5 q9 R       RowBox[{3 I/ @* y/ Z! b3 ]  X
            RowBox[{"Re", "[", ! F( s+ o; {/ Z/ C5 }  n
             SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}],
    * i2 c# }! K  b' k     "]"}]}], "]"}]}]], "Output",
    & K5 t& ]3 J; ?* d CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9,
    % o" S9 Y! V9 |$ y: ]3 ~8 w  3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9, 7 [2 `$ I( ?  {# j
      3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9,
    + D" C6 y9 y8 z- g/ t* N  3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9, / A- S* F( a. A$ V- `. f/ K
      3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9,
    0 z- D9 R+ M# |1 h  3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9, # h# z' v) r& o
      3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]0 w1 P( D1 U, k. v) {2 W
    }, Open  ]],
    : {# _# k' f8 }. v
    . I- U, [" u! t5 wCell[CellGroupData[{0 Q/ U5 H; K  z! y4 n$ g; [9 F2 `8 ~+ B

    * B* a6 l2 S5 O) \  Y* W; I8 LCell[BoxData[4 ^' C7 W6 u6 S! }/ q' h
    RowBox[{"Delta1", "=",
    5 }6 a0 ^: ?# E: \  StyleBox[3 I/ c% f  G/ d) m* \, n
       RowBox[{"97.40909103400237`", " ",
    4 K) T7 F: Q  g( f6 K( r    SuperscriptBox["Delta", "8"], "  ",
      h. L; G2 ?0 }) C& i    FractionBox[) k1 X- g  y) n# @) ]4 U) d
         RowBox[{"1.7724538509055159`", " ",
    - o0 e6 _, f& D0 S      SuperscriptBox["\[ExponentialE]",
    ; y+ ^  j4 ?4 ?; A$ C       FractionBox["1.1102230246251565`*^-16", # W3 O+ S, L( ~7 c- E7 q
            SuperscriptBox["Delta", "2"]]]}], 4 `- U& q* l) f$ n% U
         SqrtBox[
      S0 f. o* q2 B$ c      FractionBox["1",
    / X. C% J" w4 U1 |! e       SuperscriptBox["Delta", "2"]]]]}],
    : Z: i; }& V3 w   FontWeight->"Plain"]}]], "Input",7 B) q1 s9 V7 K% D
    CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {% B$ ?1 K, ~. L4 j5 i4 Q5 d( [7 N
       3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9, . r% Z- ]$ T( v
       3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {  _4 N8 _' |4 _7 `# }
       3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9,
    - V9 {  E- @3 |9 D) E   3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9},
      ]- l4 L4 ]( v& f9 B- X3 ^. P   3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],
    # X& o# H4 \* H  ~8 _& w* q' J3 g% g$ q
    Cell[BoxData[
    2 u; ~+ I3 F9 T# ]- z$ z: O FractionBox[
    5 K( q; l, J- N, T  P& J) C  RowBox[{"172.65311851642346`", " ",
    . b, Q* q4 Z1 k   SuperscriptBox["Delta", "8"], " ", " Z. f" ?1 O1 L" O( u, G
       SuperscriptBox["\[ExponentialE]", / b* l- ], c7 L
        FractionBox["1.1102230246251565`*^-16",
    4 n7 ?3 A6 F) q# D: U     SuperscriptBox["Delta", "2"]]]}],
    & S# K0 t: u& a- p  SqrtBox[. H5 @7 f/ }' ]* `# |2 Q1 Z# z
       FractionBox["1",
    & s0 Z/ p0 P9 K4 d/ U0 b! O    SuperscriptBox["Delta", "2"]]]]], "Output",' v! K. Y; I$ V2 t; @- y: n
    CellChangeTimes->{+ Q7 ?& E3 r" W8 |# p' @
      3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9,
    % K. ]& d! [, I, O) [- Y   3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9, ! i# a" D- g8 a) t  B5 h: {
       3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9, 5 w% t1 L2 N+ X) m
       3.578012166234375*^9}]
    3 S" Y: I+ I' e, b' ]8 g8 ~+ S" e}, Open  ]],
    5 m  e' p, l& B1 A2 q' V% |  u2 `  ^5 W
    Cell[CellGroupData[{
    ' C, n& w! D  `# E+ S) K) w! R8 x; [( e; b9 a5 }
    Cell[BoxData[
    . X+ s% Y" p) T+ Z. \ RowBox[{"DeltaX", "=",
    9 y# \3 z. N# g; K4 E0 ^; L4 _- C  RowBox[{"FindRoot", "[", - K$ O2 g& A: g. q" Y
       RowBox[{
    2 j$ a5 \- T  X" o- k+ ^    RowBox[{"Delta1", "\[Equal]", "1"}], ",", : p  v* Z# Q& p3 p1 `. C
        RowBox[{"{", ! R7 d$ P5 b- L6 m1 o
         RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",
    0 e* D5 n# J' t0 |. x( h9 M CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {
    2 \$ b/ E! G& ^0 {7 w6 G   3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9, % q( t, e0 [7 z. a# u
       3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9, / x4 w# y# @! g# C! Y
       3.57791921584375*^9}}],! B" L9 S% {. a. r) O3 N* e& v

    & d) ]; P" s6 oCell[BoxData[
    ' g' n7 Q, k2 E& K  m6 B: k, C RowBox[{"{",
    9 O( M. u2 \7 n" C  RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",
    4 g' _' c& A+ v- w' ~; e CellChangeTimes->{% S4 m) I+ D! j( I1 P9 f
      3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9}, + ?! ~2 H1 }1 L5 Y6 k
       3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9,
    * K- R) ?2 u$ l   3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9,
    9 u$ O' O, m: h* Z6 H3 w, p3 [   3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9, 1 P. ?; G( y6 O1 Z+ v
       3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {8 x' O' N& I* {. A8 W5 I
       3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9, ( v7 D( K$ X. ]8 U6 k1 g
       3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9,
    0 c4 G- Y3 f" _, x8 K1 Q/ T8 I   3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9, ( H# G0 c9 q% z( J1 A, ]8 Q  R4 e
       3.57796070150625*^9, 3.578012167703125*^9}]* s& X  F8 A& N3 ]
    }, Open  ]],
    & l/ y% K: ]/ |
    ) }: U9 ?0 m* k( |! s/ OCell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\: R9 M. w' i) R! y, y
    \:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",6 W2 T. M5 {; M( ]) G1 D2 C
    CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {( n5 e+ R% g% K& A
      3.577960705312657*^9, 3.577960707621461*^9}}],
    ' u$ g, v) d$ ~) k7 z% F3 H5 t) \7 T# D% [1 p4 `3 |0 l
    Cell[CellGroupData[{
    3 V  q: x$ }# W" O4 i$ D' V- Q' ^; K
    Cell[BoxData[
    / o" P* D* g! ]9 T" E& K3 t% W0 X RowBox[{"C1", "=", "Ca"}]], "Input",
    5 h; E* N  ?# G2 v' k! Y' H CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],
    5 P7 w( D8 n2 Q9 U. ^: o$ v5 K8 ?$ }; E# R7 a; Y8 F( N
    Cell[BoxData[4 ~  q  m( I% C% B& l. e9 k
    RowBox[{"{",
    & L* |, P/ r0 o  RowBox[{- X* j  W1 g: Y
      "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",", 9 A3 Q$ w9 }/ j. |1 Z
       "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", " U# \# j1 A1 D% j
       "0.`"}], "}"}]], "Output",
    0 C" ]/ T( g; ~0 x$ {/ d; o CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9,
    : K' J% c8 B) }" d  3.577960710273465*^9, 3.5780121855*^9}]$ C' m' z4 C& K2 ^) v
    }, Open  ]],
    / ]1 B) R) U, I6 ^3 {
    # Y6 u. C) T% X2 iCell[CellGroupData[{
    0 g1 N, ~3 q" A" S  E" P) C. s; ]2 K) D4 s! T* d' x8 a
    Cell[BoxData[+ B! q( y  H. v) N5 ]- ~, v4 ^' k
    RowBox[{"u1", "=",
    0 J6 Y3 Y% z9 c' G- |7 |/ d, Y  RowBox[{
    ( _* s; V* Q: ]% i( |4 T# Q- C   RowBox[{"Exp", "[", * k  b, r; t. l
        RowBox[{) Q# H3 O2 ~9 U$ U
         RowBox[{) |1 w: G  J. J5 I7 u
          RowBox[{"-",
    ! W* c6 x) Z* Q5 v: E       RowBox[{) {3 L& R  W# ^- U# e6 F
            RowBox[{"(", # Y, A" f/ }( N$ u+ l$ S
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 2 F" M) I, ]9 k" f8 p
            RowBox[{"(", 9 M4 `0 E' y5 t, s
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],( M. ^3 z) x  Z2 B4 _) u
         "]"}], "/.", "DeltaX"}]}]], "Input",5 h* z& r7 W& w) c# v# l9 {4 Z- L
    CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {8 [" t# j9 U" g2 N. O& o
       3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {6 }1 U4 V2 @$ O" H9 y8 s
       3.577919193484375*^9, 3.5779192326875*^9}}],
    7 W+ s. p9 M  i4 h. X, M
    : U: |& ]) I  m7 N; E7 _Cell[BoxData[
    + S( H9 F# \' H( u, S SuperscriptBox["\[ExponentialE]", 4 c$ m$ J$ a( l+ T
      RowBox[{"3.141592653589793`", " ",
    0 d, l2 {1 r. u9 l8 H1 C. j. E   RowBox[{"(",
      k3 z& \& c, \+ a" S/ G    RowBox[{+ A; C% W1 O" @% U0 X) O) c
         RowBox[{"-", 2 l! y! e- w4 X) N
          SuperscriptBox[
    ; S+ e& [# A5 A0 X! [+ w! c       RowBox[{"(", : l! g6 `$ L1 s6 ^4 D
            RowBox[{+ }/ E+ X0 o- C9 J5 g. c
             RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", - m# n( k2 B, Z0 `
         SuperscriptBox[
    , s( h/ Z+ F/ i7 ^4 E9 F( o6 J      RowBox[{"(", / M4 Z7 h4 ~; J3 ~, r+ q
           RowBox[{
    ; S# m" h8 R: u! @        RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", % C7 L& M, P' _% a
         SuperscriptBox[. P7 k8 ~+ N3 `/ b8 o
          RowBox[{"(", ' W+ A) r: B9 B5 W5 l0 X' C& c) h
           RowBox[{% z  Z  }# d- N, b% C# t" I0 f$ V
            RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    9 ?  x7 }+ a0 v2 y  \     SuperscriptBox[4 U: F& y8 G& |; `1 S, H
          RowBox[{"(", 9 I3 c; X2 g8 z! N! F4 H
           RowBox[{5 L6 @4 m3 L' ^# B% \$ G( s
            RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-", & B" |) l8 z# ^/ I; x6 Z
         SuperscriptBox[% ?! d& A# [: r/ y
          RowBox[{"(", 6 P5 F9 O, E. U3 j" |
           RowBox[{
    & n" z7 ?7 w0 s# }        RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-",   h( B( b5 a8 O2 a3 A2 U7 @1 K
         SuperscriptBox[- X( ]1 S& C% I9 I; y
          RowBox[{"(", # H& S' ~7 s. l: y/ Z+ P
           RowBox[{( A4 e0 G- B7 G
            RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    : t( M# H2 k8 Z$ _     SuperscriptBox[
    8 ?5 H) f* [" J8 ~2 H      RowBox[{"(",
    2 V  J8 s* k5 _# q' o; U7 w       RowBox[{8 I( t% q$ w! u3 ]
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", # ?- X' X. j5 \) H9 t4 Q. F
         SuperscriptBox[# U4 w0 n# o1 ]  Q
          RowBox[{"(", & [* k3 v: H/ R
           RowBox[{
    - g& z7 f; K, ]' \  t# k" C        RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    ( ^, d& z& w5 Q+ t     SuperscriptBox[
    * H0 `5 s* _5 C; i+ Y8 G( j  T      RowBox[{"(",
    - g8 |6 U, p* `  m* Y3 d       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    - x* I6 `; n% T    ")"}]}]]], "Output",8 I3 V: ?; y, M! Q
    CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9,
    & v; B8 @3 o. ]; g( c, z  3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9,
    / c' a2 @2 [' {5 e% b  3.578012187078125*^9}], C$ d/ J; _& }* D
    }, Open  ]],
    6 x; c% q+ }* j
    1 _2 H! r0 _7 C" fCell[CellGroupData[{
    * p# R$ ]! D  j/ b7 m5 Z) R9 |
    ! k6 p: b: R; c5 h) P/ F4 bCell[BoxData[. ~# z; J" ~! E6 T) x) a
    RowBox[{"C2", "=", "Ca"}]], "Input",1 X! s1 x. q/ B, Y4 U
    CellChangeTimes->{3.57792047321875*^9}],
    ( q% l5 |: _) D4 R/ i' ~
    # P& Z& U/ E: K) m" sCell[BoxData[
    ' m  W, D/ V( v9 C  j* c6 ]# ] RowBox[{"{",
    , A( O+ R1 V& c2 i, ?7 U1 E7 f  RowBox[{# `1 {: v% O  {+ C8 i
      "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    ) [- J8 S' W, J" Q) |, \+ i! N   "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}], : u( a6 c8 x! }* r' ~7 y
      "}"}]], "Output",
    1 u9 @* O: x- q CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9,
    / I  G) P- p) s/ W  D  3.5779607401163173`*^9, 3.578012204671875*^9}], _: x" ^' j( ?4 {$ d# r0 W) k8 J
    }, Open  ]],
    ) W- Q% c, f' o5 T4 H: M. t% L
    ' p1 q: I$ J6 c" Q- FCell[CellGroupData[{
    ! U. W( f; N6 L  E+ N; l+ p8 L: m. i0 X% i; k
    Cell[BoxData[- p3 j  y: _  y. C, @$ T
    RowBox[{"u2", "=", / c# ?. ^* `; f5 V  |+ b- Y
      RowBox[{+ k" g: x6 }8 f/ @; @
       RowBox[{"Exp", "[", ; U# q) ?: ~& i6 e4 l
        RowBox[{4 R# N  z+ X( L& ]0 l5 q$ E
         RowBox[{* D6 r9 V; T: ~3 `0 v
          RowBox[{"-", 2 d, {9 `, m. j+ f! x
           RowBox[{2 Q6 V, q/ t, ~8 h9 k
            RowBox[{"(",
    ! E, U+ r2 |2 x& a4 V/ [) \8 R         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ( c! x# V) W0 Q0 V. T
            RowBox[{"(",
    " \4 c1 r1 M1 ?$ X         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],) b5 R6 {( e4 G7 `9 q+ Z' Y
         "]"}], "/.", "DeltaX"}]}]], "Input",
    * j* W' X$ d) r3 ?/ Y! @$ \ CellChangeTimes->{3.577920484109375*^9}],4 m3 g, F- F0 R, ~& H4 I+ ^$ d! Z/ X

    $ W" U! u* x" p( K  A/ Z6 QCell[BoxData[2 d3 Q! E1 B3 ~, P
    SuperscriptBox["\[ExponentialE]",
    / _( u9 c8 s7 b; j" G; ~  RowBox[{"3.141592653589793`", " ",
      Z" i, C) h( Z7 R4 J   RowBox[{"(", 6 x  `/ {, C9 z, k) _
        RowBox[{
    # p; b+ N. N5 b  V0 E     RowBox[{"-", ; R0 a% A: v3 N
          SuperscriptBox[
    * ~+ }3 p" m" A, U2 s' v4 z  }3 z! K2 o       RowBox[{"(",
    + t( z8 V/ Z  J8 Z2 w0 G$ Y& @        RowBox[{/ T$ s) ^* N- x9 m1 `
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-", 7 l  n4 r7 ]( L7 R$ v3 _
         SuperscriptBox[7 Y2 \1 c/ f/ w  h+ }5 U- X
          RowBox[{"(", . t  p/ p0 Q* i+ \
           RowBox[{$ U! I: l# Z0 {' R4 \5 E
            RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    1 l8 r) c* n; k5 z) S# p5 i& g: a     SuperscriptBox[3 k/ Q6 t2 Q2 d5 b3 b$ m, ]; R
          RowBox[{"(",
    4 w1 _6 {, X: T# @0 H       RowBox[{
    * \: h/ D0 p* A) ]        RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", 1 Y6 t4 `2 A* I* K$ @) ~/ i% X
         SuperscriptBox[
    ) B# t. S: i# b2 X- @      RowBox[{"(", # I2 \) @  c2 i! M0 c1 Z
           RowBox[{
    9 Z, ~4 ?, i+ C2 ]8 z0 Z. S* G        RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-",
    ; X) U$ |( i- L7 s- @     SuperscriptBox[
    3 K7 @5 w' t6 M! w, t6 G      RowBox[{"(", 3 w. [" H1 B% w, f. \* n
           RowBox[{
    + s0 n2 m/ ^6 m; ]        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    ) o$ z1 a  A$ {6 I     SuperscriptBox[
    8 Y; u0 @1 z8 V/ M4 D      RowBox[{"(", 8 W# N! s5 c5 X2 Q6 q+ |
           RowBox[{: j) z2 u) m, b) u6 S+ M9 }
            RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", # P2 Q4 G1 [- ~8 I& N* ^. ?; Q
         SuperscriptBox[- X& u- L: c4 N. E) h  O9 S1 ]9 ?
          RowBox[{"(",
    ; G' W+ @, m( F; o2 ~" P2 S       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
      b6 @& h) R" s* [1 w8 t     SuperscriptBox[
    * q; k4 K, L- N, b( {7 D      RowBox[{"(",
    4 N+ p& e# k* k. m* i       RowBox[{
    3 F4 g: `+ ]4 H9 ^3 \- T. Q        RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    / y! k4 Y6 G6 w1 N7 e     SuperscriptBox[) Y: v% [$ v; z: t
          RowBox[{"(",
    / y% E# J! K* @" w5 |  L% R& `5 p       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], $ ?: v. M2 \" }
        ")"}]}]]], "Output",
    , f/ n( {4 F9 W$ `9 C CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9,   Q# u8 d: S3 ?
      3.5779607413955193`*^9, 3.578012205484375*^9}]+ S2 x* X5 U1 n+ u& q7 Z  [
    }, Open  ]],& ?! [& U* O  u

    ' Q7 q% _6 ~# z' |" vCell[CellGroupData[{
    + O$ J1 g- W3 w- |7 F* g! m* b" Q  o: l0 @+ I/ f7 T1 U
    Cell[BoxData[
    4 x" j; W. K) O9 k5 o% ]& P& i RowBox[{"C3", "=", "Ca"}]], "Input",
    * _  A, b2 ?& l0 B: C9 x) o. q- C CellChangeTimes->{3.57792064125*^9}],
    2 ~; D4 k5 o2 [, P  \
      r" n2 P# m4 ]8 p6 b2 FCell[BoxData[
    8 y2 S5 s. Z% L5 P6 N4 u- A RowBox[{"{", 5 S( k4 r) e' m
      RowBox[{
    6 X$ j6 j! x& y+ @  "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",", 5 u/ `4 L9 \# m7 X+ h, n, d3 R. ?
       "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}],
    " D1 R/ d9 ]: |0 A4 x- |  M  "}"}]], "Output",
    - s9 B% }: |* P, m* T! R/ X. V CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9,
    5 G/ s( h6 v% g% l  3.5779607642027593`*^9, 3.5780122103125*^9}]
    - q9 c# {9 h5 U" p}, Open  ]],$ N/ C! N& B8 s6 {; n
    - s8 V; B0 K# J! D4 n" h' h& s4 C
    Cell[CellGroupData[{
    3 e: c& o5 W2 R' w/ U3 ?! |( \9 V, `9 E( u! H
    Cell[BoxData[) Q0 p5 V7 ?5 V  c
    RowBox[{"u3", "=",
    % d: n! U4 h5 _5 F- `; g  RowBox[{
    ' b$ z8 `! b( `* @: Z   RowBox[{"Exp", "[", : A' P! l2 I/ h9 X6 ^& i) {
        RowBox[{
    . {) y" ]* o# P9 {1 x7 [; T4 U4 H9 J     RowBox[{
    7 ?1 O) V% G4 p* B$ E      RowBox[{"-",
    * Z7 u0 \- S7 r       RowBox[{
    ) g: t+ O( s- P+ T) J        RowBox[{"(", * Y" e: p: P& Z0 `
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ! X) Q  u! e# @+ ^& N4 `7 {8 e
            RowBox[{"(", 1 q. r! c. S1 ?# t4 ~* r
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],1 N7 U( V( W' |+ {4 C
         "]"}], "/.", "DeltaX"}]}]], "Input",
    3 ~- }9 P& g8 T! H1 f7 X) X; X( T CellChangeTimes->{3.57792064921875*^9}],' t) s+ j5 n/ B3 |2 g& ~, @

    , Q  \1 ]: K+ Z: V8 l6 WCell[BoxData[1 {0 ], ^  }$ o  B8 H: p
    SuperscriptBox["\[ExponentialE]", 3 Z' x; d4 c3 h  M
      RowBox[{"3.141592653589793`", " ",
    + }9 ]9 O& W$ o5 E4 ?/ `! X   RowBox[{"(",
    ; y8 g1 y1 U: E6 e6 a9 J( C    RowBox[{
    0 T6 G' ~- K: S- m( {+ I     RowBox[{"-", / d( L! ]4 B: x$ M0 F9 c& h
          SuperscriptBox[3 R8 q8 Y; q+ p: [
           RowBox[{"(",
    3 i" b5 X! W9 V) E  l        RowBox[{
    $ O  Q: ]; A1 p  j; P         RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-",
    7 O5 `; b. E2 V. W" J6 c     SuperscriptBox[
    ! x2 H+ V3 G7 k0 N4 y      RowBox[{"(",
    8 Y1 {* N5 B* o& J: i% e* ?4 s. w       RowBox[{
    , u4 u( Z4 j# V9 O5 a        RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-",
    - X5 f7 f" s( t' U- Z# N     SuperscriptBox[
    9 n# ?+ \2 M( N% {( A3 {      RowBox[{"(", 9 Y. ~0 ~6 K* F
           RowBox[{
    9 t# x/ E1 _* T2 v        RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",
    . P. d3 P; [8 a% ]3 _4 F5 ~1 x& ^     SuperscriptBox[
    8 e& @. p# l2 |      RowBox[{"(", ' V; w$ j+ |* v3 P4 t! j+ I$ S
           RowBox[{
    6 v3 R/ n# F! k% J/ H, o  {1 ]$ P        RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", * |9 H& m2 s- s( R6 J* }4 n% }
         SuperscriptBox[
    " _4 n8 N  @# C0 K) ~5 o; }5 I      RowBox[{"(", 2 j) W: M1 P! B2 [
           RowBox[{3 h! K8 V7 j1 n# F3 W- X& M
            RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-", # V( `# O1 e" [% O( x/ O
         SuperscriptBox[' R# I; u! y4 U$ f7 `5 H4 o' ^
          RowBox[{"(",
    " K( j! A+ P3 _; L1 S/ W       RowBox[{
    0 e: ?8 T' p) l. x        RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-", 8 h2 n% y  L8 q5 O1 e
         SuperscriptBox[5 j, I) W4 z: G9 i7 ~
          RowBox[{"(", ! s" S; ?! y( W/ Q( v
           RowBox[{
    2 R* S# Q: Z2 G" C, ]        RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    # V4 G4 z. I6 K; T0 J1 r9 A     SuperscriptBox[+ E+ p& ]5 D6 b3 r
          RowBox[{"(",
    ' T+ ]* @5 [: t2 l# c       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 2 q6 }' u% i$ U+ N
         SuperscriptBox[
    ! x+ m6 F5 f% u% ?      RowBox[{"(", " _6 d, H7 i8 _; W
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 4 ^% G) ^/ q) v, c: Z
        ")"}]}]]], "Output",% S8 E6 ]6 a" W- x, K
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9,
    2 p2 k( f, I" ?  d2 J5 d* e' s  3.5779607654819613`*^9, 3.578012211515625*^9}]
    , d1 J4 n  W4 S# X. ~, ~* ~3 E5 i3 E}, Open  ]],- \7 x' V9 p0 b: ?: l
    # Q+ E2 f& }. m+ v) q& f% a  l5 r
    Cell[CellGroupData[{2 e( z  G% N1 S" u9 H' ]

    0 C% J! w& T1 a  n: hCell[BoxData[" K: e9 s- }, g* q+ N4 C
    RowBox[{"C4", "=", "Ca"}]], "Input",
    + M- p6 j) c4 \$ F+ l7 f7 Q! \ CellChangeTimes->{3.5779207559375*^9}],
    & k  L% P# O( O3 |  e; G5 |5 ?" ~' H( G- T) R
    Cell[BoxData[, B! X8 e" b. z5 {4 q6 c, v5 R
    RowBox[{"{", 8 g- r7 d2 c) g
      RowBox[{. w5 A  A+ ]* F  W6 Z9 T4 }/ f
      "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",",
    # H. A, \- b8 g6 S0 p, u   "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}],
    ( n) ~4 y) R0 P, G$ F% ?* P  "}"}]], "Output",
    0 J5 m+ E& T: c' ?5 N  e4 i' G: a CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9, ) A" G3 ~* A6 Q! a: I5 H: c
      3.5779607861363974`*^9, 3.578012216171875*^9}]
    8 B; |2 m0 F$ Y1 ]5 ^! I& C; E}, Open  ]],4 U5 v9 r9 I3 e

    % a2 z% O4 E+ J  l0 g+ L3 p) z- i1 jCell[CellGroupData[{
    5 V5 L$ R  T. S( D
    2 ]/ X. r6 W! T, e5 E3 `5 d' R- MCell[BoxData[3 C! W; L5 X) ?  S0 Q3 V. [1 U
    RowBox[{"u4", "=", 4 a, Z$ _% ?2 q% t1 x: W
      RowBox[{% p( s9 i- b/ w  h! _# G. M8 c
       RowBox[{"Exp", "[",
    7 T* K9 l- z8 x1 H: L3 }# ]    RowBox[{1 D+ D, F0 n: ~6 ~* R+ V  n* J
         RowBox[{
    ( C9 H/ P% b- m* o7 ~: Z      RowBox[{"-",
    9 r) {) a! c" T( Q9 G5 T% S       RowBox[{
    & P! \% ?6 h( @# \3 @) |' u! d        RowBox[{"(",
    2 P: p7 N6 b) d$ K         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    3 E8 H# C7 w% T; c& B' f        RowBox[{"(",
    " P# w9 F* `$ c$ D- A9 ^         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],4 |" v' [; X# C7 Y3 k
         "]"}], "/.", "DeltaX"}]}]], "Input",
    " k7 A& K4 k2 [* O! \! J CellChangeTimes->{3.57792076325*^9}],4 D) v. v* D, v
    * F/ j# ^, m( U( u; Y) P9 F
    Cell[BoxData[, g1 Q8 B0 I* r# w: A: l2 U
    SuperscriptBox["\[ExponentialE]",
    0 e0 E% b/ b) @( T  RowBox[{"3.141592653589793`", " ", 9 I3 n% G& c8 N( G6 b, p5 |
       RowBox[{"(", 9 e* ]1 }/ Z7 @* Y5 w. ?7 Z
        RowBox[{
    9 J( t, ?/ b4 L( }+ S4 v8 A) v     RowBox[{"-", - [- H+ j! R. h" T7 @5 T; x1 @9 @; I
          SuperscriptBox[
    6 G( c0 r1 B2 a& |6 j       RowBox[{"(",
    ; i6 t# |% U/ W4 H        RowBox[{* |9 ^' X! w9 f. \) y7 s5 w7 o
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", 3 O' U5 ^! g$ |! Q9 u
         SuperscriptBox[2 W- x) _) k& V( W' E
          RowBox[{"(",   B! C5 e& {( u" j! Z  T$ b
           RowBox[{# M% X: [. H1 V2 b1 @
            RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-",
    ; s9 {) K6 G9 k5 T8 C$ l     SuperscriptBox[
    & A7 ?0 i) V; ~9 [9 K      RowBox[{"(", 9 S% z( T: S; i9 i# V+ M! n
           RowBox[{& l& p# X$ R  U7 I9 Y) _" {+ l
            RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
    * t* }0 x$ q0 O5 N& A8 X* ^* e6 |     SuperscriptBox[; H1 K, E+ @% f' W% a
          RowBox[{"(", ) U: I9 s- I7 {+ E/ x; F" K
           RowBox[{* a: R" U9 a9 l+ o! U4 ^7 J9 E4 q
            RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-", 2 H$ S  j' V- n; P& ~7 a
         SuperscriptBox[
    * j; l' a1 G( M      RowBox[{"(", + I. r4 @7 @% S6 Q( J
           RowBox[{2 ], Q8 F; Y5 m9 h
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    ! D! M  y- r2 D3 j1 p; L- p! h     SuperscriptBox[
    ; |7 z  \- k  W! S# k      RowBox[{"(", 3 {: i. |" K. {5 l) H8 s
           RowBox[{# e6 g$ Z4 _/ R/ s. I9 r% A
            RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", + i' K3 o9 c9 Q+ t2 u! e
         SuperscriptBox[1 T9 `( {' F5 o) V& L6 C5 U
          RowBox[{"(", 3 d( L4 X2 l7 X. d, ^( W4 ~
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ! Q) L: d* a7 N$ F& F, u5 y/ Q     SuperscriptBox[, M# i/ U! c7 o' ]  H' p6 A. C' n
          RowBox[{"(",
    , \/ v; z' ~% k       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ) v6 m/ S) G$ e! F& s     SuperscriptBox[
    1 q4 j* o! i4 l3 s9 _/ z( U: B8 ^      RowBox[{"(", * n  C( x+ k' I& k- u! h0 `% D8 |( h
           RowBox[{
    2 Z: E- i; L1 m0 G/ X9 u6 t+ I; E. |        RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], 1 N# H- J, y9 j
        ")"}]}]]], "Output",: G; M" b1 I/ V1 f' y
    CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9,   _9 Z9 Z1 f0 _* q$ ^' c/ i
      3.5779607873531995`*^9, 3.5780122169375*^9}]
    : O. T( H. c, [/ t+ d8 Y}, Open  ]],
    : F7 d+ `* \9 q
    - \4 n/ b1 ?$ Z1 ]4 KCell[CellGroupData[{% l0 x1 A+ h6 ~+ |
    1 f7 W* k8 N. J7 W' Y9 \
    Cell[BoxData[
    ) m$ p' k1 Y' d9 @# I$ j RowBox[{"C5", "=", "Ca"}]], "Input",
    : z. ?0 l) A: Y8 z) O CellChangeTimes->{3.577920860671875*^9}],
    , H! n$ }4 I9 U2 E3 ]  G" F1 c$ j8 z& K: M
    Cell[BoxData[& K/ s# X, p8 |  B9 _# r
    RowBox[{"{",   `' j  P# k2 ?# \6 C8 }
      RowBox[{
    . ^4 W; v- H3 Y- y3 g& ^( e  H4 [  "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",", ) T+ ^& h, V( P4 P# q1 t- Y
       "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}],
    3 M& v' v: F9 \7 _  "}"}]], "Output",
    - T! r: m% L: P, q5 B* f CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9, 5 F0 h& e" H( Y
      3.5779608137328453`*^9, 3.5780122209375*^9}]/ C0 J. t: Q! o$ {+ ^9 T! X
    }, Open  ]],. O5 F" o  o  L/ G

    9 m1 Y! X6 e& @7 O7 i3 ?2 \% pCell[CellGroupData[{
    1 l% _" x! p, w# _! Z9 W6 Q
    7 U/ m$ K) a1 S6 KCell[BoxData[
    " H5 p% q& M+ y7 o1 T! \: I% y/ U. p$ C: J RowBox[{"u5", "=",
    6 R3 u0 S% K( f6 v  RowBox[{
    7 O& S' ~- L1 c- {% A   RowBox[{"Exp", "[", ( l  _2 l, l" {: p
        RowBox[{
    . ?) T7 ^7 L* n) }- z& l2 U     RowBox[{
    - j" F6 B1 n  \      RowBox[{"-",
    + e5 `' z2 H+ I       RowBox[{. k+ F2 S- u8 v
            RowBox[{"(", 4 w: a( b6 F5 U7 j
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    # B4 Z; n) X# @  r# H2 [& C% L& g$ S        RowBox[{"(", ) P% U  e3 O" q9 \* y# B
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    7 o. E4 _+ m( V     "]"}], "/.", "DeltaX"}]}]], "Input",! t8 k6 d- Z; i: r) r
    CellChangeTimes->{3.577920869375*^9}],
    , q, @% I% v' r
    + E, D2 E% n( g8 f7 Z" Y' o* _5 v7 bCell[BoxData[
    - d- e1 _* `3 Q$ G2 Y SuperscriptBox["\[ExponentialE]", / x3 I' H$ o; T- S2 \% E
      RowBox[{"3.141592653589793`", " ",   e& c# U' [: R! F. Q' }
       RowBox[{"(",
    1 o- d- {7 b8 [# a3 i    RowBox[{# i; e6 G/ Q2 j! A
         RowBox[{"-", 3 H3 v# b' [/ |+ \
          SuperscriptBox[
    , T  j% L7 O1 D( ^4 M       RowBox[{"(", % b3 U( z' t# b; E
            RowBox[{
    " L5 H; t: ~  U# L; X3 ]7 }. g         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ' f) S, M& K* A5 R( Y1 @     SuperscriptBox[
    5 x" O- F3 A7 r- V: u. p  F# M      RowBox[{"(",
    6 J) \7 z/ K& ~( c& U! [  K2 z       RowBox[{; N$ \" O( U/ Z& ?) |5 f# C
            RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-", % j' P  Q2 v" `" l$ H+ B# ]
         SuperscriptBox[
    . P# h+ \8 ]0 L4 f      RowBox[{"(",
    3 u" ^2 h. Q% h0 t8 z- D& ^       RowBox[{
    9 l8 i% F2 t# s6 A4 A- q        RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    0 Z$ r+ d7 M  `# b; o# [5 Q; H9 K     SuperscriptBox[
    % p/ |: }+ r& G+ A      RowBox[{"(",
    % H# z0 b" a+ m, q4 |( \       RowBox[{
    - h& N* p* L; i% n. L        RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    6 B6 D4 W0 o7 W0 q! n( ^" t  v2 m     SuperscriptBox[! i/ A* ^( k2 c. X0 b$ u. v, I
          RowBox[{"(", 7 z9 v8 o8 e4 g) a
           RowBox[{
    5 c1 N# A6 N& D% ]* V  i; a        RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-", * q' D) K- @# Y8 R# K
         SuperscriptBox[
    $ [! H3 y( A) w6 W$ M      RowBox[{"(", ( r8 q2 S: d; K0 A
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ) r1 b7 r2 r1 a# N# G- f     SuperscriptBox[( z$ B  [0 o, W: y2 @
          RowBox[{"(", 8 l- ?2 a3 e# E
           RowBox[{/ N9 l8 T" z5 A" a! k  O
            RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    0 d9 D0 [; B+ k7 L9 j     SuperscriptBox[' h: l8 X3 r2 q
          RowBox[{"(", + |- e) S0 Y; M6 c1 W' [
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", $ m7 P& i7 f( X& N
         SuperscriptBox[/ q0 K" Q) m: U2 C7 p
          RowBox[{"(",
    4 J& t( E" n7 H- W       RowBox[{' Z+ `# k, l: b/ X& a0 G
            RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}],
    ) M2 B, E3 j- F8 g9 c) z    ")"}]}]]], "Output",
    ( ~4 d9 V: b1 P6 Z5 ^. q; S" S CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9,
    : K* l" S: m. a7 D" C! w" [4 a  3.577960815043248*^9, 3.578012221953125*^9}]& [) z9 J( j+ k8 }% G
    }, Open  ]],5 F& Q$ i( t2 {; @

    " M% Y4 Z8 H7 ?; {+ mCell[CellGroupData[{5 j/ `' h3 g  n" I9 e" F5 K6 g
    3 P& ?) M+ q: C: T; h0 j! g
    Cell[BoxData[
    1 |( K$ \; E+ K- b) c  o! Y RowBox[{"C6", "=", "Ca"}]], "Input",
    # o* R; U1 t2 y( _  M1 A6 v CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],
    1 |# D( W, z0 [2 o
    # m7 ~/ I8 I7 b" ~: F) W; YCell[BoxData[
    ( R0 n/ R0 f/ k, N/ d3 X RowBox[{"{",
    . C: Y, [+ k$ e9 f; p/ ]  RowBox[{
    ' u$ Z. G; }7 d8 C# l  "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",", - Z+ Y! w" v. E! U1 `; M) h4 r
       "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",",
    " e  y$ o/ C/ L& S6 i" Z   "0.494866`"}], "}"}]], "Output",# ~" q" j; I& @2 M
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,& L1 L1 l5 c: x6 @- T" Z4 w8 s
       3.5779608373044868`*^9, 3.578012227359375*^9}]
    + ]4 |  t) S# \& \% c' n  K/ O}, Open  ]],
    # l! _# e6 t1 P& M: p! D. ], _+ ?6 z, N# N6 U; f4 v' s* y' T: f8 p
    Cell[CellGroupData[{
    , I* L+ V0 v9 w( s% y8 M8 i$ A7 @) l  a: Z2 @5 N
    Cell[BoxData[
    : g2 a& Z% Z( K9 c- Q  ~9 o3 i RowBox[{"u6", "=", " m( a% A* \  o# [# q
      RowBox[{
    & F- H6 Z- O- F, r   RowBox[{"Exp", "[", 3 E8 h5 ]; g8 `5 h" c% G$ `  l
        RowBox[{
    - W8 D4 J/ h$ q4 X     RowBox[{3 @0 C* N% N- o: C
          RowBox[{"-", 0 u9 S1 F9 G: i2 B/ \
           RowBox[{
    / _- `/ _8 }; C9 H" r- R& T1 }$ Y        RowBox[{"(", / h6 U, y* |6 w; k( }
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 1 P" v3 q, X( z5 e& x- _/ R; H
            RowBox[{"(",
    9 Q4 M% b" Q5 e/ C: g2 q0 s& `         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    4 R  |* }8 G6 p2 @" ^; a" I     "]"}], "/.", "DeltaX"}]}]], "Input",9 O  X% Y. w7 e: m) _
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],
    6 J& J7 Y8 S5 r$ [& z
    . p3 F8 B9 Z! w+ f2 z/ HCell[BoxData[8 W; a( z) P% g7 \0 f4 d4 w
    SuperscriptBox["\[ExponentialE]", , ~0 L: i9 ?0 y
      RowBox[{"3.141592653589793`", " ",
    * k$ ?- Y7 f/ g2 \   RowBox[{"(",
    ' v" Z4 y: D3 x, A! [6 x    RowBox[{
    ( u4 t$ }4 U% W. b  }- w, U' n/ V     RowBox[{"-", ! F9 z+ {- t# L5 c7 f' V1 p
          SuperscriptBox[
    1 D% D' K5 y% z" W$ D3 h. z6 T       RowBox[{"(",
    5 V1 m; S! \* S; ?1 b        RowBox[{
    9 q  d1 X( {. X6 [9 [. i0 J         RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-", 0 {* ^7 T* h. t) W  c2 Z
         SuperscriptBox[& Q4 k5 j0 y: N& ~8 Y3 G/ z, F
          RowBox[{"(", ! d7 y' J: j0 I
           RowBox[{
    ! q: A4 ^+ k0 j+ I% t4 Z  l: s        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-", 0 V8 X$ |# Z2 J: G
         SuperscriptBox[# ]4 J, r8 h9 g! z
          RowBox[{"(",
    7 h6 M7 n& c% g6 k( t7 i       RowBox[{
    $ s1 C* k2 P$ {, B- J" [        RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-", / F3 m5 ~* g' S8 M% C" e3 m
         SuperscriptBox[
    5 r% j4 R& d  q2 E# I9 B      RowBox[{"(",
    ' r8 s: f$ u. ]' c       RowBox[{$ J; y2 s/ l* i& g/ S( F1 L+ `
            RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-",   ]' c3 Q) u$ W7 p' ~9 o. ]
         SuperscriptBox[7 P5 ]9 N2 z( h+ n( L
          RowBox[{"(", 4 c6 K- X, ~! ~) E3 p9 P+ f
           RowBox[{' ^; u3 o+ j% j: m, j8 {
            RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-", 7 \3 x4 i. ?% X5 F
         SuperscriptBox[0 x. H- H# u; _
          RowBox[{"(",
    # _( {  h8 z7 g  f* Z       RowBox[{
      o2 B3 w2 v9 V1 x# [! C' H        RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    8 K' p' d4 i& z1 B( Z     SuperscriptBox[
    7 T% ?; o1 z" `4 l. x      RowBox[{"(",
    . ]/ o! b6 Z% ^. i+ A       RowBox[{
    1 q7 I0 X2 c" z0 c$ x        RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", : A: s0 f1 N+ m8 e7 ?+ v( w
         SuperscriptBox[
    : k% `& s5 E4 w$ p: C! W. _      RowBox[{"(",
    8 P; t/ v8 O, g' S+ L0 F       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 4 B, Y* D% j/ s6 F, h0 w. p
         SuperscriptBox[
    + n8 N" q! O+ U# _! v      RowBox[{"(", $ C! f4 |# Q3 m1 k6 l/ I
           RowBox[{- [/ \0 M) e4 e' o  _
            RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ; r# t) W0 h% @( G
        ")"}]}]]], "Output",' s! ]% m1 F& Y. X+ j; `6 ?
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, " o. b: J+ n7 d' h. J# z
      3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]5 T5 B5 d  O# e% W3 i) b+ x
    }, Open  ]],4 v/ N5 }# S, a& x# P: D
    ! V3 H; F1 u" I, h/ R
    Cell[CellGroupData[{7 V. ~4 V0 e1 D5 h
    2 d* A3 C3 M7 p/ \- Z# J3 X* }- E
    Cell[BoxData[! G, l( {% C8 h+ ]/ \
    RowBox[{"C7", "=", "Ca"}]], "Input",* \* o$ U9 P9 _4 |
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    . H% e9 o$ d' t2 R, w; U% J+ K  3.577921316125*^9}],
    3 S# Y; C; @3 ~2 A9 c. x; I7 v" m
    Cell[BoxData[
    ' |: u0 S3 `6 `: n* W' s  G* R RowBox[{"{",
    $ ?9 `2 z- }- C& ~* c. @- U  RowBox[{2 U5 |- z4 i7 h. h+ F/ J" e% D
      "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",", 9 v; R$ S- ?: W- G8 y
       "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}],
    1 _; i% P7 o; X$ q  "}"}]], "Output",
    " N% H. |  l# c, Y CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    , k/ t6 \' o- o* U/ B( q  3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]
    & x+ a& U/ W5 [}, Open  ]],
    ; c) B% F0 W/ |) h% }/ a$ T+ i' a8 a& p; f& Z! G( K* w
    Cell[CellGroupData[{
    8 H+ u, D) ?  p( j7 t5 T+ }# R- S/ g* F* G
    Cell[BoxData[
    3 d5 L. `' r  V7 b) `# f4 ^ RowBox[{"u7", "=", * y  s$ a4 L# J2 p1 ]& I" g
      RowBox[{/ B1 O% s3 b( F$ u  q
       RowBox[{"Exp", "[",
    1 Z' ]$ D9 C8 ?; U7 A& r4 H    RowBox[{
    ; c, N" c& b) ~1 v     RowBox[{4 m  p. F: z9 L5 s+ D+ E
          RowBox[{"-", - W4 q. l: s0 _% g5 U4 o
           RowBox[{
    6 R" Y6 R! b/ ~* J6 t        RowBox[{"(", , y7 H- ?$ i- x- ?. M$ C! g$ u
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    . i4 u" X6 ^1 }9 T- X) r        RowBox[{"(", ; \, p0 ?6 G: n5 f8 N
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],! M7 w5 o% z, X- E, e
         "]"}], "/.", "DeltaX"}]}]], "Input",/ B% {; ]3 ?) L2 l5 l7 V) y
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, 0 u. I$ D4 P4 y* v8 C6 Y: W
      3.57792132028125*^9}],
    1 ^" _/ N& |- p; ~/ C
    # ~% F$ L4 W* {  Y, g$ S/ _% M) rCell[BoxData[# X% p+ k7 x1 ?
    SuperscriptBox["\[ExponentialE]", # ?1 _, R! y( S
      RowBox[{"3.141592653589793`", " ",
    6 F* B0 |5 s6 X   RowBox[{"(", 2 k3 u0 t  X  x# v$ |# X
        RowBox[{
    . e1 }7 N: V: N0 w     RowBox[{"-",
    " `. R- w7 z9 B$ a3 e5 F      SuperscriptBox[/ d) H& A, y# j4 T. L' f- e
           RowBox[{"(",
    8 t1 ^7 |# q. T) O% i8 E        RowBox[{, r8 D' o: d, t- k
             RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-", ' V, d: {7 L2 G) X7 [9 A0 T; Y
         SuperscriptBox[
    ; z' k% s; d" p1 N" a      RowBox[{"(", ' ?+ B4 M; n6 g/ R7 c( G* D
           RowBox[{
    . ^  B* q; E$ J        RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-", ( @# T5 v0 C( v" G6 w/ b5 @9 {
         SuperscriptBox[
    1 S' o# j* M  W2 a# O9 B      RowBox[{"(",
    " z; V$ g% t. h( I       RowBox[{. v3 s7 [; r" L# f  y) R3 U
            RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    7 d0 ?. S; H4 K- N, A# ?     SuperscriptBox[5 b# U% [5 i' u3 Y: E* S
          RowBox[{"(",
    7 w% Y1 J& j: o; y# F3 l  }& ~4 c       RowBox[{8 z: l5 X# J* U+ \* G) u% W* |, R0 K
            RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-",
    ; z! C0 D6 D7 M( a  F3 B! t" T2 O* s     SuperscriptBox[
    5 H* V5 {' f0 h      RowBox[{"(", * M" N( v0 z; Q; i# l* M9 f
           RowBox[{, o/ K! p- J* m- n
            RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-", ( M7 I5 ~! J0 a# @4 s. A' Q* R# B
         SuperscriptBox[" Q5 F" @7 P0 ~1 O
          RowBox[{"(",
    9 J. b: T) ^- M1 J% @       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ) B4 E2 p8 [) _  ]& s0 `8 R$ q
         SuperscriptBox[
    3 u7 x7 g, K, X* b. a      RowBox[{"(",
    * y" J/ ^- |1 L0 j2 k       RowBox[{- d# U; A# T5 o: R  D
            RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    ) c1 k6 }6 y, H& k7 P: S     SuperscriptBox[8 H/ M+ U& J9 v0 b
          RowBox[{"(",
    & o( A( H$ y. r; S& E: u$ p, [1 r       RowBox[{% R5 `  c: W& ]" U8 d( d" c
            RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    : H2 ~1 [. i; C% \+ d" p     SuperscriptBox[
    # P# l+ g) [  @8 c4 c      RowBox[{"(", ; X5 X1 E0 Q6 D3 B/ v* p
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], / e5 P4 x: l% O6 n" L
        ")"}]}]]], "Output",5 u6 o/ Y! V9 D
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, 1 C8 z+ j: a% x5 O3 z7 O
      3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9,
    + R. c/ E5 x3 P+ m  c* ]2 _) o4 Z; @  3.578012251359375*^9}], N6 I/ K$ y  y: X
    }, Open  ]],, l: t# O3 ]# p: v9 r5 B- E3 o

      P; p( F- d2 {4 @/ LCell[CellGroupData[{
    ' j; L3 }9 E% B6 [/ r/ t5 i1 g. Q3 }
    Cell[BoxData[
      v; u1 ~* V9 H' f! t2 S RowBox[{"C8", "=", "Ca"}]], "Input",* }+ S$ z. w5 W5 z7 e- P7 M6 s; f
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, : W. v: {& L  z8 N/ u
      3.577921316125*^9, 3.57792141421875*^9}],6 t# x  \# a' T

    3 f: _" a( O$ n+ o# _2 B/ l3 HCell[BoxData[
    $ _  ^+ C$ w& Q; S+ c: e RowBox[{"{", + b( \: Y+ d! w; r
      RowBox[{0 P; n- d) \0 l2 g$ n; |3 X* P
      "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",",
    % G+ ]3 W4 S" F0 E% D5 H   "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}],
    ) i. K# w& D% V8 R6 H6 _& C. s  "}"}]], "Output",7 e& b4 m5 ]# J8 J" y8 }1 N; l3 X6 W
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    1 n9 y7 R; C2 u( h/ A  3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9,
    4 m) A7 I! g7 D, L& z  3.578012260515625*^9}]' P! Y2 H: K) d8 ?2 i5 R4 R1 H
    }, Open  ]],
    7 J& p5 w6 Z8 b# {
    + k% p; m/ E7 o' m. W5 rCell[CellGroupData[{4 @+ Z2 m! X+ R
    ! Z$ v6 U, B9 B
    Cell[BoxData[
    9 }- a7 S+ k  G/ q" v* s RowBox[{"u8", "=", / u3 g+ k4 b6 w
      RowBox[{+ G3 L! @; x) D! r
       RowBox[{"Exp", "[", * O3 p& L$ _# T2 Q! r6 r8 D, X
        RowBox[{& e8 ?# O# |6 M( X) U
         RowBox[{7 a  m& E- E1 z( k! n* T
          RowBox[{"-", 0 Q" N, j% A  P$ [) R4 R6 P
           RowBox[{* L/ u2 E# \, Q' w! {/ e& V( t0 h
            RowBox[{"(",
    0 W5 d0 o* y( I         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", / c* A8 q$ h: c/ d7 A
            RowBox[{"(",
    ; ]& X" j. b% w. w' e. O         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],0 h6 }. u! J' r5 R
         "]"}], "/.", "DeltaX"}]}]], "Input",
    & L% c: Z$ [5 ^. e CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    5 x4 v- I1 g- D: O5 \( q  3.57792132028125*^9, 3.577921416921875*^9}],: n! j9 s2 h# r* V' f# h* y
    ; F6 e# ~% f+ m; ?. B0 X( C
    Cell[BoxData[! @& }/ d: ^3 x$ U. h8 L
    SuperscriptBox["\[ExponentialE]",
    * A, G" h7 S6 M/ a4 g5 r% E& o3 u  RowBox[{"3.141592653589793`", " ", 0 E% Q1 l6 S/ a
       RowBox[{"(",
    6 Y. y. g# R6 V9 ~- s4 ?    RowBox[{
    * U/ s; B+ I+ q     RowBox[{"-",
    / Q4 B3 t' q4 d+ |      SuperscriptBox[7 L: G* \- T' w6 z' ]) g/ [& d
           RowBox[{"(",
    7 m" k! U+ I. {+ x" R        RowBox[{
    , _% u  p6 c3 K- x! t4 f" ]         RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-", % r- `+ k) R9 E' t
         SuperscriptBox[
      e# W/ Q1 D, j' `+ e      RowBox[{"(",
    3 p8 D4 t. ^0 q. w# ~2 Q       RowBox[{( Y& _+ U3 J0 v& N+ m) w* [- R
            RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-",
    * c8 [9 p) C; U$ _+ g, L, F0 _     SuperscriptBox[
    8 ?( ~0 `, d' g! V+ V1 X      RowBox[{"(", 9 L# m& f+ t8 t* D0 ]/ T
           RowBox[{
    % w& I3 R9 x! |; w        RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
      \& {- V$ p$ `" y     SuperscriptBox[, V0 G/ C7 _4 U$ h
          RowBox[{"(",
    7 n+ v$ H% _# Q       RowBox[{9 _$ b! ~- I$ q( y" W" T% T
            RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-", $ ?3 ^$ l4 {1 [
         SuperscriptBox[
    . R5 U! y" \8 [  U* l) R      RowBox[{"(",
    5 L* `  ]# [' E- C/ f       RowBox[{
    6 S0 {" V3 q0 W4 V        RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-",
      H  R; R; p- ?4 O" f     SuperscriptBox[6 S2 f: u) U8 U3 _$ s. a
          RowBox[{"(",
    6 c! Z+ W# D/ X% t0 a       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ' t1 b7 R" Z2 I) |     SuperscriptBox[
    / `! e- l# U2 u      RowBox[{"(", * @" o7 c) B2 u; f8 _- X
           RowBox[{
    9 r: q: o# k7 ]3 \0 c% w        RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", * n2 q, L" Q0 D8 {5 [5 d/ }7 @
         SuperscriptBox[4 a1 O+ J: ?& l- t
          RowBox[{"(", + |9 [* {; _7 t* C  d# d0 V
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 5 D' E! q! [. g; l9 R* d7 ~
         SuperscriptBox[
    " [1 k$ p9 O" J1 z      RowBox[{"(", ; g; C! x) h( t( K' J
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    6 E# M9 r! w, z" z; ?( f. o' b    ")"}]}]]], "Output",
    4 p! w5 N, F7 k: ?  l( z CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, ( c1 M7 j/ A5 t7 G
      3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9,
    7 B0 `. C2 @' F* h* m/ ?  3.5779608945565863`*^9, 3.57801226165625*^9}]# r/ l) ]9 q( u2 Q
    }, Open  ]],+ X' c3 s. U7 s7 V% S  y/ P; G$ _

    # w5 \" ~3 C6 q6 q5 S3 MCell[CellGroupData[{9 C$ a$ i6 P4 w+ ^$ N) U) Y

    * W  F+ U: i2 Y1 l* Y9 {- _Cell[BoxData[
    * i" ~& B5 _$ o( | RowBox[{"C9", "=", "Ca"}]], "Input",% T# c5 f" d6 Z9 Q3 A$ k
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    " V3 o) |! B& u6 A  3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],
    * m4 V0 e# S9 V: W9 c6 m. F$ @
    - q0 d. s% M+ w' RCell[BoxData[. m+ O8 ?' N  L
    RowBox[{"{",
    + `7 p2 }* S" _0 g  RowBox[{0 [: r7 C1 x$ l7 r+ B% V6 O. S
      "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", 7 u4 }  y- Z1 w2 [! @" e
       "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}], ' U+ d, D: ]! P' u, k
      "}"}]], "Output",9 F. q3 z5 O5 W3 f7 k+ m1 _* |
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    ) l, f8 w- ?. M: D  w$ i$ \$ ^  3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9, 9 o4 s! K9 B8 V) l! S
      3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9,
      b$ `& ]( m) ^% |8 _0 n+ u  3.578012268234375*^9}]" {- j8 K+ @8 {( y
    }, Open  ]],% j: N( z( ]0 c7 H+ |
    5 f( ^0 \) O/ U( S
    Cell[CellGroupData[{
    ! r& [5 `: N, A0 ^
    ' M, C/ W# ^- R. iCell[BoxData[
    % A/ Q) n. V# Z8 R RowBox[{"u9", "=", 9 ?7 g3 L3 F) i6 U$ {" l2 H
      RowBox[{
    / R3 s! O" N3 \' I6 u3 M- }" U' I4 q   RowBox[{"Exp", "[", 3 Y3 C8 P9 i7 j
        RowBox[{6 ~1 r% i+ K, |: |
         RowBox[{- O4 d, ^$ E1 v/ R6 Y2 v- j
          RowBox[{"-", + y( x3 Q3 R" j% o
           RowBox[{
    . U: s2 T  F, O0 E        RowBox[{"(", : R; X( m6 n5 _+ g
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    / a# ?. t- y# ?8 @+ u% c+ @4 B        RowBox[{"(",
    ( V; ~$ G$ C1 t         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    5 j: @. O- f7 c6 A) y) u; B3 z     "]"}], "/.", "DeltaX"}]}]], "Input",8 `. [% O3 k9 q- q, @: }7 i
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    $ b$ J1 O1 Z( s7 l  3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],% y; q( ~2 ^9 C6 J% M

    2 G# d& a! ^0 |  zCell[BoxData[
    + q% C) Q- L8 @ SuperscriptBox["\[ExponentialE]",
    1 X7 h: p/ B0 u  RowBox[{"3.141592653589793`", " ", 8 \/ Y# p0 r0 W! D+ T; O
       RowBox[{"(",
    & I5 Q% K/ i6 D' F" V  k; P    RowBox[{8 F4 n  U3 D1 W+ E2 ^! ]1 `: L
         RowBox[{"-", ! ^. R0 G. d) ?$ b
          SuperscriptBox[, o& P* l3 X8 _& ^3 H
           RowBox[{"(", ( Z! q; J7 e* w7 W- g4 t
            RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-", 7 }) W/ J4 X8 C1 C( r& `  x! N4 J/ ?
         SuperscriptBox[5 s, J7 W0 l9 d( T2 Q
          RowBox[{"(",
      m2 Y6 b: t8 Y1 J( q9 Z* a       RowBox[{
      d+ P  _1 @8 r/ Q; Q, s  t        RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-",   F7 Z2 }3 [: B$ m" ^0 M3 J
         SuperscriptBox[( H2 k) f7 a4 O: s, S
          RowBox[{"(",
    8 h& W0 u0 N, e% g       RowBox[{5 E* q# g9 L  g; l9 X$ B
            RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    8 q: l4 z# f2 M* a     SuperscriptBox[, v' o. l6 V" D0 }
          RowBox[{"(",
    1 R8 @6 H6 S  j1 G       RowBox[{% k$ Z7 c) _) d( w2 n) m+ Y# A4 B
            RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-",
    / U6 w7 m/ h) M' V) ]! i     SuperscriptBox[
    0 p0 `7 i1 m$ Z/ t  i0 @; d4 w      RowBox[{"(",
    / b( p! n; }. Q6 |       RowBox[{4 E! r8 j. h2 [* {! J/ M. ^% _$ W
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    ) h: P% L0 ]; u9 D) _" o6 \/ F# n     SuperscriptBox[4 M2 F# j* }) z- @6 X
          RowBox[{"(", $ p/ }7 @. W4 [* P2 i" F
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    * {* _  h. o4 E1 b     SuperscriptBox[& R. x3 J5 F; I( ]9 I' T
          RowBox[{"(", % ?4 o) W( r3 t: W8 W5 ]9 X
           RowBox[{# \  b' r$ c. W! k0 B$ Q  u! m
            RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-", 9 M; J9 m3 ~* p7 r7 O$ y+ J
         SuperscriptBox[
    9 n4 l; y8 D- G6 w" D      RowBox[{"(",
    , Y/ a) W8 v1 O, c$ C       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ! D7 T  E2 \/ N) n     SuperscriptBox[- |# ^! s8 n# s7 G3 F" @: O
          RowBox[{"(",
    , u$ S$ o% P- _; h* c; C6 n       RowBox[{3 T1 T% Z$ F2 d: w# h
            RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], 0 x; p& j7 z. j+ \& l+ z2 b
        ")"}]}]]], "Output",
    8 @  y+ @( Q: A* s) W CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    # `* P/ @1 Q! r' n( |( [" Y  3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9,   [( T9 U; w$ `! r
      3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9,
    # K+ U5 z6 N! R4 g+ x  3.577961530421959*^9, 3.578012269125*^9}]. L  b, W1 }( n2 p& H
    }, Open  ]],6 K  k" t- R3 [- w. q2 d+ _. `

    & O1 H1 `# n2 B  ?Cell[CellGroupData[{
    / x( k+ E0 ]! g# h1 \% r+ ^
    # N- F! o$ Q5 L  r. f, R- JCell[BoxData[{
    1 C$ Y5 m! A2 ^, }& M RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]",
      m6 a: g( z: T4 o/ R  M) R( }" D RowBox[{"u10", "=",
    + g  w0 R  Z9 r  RowBox[{) W0 J9 K5 x) f: F
       RowBox[{"Exp", "[", % v; N; \1 x* A* ^. y2 Y$ U
        RowBox[{3 j6 a5 l& N* ?+ \/ ~/ j4 t8 M6 z, V
         RowBox[{
    5 }& v' X5 H1 c5 x7 D) n6 V" s      RowBox[{"-", " L( ~, J8 A* N' a/ }- n
           RowBox[{
    ! p' ?' p' v6 s        RowBox[{"(", ' J( W! t. g: v5 {
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    4 L7 x  ^3 c3 `7 }" j        RowBox[{"(",
    / G( ]+ C6 M+ W) V4 X6 k4 I         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],- R$ N8 B: T  L5 P1 \+ G% X
         "]"}], "/.", "DeltaX"}]}]}], "Input",6 T  g% j* K& C
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],7 i5 @! U9 m$ i$ E8 Z5 C
    $ G+ ^9 J  o) P7 }
    Cell[BoxData[
    9 H% T5 }+ V. y' }7 ^; m0 k RowBox[{"{", 8 d5 @6 v( c( k7 S* V2 H% V
      RowBox[{4 P+ _. Q% V' q! ^5 m8 k
      "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",", * r3 X" L% z* [; z
       "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",8 j3 O7 s, Y: w( }6 ]* I1 F, z! s
    CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],' Y2 X9 i; N' M

    2 e/ t! a5 T; P- C' W) kCell[BoxData[, ?* M/ w" x+ x2 g, N
    SuperscriptBox["\[ExponentialE]",
    2 C% Q8 y6 F- N) l8 W  RowBox[{"3.141592653589793`", " ", - }) \% D0 Y; E, b' {( Q" q
       RowBox[{"(",
    ! N( B3 y; J' Z7 v) J4 [  Q6 A    RowBox[{
      S" M$ D; O3 M) M$ i! X     RowBox[{"-",
    " h4 Z( _, M7 ^" k- c2 {& I      SuperscriptBox[4 s& k$ e* T; W" ^0 v8 ]
           RowBox[{"(",
      u3 w" O$ v. q2 a( p        RowBox[{$ E1 C/ l, j0 ~7 y5 f
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    7 Q0 q* y: P8 F, A1 I     SuperscriptBox[  ^$ O  f0 i" i- R! X3 W2 F
          RowBox[{"(",
      e$ U, g, b% d6 }" \) F2 `       RowBox[{
    ) c. P3 N  a1 u. w4 X, X, p+ N        RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-", + N) A+ [) }2 D' V% L% z/ h
         SuperscriptBox[
    2 M- x9 Z9 u" C) |6 ]# z      RowBox[{"(", ; T& O, X) F+ w
           RowBox[{9 o, j0 ~6 S/ n
            RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    * {* E% e8 l. p( r     SuperscriptBox[3 m/ \% X( p$ V0 @
          RowBox[{"(",
    - T6 x& r8 Q/ h1 ~       RowBox[{3 R/ t. u% ]1 K0 N
            RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-", 2 e. q( c9 i' W; g, o2 @% c/ G5 v6 [
         SuperscriptBox[
    - l: T* [4 h( v6 F8 a  r& J      RowBox[{"(", , p5 L; I& [' ?- u) L+ O
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", 9 |7 r0 W- \8 D$ x9 B% j% S; U" f& q
         SuperscriptBox[
    ! `9 N$ H; I. Z0 Q& I      RowBox[{"(",
    0 C! X: M7 o+ D; J9 ~7 h6 @0 B       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    * R) C( K$ e0 B( Z% k" m     SuperscriptBox[; E  w, J1 b4 ^$ g
          RowBox[{"(",
    ( w6 F  `7 K/ B; i$ _       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 9 \9 ^6 ~: ^4 m! t
         SuperscriptBox[
    9 n& t) z4 T3 o      RowBox[{"(", & [/ a" q9 F6 S, q! n6 n% x
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", : i. S% G$ O5 z+ |! o) V
         SuperscriptBox[9 d# ?$ v8 b' N+ {* D( P
          RowBox[{"(",
    ( j. R: t) z/ e2 ^9 a& ?       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], : I5 Y/ B$ Z! C  t8 R' y
        ")"}]}]]], "Output",
    - y  c9 D% S/ O6 W CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]) t0 H/ j# t  }: k: s% W
    }, Open  ]],+ t7 y- ^% q* T* p: K5 M: b: @
    & P/ s; {  q5 d8 S, y& h9 ~) A
    Cell[CellGroupData[{
    # I9 b5 i) X) C# j7 h! e# M9 ?" P1 J( T
    & f( E7 _: p& i4 ?Cell[BoxData[{6 c( F4 O( _+ S6 U& D
    RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
    7 c# O0 [; w7 b3 S RowBox[{"u11", "=",
    : E- S* w3 _6 A' {  RowBox[{
    . N( d) {5 @/ L! ?8 j   RowBox[{"Exp", "[", . y7 O6 g% C8 y8 d# [& D/ K) o# T
        RowBox[{
    & y5 k! i, e$ W$ T. Q8 Z     RowBox[{2 e$ n" p1 }6 D' R5 Q+ {
          RowBox[{"-", 1 h4 j7 ^3 _% g
           RowBox[{8 W2 U' a6 T+ @: |' d% u
            RowBox[{"(", : @0 t% d+ y& u, I% s, `( j
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", + ^2 r$ P% `1 i  ]( o; R7 c
            RowBox[{"(",
    ) {% m9 v0 {# A; O' C- n6 g" v* Z         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ! G$ X) m  h1 _7 x- e; {. U     "]"}], "/.", "DeltaX"}]}]}], "Input",! l% Q* m  A# {' A
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    ; H" u3 v7 A* i9 Z1 L- r" g  3.57796154237158*^9, 3.5779615434011817`*^9}}],
    ( \# b. W' A; g& v: }$ n5 l0 G2 V+ R7 p
    Cell[BoxData[
    " `, @3 X1 [5 s! g! j  x RowBox[{"{",
    3 Z% m  v% H8 n& ?+ T0 j  RowBox[{2 T4 G( ^7 `% M# `* @& F
      "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",", ) B- O3 t8 u/ H) S% h" ?& p) T8 [
       "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], " u& N, C3 a, Z) ~/ y
      "}"}]], "Output",) A# |8 d3 L, R1 [3 l
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    2 A$ L0 ]% g4 j9 O! D  3.57801228203125*^9}],
    ' D) K6 t- e1 ~# j+ T# S6 A" C
    ' G4 g! M1 d! m, @# J- a: b" N# tCell[BoxData[, Y; C) _4 n% B  R9 `
    SuperscriptBox["\[ExponentialE]",
    / Z$ r) T, X# ~% \" Y  RowBox[{"3.141592653589793`", " ",
    : u' P1 y% Z: T* t" k2 z9 d* Y   RowBox[{"(", 1 O( r) O7 J# g1 ~
        RowBox[{
    , q: `8 r6 \1 c, t4 W  l     RowBox[{"-",
    1 a2 G8 M( K# d      SuperscriptBox[
    8 f' T% D, e$ e3 n; n, m& L/ p3 ^       RowBox[{"(", ; m6 |% }) v# B" F. q% n. j
            RowBox[{
    / b) @4 a0 C# w! l5 n3 |- B1 U. t         RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-",
    * W9 I6 L# e- D     SuperscriptBox[
    - w+ p2 ]8 o  R: e      RowBox[{"(", ! Y. _) f! _% t1 _! h0 X# H
           RowBox[{
    % p) {' T8 Q. v        RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-", / E! y/ b7 J$ d2 p- p  T7 F
         SuperscriptBox[
    % V1 n( M% m1 j4 C6 f7 g3 e      RowBox[{"(",
    % e1 `8 g5 R2 `" z       RowBox[{) W4 m- p+ |! g; t; x7 j
            RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    ; Y6 T+ J, e% T& t/ u8 Q/ j     SuperscriptBox[
    & A9 j- ^1 ?/ S1 f      RowBox[{"(", ' H5 K3 ]1 ]# x2 o" H2 J4 c
           RowBox[{' S6 w) t! x: t' |2 P
            RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-",
    / _& ]1 H% t& v) ^& E4 c5 s2 A     SuperscriptBox[
    0 ~% O0 k0 B6 h      RowBox[{"(",
    9 `; h3 m1 a0 j9 J       RowBox[{" L* @6 n1 M6 a
            RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    ( F9 E; y: D# C  I$ P* }. ?4 G     SuperscriptBox[- u4 P! Y# V8 D$ Y$ c
          RowBox[{"(", " c  b, A) P) J% V6 H+ b8 z
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    : c3 B! h3 C9 A9 m& G( \+ @, E     SuperscriptBox[$ j% w7 G5 ?0 U; i3 [
          RowBox[{"(", 6 o4 D- Q3 `  R0 ^6 G( T, L
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    * y' R7 v0 }2 q% L- R. i" U     SuperscriptBox[
      ~/ {6 M/ T. ?, c# ]      RowBox[{"(", . L5 z$ W! I, e, k) ]8 e
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    3 h- H9 q8 {2 k3 i0 L     SuperscriptBox[
    . I$ Z( G0 B2 g      RowBox[{"(", 8 p+ c' D2 ]( K  }4 B) P9 Q) s
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    # `) \0 u5 C, v- M    ")"}]}]]], "Output",, s, J. q9 ?: r% I0 M! w( e7 K( }
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, 9 d& X: [  e" E9 m
      3.57801228203125*^9}]
    1 ]( m9 h! t  v, I9 ^. I3 }}, Open  ]],
    $ R, r. F9 k+ h$ W. b
    4 r* L" ~  k9 {/ fCell[CellGroupData[{7 Z7 ^! h& s) m# c" M3 d- B* M3 x

    1 P: C1 e: X( D7 N; |! o, D! q  FCell[BoxData[{
    / p1 J5 X  {; D" U7 Z RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]",
      ?$ W' K0 U4 A5 |$ M; m$ X RowBox[{"u12", "=", - H) Q$ J! B% `4 H
      RowBox[{
    8 n4 `  \5 }" P' q   RowBox[{"Exp", "[",
    4 h5 C- d  }7 t1 y; u& t, e& j4 ^    RowBox[{
      q5 ?! h* R: z$ w; }6 P% p( }- p     RowBox[{
    / N8 H0 D& E$ v! a4 A5 O6 o: r      RowBox[{"-",
    ) `3 ]& c9 t$ E$ N* m# W       RowBox[{
    3 `) u5 j$ {$ C; |        RowBox[{"(", % H* J) ?4 Y+ H! Y7 z( n3 l
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 2 f6 Q3 {( J, k8 X4 G0 g4 R
            RowBox[{"(", 3 Q, K4 h4 p' f* J
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],; P" m' X. [# ?% {2 n
         "]"}], "/.", "DeltaX"}]}]}], "Input",0 _7 p) Q- [+ p5 K
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {- J/ S3 z3 U1 I/ Q- [
      3.57796154237158*^9, 3.5779615576284065`*^9}}],
    ! @8 k9 ]/ q2 q/ W! U7 o9 x! Y" L0 m% d8 y* _% [4 R1 G) w
    Cell[BoxData[
    0 G1 i8 W# C0 K& Z RowBox[{"{", 6 w+ M$ W; v( g% P$ I7 F: l$ O
      RowBox[{" v3 c9 F+ C8 W9 D$ Z
      "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",", , d1 x' E" ?% R8 k# W
       "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}], 7 w0 ^7 X6 P: D, H& g) @8 {
      "}"}]], "Output",
    * i! x0 u2 ~; g CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}],  p  \( H" c* V* X  I8 M

    ' k  O) P0 D3 C9 i7 m6 gCell[BoxData[4 Q' _% d2 d/ a
    SuperscriptBox["\[ExponentialE]", " e4 c9 P0 D- B* F' |5 A8 X
      RowBox[{"3.141592653589793`", " ", . G. ^3 ^) U- {8 \% k
       RowBox[{"(", ( z$ w3 C9 R0 g" w1 M
        RowBox[{4 E3 H) x2 H0 R! c3 z5 ~' q8 i
         RowBox[{"-",
    4 {- F" f$ y  \7 p' [. I      SuperscriptBox[) T- V2 w# j* o' e3 q1 P# _
           RowBox[{"(", * _* K0 R4 j, v
            RowBox[{
    6 y4 C4 _  _  E% o         RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    . W* `6 O6 ^6 Q5 l7 A0 L" y& q     SuperscriptBox[; ~0 ^# }) s: @; k/ T. F7 H8 g
          RowBox[{"(", , T8 b6 Q' C( D6 J
           RowBox[{& R7 {# B0 p1 P& ^4 A; c* h3 J3 y, D- N
            RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-", # q/ T' `' D5 J
         SuperscriptBox[. o" u% \' {1 i4 a6 c3 o
          RowBox[{"(", % ?8 u' Q! G! Q0 _, q
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-",
    ! X/ D% @" N, {$ I     SuperscriptBox[% G: ?4 q  J" X- `5 z# {2 ~7 B
          RowBox[{"(",
    , @% q$ h: p( ]7 t, I7 {- q       RowBox[{
    & i; D6 E' n4 x; |; W9 u6 A' \        RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-", 9 N0 a/ ~- Y4 T
         SuperscriptBox[
    " N3 f) X! S* P# o      RowBox[{"(",
      |* x- v! u/ }4 k       RowBox[{
    . [3 p$ l5 _0 V! c4 r5 w) |7 G- r; Q        RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-", " d4 H1 f! y+ `3 m, ^: M" t) a
         SuperscriptBox[
    5 \: H) S( T  a7 x8 M, U3 Q( u      RowBox[{"(",
    8 l- a0 U( z0 I" z. N  F       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", " H4 d# w- D1 q  c- q
         SuperscriptBox[+ \( C9 [, ]' r; ?0 Q9 P1 D& \: Y
          RowBox[{"(",
    - K1 R8 ~6 z* J/ V+ t       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", * @9 P. B# b) e" M5 R" [3 I
         SuperscriptBox[
    7 G; }3 A: O5 i0 b      RowBox[{"(", + n$ x& Y8 }; ^( B  g8 u
           RowBox[{
    8 i3 F- M1 A7 [" h9 X        RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
    5 I# l* y) m0 A- O     SuperscriptBox[
    4 r0 A% u/ K2 q! o      RowBox[{"(",
    $ R8 T% C% H2 z       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 5 f. y2 c6 @* @* k
        ")"}]}]]], "Output",5 N! b0 f% p! P4 i
    CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]6 s" h: L5 N* H$ J; d# a7 `- i
    }, Open  ]],
    & ~5 \2 V& P; Q
    ; r; b. w* o& FCell[CellGroupData[{1 J; x! y8 L1 Q
    0 o" A5 o7 v$ P1 W  Z
    Cell[BoxData[{4 i( X. _) {4 w, l, U- [/ u  Y4 M
    RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]",
    4 t1 Y5 Z7 m$ X' ]: m' L RowBox[{"u13", "=", 6 n7 A/ w- \$ A/ B: A3 D6 ~% i
      RowBox[{* R3 a1 r& N0 i, ^
       RowBox[{"Exp", "[", ( u# r% k8 p& P* E2 ?
        RowBox[{
    3 x8 U/ h% g7 c3 {% L7 ]     RowBox[{
    + E& S* Y7 d6 k1 k      RowBox[{"-", / w! S* [0 I& ]) W& |8 w8 w6 c
           RowBox[{
    8 Y6 R; K( B  N- @        RowBox[{"(",
    ( x/ C: @8 {. i% Q3 F: A4 E8 @8 Z4 t         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ' _6 E  u+ P" k4 s
            RowBox[{"(", 0 X3 F# Y9 Z# H" M8 N# u4 t
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    4 Z9 L4 u. Y2 M     "]"}], "/.", "DeltaX"}]}]}], "Input",
    6 T8 |( ^: E# X1 S$ H CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {5 R! I# o, M5 t3 E& ]' B
      3.57796154237158*^9, 3.5779615599684105`*^9}}],/ O! |5 e2 ^- g( d6 K& U3 b% B
    * B, |8 ]5 H3 q8 A
    Cell[BoxData[  f0 I5 _9 ~8 B; E2 w
    RowBox[{"{", 8 f0 z3 p; I+ x
      RowBox[{$ q" \  |; Z  W6 |# @* n
      "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",", ! w+ W7 ]/ _3 X; G# [$ Z3 l/ D
       "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}],
    $ f8 x: x. S* o, C4 d5 `7 G) c4 y  "}"}]], "Output",
    7 s5 Z. B5 i+ x* J1 Z  t; e1 O% ?$ q CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],; C+ ~9 c5 g/ x7 R& q. x

      f3 z& f/ F  DCell[BoxData[
    2 C: R3 {" H: \& L4 j SuperscriptBox["\[ExponentialE]", - V5 \3 h% Y1 J1 u* t) q; Z2 c
      RowBox[{"3.141592653589793`", " ",
    " ^# I) x( t" e4 j% U! }   RowBox[{"(", & e8 i4 @# ^$ {/ E" l4 o0 S; a. O
        RowBox[{
    ' P# b: [! o: h8 b! T: H     RowBox[{"-",
    / G4 u' V' n( V8 A$ |9 J      SuperscriptBox[
    * j  T9 k4 n( @- Z       RowBox[{"(", # L% \6 D" ~0 `/ ^* @9 O. j
            RowBox[{
    4 N4 h  e$ h+ r5 ]' U         RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    . ~5 t! v* g; P. U$ u6 d; U: t     SuperscriptBox[
    ! |0 c" U& U+ G2 P9 |! {; {$ M* N      RowBox[{"(",
    2 Y: L  r  R6 S1 g2 @! c  ^       RowBox[{
    3 L( c( _3 L/ D9 i        RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-",
    " t  p! y& [3 p     SuperscriptBox[
    2 c* F: O, l4 j# L" U: a7 E      RowBox[{"(", ) R: l- g  w! V# U
           RowBox[{( B5 o7 e& a$ ~% j2 r- }
            RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-",
    1 Y4 z- `( ^) u     SuperscriptBox[% Z( [: b, _2 d4 W9 f& |
          RowBox[{"(",
    : B0 h# G( k( R/ Z* y9 A# _  U       RowBox[{
    - c5 a3 T3 \; Y, d, o        RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-", 1 b' C' ~5 d! W4 w6 W
         SuperscriptBox[
    - J1 r! O  f" d      RowBox[{"(",
    ; u& W; _' A* k3 w& V( P4 {       RowBox[{
    * t$ E( d6 _! W        RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-",
    , T0 i, Q' [$ t6 y# {( C     SuperscriptBox[! c+ q: [* r; }# ]7 E
          RowBox[{"(", $ P/ n6 u/ d4 Q- ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    % }* v9 q! j5 h6 k9 p7 j6 D     SuperscriptBox[" y0 X4 ^0 |# n' H$ p: n& N7 I
          RowBox[{"(",
    , n9 H2 Q, I9 r       RowBox[{3 i/ `6 T; a$ x9 O! u5 U
            RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", & v2 B; w, ?- U# H! r
         SuperscriptBox[; X- y* C& o! S4 E
          RowBox[{"(",
    : T* `0 i- D! k; {7 S       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 6 T/ a; x& I) _
         SuperscriptBox[
    % V3 ?5 g: G$ H( B      RowBox[{"(", & e& g; i4 B7 X
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],   t) i9 {# a" |! [
        ")"}]}]]], "Output",! Z2 X4 J) w8 j' @8 k
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]6 D! x9 i$ }4 F/ d3 N" B2 [" }
    }, Open  ]],
    % a+ p5 B% l, S, z9 A. [$ x3 D3 F) q5 o! K* H3 B  U
    Cell[CellGroupData[{" o4 J$ _7 S( w- R/ L8 i

    + M4 ?/ s( ^9 e9 j1 L4 z) gCell[BoxData[{5 _- N- U+ w% |) Y0 [
    RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]",
    - r# P+ M* o2 S+ h  `1 @ RowBox[{"u14", "=", . x/ F  e6 x7 C0 ?' z% c7 b
      RowBox[{
    6 [4 l% ]( z! G3 @) V   RowBox[{"Exp", "[",
    , V0 Y. H9 H  `# j4 E  l  ]$ [    RowBox[{
    1 l1 a, F' w- f: ]- N& m     RowBox[{! c" `/ p2 P! N# k
          RowBox[{"-",
    . `5 N; T* b4 {* \: Y       RowBox[{
    : Y, o8 t: ^, q8 q* X+ ~, q( V8 W        RowBox[{"(",
    7 m' N, l% p/ s( j) k# M) k' p         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ) w: s$ ~% d4 P- K+ `) F- E
            RowBox[{"(",
    - t+ E" U. G( C, c6 Z) p, P4 M         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    7 F# s9 ]/ V$ _: S; |- J  E! ^     "]"}], "/.", "DeltaX"}]}]}], "Input",
    3 l* ]' F$ Y+ c" x! u4 J CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {' p5 W2 ?, ~- H; g' v9 ]
      3.57796154237158*^9, 3.5779615663176217`*^9}}],
    * `2 G4 R/ s9 l, Q
    : @% y% e7 ?9 Q$ |Cell[BoxData[
    # ^- o, r+ S6 C RowBox[{"{", " n) m) U8 H" l$ V3 t- a( @* M+ u
      RowBox[{: a- z  N+ `3 G4 I
      "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",",
    7 X7 q/ p0 q6 p- ]$ s   "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    ) n' w1 S! E: w( q3 z) c/ ?. x) H  "}"}]], "Output",
    " D$ F" Y) `+ I/ [  n CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],8 K8 b% }2 M# M
    , a6 w) K8 B. {! K& ]
    Cell[BoxData[
    3 N( R( h7 u9 P& R SuperscriptBox["\[ExponentialE]",
    * U0 j) }% I- w4 H! E  RowBox[{"3.141592653589793`", " ",
    2 o  `! I- j, a& H, u. d: z8 L   RowBox[{"(", $ r8 s' T& V% ^+ X4 j
        RowBox[{) B, s0 r# j' \- c0 @8 H( o2 d  V
         RowBox[{"-", . |! }2 d6 h% I! r
          SuperscriptBox[& D0 A5 a# [" R+ ?7 @& }2 c
           RowBox[{"(", / {- S2 {% w) m
            RowBox[{% \" f0 w6 [) R  e/ U, q
             RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-", # Q4 ^/ l# |9 t8 |" l
         SuperscriptBox[$ V: |1 c' p6 R! A7 @- f
          RowBox[{"(",
    ; g2 L3 t  @6 O/ b       RowBox[{; F) B' o& T: U/ l$ e! v
            RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-",
    7 j, P$ `( Z$ A0 d; I, {     SuperscriptBox[- D# D  U, S3 X3 J6 H
          RowBox[{"(",
      f4 K7 {4 O# h! `       RowBox[{
    & e$ m- E  `, I        RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", 7 K7 j" G7 i' H$ B: ^& ]- \, \
         SuperscriptBox[+ l6 v' \. F# W* K' z
          RowBox[{"(",
    % p1 @# \9 x6 c+ m' s1 l0 _       RowBox[{
    ! l2 B( S! ~  C3 h) S$ T        RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-",
    # Z9 l6 i' z& R$ m* J& D     SuperscriptBox[
    / w/ y7 O0 R4 E- q, {      RowBox[{"(", - n' n( L  H& r0 j8 G! _
           RowBox[{
    $ ], e2 {& B$ ~( D* ]        RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-",
    & E5 g& Q) _2 U     SuperscriptBox[/ \+ t# @; f6 q5 N2 ]: F
          RowBox[{"(", % |5 R' @4 U5 ]. R. o1 L
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    , w2 y% L% u6 N/ G0 A8 p/ x; S     SuperscriptBox[& S1 @* E/ I' z2 A  x8 u& ?; F
          RowBox[{"(",
    2 q1 K% ^) d8 K& `/ ^% l- Q( Q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ) \; r+ ?* C% T( F     SuperscriptBox[- ]' O1 j# N3 g( w8 Q; y5 J. r% ]
          RowBox[{"(", 3 E7 h6 h' |9 S6 {: I
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ( \+ _; O- J8 T5 x3 n     SuperscriptBox[+ q6 Q4 L. n2 r, V( \+ m
          RowBox[{"(",
    4 A, k4 _6 X$ y; e% k       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    $ ]) r- I6 W8 [* ?" A    ")"}]}]]], "Output",
    % O, S$ F% c3 T' H CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]4 G  H- V4 ~/ G- S
    }, Open  ]],
    0 |3 k6 k; |- g
    % P7 q1 N! C  F* S* y: @4 bCell[CellGroupData[{
    7 F2 R' K  y' @5 F+ {- e7 E8 G  w. `, S
    Cell[BoxData[{
    ) {# K, b9 X6 u1 v RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]",
    # ]! c( X. j0 {7 e RowBox[{"u15", "=", * {" O6 v/ X" V( L& f/ f
      RowBox[{) x; h& G! a. _7 I% S
       RowBox[{"Exp", "[", ; c- k& l7 S' d7 \# Q6 U  x! u5 B
        RowBox[{
    / o! _1 X* g# i; T4 \: |& ~     RowBox[{- {: b  {$ v- u+ L2 e( W7 `) ^( ]
          RowBox[{"-", % i* ?. D5 i. g
           RowBox[{
    1 J2 j( T/ H' z        RowBox[{"(", 0 T, A8 R* [7 H" n
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + h) ?4 i4 t2 O% K        RowBox[{"(", * T" C# q7 |+ v9 O
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    $ b7 n8 X9 Z( a) o3 H) R     "]"}], "/.", "DeltaX"}]}]}], "Input",! E9 ^' P% Z/ [1 f: ?5 V6 d# O" D
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {' _( k9 x: g  V5 p  }5 w7 ?
      3.57796154237158*^9, 3.57796157098203*^9}}],: U& Z) M2 [+ K$ s: l7 k  @

    2 v. x, P/ b/ u$ L1 j7 ECell[BoxData[$ |. r0 `: Z+ N( D
    RowBox[{"{",
    , n  P  v  N! |- J. g/ ~  RowBox[{6 |- X6 u4 W; C! ?6 \# N
      "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
    " W6 o  P4 T$ g$ m1 W8 q0 R   "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],
    ! p$ }# l# e/ C, Q, s9 v  "}"}]], "Output",
    . O7 K3 Z6 e' [& j CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],
    + h: o* |/ h( V. f( U  r9 x9 _' D! n, Y5 X2 B' ?
    Cell[BoxData[
    ) T+ W! [" C+ r4 |4 b0 I SuperscriptBox["\[ExponentialE]",
    * a# B9 V4 {( H" b, v% f2 [  RowBox[{"3.141592653589793`", " ", # y+ o& A  }! g4 G' Q
       RowBox[{"(", " Q; P$ t1 B) z
        RowBox[{
    8 d5 C9 E$ ^+ }  Q; J: t     RowBox[{"-", 6 B' B- F9 ?" z. P2 }
          SuperscriptBox[
    3 I  A6 D! a: H3 u* t$ L       RowBox[{"(", " @* l% S+ W) @' {- a2 u0 I
            RowBox[{
    0 B* `) h& q, J2 @0 X- M) [         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-", . h1 e* C9 ~' k# X9 e( u
         SuperscriptBox[
    9 p% b  K- B7 k% g8 D, @      RowBox[{"(",
    + ^+ n1 t; k+ i! l% F) y       RowBox[{8 C' A& b0 F" s0 [
            RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-",
    6 |/ a  |& L- U$ u8 ^$ Y     SuperscriptBox[8 }1 f0 W; R" d. V6 Q3 D
          RowBox[{"(",
    . L' r5 j' V9 I8 ~* K( I# F" u5 v       RowBox[{3 _5 y5 E9 h/ ?$ l: e( D
            RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    % K8 @* u. B- N8 @7 u     SuperscriptBox[
    + m& H8 L8 m6 n      RowBox[{"(", 0 `0 B+ `- P2 Z* i2 A1 T
           RowBox[{, z9 d; \+ w0 B+ Z7 X/ X
            RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-",
    1 l, `1 [8 x/ o, p' s% T) L+ g     SuperscriptBox[
    7 ^/ A; F. A% }      RowBox[{"(", 7 x+ O& @1 W; g6 s2 O8 v# `
           RowBox[{
    ' W+ D0 w. c4 i! y        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    ' |3 e6 r6 A4 e6 J# C8 r     SuperscriptBox[
      t' G9 ~& `8 ^7 m      RowBox[{"(",
    & R' c1 U% b8 c* S2 t2 s, v       RowBox[{" c7 S3 q- V! |3 H2 J# A
            RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", % v8 m! |. ~% D& p, ~* y* E# }1 ]
         SuperscriptBox[
    " G2 `/ T/ X, c4 ~, N7 w) y( R      RowBox[{"(", + Q2 [) L# H1 `1 ?* I
           RowBox[{
    8 s* }+ x8 F$ C9 x8 |        RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", 7 W- r. |' n& ?- J
         SuperscriptBox[: |9 v9 F6 Y1 b. m
          RowBox[{"(",
    / L  p4 u$ o; A8 m( \. W& s; e1 g       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    5 E1 O3 [$ u5 n% r6 O7 ^; T0 H     SuperscriptBox[2 ], p1 |& V) t" v
          RowBox[{"(", ) s/ H8 V: W; _7 l
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], " A) t* B# W6 f4 k- }
        ")"}]}]]], "Output",
      E, o' y% u/ r! t) B& l CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]
    $ \: U: V1 Q; E/ e( f, f2 J! \$ T}, Open  ]],4 i6 E8 [% p( `/ l1 N. t* }
    ; R# A, X2 r0 q! z* P1 c: f4 `
    Cell[BoxData[
    ; M) ]! `1 j' U2 L  A, z8 [0 _+ ]) L. n RowBox[{"For", "[", # W: `2 S) H: b) H  v/ b9 K3 K* O
      RowBox[{
    / R8 g0 G* z. M5 _, t6 l  K- t   RowBox[{"i", "=", "1"}], ",",
    . d$ w  h* N, ?+ u/ j* l   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    % v, E5 X$ |% y3 Q7 l9 Y0 N. _   RowBox[{"i", "++"}], ",", ( V2 l5 m* D0 \3 o* u/ M
       RowBox[{. V. ?2 M  [" u+ O5 I4 m; P
        RowBox[{"Ca", "[", 6 K) J/ q* {# s# [
         RowBox[{"[", "i", "]"}], "]"}], "=", $ j4 K/ ?8 O9 G. N5 a6 c/ ]" P: U
        RowBox[{"CM", "[",
    , B, ?2 D; P" J; }, p5 O! z% |+ c     RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",
    5 Y( i% U! y1 v+ _ CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],: `$ ?% S; K( U- u4 s/ e

    4 D( T% B8 c2 c, C, G  d" GCell[CellGroupData[{' i/ X# f. b. G; ^8 c5 ~- ^6 k

    / W7 g! [5 Q3 V& wCell[BoxData[{7 U& w6 d2 \, s  @1 u& R
    RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]", 3 q9 F  A/ _  y/ j' M9 }( t! _7 `
    RowBox[{"u16", "=", & F4 C% U1 V, ]+ r: k
      RowBox[{8 W5 a- s# }# b7 i7 A: t
       RowBox[{"Exp", "[", - c' w& ^. m) s4 O
        RowBox[{
    - s7 p8 Q0 B, K$ p! Y% ?     RowBox[{& D6 r* J3 a+ v, y4 ~& g
          RowBox[{"-",
    1 \  T0 t) G  J       RowBox[{! E2 M+ ?+ {* p( z" k" V: R! P
            RowBox[{"(", # K+ O! x) k% A+ d4 K  R8 B( Q
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ; `& M1 k9 h( Q+ _
            RowBox[{"(",
    8 B) @5 m: G, T( N1 g4 o5 \. e  Q         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ m$ t  k+ I, r0 T
         "]"}], "/.", "DeltaX"}]}]}], "Input",4 i/ n0 `6 y8 z) i
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {) B# I! l9 t4 o, }) y3 S6 a- _! n, ?
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9, : Z& U: I# g) D  S/ w# @
      3.5779615751004367`*^9}}],8 L: c8 B8 _) p- Y, t3 V- ?# j, k

    8 @+ B, J6 ]! `Cell[BoxData[
    7 W% A: p0 Y5 Q RowBox[{"{", . S! Z2 z' e+ s# t& s% j* a' w
      RowBox[{2 i3 }( t$ K, y" f& }" R
      "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",",
    - ]) v- O, r" f   "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], - a" `5 p; R! p' p5 n: G. R
      "}"}]], "Output",. |1 K4 T# s, T5 X# V' M1 r: g$ s- D
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],' m' H! Q8 h9 G

    $ d$ e9 m& ~& q; D6 x/ dCell[BoxData[
    & G$ A% |5 A2 T& { SuperscriptBox["\[ExponentialE]", " g0 E$ G! B  j6 j& B% {
      RowBox[{"3.141592653589793`", " ",
    ) U$ ?2 Z2 D9 ~. @- E# G   RowBox[{"(",
    $ e- d' t. ~. I- s/ ?; K: L    RowBox[{2 y# S7 _0 c+ {8 R9 m
         RowBox[{"-",   S/ n; W0 V; R
          SuperscriptBox[
    9 h9 r4 q" v" U) N" _7 ^       RowBox[{"(",
    # D% ]5 ]/ ?$ U& k9 {        RowBox[{" x: E, b" l/ \
             RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-", 6 \9 P5 U# d: C0 A5 i  Z8 l/ }
         SuperscriptBox[
    8 R% d5 V6 H8 n: o+ v      RowBox[{"(",
    9 \: A2 F( P" B5 L, U6 D6 [2 O9 e: R/ R       RowBox[{
    3 T2 N# v, ~6 X+ q4 c' j2 M8 f3 Y        RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-", " I/ D- B- z( t8 P$ E
         SuperscriptBox[+ ^" J" A4 k; Y+ i/ @
          RowBox[{"(",
    * \- @7 G# [5 x* @       RowBox[{' @; ?$ s3 Y4 Z( k
            RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-",
    3 j# e% T" @( e& K$ L9 o+ P/ F) d1 U     SuperscriptBox[
    % G( b" m) X- g9 i& _      RowBox[{"(",
    ( {2 q* l, K" l       RowBox[{0 h& U# l" s7 j
            RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-",
    , m+ A5 T" n& ?5 ^     SuperscriptBox[
    / x! t# I* q# w2 r0 x1 x3 T8 l      RowBox[{"(",
    $ S4 L2 y0 ]( k       RowBox[{
    # @0 j% k6 f; v! B' M        RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-", * t0 _: z8 z" L6 i
         SuperscriptBox[' T  v- d1 f) f" R
          RowBox[{"(",
    2 c; ?; D$ E1 _. J2 c$ a6 H" l. t, J       RowBox[{% {! P3 t5 D: _% {
            RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", # M' ?& L! j0 G2 f' R/ i1 _: b
         SuperscriptBox[
    , P8 @- ~& _4 o      RowBox[{"(", ; C7 w. }+ j* h& }0 u" y+ t( R
           RowBox[{
    . p1 h) r0 [/ L8 _$ I, X        RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", & e4 Y. Z; K/ F5 c0 c
         SuperscriptBox[
    1 Y( G- i9 Y( j' {: Z2 M      RowBox[{"(", : y) z. `8 ^. Q3 z: }; M1 }) _
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 5 y- \/ {% G2 h
         SuperscriptBox[, i9 A! L$ ]6 c: b% j
          RowBox[{"(",
    4 g; I" h, G& D# K' w) T       RowBox[{
    4 |1 r- A! ]7 }! a+ b( L( s9 [        RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",
    ' b  U' c' Y1 [4 B CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    ( Q+ \& D% v' n& F+ u+ Q- ^}, Open  ]],
    . A3 G' L5 y. B( I
    5 J+ a# d& j! G% Q3 k! h, m0 N9 QCell[CellGroupData[{
    ( A, _: ^5 ]5 F' w  \. J% o# ^: e
    Cell[BoxData[{# d% P# C2 T- z: s4 \& J
    RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]",
    ' z; P: e4 |( H8 R' v# i RowBox[{"u17", "=",
    - [4 s5 ~5 b3 o6 a: ^( q  RowBox[{
    2 O' \0 p% v; m3 W2 R* W) A   RowBox[{"Exp", "[",
    $ p. d% m) _) q* d7 N+ n- n2 S    RowBox[{
    6 x+ `1 M1 D3 H     RowBox[{5 `' Y. |2 R. C
          RowBox[{"-", & G3 h5 [: h3 T! I: o! b) s
           RowBox[{
    ! _' K% g4 \2 @0 p, r9 ^* A        RowBox[{"(",
      C- s0 l9 `! C/ M         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", / F2 O& l1 y  s! ?
            RowBox[{"(", 5 l& f1 H# k( ]& Q
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    4 a/ j: i* t6 K6 d1 s4 T/ n/ J     "]"}], "/.", "DeltaX"}]}]}], "Input",( k0 v4 B& }0 e7 [
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    6 C' E+ ^, d. S+ E% M# l# p: [  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9,
    5 }2 U5 g7 c. q! U' s3 [- @' b- w  3.577961578953644*^9}}],/ |7 O6 X& e* x% O4 A/ q4 C
    # d) z) [9 \% X% p/ J3 U
    Cell[BoxData[
    & F( O7 i' N, w/ D/ U& u$ h RowBox[{"{", + e( {2 P) w+ e8 h& K$ J' m2 l
      RowBox[{
    1 A( s7 U1 E* c6 X6 G  "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",",
    7 _% L4 t7 p. {/ G# x  }   "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}],
    * s+ `2 F( Y6 W  "}"}]], "Output",
      x" l& n! ]2 D( Y  m4 G# F/ h CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],
    ' W; N- _. I% i# c! y* H5 p' h' z" P. M$ ]/ [5 K7 j+ t7 ^
    Cell[BoxData[
    2 W# l: `7 [8 ~' S' {+ B SuperscriptBox["\[ExponentialE]",
    9 K; A7 T; L/ D( Z# w( l; a  RowBox[{"3.141592653589793`", " ", , f' I+ G( u: T5 G2 |# w( m
       RowBox[{"(", , G7 B, |8 b- }2 E! T
        RowBox[{
    : V, o: K1 ^9 s+ F9 M  N     RowBox[{"-",
      f/ T- D9 E( F6 I      SuperscriptBox[, J1 ?/ q, N2 m* E: y; e
           RowBox[{"(",
    - o! C; E( z) E* ?: y        RowBox[{
    2 P+ r7 E2 x3 i1 r; J6 q8 N         RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-", * E( h1 v7 K! U
         SuperscriptBox[
    ) C* o- G' a. j7 W+ n7 B      RowBox[{"(", ! p$ V" C% v! e
           RowBox[{
    3 W8 \9 ^' Z7 Z# B        RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-",
    % S% b; p. h- w5 }. V9 H     SuperscriptBox[
    * r: B, v( J! R8 V- G      RowBox[{"(",   _# ]' f; _( H& Z8 H9 e
           RowBox[{$ x' F5 b. o: t3 k. M
            RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",
    : N! q/ U% U/ w7 D     SuperscriptBox[
    / c$ E# E) B9 z% d) f      RowBox[{"(", 4 H4 n- d9 u- m; w3 k; H/ D
           RowBox[{4 H! U7 f/ Z+ D9 M% |2 F/ b; A
            RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-",
    - U$ }; L/ x- l     SuperscriptBox[* ~& F/ O$ K/ M+ b6 D7 r) F
          RowBox[{"(",
    & O- ^7 ]/ q& g0 K, j7 T9 @) b       RowBox[{6 n" W6 t7 R" z6 N
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", : i* {3 j- e5 B, U
         SuperscriptBox[
    3 h3 F; b( B7 y      RowBox[{"(",
    * }2 F; g8 r, {0 q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    + t: y4 q7 S$ v, b4 G4 _3 c     SuperscriptBox[7 n2 R/ H8 l4 x' t1 C$ z
          RowBox[{"(", $ n5 U8 R( r: {) T
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", + ^5 b5 N7 e, y( c7 W5 J5 U- g( v5 ^
         SuperscriptBox[% [1 K  W6 j3 ^0 m+ I+ _
          RowBox[{"(",
    . Z- _" F) k5 I5 c       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", . P  X3 W2 K$ n* N% U. D& ~9 r. b
         SuperscriptBox[
    " A- R; \* R. W% L& l8 i& b; U      RowBox[{"(",
    . }) Y  n6 f6 G       RowBox[{" x8 u; q, h8 A0 J* x
            RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}],
    ' W' Z3 K. p' c    ")"}]}]]], "Output",6 h1 J7 n. Y; a3 y+ `9 J# S1 f
    CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]
    + @9 D4 }4 x* o0 y7 {! [}, Open  ]],
    7 c0 M+ e# P& O# y7 U0 v2 _3 L# C* i. N" F/ ]5 \* ]9 p( O+ O
    Cell[CellGroupData[{
    ) W* a( j: }0 C" z- P/ o  g
    & C% W0 ?  w! Z4 a$ w/ ?Cell[BoxData[{
    . B; h& X5 f% ~, r RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]",
    6 M% F/ l6 K$ {7 s6 f" E$ B RowBox[{"u18", "=",
    ( K2 E$ ~2 j5 b  RowBox[{
    4 \, b2 |& P4 v5 `' b( Z2 s   RowBox[{"Exp", "[", ' _( ?4 b( Z! [% u% E. o6 r% J6 L
        RowBox[{
    / t  K1 w; k: B: x- n8 P. U% S     RowBox[{
    & l  j7 e  n6 }8 J7 w. Z      RowBox[{"-",
    " E9 D; I6 I$ C       RowBox[{! Z3 H7 ]4 C9 [( f* b  u  r$ u
            RowBox[{"(", # U$ o; j" x3 Z2 }1 C
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ) m# a- J& O8 s
            RowBox[{"(", ' m3 q5 y8 k; k: Y( p5 }& y& _/ {7 b* e
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    9 a- J9 e- l  T. e( X2 A     "]"}], "/.", "DeltaX"}]}]}], "Input",
      t& @  p8 e: k. y+ Q8 Y* Y2 m: g CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    1 O9 x# U+ v5 L; E  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9,   a  Z2 Q) t% G8 J3 W
      3.5779615828848505`*^9}}],' W0 p; k% p  [7 r
    4 |7 }( t' N9 p9 i( w+ {# j- m
    Cell[BoxData[
    ' E6 {2 Z1 j  @0 \7 e' y RowBox[{"{", 8 P0 q8 |: ?  R; P; D$ I: z
      RowBox[{3 _. l5 G! i( O, B
      "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",", 4 b6 X: ?5 U8 p, J
       "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    ; Q) _6 @. e! \) S+ }+ ~  "}"}]], "Output",
    . a0 P6 k. i4 {. f/ k4 G: x CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],( c0 C) l* n% l1 G( ~
    4 p* ^0 ~, p3 E& J0 v5 m' L
    Cell[BoxData[
    * p. s& Z3 B. o SuperscriptBox["\[ExponentialE]", 8 f# y# c: u2 F2 s" U8 M
      RowBox[{"3.141592653589793`", " ",
    7 n+ p) n- a$ S2 m: O/ Q$ H3 n   RowBox[{"(", $ l1 T* M! w) a3 I
        RowBox[{
    # l! |  W- s/ l# M     RowBox[{"-",
      n  z" h- z3 k      SuperscriptBox[
    / O+ W; H# y$ l; ]7 x/ s       RowBox[{"(",
    # i) \7 I# a$ R- M" M7 E        RowBox[{
    & {: q2 R! Q5 t         RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    9 c/ c3 q; N" E     SuperscriptBox[
    % l$ P1 P! N  h6 R      RowBox[{"(", * [$ E+ Z0 d# ~
           RowBox[{2 J5 ?  |' [4 S7 q  c; y
            RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-", . }/ H& g7 B/ \0 j6 G' M; T- [" l, k/ W
         SuperscriptBox[
    . t- ?" M# d5 e# Q) ?      RowBox[{"(", 3 M# c; o) ~- C8 {9 `- b5 X% }
           RowBox[{
    , V" e5 J$ V9 c4 A" |. V        RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", 7 Y5 r" x& Z9 c+ z
         SuperscriptBox[
    ! d) q0 V& u; K1 ?2 |      RowBox[{"(",
    3 ?3 C  r1 ^6 k& j; t7 r       RowBox[{% R# |% R0 D, ~3 V- ^
            RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-", ' W% a. L% N6 C
         SuperscriptBox[5 t  K& T5 k  S/ u1 |& i& N
          RowBox[{"(", ; w# c, x  x/ M1 c6 k8 ]
           RowBox[{
    $ U/ f# p- U. T% D" @        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    9 Z' y( X" M7 M. ]$ @& U$ @2 t" g- l     SuperscriptBox[( k8 N) |5 p- t9 D! y
          RowBox[{"(", , f0 `! ~& R* R
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", + L9 L  o/ g) \$ M9 I
         SuperscriptBox[
    0 R3 m7 x2 D- w& @. q      RowBox[{"(", 5 F) J- r) A# Y+ |
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", : E" P$ D$ a! p7 n9 Y
         SuperscriptBox[
    % K: w, n8 Z. k( P      RowBox[{"(", $ O% X8 t6 P7 C  n
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ; I& R/ T0 r; T8 M0 F9 q
         SuperscriptBox[! r# B* V* n1 L8 L" x( H; a' H) w
          RowBox[{"(", + k& P7 G2 r" h% E# j1 f
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], + x% a7 O5 X8 k7 b
        ")"}]}]]], "Output",. K. f+ m; I* w
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]
    - C7 w3 U( P4 Y1 G4 J6 D# T! J}, Open  ]],1 U/ _2 ]9 a* R' P

    $ V/ R! v5 X2 E; T; g- n. O1 KCell[CellGroupData[{& [. H3 _1 T; Y5 x
    9 |1 `! I8 c% Q( N
    Cell[BoxData[{+ \) ~7 v" _0 x9 i
    RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]",
    * b# o; D1 F" Z+ H4 a/ e* W RowBox[{"u19", "=",
      [$ }# ?7 \. }& S  RowBox[{
    ; N2 j3 N/ q; e& d3 [# \   RowBox[{"Exp", "[",   N5 g% R* |7 Z( q% \! [3 y
        RowBox[{. a. ~6 Z) c+ r- _, ?- I: O
         RowBox[{
    : Z- O  d- E7 A$ D; J      RowBox[{"-", * q, a6 W+ Q5 x2 q/ t5 q
           RowBox[{0 A9 w) v! n) k* Q6 W
            RowBox[{"(",
    , c7 i  H4 i( [2 R) L; L         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 h. F7 A- f6 M" i        RowBox[{"(",
    $ r; O; T8 ]" i# T4 I' {9 M2 F         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],2 ~1 q8 A* }. [! y5 |' y
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    4 q" v0 ^; i3 z9 z CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {8 |6 e( i3 F2 R2 ?& S  c4 Q
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9, 7 h- \0 l4 ]" _! H
      3.577961588890861*^9}}],
    * h' Z+ \9 x" n$ K# R* z6 K: r4 ^% |
    / ?8 B0 Z, O3 |: D5 ]1 oCell[BoxData[- \! E1 n' N, U8 m& S
    RowBox[{"{",
    . P7 W/ e) |2 ~3 w' p2 T( J% Q2 ^) K  RowBox[{
    4 x2 b7 I% S3 T' i7 r+ Y  "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",", ( r3 Q+ U+ n  F1 M7 [3 C
       "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}],   N% U5 x% I9 Z' q  I5 Z5 l$ ?
      "}"}]], "Output",
    7 E$ |; e9 ?( R5 Q CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],( Z% y- i! W" _: V6 i9 E

    8 h8 r$ d, o8 j+ l; \' Z4 i1 |Cell[BoxData[
    7 K- E9 D3 b  E8 L4 h9 Z1 k5 i' ^ SuperscriptBox["\[ExponentialE]",
    ( Y( ^' l# X* [- f5 k  RowBox[{"3.141592653589793`", " ",   f  r' U% P( b' q2 m& F
       RowBox[{"(", 8 U! k; d% Z' f+ v! U1 r
        RowBox[{
    9 ~4 H/ s4 I& c3 ?     RowBox[{"-", ' T1 S1 p* |' _" E* c3 V
          SuperscriptBox[
    " M& F' R2 [% V. h8 o6 x       RowBox[{"(", - S/ _9 J) p( t) l( J1 x$ V: [) M
            RowBox[{
    . r. |# u3 j) \         RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-", / ~& F' f) _  A' N* j" i
         SuperscriptBox[/ l) D) q$ @7 o8 W  R* x
          RowBox[{"(",
    8 h# H: z4 n& e9 s( o4 e       RowBox[{' B( W; P5 Z' _
            RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-",
    " ]9 d* n4 V' b% g) L# h) X0 P9 _     SuperscriptBox[) C+ Z/ Z* A. Q1 q, l  R4 L0 q
          RowBox[{"(", 3 V- a- K; r8 o' ]" k0 K
           RowBox[{: ^5 Q/ n  i: [8 g( N/ U. w
            RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", ! J2 e$ `, ]6 R" F2 h9 \3 C
         SuperscriptBox[- F) V2 `  t( B% T  |( U
          RowBox[{"(",
    5 l" N% e+ Q: @% H5 h! I* _4 R2 B% A       RowBox[{
    2 d7 B1 H% ?' X9 S8 w( t        RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-",
    $ T0 w& m) a5 d5 E     SuperscriptBox[
    ; b$ Z0 }8 v: n4 y6 _      RowBox[{"(",
    0 V9 ]& k4 b. k% F1 }2 S- E       RowBox[{% A6 t! z' ~& j5 c
            RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-",
    / M  K1 B) w! j- R" `     SuperscriptBox[0 {+ T1 u' e6 ?5 s. K) f/ h
          RowBox[{"(", ; o/ [7 i3 [7 N/ X0 }% |( j
           RowBox[{: Q  }/ F8 M+ X; Z* `. S8 h
            RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", ! y6 A- u- J7 g$ Q
         SuperscriptBox[
    ( F: |! i. v# i# Y      RowBox[{"(", 6 W( H/ j2 D3 x9 W. ]
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    / r# g. a1 M% f1 [- H) u' G     SuperscriptBox[4 e9 m7 }( m4 c; ?- i1 `2 s" ^
          RowBox[{"(",
    0 x3 D6 K% T( F# ?' v' f       RowBox[{
    7 D/ a; p3 v6 f/ i" V        RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-", ! y6 k6 P% `; _: W
         SuperscriptBox[
    5 ?  N- Y4 \; h& q5 J      RowBox[{"(", 2 e! F2 H( n2 }9 |9 u
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    7 A3 A3 q; p' w/ l6 |    ")"}]}]]], "Output",$ l5 J' Y5 z- g; i* e4 g
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]  |" s+ ~7 s3 z2 X3 L+ l
    }, Open  ]],: o& @. j  ~9 ^) u
    ! l2 O7 @: P. i" @- w
    Cell[CellGroupData[{( T% N! w+ x( d0 Y# z: L7 b! B! x

    0 B: ?* o# w* J2 R: `% d/ Y* rCell[BoxData[{8 N) V, I6 Z6 `8 o5 a* J" R& z
    RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]",   O# h7 \1 b1 y$ v8 C8 a( [
    RowBox[{"u20", "=", ! P/ r9 m" b, s/ ]
      RowBox[{* O! j3 L" G3 F
       RowBox[{"Exp", "[", ; N4 X4 i3 F( }1 [
        RowBox[{
    3 O" G* W7 G- v     RowBox[{
    ' H3 U, }) ~2 U  s; {" X( y0 r% S. P      RowBox[{"-",
    : y4 {3 Z! C& w* s6 O; c! f$ k       RowBox[{7 `5 }/ z/ j$ t4 D4 K9 w
            RowBox[{"(",
    / o) K+ n' r( L. Z         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", * Y2 [/ o0 U' r5 ?; Y
            RowBox[{"(", & E  ~" ^4 i  S
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],8 f: u0 M1 D$ ^6 L  M
         "]"}], "/.", "DeltaX"}]}]}], "Input",* Z4 e' H. `3 C* c; c# A
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {! `0 \' f) y: a9 E/ N3 f
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9, 2 F3 J, I% ^) ~3 ]9 j
      3.57796159382047*^9}}],2 ~/ K, T* g. w) S

    $ K6 y- d4 _# s: b2 {; I5 E1 jCell[BoxData[
    0 l: J: h( T2 F5 d4 l/ B RowBox[{"{",
    9 x" L8 ?$ A2 a6 q  RowBox[{
    5 L* `2 g% t' V6 c: w* y  Q) G  "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",", ; F  r+ \9 C2 T7 Q3 {; U$ [9 `
       "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}],
    4 J" \  D1 U% `# G6 m  "}"}]], "Output",
    ; H  C* v7 ]9 l: }! p- X5 t$ @2 f CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],% ~' y0 [! L' M* Z; l1 M3 L
    / O- ]$ F3 A% X1 [3 J
    Cell[BoxData[; y, M, `4 Q0 N  G; R) p& t
    SuperscriptBox["\[ExponentialE]",
    5 }4 i! o/ k6 x* K  RowBox[{"3.141592653589793`", " ",
    - e) k4 I( |. C, X   RowBox[{"(", , v% u. q$ E, o7 l) s' K
        RowBox[{
    - \* ~2 b/ i; ~* n2 t6 g     RowBox[{"-", 8 [9 E7 c- @5 Q* A% R0 b6 |; J0 P
          SuperscriptBox[
    / a$ d! L. m, ]# ]       RowBox[{"(", ( q6 F' _- V! ~0 Q# ^
            RowBox[{
    3 ]* E; ^, b6 p1 V2 t* W+ n3 G         RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-", # y; v' @; ]8 ~
         SuperscriptBox[
    2 ^4 k. x; C) ~3 V/ y# ^+ u/ Y      RowBox[{"(",
    # a( \  `% ~: c) Y4 @       RowBox[{
    0 P8 q; Q0 }$ v' N/ y+ C        RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-",
    9 R5 H- H$ R1 o5 s     SuperscriptBox[% h: }' Y* ?! n3 Z4 m4 e5 I
          RowBox[{"(",
    6 C( w% H1 ]  \) K       RowBox[{
    * e) T9 `7 V" [; D: O6 }        RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",
    9 ]/ Z0 c' s9 j3 M     SuperscriptBox[
    1 _# a/ h& Z! \" B' a      RowBox[{"(", 0 m/ F* P5 {3 }6 w
           RowBox[{/ X2 r9 W, U8 H' A% T& p, d# D% d
            RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-",
    $ u6 ~" s- B) ?     SuperscriptBox[7 z. V' B% E9 W2 |9 v! \  S$ L
          RowBox[{"(", 7 w- i  `8 q1 @; ?2 s. z
           RowBox[{
    / i) j! |1 E6 `; `5 t6 ?        RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-", 8 P; g7 s. q. V) ?( T3 S' m
         SuperscriptBox[
    + E) j- c# K, p, N      RowBox[{"(", - p, e, w: a8 @- Z
           RowBox[{
    6 {3 w6 u0 V( E/ O        RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
    + \5 o1 h7 J3 o8 r( u, T  w     SuperscriptBox[
    6 e& p1 h# `3 i& W      RowBox[{"(", - `1 A7 @: S6 [. T+ l; M) G
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    . l7 }( |" q4 P; h) Q& l1 f     SuperscriptBox[
    " h% ~! x8 _% T9 L, [      RowBox[{"(", ( l7 X: Q- D- Q3 C
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    1 m1 m) t2 l/ g5 q     SuperscriptBox[: }1 y* U* A$ }0 Q% Y' S% r
          RowBox[{"(", ' n- y$ Z; l" \; ^6 }
           RowBox[{0 G( h/ G! M8 ~) X! u: [
            RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], $ v# z2 `" s* o. d- m
        ")"}]}]]], "Output",9 U6 C5 f4 ?6 g" I
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]3 R& E5 k  W$ ^: A
    }, Open  ]],8 o' ^. d  g* d$ P
      `8 l: N" e+ S  L% _- s6 n1 x
    Cell[CellGroupData[{
    , p+ i, u) y! L0 i1 z- l/ N! x1 V, c. q' w
    Cell[BoxData[{
    : w* g/ S4 r, y, x( \& M8 W4 z RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]",
    ; X$ h8 l$ e6 D! B% h RowBox[{"u21", "=", 0 Z2 O1 q* q- S0 d+ M* |" S; V
      RowBox[{- i4 t8 F- j6 P$ m. `9 z5 w; N
       RowBox[{"Exp", "[", 2 c$ Q! M# t( Q5 T, n
        RowBox[{
    9 q4 X% J4 e9 |  H- P/ K9 a0 b     RowBox[{
    7 @' j) E  z) i7 W( K+ J4 w      RowBox[{"-", : `9 A7 Y! p. q+ }
           RowBox[{
    5 {4 t8 K; x2 ^8 w        RowBox[{"(", 4 C! \1 Q5 B: h3 l# v0 A
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    % \% b% q! v& W: _, A$ V        RowBox[{"(",
    9 U/ ^3 H$ \) |, M5 Z         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ; V: H5 V5 g! V9 D7 ^     "]"}], "/.", "DeltaX"}]}]}], "Input",
    3 p/ N2 [8 W2 P; j" _ CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {2 S+ v* G+ Z0 ?7 t8 x( P
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9,
    0 X3 w7 g2 _& G8 g4 J( p  3.5779615991556787`*^9}}],9 X' }! W' N; ?: X
    % z1 w' C$ B" q1 }; p% r6 T
    Cell[BoxData[
    ( w/ u9 l: d. q9 u1 R RowBox[{"{", 1 O6 O  T! O  o5 n
      RowBox[{
      C0 H$ ]9 ]( F$ ?' b+ e  "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",", % ]/ a' O3 `) r5 t* _% G
       "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}], ( b2 a& `* z: K, [- X
      "}"}]], "Output"," I" h. d/ \3 w' q7 r. ~/ i
    CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],
    ; E2 N6 ^9 k# m3 d  d0 A, m. g- X5 L, D0 U/ W
    Cell[BoxData[) m4 T3 K( L- i3 h- M
    SuperscriptBox["\[ExponentialE]", 7 N: L/ e& A* J% s9 `# o8 q
      RowBox[{"3.141592653589793`", " ", 5 W* W8 l+ M8 `9 u4 {, R
       RowBox[{"(", % |# m5 O+ O' d# x- I! {& c: h
        RowBox[{/ l& b( k! M7 N* |; X$ c
         RowBox[{"-",
    3 l/ V2 w- b6 v      SuperscriptBox[! S: z" E) a  h
           RowBox[{"(",
    , k4 v' c. _) [  \        RowBox[{
    $ g- i% M3 b) n1 p- Y         RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    9 E0 x0 i) T4 y2 ^6 \9 W5 f     SuperscriptBox[, b5 r' {% t" w. G$ j3 I% v
          RowBox[{"(", : j$ d2 W' @2 j1 C- O
           RowBox[{8 _1 O5 t0 u5 s
            RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-",
    - D5 P6 p+ t2 F, F     SuperscriptBox[
    , a% C8 Y1 ]; V- z5 \# C) `+ T4 Z      RowBox[{"(", ! I# W! Q# g8 J2 {) k, Z% |/ v
           RowBox[{
    $ w" ~9 e, E5 z) ~        RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", " O9 @- g* I7 {/ d
         SuperscriptBox[( ^2 H7 t1 C' |+ i$ D1 d" Y
          RowBox[{"(",
    . |, }/ e* x4 X       RowBox[{
    & g/ ~1 a+ n5 s: w3 V0 A4 h        RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-", 0 l. y0 L5 p7 ]* {7 ^) i
         SuperscriptBox[
    $ o' x9 C# ~& F. n9 w      RowBox[{"(",
    8 z+ \: w! F+ s9 v( ?! n$ c+ V5 X       RowBox[{
    " `/ C/ a9 T9 N% d: o% l        RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-", 8 T4 m" Z5 y+ E' T
         SuperscriptBox[
    9 l, [  Q  {; l, X8 W- R! Y      RowBox[{"(", - x0 r. p6 P% C$ F" A) `
           RowBox[{
    " `5 M9 a: v$ v. l        RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    # d. h, W- \% I3 E     SuperscriptBox[; q$ u: L4 [9 H2 W
          RowBox[{"(",
    / y  t, u: N% s       RowBox[{* v+ }' S) Y0 J( d2 b
            RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",
    / v( z  k/ ?, d( Q* [- O     SuperscriptBox[
    * `( s4 @; @  |0 `1 d      RowBox[{"(",
    1 c4 c, I+ E6 I       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    8 e. j; s% B  J. h: ~6 L     SuperscriptBox[
    5 b9 H+ i" C5 d2 g7 h; M* L8 j      RowBox[{"(", : P+ E0 k9 e' T
           RowBox[{
    9 \- f4 ^. f5 G, [' s. [        RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], , T, o+ i$ U% ]+ L( i
        ")"}]}]]], "Output",7 P& \# x! n7 ^, q& m2 u
    CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]
    $ z" b; R, \  C$ Y2 v4 l}, Open  ]],0 f7 n2 d* E# p. y9 }5 z& f
    " a  R/ z3 t" s- ]3 n' x
    Cell[BoxData["\:62df\:5408wi"], "Input",
    ( T* B8 ^. }. Y0 P8 q CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],% I+ m( |9 A, j9 S; C# u+ n0 G
      i$ W9 R% T2 z/ W
    Cell[CellGroupData[{2 z+ @6 B% b& n

    . D& Y6 |: _% i7 x+ W0 ]Cell[BoxData[
    . c) J$ b  g( k; _; I RowBox[{"y1a", "=",
    3 }2 [  W- z# d  D; S  RowBox[{"Table", "[", 7 Y2 H7 V3 M* e( A9 U  `7 X' ^
       RowBox[{"x", ",", : t3 w: a$ M" ]1 x
        RowBox[{"{", - l4 H* E' y+ u! g! a2 m" w3 C/ m. F
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",4 g) n0 V, X+ e' P- B
    CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {' M6 U5 ]( v' q  `4 n& G+ `9 Q2 |
      3.5779226649375*^9, 3.5779226810625*^9}}],
    2 y: `: E: A( W9 N7 L* Y' {# i2 l0 ]) u" s% Q1 c
    Cell[BoxData[: D. O3 r' f2 X  C8 f6 P% K( s& ?
    RowBox[{"{",
    1 `9 C* r9 [) b6 L9 V% T3 a3 C  RowBox[{
    4 s0 W3 ]+ [& J# Q! O  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ; }" h$ i7 `+ _9 ^  X* a/ i2 g* I   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    9 r" P" U3 v* Y9 v" U" z    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    ' N& s, c! I* q   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 4 d0 Z. G" O6 W( p
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    9 G& t, T4 u# [5 d9 H. t0 V   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", # I2 u6 n4 d8 @9 V& e  b# }: B
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", 9 T8 Q, g" |; I6 }$ m
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", . o* [+ t5 U7 k' ^' Z; E0 `2 R6 Z
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    8 o+ U  w$ ^0 s2 ?1 B2 e" a4 i  "}"}]], "Output",
    7 b7 p1 @0 ?0 L6 [% e CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9, 2 H& P  u! s0 T% v/ w+ M' O% Z
      3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]3 D+ L, y7 h  L( N
    }, Open  ]],
    * _9 V8 E" G- Y9 G! B) x0 [3 ~! G/ w! H/ v4 L7 O! L
    Cell[CellGroupData[{
    1 a! b; a/ O5 T1 z  }) a
    8 Z& V/ L( [2 eCell[BoxData[
    6 \+ m8 u) l) D* r$ Z( j! m9 b RowBox[{"Data", "[",
    , G; [6 q0 r8 [( D# X  RowBox[{"[",
    / w5 T- |) _" d4 u+ W$ F; B   RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",
    ! p! q2 b( o! {, S. g( y CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {
    % A! l* z0 n7 k7 ~' y   3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],8 y8 v* d2 U0 M
    & }: b0 t) D& t6 `. D+ `% V
    Cell[BoxData["0.899882`"], "Output",
    1 r) U. Y# J$ G' i* X CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9},
    # z3 [/ o2 t( ]  Y9 F   3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9,
    + C3 W4 {6 ]$ W$ {$ F   3.577961929080654*^9, 3.5780123419375*^9}]
    ) `2 G: h2 m9 v/ C) o( Q3 o7 R. L}, Open  ]],, S. u8 w. Q* L5 o
    & _" N, G& h8 `6 S% Y, h; G( u
    Cell[BoxData[
      G4 X: L, N' O4 N9 Y& v RowBox[{"For", "[", 0 T' ^; c3 N1 e; A5 k* |* q3 q& D
      RowBox[{
    ; F2 }) ?/ A! x8 [! `4 S   RowBox[{"i", "=", "1"}], ",", 0 G7 y8 Q6 }/ ~/ Q
       RowBox[{"i", "\[LessEqual]", "60"}], ",", & O$ o! O# s+ ?0 I) q8 q
       RowBox[{"i", "++"}], ",", 2 r( j6 u0 ~: |& m! ]) z
       RowBox[{; X4 W9 T3 m& p- b
        RowBox[{"y1a", "[",
    8 h/ `5 p1 b9 \# Z2 ?0 U     RowBox[{"[", "i", "]"}], "]"}], "=",
    5 ^/ |5 h& z7 n    RowBox[{"Data", "[",
      O5 J; O* B% h3 T, |. L. }+ u, k     RowBox[{"[",
    4 y7 Q0 V4 o3 b0 ]      RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",% {* M$ s/ P4 x" v5 u. x! X
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {: t; I* d, U6 w
       3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    / c: q+ Y0 P. n! D! t8 x   3.577922923203125*^9}, 3.5779588839702806`*^9}],
    ) e" D' }# B3 g( x( _' _; ?
    3 `! Q0 C  k9 {Cell[CellGroupData[{
    3 N3 i3 _# o; Z8 r) W2 L4 T" M; U
    Cell[BoxData["y1a"], "Input",$ ?7 h. l) l  Y. O7 c
    CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],
    ; ]; }# `1 [' p: m6 y, G% p3 C  `  J) @* V6 \9 {% V) B6 G
    Cell[BoxData[
    4 s" K( W7 k* [7 G7 u: B7 C8 L- b RowBox[{"{", 9 Y! N- H9 X. x# Q5 X! }( c
      RowBox[{/ g, @5 t5 w! l' B5 E0 y8 m& F
      "0.277091`", ",", "0.220259`", ",", "0.899882`", ",", "0.265607`", ",",
    , h, S/ }* S! @7 ?% G+ L   "0.642226`", ",", "0.306243`", ",", "0.186985`", ",", "0.175501`", ",", % R5 C) u0 Y4 m
       "0.147821`", ",", "0.352768`", ",", "0.23881`", ",", "0.095701`", ",",
    " ]0 Q3 F: p" s. B9 n2 A7 D   "0.162839`", ",", "0.335395`", ",", "0.160483`", ",", "0.398115`", ",", $ I$ r; L" f4 N( o. H
       "0.157833`", ",", "0.315665`", ",", "0.492344`", ",", "0.638398`", ",",
    ; X6 ^/ g# w1 \: B   "0.392521`", ",", "0.362191`", ",", "0.114252`", ",", "0.401355`", ",", # [$ p) P( r. Y6 u
       "0.827444`", ",", "0.676973`", ",", "0.331272`", ",", "0.845701`", ",",
    . h7 v; E9 X+ x  L: V* c) V# S   "0.287102`", ",", "0.`", ",", "0.050059`", ",", "0.254122`", ",",
    ( c3 u) V: F3 ]8 C   "0.086867`", ",", "0.659894`", ",", "0.317138`", ",", "0.605124`", ",",
    : I  o0 T& `* b$ p) `( ]/ j& Z   "0.32126`", ",", "0.595406`", ",", "0.555359`", ",", "0.333333`", ",",
    " P# P" }' Y; F0 ?- x, C7 h3 H" A   "0.149588`", ",", "0.493522`", ",", "0.224676`", ",", "0.410188`", ",",
    8 i  ?0 J- L' L6 w# S8 ?   "0.668139`", ",", "0.102179`", ",", "0.380742`", ",", "0.319494`", ",", # k. J  h' D+ x
       "0.031508`", ",", "0.292108`", ",", "0.329505`", ",", "0.337456`", ",",
    ; Q7 n( H4 t0 E4 k# {1 B3 ^5 R. w   "0.766784`", ",", "0.676678`", ",", "0.541519`", ",", "0.064488`", ",", 9 ~  T' L, j5 n
       "0.463192`", ",", "0.388398`", ",", "0.262367`", ",", "0.290931`"}],
    / \& u6 h# _4 R& s5 t0 `7 r  "}"}]], "Output",  A: N) e' N; y" n3 U
    CellChangeTimes->{3.57792293246875*^9, 3.577957577756765*^9, - t  p7 c, B7 q9 X# h+ p
      3.577958888806289*^9, 3.5779619425902777`*^9, 3.5780123438125*^9}]
    6 G, V& z: E; a7 g0 i) i) v}, Open  ]],
      U) p; W4 ^' G0 V/ j: u) t9 I% X. k  l' s: {7 G8 j  |& j
    Cell[CellGroupData[{
    3 H( j& F5 z* [+ w. F2 H! o2 k. H: X5 D, P( v) U" o
    Cell[BoxData[
    / c  ]( B- E2 R' z! k1 i# \ RowBox[{"m60n21", "=", 7 F8 C+ @: L, V- o
      RowBox[{"Table", "[", . i2 G: l0 \) h' O6 \& t/ ~- G
       RowBox[{5 F5 w' ], ]' @2 i/ O5 i- S/ `: O6 S
        RowBox[{"Table", "[", & o' Y3 q+ e) G; Z! e+ S2 W
         RowBox[{"y", ",",
    . J2 n& k3 L# s9 n% T) l( N& c      RowBox[{"{",
    : o: v- k6 p- I3 s3 m6 p       RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",", . x8 U" K/ K6 J1 l! Z0 N& v
        RowBox[{"{",
    , a9 o" ^/ v+ A     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    ' l+ s2 b( y: j- ~& J CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {
    " ]8 M: G1 n/ e" a  3.577924052828125*^9, 3.577924101671875*^9}, {3.5779619669419203`*^9, ; |$ ?3 Y- E( p1 ~  e
      3.5779619706547265`*^9}}],! {+ ?& N& R: h0 _. h- i
    2 f% J6 |3 q) R9 e+ w
    Cell[BoxData[
    . K$ {  w& S/ a RowBox[{"{",
    0 r- f+ z  M, S  RowBox[{
    7 j6 U2 {0 h! m" D5 t   RowBox[{"{",
    " m" v. i, N& S: H! f# h    RowBox[{* ]! C9 O: `' ?
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 r9 M1 F6 Q* z" @$ Q
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - J2 j* D# J9 M     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    6 i  o" c8 h8 q& R9 \     "}"}], ",", , A% i7 @2 [5 z7 W/ [$ j0 [
       RowBox[{"{",
    * Z) \: e# ^: F    RowBox[{
    - N0 f* l; ]- {3 I4 ^6 V% R    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 i0 ]  Y; ~0 u. J0 g/ ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + I  G; h6 d* J* {8 ?0 V' G/ k
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 t9 z0 |8 F+ H& R: Z% x* }3 t
         "}"}], ",",
    3 `( P- \/ w  T( o( u: `% G   RowBox[{"{",
    - N3 `, r3 o& z3 N; ]7 L( T    RowBox[{
    5 ]3 q( v. U8 w! S) `8 u    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 l* A  w+ U! s5 _9 {+ f5 b/ K* S      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 E5 {0 x3 n# T. Z* j6 \* x9 S3 s$ \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 E# p$ D' z. d6 j- e3 ~
         "}"}], ",", 5 I& U0 s! r& |' Z& W
       RowBox[{"{", + q! Z: L0 N) P2 w( x
        RowBox[{
    : `$ k# r# O) [6 R1 z2 K    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 c" c4 v: h( n0 Q0 ^9 R0 p- s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 B8 ]7 M, Z8 V+ B5 q     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 }6 B" E6 x5 }+ A4 c# p
         "}"}], ",", 3 B6 e8 P0 W: H( a/ g+ Q
       RowBox[{"{", , j$ @! v" G1 d/ ]7 G
        RowBox[{! B8 }, y. }  z# e3 ]2 g
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    1 R$ E/ B7 W, x1 [3 n' A4 {      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    + S. F, R2 @6 E5 a     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 d; N) h; ]9 s' z     "}"}], ",",
    / o8 ]2 q- c0 f+ ^+ E9 f   RowBox[{"{",
    % S% U1 Y: P" g8 i    RowBox[{
    , [& g4 c" v/ B    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 C" H$ ]/ Q: G* T6 q0 z
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 R. ^, _6 u7 g( O
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ E& M: T* m% V4 U7 I7 T
         "}"}], ",", 1 ]) D7 @2 I) J) Z2 |3 X
       RowBox[{"{", 9 _' k* j% C( }# G6 Q/ H) M
        RowBox[{1 e. `& T, A3 M7 S( T/ y
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 q8 ~  E) ~- n% T2 }      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # v, H# D5 x9 _/ U% J  z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],7 D5 @' E/ V  r1 q
         "}"}], ",",
    % P4 l3 m. y  k  m   RowBox[{"{", 2 Y6 m7 @/ o7 V' V
        RowBox[{' U, i/ i0 n; e4 |: V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 _8 @, }" m6 v
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   R: J. j/ g8 N- C. |, \! H2 {
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ; Z0 f+ |3 x* M) Z3 ]6 c7 ?     "}"}], ",", 7 |& G6 N7 `- U. J4 _& e
       RowBox[{"{",
    : n. G0 q& n6 l  ?  k  _/ H    RowBox[{$ k* _0 I. M7 @
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",, B; d6 P; ?+ g
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * P8 E- t$ F. F7 T+ Y4 g) p7 N0 _
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # e  _: f9 V" S( Y5 ^     "}"}], ",",
    : |1 [/ A- L. s- E   RowBox[{"{",
    $ ~9 G6 z0 A/ ]2 ^# V    RowBox[{! S, R# k, O9 Y6 q
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - S& h9 B7 i% T2 A* W% Z* T7 E      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # ?) L: Q2 t5 }8 c5 t4 {1 k9 l     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],7 s$ T* g  S9 v1 P3 T, z5 N; u$ F
         "}"}], ",", ; H! A8 o# X/ E# D
       RowBox[{"{", & V% G+ C' Y8 u+ G' N
        RowBox[{
    + L! `" G  h" r( N) @5 }    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 ~# I7 R* N% B, _  _( m0 {, R
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 J9 f  E- E8 b* p
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , E, |- `0 ]* m$ D     "}"}], ",",
    & o; ^6 h  N  k6 N  ?) I   RowBox[{"{",
    . X8 Y& O7 w1 w    RowBox[{) d& h. t8 K  i' v- I
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ; [% a2 s( }9 f9 m- o& L      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , C* a2 I- A8 a- q     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ z& e, f! ^3 d" {8 H( P' A6 J
         "}"}], ",",
    8 a  x: h# x- ~+ e   RowBox[{"{", $ L4 ?( b; m6 G/ k1 x( `! C9 ]( a7 q
        RowBox[{# j* W8 `* r" t1 y
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",; B9 s" W6 z: c6 n
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( D) C  ~; g0 ^- K1 e6 G& l     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 y1 Q1 g  r/ b1 A/ _8 w% O
         "}"}], ",",
    0 m" _: H( x1 @( ]: H* n0 _' F   RowBox[{"{",
    9 f2 q* }& B; j7 ~+ S- `    RowBox[{1 g$ V  I- O  p4 R5 }  ~, |+ K8 q
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 v1 m# r( l/ q' x. v2 Z
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 4 s# k* e' ^: l9 J" [
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 q- o* n+ @- D* @) k
         "}"}], ",", 2 I& N3 A! z9 o, c/ X1 v6 a) Z
       RowBox[{"{",
    ; }0 m. d/ J% d5 S    RowBox[{
    4 q8 a6 U& ]7 j' @/ B* J' K9 n; P    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",% f) s. N6 I2 d" j: R  `7 L
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    + H1 M% `3 V1 s8 u     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( `( k( P: ?! b1 V5 m
         "}"}], ",", 2 S6 g8 o9 w- N- q
       RowBox[{"{",
    4 o- U/ `8 t5 F; q' b7 ?. j    RowBox[{
    ) D, S! n5 O5 X4 a2 P- P    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- y3 f( }( K; c
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 2 M$ Q( c+ }4 d0 Z* G1 N- h4 }# W
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 M2 w) w0 w) q/ y- y/ l
         "}"}], ",", 8 E0 ^0 F, L* p- @1 q7 T) U" E3 M0 n
       RowBox[{"{", " Q  T: E  z' g( `& z! |
        RowBox[{
    * H% |/ X7 W7 L) w; [    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % U% u$ R8 c! O9 d3 a  y6 z; i8 I& s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 1 W( B. l" o* p( w7 q' I
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# P  M3 B6 J1 X7 r6 h; u4 }
         "}"}], ",",
    4 v, _; H, m5 A( c% F$ }+ f  f4 L5 e   RowBox[{"{", . ^2 }' G- Y6 ^: w. W; {1 g) \
        RowBox[{
    6 \" m/ }" O# D7 k; \: a' Y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 }. g- c  A6 F- v      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " y, \$ Y, w& d& F
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],3 b$ r( e/ ]3 c+ i% [+ B7 ^1 ~
         "}"}], ",", 3 D3 s: V- x" W( X! p: ~  B
       RowBox[{"{",
    ) x1 e$ `2 m) u1 w* Q' Q6 L! l3 |$ \: ]    RowBox[{
    8 Z- G5 Z1 [- L3 ^+ q8 m3 B( x6 _. N    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ ?" S! c8 D7 y3 \4 t
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    + t1 D. g1 C0 ?. F+ l8 a+ A     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ i4 f' ?8 c. `. P1 O7 @3 Z
         "}"}], ",", - f0 E4 m4 P0 S0 s0 \
       RowBox[{"{",
    $ I( m, q- Y3 s: t) W5 a    RowBox[{+ ?2 t; F' \$ Z* d- c7 }
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ p* ~! X+ X9 u6 H
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", $ S' [% E6 C8 m3 I- Q. e
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : h9 e9 p- ^* d9 |: @& O! \     "}"}], ",", 5 U/ D" A' x9 Q5 i
       RowBox[{"{", 3 a: ~/ s* q. u! u; T
        RowBox[{- s7 ?$ \, g6 c- g, l* w
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",( A. R0 B2 b; v) M: o- k: C, C
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 r# k7 ]$ T" d5 ~     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! f& r" n$ }, o     "}"}], ",",
    0 Q  n% h6 f& C# s4 b) u% i0 p3 f   RowBox[{"{", ; q/ e: K, V& c2 g
        RowBox[{/ q' I3 K7 h# t# d, c: B
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    6 `- _& x( C; D, K! X0 ?4 f      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 Z4 R) p, T+ u- S     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 I% P5 R* [5 i$ W% U* P; m
         "}"}], ",",
    " s% g: S, m! s9 j   RowBox[{"{",
    8 i1 i4 G* `5 s- U8 E! g: B6 L& I    RowBox[{/ L, i$ P. g4 L/ B: ~7 f  n
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",, ]/ A% f+ Y( I9 k( E6 s% u' F
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   J& i* L+ N& i3 f, t8 Z" U" w/ x
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, s( H, b, M* Z1 ^: p% W* r) u
         "}"}], ",",
    6 ?; J7 q: o" W' M   RowBox[{"{",
    * }! g) b7 w. `2 \    RowBox[{
    1 y. J' D5 O* l2 Q6 u/ R& {9 ]    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. ^: f5 Z: \. G. ]& O
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # [9 w$ `: k2 g+ U9 G1 W4 F
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! {8 |, w8 F) R     "}"}], ",", 5 B: E- J) f+ M
       RowBox[{"{", # s3 r* x, k3 K1 V1 @4 P
        RowBox[{2 f  {+ z- [% S; H7 A% [  k- o: R
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",, I$ a0 R9 ?% P# M2 J
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
      w6 Q3 _) [( J  H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],* M' y3 j8 B7 B' |+ x
         "}"}], ",",
    2 @# L/ z' x5 R7 Y$ B  W# a2 j0 T   RowBox[{"{",
    . w! C5 O9 p# r( i    RowBox[{
    ( T  T6 k9 l* ^, `) \0 ?    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' x7 B; @! @& Q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; |& W( u8 K6 W+ x- P+ |     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    3 U1 {' q3 v8 [4 Y: g: f     "}"}], ",",
    , |, B2 n' I8 i9 \   RowBox[{"{",
    , V* W5 S* u- z  u$ P/ [# i    RowBox[{
    9 Y6 h" b' s6 f5 D; w) m    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 j2 p8 n% [2 `. z( _
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! p6 D: ]* \+ T" m
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; B1 a' a) x4 s1 n
         "}"}], ",",
    2 p/ F" h& H* U+ \" B   RowBox[{"{",
    ( W9 }$ Y5 D2 ]# G  P  j    RowBox[{
    $ x& }6 S+ m; ^6 _% x# K    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / Q6 M9 s0 u) T) s& x      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 h: H" \4 m& h' ?4 |9 T* p
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * c0 n9 A- H( D1 Q     "}"}], ",",
    * ^' K* q2 K  j; K: ~: X   RowBox[{"{",
    6 Y8 [, _% o7 ~1 G    RowBox[{
    - f6 b( G! T" E    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",  z, W6 F' h- ^4 [; _2 _
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 P- Y2 k1 o) U+ G6 z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    6 Y) U8 @+ k; J5 X     "}"}], ",",
    & J7 j' A0 y6 L: ]$ u   RowBox[{"{", 4 }3 w: y9 n4 B3 w1 N* ^6 w$ W1 [- E
        RowBox[{5 r( X/ x, x. |& ^; H: n: H
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ; z. g  G. m3 y' X9 B2 z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( D& q- Y* ^* s/ P2 ]' p* J. w: e- l
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 h! P- Q0 R6 J
         "}"}], ",", / [6 h( T! O6 v5 D8 U
       RowBox[{"{",
    0 q2 J4 O* F: K* n" I1 D8 `: r3 v    RowBox[{) [1 ]$ b) d$ U. [+ n- J! P
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , L4 q& [6 L! s& \      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' s# N$ i4 x* E% X; B+ H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 v# x  D6 [$ B7 d0 G# \" v9 q  B
         "}"}], ",", . L- R3 a+ X; K0 W8 |8 I
       RowBox[{"{", ' p3 R3 `4 y- I  R6 t' t5 x
        RowBox[{
    " N. g3 ^. k% t- U5 @2 ^    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' c. C' I9 V, V* {      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " m$ y/ V. X' l* X7 G% |5 n; W     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],: D, [6 Q+ K8 ~7 Z
         "}"}], ",",
    ; U+ B! Z. |0 j/ K3 X. M   RowBox[{"{",
    3 a- x) H9 U$ V) ]    RowBox[{
    % T4 P8 S4 k9 X2 R    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : O$ S6 W5 o; [) K      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # f/ g" T6 b) q) D2 m     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 v1 X5 N* {! |1 l/ a6 L5 F
         "}"}], ",", ! M: Z* g  J2 n0 R7 q+ X: |. d% b( X
       RowBox[{"{",
    4 j5 h. D4 ?5 U( N" x' d    RowBox[{
    * T% X- v( ~# f  Q- N3 A' z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . R6 d4 y# P& m- T      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", : [1 W, a1 q% N6 I
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# h- E) R) ~# w+ B9 x  _
         "}"}], ",", ! r5 H" G6 R% G* S' B' |; F9 g
       RowBox[{"{",
    6 J4 U2 ~: |  N' d/ ~    RowBox[{
    ) C) A6 _6 G' B    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      _0 Y6 C$ a( T      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : W2 n# n2 q& f1 N9 f" y7 u7 K     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],  B, b4 }& S+ Y& Y# u
         "}"}], ",", - X1 i  v+ M- `  t$ ]1 }
       RowBox[{"{", # d) n! G8 R* P* M3 A+ N/ M& L
        RowBox[{
    5 {5 N3 Z( Q. R8 }: ]/ d- d- x    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- \! ~- P" V' d# d5 n' a6 A( t
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 {7 \2 P" l3 X( s% Z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( @$ o6 ~: C. ]3 Q     "}"}], ",",
    0 A. z1 {" w4 r# v" c   RowBox[{"{", " c  S6 h  g8 F# N5 |/ S. d/ t& I
        RowBox[{; S2 Z5 Y: o' h5 L0 I5 x+ t
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 \, I" y5 W9 J  l- B
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 g9 p0 O4 |2 y9 _$ G) ]2 a
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ Y) B$ o, K' ?
         "}"}], ",", . a* [/ e9 Z7 N' M$ p8 k" F
       RowBox[{"{", ( Q' M9 O) w0 o% y* y: Y, A
        RowBox[{/ F0 i0 n8 R) ~: U6 \- |
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* H  F/ T7 w$ w! v1 ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) g* A' E2 C2 \* r' s* i     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( P; l. ~+ P6 A/ W. U; ^+ q     "}"}], ",", ! `; a9 |4 M, t5 s( ~
       RowBox[{"{", : U/ }3 Y) i  ?5 G+ w$ f2 L7 G# Z- }
        RowBox[{
    + L% }- W& }, T, K) H( F    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % c/ [! G; E$ V0 F9 q" G2 Y9 D+ ]      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    * `  r3 ]4 ~6 f4 q7 ]5 A6 |     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],* A  U* b8 w9 E0 L8 {
         "}"}], ",",
    . b: T) _% N* l   RowBox[{"{",
    & y" j: B: }6 V; F. t    RowBox[{- h: }% S+ B2 u, D
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # ~/ s' C) L+ v- p+ U) W      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 ^8 I0 r5 [8 L# W/ V* P     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],* J! o9 p9 r6 R8 b1 e
         "}"}], ",",
    $ A! O1 q4 k8 w' F" [0 g   RowBox[{"{", ! j' S5 H. _5 _: M6 y: c8 S) V7 N
        RowBox[{
    6 L" G" R3 ~2 U2 a- @    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," u2 K" m  u5 x' e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 Z( S' H' |& P6 r/ _     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 d$ K( J) b% p% Q) f& q/ E
         "}"}], ",",
    8 i3 Q9 X. |! k7 H* h1 x   RowBox[{"{",
    & {. t4 ?- s0 A( G  {) a    RowBox[{
    ; o8 {( G+ o: d    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 `, x5 C, a$ o8 r' a" [6 G9 e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; n, k" C6 m  o2 p9 ]) f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    0 Q  ]" B' D% f: S" b4 K     "}"}], ",",   l$ m; Y& }9 r5 F' v7 Z
       RowBox[{"{", 6 A) H- r( x2 }
        RowBox[{
    $ {% _% Q# ~0 U! f2 Z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 v/ a! s8 J4 [& H! i3 r3 W      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) n/ l$ x0 g, Y  U3 c5 a     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# H# Q0 o4 k5 K0 K' m& e; a! R
         "}"}], ",", ; \( O9 G- _3 Q' C" d1 j3 h1 _
       RowBox[{"{",
    0 s# \8 V" n  F/ O9 k! {+ ?    RowBox[{
    - u7 Q: E9 G& S+ a1 t    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",% A4 N% U  ~. X; \+ B
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & S1 c: R# e1 m+ r7 C  K! L2 M     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    $ J7 K! n$ b" S     "}"}], ",",
    1 j' C% K6 `1 x1 R- A# {   RowBox[{"{",
    $ L5 [; i6 P' d6 {: O) @6 t$ o    RowBox[{, I+ Q: k5 R# o2 k7 g
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* x' J7 L% E, o9 f) G
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / p5 q' X4 S' Y; T9 h4 O4 k0 |2 p1 l$ M" q     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],% ]4 `4 S0 u6 T( H, d
         "}"}], ",",
    + d' f( g9 {( T6 H- \( n7 j7 N  s/ J   RowBox[{"{",
    ' }" Y4 a" G; C    RowBox[{
    ) Z, e& h) A1 [4 G8 v    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 S3 w& m' T( D( t% i0 j% ~      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 K; _( Z0 V' v& w7 J
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , X% C, P6 V2 w1 N2 f% X     "}"}], ",",
    ) A  ?9 f/ [% n1 g2 G. C/ w   RowBox[{"{",
    # |: c6 b; h# Q. J+ \5 Q    RowBox[{
    9 B3 b7 O# S$ _* K, C: |- J+ C    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," [# M9 u+ W% m8 s' M3 [9 j
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 F' z2 c2 e8 E7 ^- |
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],0 ]( _  i, H7 D: i& I
         "}"}], ",", . D. |( j$ p( L7 ?) v
       RowBox[{"{", 5 j# Q! C  q2 y  F8 X$ j
        RowBox[{1 n+ p" o) _4 R1 U  o
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 b6 {  Q$ Q+ p+ s
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / F; z9 s! G. \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . g2 N# }9 m" Q3 k5 V( Y2 b     "}"}], ",",
    $ s9 K, A/ f# ^! z   RowBox[{"{", , M' i/ Y4 z: J7 N, w
        RowBox[{
    7 z0 C5 F3 y: M" C+ s' ]    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 q; A( o9 j- d8 c8 {+ n% Y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & Y1 c# y7 J! T     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 o  |& [. E+ L5 k
         "}"}], ",", . ~- d$ ~5 B: O
       RowBox[{"{",
    % Y1 G' o3 ?; y    RowBox[{* W* G) C4 H$ B9 Z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 |- E1 M. Q+ }2 F
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 s0 g+ Q" O0 N0 ]3 W; i4 A$ G* N     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ Q# `, @' q' N2 r: U, f. {
         "}"}], ",", ( r) Y5 u1 Z7 j8 C! w2 }  c3 j3 Z
       RowBox[{"{",
    + ?# P- i, b. ?0 z$ g+ ]    RowBox[{
    & w  S/ X$ f( d8 Y. S+ w0 o    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . y/ \  S, p+ I4 F# a" h  ~      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 `* d6 |0 `: \, s9 s. ~" c2 U     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . h3 U0 l# q5 o# ]# ~2 w     "}"}], ",",   p5 Y; ~' H- k7 L
       RowBox[{"{",
    1 f1 i2 o+ K% e6 z! i8 z" p    RowBox[{
    + k9 z, @+ P, _" x    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ) v/ B7 x+ i; }      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    0 f8 E* |2 Q$ ]     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 m8 R# T, z- N     "}"}], ",",
    0 z& O" N) [: ?4 ^& g   RowBox[{"{",
    : U- k( k- P& v' g    RowBox[{
    ( F! i/ w+ X: x) {! @% O) U& v    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 B) j) B. I& p$ S# o
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' V' u" D! t. o) D7 [4 Y     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 {& o$ n1 O- T     "}"}], ",",
    , W+ c0 }' ~5 `1 `: Z3 l   RowBox[{"{",
    % s* I2 c: k; q0 D9 L2 [3 \    RowBox[{
    5 }: Z  v# O1 U0 k8 f    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 @8 {% T6 t: ^  P6 h+ x: S( u9 M
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( h6 U9 t( \4 e1 S
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . a5 l0 |, g! V8 |; c6 B! j0 G     "}"}], ",",
    # v* }5 ?  o/ Q" F   RowBox[{"{",
    ' l' `8 F5 j9 Z9 E1 u    RowBox[{
    / |# e7 m& w( h- o    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",1 t, w+ v, E* x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    9 s# c5 A8 d  G  R% A     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],' ~- M# P5 ]5 o  }, M' G
         "}"}], ",",
    % m0 W7 v& D6 u! @* x3 I1 x3 _   RowBox[{"{",
      J  e1 Q1 f, I1 p  P9 p1 T& d    RowBox[{3 ?2 O! x$ ]3 P7 ^& O
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 g6 }& h8 ^* o# A2 e7 i* i# B" T      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' T: j% p3 U; p     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : j- P* m! R- V     "}"}], ",", ! k' i8 I3 {0 k& S" t3 p6 q
       RowBox[{"{",
    ( |0 F$ h# R# e# Z" L9 {. O    RowBox[{( F1 n2 _0 [7 C7 c% J
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",: @: ?3 V! Q8 d, Q) [6 a: J
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . v0 g+ A4 D' G
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / k$ Q5 G0 d4 Y3 m9 t. m  E  J4 k; B     "}"}], ",",
    , _2 T' v! X% @7 S$ @6 V   RowBox[{"{",
    ( l' q# q+ X& T( O! L& R$ R    RowBox[{  g" I" a, Z8 C) j7 i% P% Z) ]5 a0 a
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % A( Y  z# k6 T& Y( o/ ]! q: N      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' D; a$ P1 z5 o% p     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],9 g5 Y# a- k) N( K  d
         "}"}], ",", ( H5 Z5 A- T! G, a* V8 j
       RowBox[{"{", 1 w$ W& @9 w8 _& y  S, `
        RowBox[{# i! M8 t$ p+ K9 p& }
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 X: z  J# _3 k& Y, P: C: h, G      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    * P& n6 t/ f9 S     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 Z9 M  @2 ]. N, S3 C
         "}"}], ",", . ^  z- q/ b) Y$ D# g/ U$ h- ^
       RowBox[{"{",
    ) ]  R0 z+ j8 d9 G4 `    RowBox[{2 l* L" ^/ d$ H, {
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",8 S8 Q8 H2 [* N* |# j
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' g# H6 E6 O$ ?: u- s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) X  T' F& j; F& W" `5 O     "}"}]}], "}"}]], "Output",
    / ~4 \$ Z# ~) [. q! K CellChangeTimes->{/ D$ ?% U! h0 E* i' h& g$ T
      3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9},
    - X, `' D) T, ^   3.577957579987569*^9, 3.577958891536294*^9, {3.5779619459910836`*^9,
      `3 D% e1 p  U   3.5779619748823338`*^9}, 3.578012345453125*^9}]5 J  b) r/ g) b) U. k2 \3 a" x( l
    }, Open  ]],7 W8 P$ x  p, Z

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

    1 Y( R% ?; c; A  v# jCell[BoxData[0 n' |, z- e; s) [  a+ a# F9 T; B% h
    RowBox[{"{", + [$ u; |( P9 L' ~8 m8 G  W
      RowBox[{"0.32564305572552416`", ",", "0.500820838606441`", ",",
    ( {3 R# u6 z) M" }3 B   RowBox[{"-", "0.5945873894818967`"}], ",", % H8 }! g4 v) R6 {, d$ k
       RowBox[{"-", "0.1999688587779198`"}], ",", "0.020180806675835994`", ",",
    * `1 L5 ~7 ~4 \+ M$ `4 k& x  Y! M   RowBox[{"-", "0.03345934908892623`"}], ",", "0.25282438852646905`", ",",
    4 z: [! [) {1 H8 u1 V( J0 U9 [7 C5 X   RowBox[{"-", "0.17602467625404622`"}], ",", "0.3961180670900672`", ",",
    7 T7 q/ |, c# _6 [, L5 w0 D   "0.02759193650965952`", ",",
    ' _# K7 C4 N7 ?4 e: B: l   RowBox[{"-", "0.320472847796449`"}], ",",
    * c! D3 G: T9 {4 |! w3 z, L6 t   RowBox[{"-", "0.07581214474544527`"}], ",", "0.4812237524557292`", ",", 8 Y% x' s6 G& o) `- V
       "0.7528674241482847`", ",", "0.6665374509702799`", ",",
    0 U% _, Q% d1 i: a; q: }/ A   "0.22861495086373018`", ",", "0.13092706311748484`", ",", : {9 D* c- L) l" ^& G* c! `
       "0.5252475961933538`", ",",
    8 D. Y5 T2 [* Y$ l) Q9 s1 T   RowBox[{"-", "0.10599338351843157`"}], ",", "0.6670272593678526`", ",",
    ( c9 E" l9 V1 q* Q   "0.23580523388620733`"}], "}"}]], "Output",
    : h- m. v& G+ `- _$ y CellChangeTimes->{3.577924621953125*^9, 3.5779246688125*^9,
    5 _; Z2 ?, ]4 b% M) o# K6 _( J  3.5779575884583836`*^9, 3.577958952875601*^9, 3.5779620806661186`*^9,
    4 v1 X/ z& j5 o( q  3.578012349875*^9}]5 e7 _6 ^. s* v$ }( Y
    }, Open  ]],
    + h! `; p* P: c9 Z* m$ Q/ ^- W: B- F% J$ D0 E
    Cell[CellGroupData[{6 Z! M  h5 q; o) u, f( j

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

    0 g+ F' ?* z, }0 ^. H- MCell[CellGroupData[{
    ( }% Q5 t; T: q: E" }- Q# i; I2 I; K' U8 Q
    Cell[BoxData[: `/ T- z! \- x7 `  v
    RowBox[{"y1fit", "=", 7 ~9 D7 H3 V( H+ Q5 @4 q# A( ]
      RowBox[{"Table", "[", / t0 d  E" I& B7 O: z
       RowBox[{"x", ",",
    : l: l! L9 J3 l& b0 w$ d, y    RowBox[{"{",
    " z1 p/ p. G# v; ^     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",5 Z0 j2 F% H( v* q$ P! T8 q
    CellChangeTimes->{{3.577924969375*^9, 3.577924979515625*^9}, {
    + ?, ~& ~/ [; X( P, L  3.5779252768125*^9, 3.577925277484375*^9}}],: b& O% y! _& {1 ]- {& Q% D
    9 K0 S0 E1 p; s+ B
    Cell[BoxData[
    9 {# ]& V+ d3 r+ Q RowBox[{"{",
    " M! @- a# S1 L3 k" L- S* z2 w  RowBox[{
    # @. y; J& N- J$ v2 v; \: E  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ; D$ t* P) `% ^* B/ ^/ c0 `
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",; ~5 `, X" b* O, k6 V1 a
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    " l3 K% q) c4 Z3 B   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    & j1 m0 K! R, ~! g; T/ U   ",", "29"}], "}"}]], "Output",
    ( q$ r/ {. m- R; ?/ p! [' o5 J! ] CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9,
    ; ?8 r, f3 |+ e- r6 _. A+ i! k  3.577957594916795*^9, 3.5779589579612093`*^9, 3.5779621294942036`*^9,
    " w' @! `1 y' L- M2 |$ s  3.57801235340625*^9}]
    6 {8 C0 |: z, f+ u0 ]4 \% h+ B! i}, Open  ]],
    ! p/ y9 W! t1 R4 {9 X7 U% y% x
    5 \% I, _7 v" O  d( lCell[BoxData[
    1 _' A- X* _' h0 P" n8 E RowBox[{"For", "[",
    ; \* B- r' b) i# p& w" [/ U  RowBox[{  A  K! D. S) ^- L/ F: y( Q. Y$ A" \
       RowBox[{"i", "=", "61"}], ",",
    " M8 L2 q! c6 {8 ?' H8 A) m5 g   RowBox[{"i", "\[LessEqual]", "89"}], ",",
      G3 H4 V" y1 o# W/ j   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", / @3 j: j; ]( }+ G# `1 p  ^
       RowBox[{- M  L( j: Z0 O+ s
        RowBox[{7 C. X+ @* I* ~9 a* G) d0 ^
         RowBox[{"y1fit", "[",
    . }8 ], |, B% W* L- H" |2 f      RowBox[{"[", % h2 L1 n9 \2 q) l, j0 `# R5 b
           RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",
    7 o2 r. Q. d! W- G/ R  A     RowBox[{"y1", "/.",
    0 }; ~! J9 E, |1 _" A- W) m! q- q$ i( O      RowBox[{"{",
    % N( g) ]% t/ p$ J& g       RowBox[{
      z, c, M5 V5 s3 f$ O7 w        RowBox[{"x1", "->", 9 U  q. I% b- x6 J" v
             RowBox[{"Data", "[", # u- w) }8 K6 D5 ^9 a. G
              RowBox[{"[",
    & V4 I- G+ |8 z( C) e+ r# y) {           RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", / w. S; O7 w  i0 [( Y0 I  B5 p
            RowBox[{"x2", "->", ; r: n. p7 G0 I  {: p
             RowBox[{"Data", "[", * N+ a, \" o% n& g* A
              RowBox[{"[", % Q- t2 m2 {" d( q! h- |5 P) F
               RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", * A+ n& z+ L( q' k* [
            RowBox[{"x3", "->", & y8 U# _7 A. v" q; T
             RowBox[{"Data", "[",
    ; l0 a* a' ~& M3 B) a9 [          RowBox[{"[", 0 d& T  r( @7 q6 V+ y
               RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    " p; l3 h- \6 d( D$ x9 U        RowBox[{"x4", "->",
    + {+ @4 F$ [' l. a9 w         RowBox[{"Data", "[",
    8 `  Q0 v9 O. A9 b8 V% j' D          RowBox[{"[", " c! H. `/ g3 T: D7 y5 @0 w
               RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    8 {) f4 K  H& F: q* y        RowBox[{"x5", "->",
    / \; s- r0 Z: I7 z$ s$ O) D7 E         RowBox[{"Data", "[", ( {( Y: r, B) d) ], t+ z" b
              RowBox[{"[", 6 t6 K& y4 R/ {0 P; _
               RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    0 N' Z- ~- N( D5 R  _! x        RowBox[{"x6", "->", 4 W( t3 D" Q% a0 w6 |; {. C
             RowBox[{"Data", "[",
    / j0 P% ~, H1 p, @/ v/ |9 h, d          RowBox[{"[", 7 ^' S. ^+ `8 E2 G! c5 T4 g
               RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ' }! E7 m! |( [) R8 ]0 u        RowBox[{"x7", "->", , N# a, j0 E8 ?1 w2 t6 e2 A! n1 v  D
             RowBox[{"Data", "[",
    4 E. z+ ]! K/ ^! i# ^          RowBox[{"[", * H8 O* @8 w1 A9 _8 h$ |# G  b
               RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 1 y) R" b1 H! \
            RowBox[{"x8", "->",
    , P+ f4 Q' D' M9 r. y         RowBox[{"Data", "[", 6 D' y1 d. v  T8 [( w/ V" M
              RowBox[{"[",
    4 }2 y# K( B6 Z& @; Y! s           RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", + A6 T/ }6 G" @2 D9 S9 }! T: v
            RowBox[{"x9", "->",
    . O9 f. [- M8 S" l         RowBox[{"Data", "[", 5 u) q8 I0 B" B% i0 j, ?
              RowBox[{"[",
    0 S/ `& _, A. i           RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}], 1 t+ K% D" g% a
      "\[IndentingNewLine]", "]"}]], "Input",5 |( `# G' \$ y
    CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {
    0 z& W8 i& `5 X! r  3.577925286140625*^9, 3.577925306765625*^9}, {3.577958922517948*^9,
    6 J+ M! Q& n' U3 s$ H: [& Z8 w8 G1 U  3.577958922549148*^9}}],1 b/ y+ ~5 B, i" u( _0 D

    % r3 q2 h" f, }' O) }9 VCell[CellGroupData[{! f& `1 x' F& `

    $ g" S0 N& @7 Z) H3 ~Cell[BoxData["y1fit"], "Input"," [' g2 a+ l# ~0 Z" R; F
    CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {
    . v/ R' B/ B( a1 a( t6 ?6 `; C! Y  3.577925040484375*^9, 3.5779250440625*^9}}],
    6 ~4 T1 @7 a6 O8 V' L
    ; w4 P: a3 x. ICell[BoxData[
    5 D# C9 t* a2 I  X) b& d RowBox[{"{",
    / K8 |, \1 f. t! Q- i  RowBox[{% \. _' ^8 ~( g1 [4 W: \; b0 u) ]
      "0.43193416525930517`", ",", "0.4501634853493982`", ",",   k1 D* e2 t! G( Z% S  _" Y
       "0.33336034768525247`", ",", "0.4418609896858925`", ",", & B$ S/ O/ @% C- e( _  M3 |
       "0.41030378932283024`", ",", "0.516814798191575`", ",", 4 n: f) N" X3 ?4 L! o$ c* D. @1 @
       "0.4476631213729994`", ",", "0.3016552978696669`", ",", - k+ D- p+ |1 k! t  ^* U7 D
       "0.378122167437847`", ",", "0.020339844919720733`", ",",
    % |) d! @2 {: s+ d3 I   "0.018745375782087376`", ",", "0.2919925992695025`", ",", 8 |" [6 p, L" X% [! f2 o$ P
       "0.2649067959681263`", ",", "0.16343444284525593`", ",", : F3 H% f) G- j" A4 T) B  ^
       "0.4182466778551563`", ",", "0.27347752211364934`", ",", 3 F2 m  _2 g" R* A2 Z" K
       "0.38554057386385654`", ",", "0.35253160453718047`", ",", # E' ~- i3 m6 @9 d( ?
       "0.2054745841100774`", ",", "0.45504377112716676`", ",",
    & D) G: c6 D5 z5 Z. t   "0.1598805094678612`", ",", "0.18662509982279485`", ",", - [4 ~+ Q1 B) U. F# [
       "0.10684797493248213`", ",", "0.013349212673286828`", ",",
    % C& f  L, j( G" L  @- F$ O   "0.08215836003004297`", ",", "0.2979041599362813`", ",",
    . C/ A1 t0 o. |  Q6 C   "0.05995976512343641`", ",", "0.3884793499104568`", ",", . ]' V2 W, R  `8 _2 {/ L0 k4 q. f
       "0.5361889337034293`"}], "}"}]], "Output",
    4 M+ L1 ]" J0 D9 f/ | CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9, : W3 e$ n0 Q& d4 ~0 b' f
      3.577925312375*^9, 3.5779575978808002`*^9, 3.5779589654960227`*^9, 0 `2 c0 l+ @. [) u9 ]1 v; c
      3.5779621416934247`*^9, 3.578012355546875*^9}]* @( |  O. Y+ `4 {* L* I5 z( m/ r
    }, Open  ]],
      u# t% ~9 i" z
    ( z! h0 X( `6 u+ {3 s: p$ LCell[CellGroupData[{5 v! V7 N+ y0 L; l8 C
    # ?0 K" G8 R+ y4 Y2 {! T: {* Y2 x
    Cell[BoxData[
    # d- V) l- d# k: Y4 y0 a3 c7 D RowBox[{"y1fit", "=",
    , B' f8 g6 i+ X- s1 m  RowBox[{"{",
    * j8 J' }4 x" T8 E) q9 `2 u   RowBox[{- v; P8 L" i2 c- S" z1 w+ m% x
       "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 5 j4 [  S& g' ?: k9 u& D2 L$ o
        ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 e4 v6 l* R) B7 n: p% O9 J
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",   L7 @( V3 x0 Y; N( Q# Z
        ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", & ^% C! S) h' C
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34",
    ! m. p  A; c& }  `2 V- c. D' ~    ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", 4 ^: s: K& ]3 ]1 E, W
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", % o2 B, V' U. Y4 V0 |$ V- R
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    3 r- ~$ r7 f$ m9 w# C    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", # T* k$ g) F  j2 X* v$ P7 i: R
        "0.4319341652593058", ",", "0.4319341652593058`", ",",
    2 X% o* _% @4 L$ K6 Y0 _9 |    "0.45016348534939865`", ",", "0.3333603476852527`", ",", 7 T9 H' K7 a7 ~) H
        "0.44186098968589294`", ",", "0.41030378932283074`", ",", % E' t, E  X7 M* e' \- ]
        "0.5168147981915754`", ",", "0.4476631213729997`", ",", * C! f" f5 x/ ]! P$ R" r; V: q
        "0.30165529786966755`", ",", "0.3781221674378473`", ",",
    0 j$ M" m4 ~' y    "0.020339844919720775`", ",", "0.018745375782087393`", ",",
    : E! K1 _0 [0 ^' |. d    "0.2919925992695026`", ",", "0.26490679596812655`", ",",
    7 B' w( D' L0 F: \# w0 R    "0.16343444284525593`", ",", "0.4182466778551567`", ",",
    $ q* S7 B6 h; ]    "0.27347752211364945`", ",", "0.385540573863857`", ",", 5 _7 i6 S2 c( P0 |, t7 F
        "0.3525316045371807`", ",", "0.20547458411007796`", ",",
    ; B1 `2 Y! R+ o% l$ I! h    "0.4550437711271672`", ",", "0.1598805094678611`", ",",
    $ l" h' ?  j, w9 U) P    "0.18662509982279502`", ",", "0.10684797493248224`", ",", 7 ?, z" r1 A3 x8 N
        "0.013349212673286806`", ",", "0.08215836003004302`", ",", * M' H0 a3 _! @1 P8 d3 t
        "0.2979041599362817`", ",", "0.05995976512343637`", ",",
    : n8 F% b' i2 D7 y9 d    "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]}]], "Input",8 q0 }9 F1 \1 {. O
    CellChangeTimes->{{3.577959701349306*^9, 3.5779597161381316`*^9}, {
    # ~/ C3 p6 y/ w, n/ [5 j  l% u  3.5779621548286476`*^9, 3.5779621618642597`*^9}}],; q0 ~  d; y" b: a  s' p

    & `( o$ E- e0 ^0 d0 `Cell[BoxData[4 m; G7 C* f1 Z5 u9 f6 G
    RowBox[{"{", 4 t& z- X3 M+ E, ~( t
      RowBox[{; U0 q" g& S5 N: [: u1 Q! t
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' e# l: J: f" A" V/ I/ U/ \. P1 D1 e) b   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",! \' c  L5 Q& g1 p
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", ; S/ p4 P. H, i! G
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", . B& i6 l8 ]* R
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",   N# `: t. S# b. t" f, s' J
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", 5 P5 Q1 I8 h2 _% T
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    ; d( k: b$ P  f9 ]; h" I" s   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    0 l3 V- r5 F+ I: f; A   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    ( u4 ]8 J8 T$ \( E" W   "0.4319341652593058`", ",", "0.4319341652593058`", ",",
    9 x& m/ V' d% |+ c: o+ h2 f& K   "0.45016348534939865`", ",", "0.3333603476852527`", ",", , z2 `. n+ d4 X* ]3 h  M
       "0.44186098968589294`", ",", "0.41030378932283074`", ",", # m. V$ T, H) }7 F+ H8 r
       "0.5168147981915754`", ",", "0.4476631213729997`", ",",
    # m; s% `9 C9 y   "0.30165529786966755`", ",", "0.3781221674378473`", ",", ! m6 b3 i$ ~# X  O5 [& D5 G
       "0.020339844919720775`", ",", "0.018745375782087393`", ",", + z0 P9 P5 h/ N0 u' }: g9 {/ \2 L
       "0.2919925992695026`", ",", "0.26490679596812655`", ",", + N) q& s& Z2 K4 }6 W& q
       "0.16343444284525593`", ",", "0.4182466778551567`", ",", % K5 H6 s: r. J- w/ @. L! @
       "0.27347752211364945`", ",", "0.385540573863857`", ",", % l' y1 f/ l3 `# N7 O3 n( ~
       "0.3525316045371807`", ",", "0.20547458411007796`", ",", 5 P' \# {1 Y6 A1 {  y7 F* B2 F
       "0.4550437711271672`", ",", "0.1598805094678611`", ",",
    % a, ?2 j" x' L   "0.18662509982279502`", ",", "0.10684797493248224`", ",",
    ' w; T% W" S$ W; `   "0.013349212673286806`", ",", "0.08215836003004302`", ",", 5 a' d" O# C3 x% a  _
       "0.2979041599362817`", ",", "0.05995976512343637`", ",", * C7 ^% [" |) ~; [( ?
       "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]], "Output",
    / l4 I/ A2 K6 C! P. j8 D CellChangeTimes->{3.5779597200381384`*^9, 3.5779621650778656`*^9, ' ~6 |) n/ Z7 Y# C
      3.5780123569375*^9}]
    4 Q7 w" ]' K$ w6 O+ S}, Open  ]],
    9 I& e6 D0 I) e* k$ ]& t, S: V9 x2 d
    % b2 h, @( R" `Cell[CellGroupData[{# O6 p  _3 K' H
    / w% P; ?. A1 s' V- {5 M2 F! O: Z
    Cell[BoxData[
    , r; Y3 w. x3 h2 P1 } RowBox[{"y10", "=",
    : X9 ^* L( U% H" F: G9 n7 ^  RowBox[{"Table", "[",
    $ }8 v5 V9 B5 K5 e2 c8 Z   RowBox[{"x", ",", " @! D8 e( w. q& ]. }2 ~
        RowBox[{"{",
    ! j$ E% U' y! {     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    4 d( B9 y7 B- u" b: x CellChangeTimes->{3.5779253628125*^9}],1 b8 Z9 |/ z/ Q  G0 n

    , I: R1 F: _# f# O1 R% o1 z9 NCell[BoxData[' w4 V  l% M# |% Z) {4 t& w
    RowBox[{"{", , I2 V. T3 p! Q! _( ?/ z$ ^7 E
      RowBox[{+ q& T% G' g. b- R1 @1 S) P
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    4 x! l3 I  D/ q# {2 D' q   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",' u" |% p2 f& F5 L
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    6 ]. F- t" s# Q9 \$ }, Z   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    . P; T/ b# D0 t" k. D   ",", "29"}], "}"}]], "Output",
    ) `1 m8 R; {/ s/ X CellChangeTimes->{3.57792536553125*^9, 3.577957599565603*^9,
    - A" r$ Y) w5 y& ?! q2 s  3.577958967383626*^9, 3.5779621678858705`*^9, 3.578012358609375*^9}]6 z  |) n7 U# @
    }, Open  ]],
    * |& J1 K. {8 i7 l( l
    ) t1 x+ G0 W* ]# ~0 v1 [, ?# t$ DCell[BoxData[
    $ P+ \6 {% w9 x  Y! [; o RowBox[{"For", "[", ! w- c9 a% P/ s$ }9 |
      RowBox[{3 b7 q5 T3 H# c' ?6 }  d/ y8 }; u/ Y
       RowBox[{"i", "=", "61"}], ",", 9 ]5 i# z% E+ ], {
       RowBox[{"i", "\[LessEqual]", "89"}], ",",
    - d1 y; ^3 N. W# a   RowBox[{"i", "++"}], ",",
    7 S4 D6 Z5 s  _" N$ _+ M8 ]* Y  Z0 V3 d$ r   RowBox[{
    % {: L6 X% Y+ K8 u; \! w( l    RowBox[{"y10", "[", 7 w  d9 t& p( z& r  O$ r. w
         RowBox[{"[",
    0 x% M( r' p' o* H" q6 p      RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", 3 X7 ?5 ?& K- r! |! k0 c
        RowBox[{"Data", "[",
    & Y3 ]/ T! d& w5 n/ `- M     RowBox[{"[", 5 H4 ~2 g9 ^5 B" }8 p$ C/ R/ g* J
          RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",
    9 ~, }, c" z$ u, Z6 f4 R6 S& q CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    . H# p& x( V9 d8 M   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9, . ?/ p: m+ x! W; ]; G, z% G& u
       3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, . v6 W2 X! S1 L, {& I' F
       3.577958922549148*^9}],- F. N; \! O# w  g  \

    4 n' ~, U' K! h8 Y4 |Cell[CellGroupData[{
    3 r. D$ h( k% h/ `  K& z6 j( W+ e: R: n3 D4 c
    Cell[BoxData["y10"], "Input",! \" t7 ~( E6 T- Y
    CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {+ N2 ?  i* Y3 m8 E. Q1 l( i; `
       3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9}],, h+ B) d9 }7 H: c- |+ I* B/ A' x2 r2 x

    , O1 @: d) d+ N6 M) P) u2 @8 HCell[BoxData[) ~2 H' n3 T. h. D
    RowBox[{"{",
    9 ?4 |$ W  H- Y% w5 N- w( r  RowBox[{, o% P' @8 f+ E* L; Z2 k! e3 G
      "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`", ",", ( p- u% D* O# m3 d" `3 y
       "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`", ",", 5 @7 d# {3 w; ~$ A( z
       "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",",
    9 W& f0 ^1 U: p- x- `   "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",", 7 r+ b( B1 O' A
       "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",", / i6 C7 v5 O) c, w& O, D  N4 c
       "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",",
    " Z2 x3 m; J( h& q. y! l   "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",", 5 z& a+ a7 j) @4 z
       "0.694935`"}], "}"}]], "Output",+ X: t! Z, ]  V4 c4 \( y) Q* n
    CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9, 9 c; i  R7 z; T
      3.577925393046875*^9, 3.5779576032628093`*^9, 3.577958971767234*^9,
    . j  a$ }9 b, ]% U  3.5779621736734805`*^9, 3.57801236071875*^9}]3 I7 u& w5 k+ ]$ f) w
    }, Open  ]],
    & i4 X8 n! Y- b, ?: C2 F6 p& s& x( k* g
    Cell[CellGroupData[{8 ], i8 a2 a+ s1 x* X9 w% l' v
    - C  R( S9 ]+ t' ~- h
    Cell[BoxData[8 D. T2 U2 F0 z4 \# H' Q/ n) k  [
    RowBox[{"y10", "=", / ?. F5 F: h- h  T
      RowBox[{"{", : X; j+ i& j/ x5 G/ Y
       RowBox[{5 X( n* W2 d6 j- H
       "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : I" [- Y; g: O. v7 B* d    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 e! T* C% b& [* J9 q: P
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    ( C' d. e* X8 O+ U- e5 ~! p  |    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", ; I. K* g; ^" V& }* Z/ j
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", # ^% B' i* ?' r- {
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", & B6 B4 r0 ~, ?, o4 j: u3 @
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", % f* z3 q. k+ B* l  d
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    ) T. a; [" T8 r- m# S6 A    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", 0 R% s/ d+ s! Q3 \! P2 [) l
        "0.380742", ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", 7 x- @1 j2 X) ^: v6 o6 r6 w
        "0.448763`", ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",",
    3 E1 s2 S: `& I* y; P    "0.057715`", ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",",   O3 G3 y0 n$ S' ?- J* m
        "0.570966`", ",", "0.468198`", ",", "0.414016`", ",", "0.18669`", ",",
    9 U3 ]; P# @4 h3 Y    "0.442874`", ",", "0.68669`", ",", "0.244111`", ",", "1.`", ",",
    : d  l' i0 |" m6 N; A    "0.957892`", ",", "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", 4 |0 S& x; E1 P9 ^5 T  G, h
        "0.412544`", ",", "0.322144`", ",", "0.370436`", ",", "0.333039`", ",",
    ' z$ g; S- e& y# d4 d" z    "0.390754`", ",", "0.694935`"}], "}"}]}]], "Input",( T  w: G4 N  |
    CellChangeTimes->{{3.577959733438562*^9, 3.57795974955339*^9}}],5 Z7 Z0 w" y8 d! `# {; i9 P
    . [# f$ i5 j, P3 ?4 g! f& I2 }
    Cell[BoxData[
    % u8 l, T7 k7 h) n RowBox[{"{",   p* ~. q4 Q: X6 K! ]- Y
      RowBox[{
    # \2 p3 z9 r  U+ M8 D/ {  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 2 t* K& e0 n* D0 }" u/ B" s
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",! i* Y3 h: \/ u. k- w, g, U
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    2 N. Q& Z7 y% Q$ a6 T   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 1 A& a+ |( j4 f
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    4 C2 M: k2 ]( D   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", 5 ?- P5 E/ |- L4 E& i6 ^. ^2 f
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", 4 s# o# `( x' d# l/ V
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    ' l8 C% ], R) X) [/ Z0 U   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.380742`",
    # V  |5 ], {5 @: ?: w# N0 J   ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`",
    / t  X8 [0 D: [3 p2 n   ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`", " B5 h- @* D) J! G  o, @4 K. _+ D) D
       ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",",* }0 }- [, c* b( C
        "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",", 6 i5 {7 N" b& u! d/ Y9 s
       "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",", ' x0 u5 y# G3 l! }6 f
       "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",", & s. ^; B) `6 S
       "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",", , g& |0 ^$ m" S* d. H8 [$ e
       "0.694935`"}], "}"}]], "Output",
    1 @. N  S, m0 M2 n CellChangeTimes->{3.5779597517529936`*^9, 3.5779621844842997`*^9, 9 Z9 N! t) f8 z" C$ z% X* f
      3.578012361734375*^9}]
    9 K4 ^# Y- g/ Q! M  n}, Open  ]],
    9 k: i; u- p! r7 [' Z* M3 X% n6 H, ?1 `8 |0 D+ T  B" @
    Cell[CellGroupData[{
    4 G0 e) v3 m) Y% S* J
    9 r& h4 C. ~- s# a- tCell[BoxData[
    0 `: B" u7 k# f! \" ?; u' \' E RowBox[{"p1a", "=",
    & @" D2 I% W3 H9 k$ L$ h, q7 }5 }  RowBox[{"ListPlot", "[",
    % N4 I+ G; }3 P( v   RowBox[{"y1fit", ",",
    8 a, R6 h9 {; V/ C5 U    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",", - K% n, w, S# A" G& A0 m
        RowBox[{"PlotStyle", "\[Rule]", : l/ C( |% S- ~6 ~) {
         RowBox[{"{",   i2 a' I1 t6 L8 _' |
          RowBox[{"RGBColor", "[", * R# F' P& K4 c5 N) G% p
           RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",",
    ! `6 B2 U& s4 I    RowBox[{"PlotRange", "\[Rule]", 0 k7 v" T. [8 p0 m' b2 P# V" l
         RowBox[{"{",
    0 c1 H" {1 {# V9 r      RowBox[{2 m8 _1 K2 H! f5 n0 C: R3 p0 r" A) z4 K
           RowBox[{"{",
    ) }2 G. y: M: }1 k9 f6 d        RowBox[{"61", ",", "89"}], "}"}], ",",
    % G& R# j/ p1 @$ ]9 u5 _       RowBox[{"{", 6 [, r3 o+ ?$ f0 C
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    8 x0 R5 E& }6 K+ W    RowBox[{"AxesOrigin", "\[Rule]", " k) B# \0 b# Q) U) o" z% N" K
         RowBox[{"{",
    / y, n& i2 k; _' ^% p. U      RowBox[{"61", ",", "0"}], "}"}]}], ",",
    $ k9 ^! Z; a" s7 C  ]) N    RowBox[{"Frame", "\[Rule]", "True"}], ",",
    : T* @/ ^/ i2 P    RowBox[{"FrameLabel", "\[Rule]",
    ' m) B/ ~7 e5 b% K/ Z- T     RowBox[{"{", % ]0 e/ c, H% y( {5 \
          RowBox[{# Q; l( U: k- |! p. C# Y; N- d
          "\"\<\:7089\:6b21\>\"", ",", 7 f% n. r% K9 ]% f7 @; X
           "\"\<\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\' u% P$ F/ K8 m8 o
    \:ff09\>\""}], "}"}]}]}], "]"}]}]], "Input",
    : S) V$ ~1 A! F7 m& F CellChangeTimes->{1 D6 f8 \+ Z" o$ Q6 U- K* q  r0 {
      3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {
    $ k4 j. j, @. D   3.5779576143076286`*^9, 3.5779576277548523`*^9}, 3.577959769006624*^9,
    3 e2 P  D' f: c" r+ `" `5 ?   3.577960184458948*^9, {3.5779602338174343`*^9, 3.577960278745513*^9}, {
    1 a) e& v* J. q" p   3.577960347588433*^9, 3.5779603994429235`*^9}, 3.57801239140625*^9}],* U7 \" e' F8 D9 }* X  u: b
    - _$ w8 u/ l1 h  n
    Cell[BoxData[
    $ R: o7 F' S; B5 C GraphicsBox[{{}, {},
    3 q' v" M- _7 Z   {RGBColor[0, 0, 0], LineBox[CompressedData["" ?' @4 C( l# t9 Q
    1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn3 v6 y: }: e' |8 k/ t
    8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq
    ; {* w" J* B. T6 zD3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B
    / `( Z8 w& c# m. e- i1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX
    0 s8 ^7 W, w7 K/ ~% HC1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN0 Y9 d; y1 x; k9 t: i0 z
    a2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff" n( h: C( I% s5 z# F
    yqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb
    % A( s8 G& n) l) ?wrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX593 U; r0 I) s1 e% a  [
    Y6nGQ3sAieueIw==. a2 f* D' d7 A: P5 n" d  J' Y
         "]]}},, t7 o- p  l! f* e( Y1 P  f! n' E
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    6 E. i# m  C: U; A; h' |  Axes->True,( L2 V4 G; Y2 D7 Q5 A
      AxesOrigin->{61, 0},* f! K9 D  Z: i. t; ]' {" q3 p& S
      Frame->True,, i1 H3 z2 ?* S! [, z
      FrameLabel->{
    . T) q+ F8 \$ B1 K: b3 _" D' T' y, E( e    FormBox["\"\:7089\:6b21\"", TraditionalForm], / i. T# i8 b4 c, n/ E. d$ r% e
        FormBox[
    2 C: k( N2 F* n% B% F* P    "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\
    # x2 V6 b, G, W( {  o: [$ m( j\:ff09\"", TraditionalForm]},) l9 n+ G; E& b" I" r2 R
      PlotRange->{{61, 89}, {0, 1}},( h. H" U% X. D( Q& W' O! [4 B+ I
      PlotRangeClipping->True,* B, v5 x/ f! }- ^
      PlotRangePadding->{Automatic, Automatic}]], "Output",
    - H% q+ B( R1 E  i' b3 W! g3 T, ^/ ` CellChangeTimes->{
    % t3 q- z: Z; p. V$ X( a) U& X; a  3.577925144625*^9, 3.577925396578125*^9, 3.577957630297656*^9, - d* N9 Q( O) A2 V' I/ b
       3.5779576933061666`*^9, 3.5779589732960367`*^9, 3.577959771908229*^9, 6 n$ C  [& E0 V0 L0 E
       3.577960281756318*^9, {3.5779603518628407`*^9, 3.577960407664138*^9},
    0 D- N- z8 d6 U  H8 l   3.577962187510705*^9, 3.578012396921875*^9}]8 G2 x* K* \% T4 `. W5 ~* [- b
    }, Open  ]],
    * m& }; ~# [- s& o! r; ^, S, F$ ~  }2 r( ~# u
    Cell[CellGroupData[{. {$ |/ J& V8 h# @- k- W

    6 R& E- h! Q; _6 R) L6 pCell[BoxData[
    : m6 u! e# i$ X9 y RowBox[{"p1b", "=",
    ) i3 V" C; ^5 C- K/ ^/ V, D7 \; g  RowBox[{"ListPlot", "[", ) _9 p# k5 r* \. W# ]  a* O
       RowBox[{"y10", ",",
    - ?" h) a6 T* w, s/ _; y  N( j4 p    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
      H# ^5 \" e& v+ ^$ l' T4 q6 a9 u    RowBox[{"PlotStyle", "\[Rule]", 1 b: L4 l. {# `' O1 o. S1 E! l3 T
         RowBox[{"{", 5 U" P8 L+ f% u
          RowBox[{& @5 O( C# y3 _! L8 x0 i- P/ S
           RowBox[{"RGBColor", "[",
    # l/ k; E* r1 y- X# Z        RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}], 4 `( ]% s" t& v. X) U- n
        ",",
    1 t$ q0 L6 l  v. k    RowBox[{"PlotRange", "\[Rule]", 0 M0 e: {- a; p9 u0 F# q
         RowBox[{"{",
    4 ~% ~5 r# k. L) r6 s8 d      RowBox[{7 E. x, z8 {3 F  C3 ^1 A
           RowBox[{"{", + ^3 L, o" r2 c) U3 c4 D- O
            RowBox[{"61", ",", "89"}], "}"}], ",",
    5 u( r3 S: F% r1 A) `       RowBox[{"{", 6 n, u, v, K( m/ c5 @1 \: [5 E
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    ' g; {$ G, E; C( O- v' o3 S# p    RowBox[{"AxesOrigin", "\[Rule]", + @7 {3 I; C6 G$ V8 B. t, q8 c
         RowBox[{"{",
    6 k+ X0 g( i8 F7 ]5 Q      RowBox[{"61", ",", "0"}], "}"}]}], ",", % o! `  ^0 U) z4 w- E
        RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",- O' K/ P  |3 N4 V5 O8 a1 P" {
    CellChangeTimes->{3.5779253991875*^9, 3.5779576384564705`*^9, # j! h8 l( s- y' X  b9 R* u
      3.5779597764166365`*^9, 3.578012409265625*^9}],
    8 A6 K6 P5 E& `7 K; K( r- e: }+ U
    Cell[BoxData[
    4 [  Q) y4 |( s GraphicsBox[{{}, {},
    ' ~! U0 f, A& g" ~8 h' c2 S   {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["
    # y' Z, }6 D% y* [7 x9 v5 k1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ
    9 G# E' O6 `: M* q# i/B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy
    0 i, K# [( ^: N+ JGwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy' j6 P. D$ ]' `/ Y$ T
    GFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy
    7 r% q7 C7 k+ v/ H7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/& G  Q% i1 k" r7 C4 H& H5 P
    Qu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri
    3 L& g. y$ m+ |: q8 kH+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV' }0 |& _' i* c9 Q, e# R
    rQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T
    ) S4 i3 V4 C* }+ gvA==
    8 U) m# E! B- y' P3 b     "]]}},$ i$ b1 c6 ^& Y) J$ I
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    9 e( R6 n. b; u* }  Axes->True,% t. B0 d. T+ F3 N' r
      AxesOrigin->{61, 0}," s4 l5 E3 D& H$ }! c+ G* W
      Frame->True,0 d! s0 {* q4 K9 }( q
      PlotRange->{{61, 89}, {0, 1}},) Y5 V: S, x& O' L: R& P" p
      PlotRangeClipping->True,
    ! M9 z9 R; D) i* f% ?) W  PlotRangePadding->{Automatic, Automatic}]], "Output",0 }; j7 O: N2 i) q/ T# ~7 r8 O( P1 f7 b
    CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9, 9 l. W$ H5 A* `  F4 f9 i$ V
      3.577957640266074*^9, 3.5779576946009684`*^9, 3.5779589749964395`*^9,
    % T/ c* o  x, w1 r: k, r- ]9 T  3.5779597781950397`*^9, 3.577962189476308*^9, 3.578012410328125*^9}]
    * z1 O+ G* W0 t( A* D0 n2 K}, Open  ]],4 g5 o, H: I! k; G

    # c! N$ Y9 I& v& Q% v/ ^8 Z6 ?Cell[CellGroupData[{
    * _7 A( ]) Y* |( o
      q2 f/ C- ?* p+ V0 [0 b) Q$ \Cell[BoxData[$ Z5 I6 D) P& ~! g) e0 G
    RowBox[{"Show", "[",
    - X: x$ _+ v9 s, Q5 ~+ K0 J  ]2 w  RowBox[{"p1a", ",", "p1b"}], "]"}]], "Input"],1 S6 G/ ]" C) _; ?8 N

    0 n- S$ ~( \5 n/ |6 h- aCell[BoxData[% T: `3 y4 b# [
    GraphicsBox[{{{}, {}, : V( S4 |* [2 ~; `+ ]$ n7 ~4 J
        {RGBColor[0, 0, 0], LineBox[CompressedData["
    + w0 {+ n- B8 H3 @( ]1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn
    - [/ `- t0 R" P1 c( m8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq) v& R2 I4 l/ B0 Z4 J2 Y
    D3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B
      _7 h# [% V7 d: S* {. [: r1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX) f3 \9 C/ X# T& u2 ?; N+ h6 h/ X, c
    C1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN
    ! N, J( g$ r3 D% f% ha2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff1 B+ ^: S8 V8 W: f$ E" w# z
    yqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb; h8 z. y3 a- X: ]& B
    wrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX59
    . p% v" `: w& VY6nGQ3sAieueIw==& S' O1 ^6 ?: I; T
          "]]}}, {{}, {}, ( w$ x0 }1 ^+ {/ P
        {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["
    * ~# ^  g0 y/ U1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ" u: o9 n* f2 q1 P. I5 x
    /B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy4 Q( b" w3 X9 c* d
    GwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy
    , l8 g7 w# G9 l/ D: N& J; u  hGFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy$ z! s# q6 F- k3 @/ [9 z2 ^
    7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/' N. ]5 g0 J" `7 n
    Qu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri
    * w$ g; ^' E, C$ s! k: l" [) kH+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV7 y" x7 H4 j/ n
    rQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T
    5 W# {5 J3 P# O, n, kvA==# Y$ I, q4 Z7 @1 i% Z( U: k  A
          "]]}}},
    ; n4 i, c8 V; w" c4 d& R  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],. p# c0 g$ |# Y( m4 {
      Axes->True,
    # P% o9 D/ g, L" \8 ~9 A( r  AxesOrigin->{61, 0},
      e: x( |, S. b- y9 u# C. M" F* l  Frame->True,- g4 P) G% B, }. y; b: J
      FrameLabel->{6 e- J$ u7 R' k  S. _# `
        FormBox["\"\:7089\:6b21\"", TraditionalForm],
    5 p1 \. Z4 W! u& @# n6 t+ q9 n/ k    FormBox[5 w  z* D8 M  }8 X
        "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\
    1 p. k% l5 {* z2 D3 `) i4 E\:ff09\"", TraditionalForm]},) G6 D1 j) G1 N+ R& [3 o
      PlotRange->{{61, 89}, {0, 1}},  a; T* |: Y; S/ D
      PlotRangeClipping->True,
    # b) R! B( M: [! [3 g2 I! @8 X  PlotRangePadding->{Automatic, Automatic}]], "Output",
    + |8 x- F9 ], ^! z) h) E+ R CellChangeTimes->{3.577962196683521*^9, 3.5780124119375*^9}]
      D% q  B+ v, j9 @# `  x& e}, Open  ]],
    : r* V/ W% ?' S' R* G, ]2 B  m/ j! V3 X5 z8 b$ @( ?
    Cell[BoxData["\:62df\:5408wi1"], "Input",
    ' H! l+ H0 {7 D6 e* {' W CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9},
    7 r: y# |: m+ U8 y8 D  a   3.577959662349238*^9}],
    & f; c* o, W, x
    ; H# r0 y: p9 V* k& MCell[CellGroupData[{9 R& w6 Z6 M3 O- _2 w

    5 k! r1 N& _- UCell[BoxData[
    1 I) v! V, Q8 y. W. ?! m3 ~ RowBox[{"y1b", "=", ! k) n- e$ Y. P; N6 s7 V6 G) q
      RowBox[{"Table", "[",
    - i. f1 Q. i; q' t2 C   RowBox[{"x", ",",
    ! P: \& D* T6 V# B* N+ r1 v5 r    RowBox[{"{", : `7 D# l$ k! F# t, M( i
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",% [  u7 ^7 k" l. r+ }: I
    CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {) v: ~5 p) a/ e9 a  ?; @6 `
       3.5779226649375*^9, 3.5779226810625*^9}, 3.577958232403945*^9}],
    ! z! m7 {2 H6 o+ B; S# z3 m$ |; x" N; r( U5 M3 v) c
    Cell[BoxData[9 B/ H0 P$ G6 j
    RowBox[{"{",
    * E9 R& I3 Y" _6 [3 D  RowBox[{
    ) S6 `$ P. Q4 J2 J5 I: Q8 @& C  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' w. q# y+ n1 y; h5 J. U# C9 ?   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
      O  Z1 _3 _* b9 _    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", 8 |0 v/ I- @( s& T) F  `
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 6 [- U& j1 L2 B- l
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 1 Z' S8 x) X! G0 p8 i% h3 A* R9 g- V  @  F
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", 0 F, v) W2 q& i8 p6 G& I2 R
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
      \5 ^0 a5 i2 j6 `) J- G   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    & n9 d, y% U1 Z  c   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    4 X  g# h4 U% h. h, ?: U  N) }  "}"}]], "Output",/ C5 ?. b5 q5 O; v
    CellChangeTimes->{! J! n) L2 a& j2 v5 P
      3.577922682296875*^9, {3.5779582291435394`*^9, 3.5779582351339493`*^9},
    4 C/ y- p5 e9 D   3.577958478041973*^9, 3.577959010205701*^9, 3.5779622225483656`*^9,
    1 O/ r& q- I3 g2 c  g* S   3.578012438953125*^9}]
    # a+ g+ u; ?) G  l8 d}, Open  ]],: {- Z8 u9 J8 p: z  F7 m

    : ?; s/ e6 U, }+ yCell[CellGroupData[{& C4 }6 @6 r& M( C+ B

    5 B1 M+ @0 m+ U9 vCell[BoxData[1 b( i1 q" n: L
    RowBox[{"Data", "[", 0 \# e8 g1 z, Q1 ]  l. B5 G
      RowBox[{"[", 9 Z% C% U- E8 a1 v. K) J6 ]* B
       RowBox[{"3", ",", "11"}], "]"}], "]"}]], "Input",4 A: [1 r! I( n% X
    CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {
    5 W4 g3 A* q2 S, l. C; G6 N  R4 _   3.577922912015625*^9, 3.577922912171875*^9}, 3.5779582414831605`*^9, {, R% Q! y% v& F% l* L& ]% h4 }
       3.577959014090108*^9, 3.577959016040111*^9}}],
    $ _8 P' A  K, ?& }0 B' _5 I& H/ l! i$ c$ {
    Cell[BoxData["0.492958`"], "Output",1 V5 J+ {& r1 i4 {4 |6 @
    CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9}, 6 Z0 m, @# {; h6 c6 b! M
       3.577922913203125*^9, 3.577958242809163*^9, 3.5779584790403748`*^9, ( x* c# y1 Z2 G& a0 x1 Y3 W/ K7 `
       3.5779590175689135`*^9, 3.5779622239523687`*^9, 3.578012439828125*^9}]
    ! a8 d3 J8 y6 i6 E* `& ?* `+ H}, Open  ]],0 |  v4 n! f: r

    1 ]- |5 s; C: }: r" N* K% vCell[BoxData[# Y7 c/ C) H+ Y
    RowBox[{"For", "[",
    9 [; m% f6 C1 _' H9 {) Q8 d" R  RowBox[{
    6 Z, A* V/ P0 E, m   RowBox[{"i", "=", "1"}], ",", 1 I, v0 L- y+ Y8 h( V: h
       RowBox[{"i", "\[LessEqual]", "60"}], ",",
    % H0 A  K% b6 D, p   RowBox[{"i", "++"}], ",",
    . B4 j+ Q. {' a) o. s; L) b: R   RowBox[{6 J: o1 p2 j3 }' ~
        RowBox[{"y1b", "[", ! Y6 u% g# |0 F# o, |( B
         RowBox[{"[", "i", "]"}], "]"}], "=", % k7 L6 v/ N; ]: w" a- G0 c/ i
        RowBox[{"Data", "[", ' D& n" M9 s; u5 E/ _; ~  b
         RowBox[{"[",
    ) z8 o1 o1 g# R; C      RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",; E! f! {$ w3 ~7 {# }7 R
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {4 l' r( J( P3 ~8 V. y# y& H
       3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,   s* u- [, |) ~% e' e3 v
       3.577922923203125*^9}, 3.577958246272369*^9, 3.5779584755771685`*^9, {
    ' K4 Y2 a  ]" @. I   3.57795902089172*^9, 3.5779590227793226`*^9}}],+ Q7 v" |  d& @3 k) R
    2 w& N" v2 d- u% t" O
    Cell[CellGroupData[{% w4 P9 ]& o, T9 t0 H* L& a

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

    4 L; y1 ^! O4 U( j/ V" @' uCell[BoxData[
    # g: Z! e/ c" K6 q RowBox[{"{", - L2 V! Z! M: [  t( M" D. K
      RowBox[{6 i, @: p& C  s
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 1 v7 X0 T, U4 _5 U
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",7 u' S) W) c, G; d$ R8 I
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", . t% X* L: m1 c: {* C4 }6 s
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 8 R7 B) Z- z/ L" C2 {0 s
       ",", "29"}], "}"}]], "Output",
    2 m$ b* ?& ^% T% c CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9, 6 m, F; ~6 f3 Y! {# j: N
      3.5779583268153095`*^9, 3.577958508118826*^9, 3.5779590470685654`*^9,
    : f3 \  @/ R8 B  3.577962320173336*^9, 3.57801245028125*^9}]
      G3 `4 w% X" H/ {* v}, Open  ]],! F7 v! N6 A8 A6 v; z
    . E3 d5 N. h* o
    Cell[BoxData[- |& A- d9 z- C4 t1 `  P
    RowBox[{"For", "[",
    ; D0 z4 m$ @0 [& O" r' w/ n0 S  RowBox[{' X. Z/ |$ d: d1 a7 ?4 L7 e! p1 v
       RowBox[{"i", "=", "61"}], ",",
    3 F1 {1 i1 h+ u% f- H5 t) I   RowBox[{"i", "\[LessEqual]", "89"}], ",",
    + D7 G6 t! @  d! t   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 9 h: S1 Z6 L$ ^) @
       RowBox[{
    7 c: w" M7 ?. T/ n) D5 {! P5 [# h    RowBox[{
    $ ^( {- k$ v- C% W+ Q" `7 U3 {7 g     RowBox[{"y2fit", "[",
    3 d1 {0 b5 u) X6 I$ O      RowBox[{"[", ' w! w! E+ \, ^: y
           RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",
    0 S* a4 {$ Z! L. W     RowBox[{"y2", "/.",
    9 V+ r7 g, t0 ?1 K      RowBox[{"{", 9 H- w/ A% p" s3 C2 C; M& W
           RowBox[{
      m6 A# ~; P  x3 V! {        RowBox[{"x1", "->", . Q. S0 S" ^& v* x; _
             RowBox[{"Data", "[", % ^) M2 k1 j& A7 E6 P7 x; `
              RowBox[{"[", 9 A$ ]9 I  f3 S+ o# u8 l# @/ O9 F9 ?
               RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    / K4 N% q; m9 x6 t$ a: S9 K) V        RowBox[{"x2", "->", : o2 S# [3 G% o1 R4 a
             RowBox[{"Data", "[", $ I& g6 j3 `) Q! k0 c; g: X6 A
              RowBox[{"[", 7 R: L" |. F) h- E2 _( {1 G
               RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    5 \" b4 f) [4 ~$ f8 Y. M8 Q" K        RowBox[{"x3", "->",
    . }+ ~( B6 e  J# ^# p7 Z         RowBox[{"Data", "[",
    - e2 X" R& c* r% E2 ^0 E* y          RowBox[{"[",
    4 T1 m# Y# g- @) I* K/ p2 Z           RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    0 p) C5 B1 y) ~& C0 ]        RowBox[{"x4", "->", , f8 L3 ~$ c. @$ s1 c7 t& r9 l
             RowBox[{"Data", "[", + C! s' l0 A1 n) r4 n8 ~# k
              RowBox[{"[",
    : K3 p% |& c1 |+ d6 ^4 y; [% D* }           RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", ; k: y' {% c% ?
            RowBox[{"x5", "->",
    ! t0 T+ [/ {1 E         RowBox[{"Data", "[", . h# i9 Q, w) C" i7 w
              RowBox[{"[",
    : I; D8 }. K: v% j" P3 f           RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    7 V: ?7 B" r5 @" [! @+ F        RowBox[{"x6", "->", ' q: A& ^$ B7 D0 B$ p( u# C
             RowBox[{"Data", "[",
    ' d% r! E0 v4 y: K: }  @( J          RowBox[{"[",
    8 G$ |% H4 W/ B- N3 K           RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", 7 a! S: g  @5 ]
            RowBox[{"x7", "->", " E$ C# `, d* j! q, a8 g3 t
             RowBox[{"Data", "[",
    5 M% i/ [/ p. |* ^          RowBox[{"[", % b# m. A) B! O' Z" O! R( i. Y% g
               RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    3 ]0 b3 i  x  A2 L1 R) ~# B( P        RowBox[{"x8", "->",
    4 \0 p' ^, i7 P8 V: Q5 h+ m         RowBox[{"Data", "[", * D, F. A8 B( v0 d3 G  ]
              RowBox[{"[",
    & z; a: q+ ~% q           RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    ; x7 M( f1 g* U4 W" F+ X        RowBox[{"x9", "->",
    6 O! \# ~# E7 X( d, L( ~         RowBox[{"Data", "[",
    + Y5 P' e& L% s* R1 J4 O" s& _          RowBox[{"[",
    ( V+ L5 o) Z9 v* ?/ Y: Y& L# k           RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}], % A) B1 I; w3 S4 d' t2 ~' N
      "\[IndentingNewLine]", "]"}]], "Input",
    0 o1 [1 g! r) H CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {; `+ f2 i, _$ i& _- F
      3.577925286140625*^9, 3.577925306765625*^9}, {3.577958329919715*^9,
    7 v/ a; }" p0 m7 X4 f  3.5779583326341195`*^9}, {3.57795892351635*^9, 3.57795892354755*^9}}],- [8 n/ N/ X* E
    $ M. f# e0 H6 U2 X1 o8 F# Q, G0 m
    Cell[CellGroupData[{
    3 f1 s$ [# ~3 M0 u6 c. q9 o0 u+ J6 D1 P0 W, m
    Cell[BoxData["y2fit"], "Input",. g, O7 E# u! E$ O) @
    CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {
    8 ^3 J. D7 C0 f# K/ w- H; I* r$ M: K   3.577925040484375*^9, 3.5779250440625*^9}, 3.5779583419785357`*^9}],: x. \5 |6 _( d" r/ v" ~
    9 [3 _: o" I; i+ |4 r4 _
    Cell[BoxData[
    2 e6 x7 t9 S' y: a RowBox[{"{", - B9 d) W& K  p) k& ~$ p
      RowBox[{
    . q/ @& n5 M1 \9 A% r# Q  "0.4853171132859182`", ",", "0.4508635216665074`", ",",
    ( B3 M: X) X6 A3 X   "0.3642119241752518`", ",", "0.42852077425595436`", ",", ) W5 g% t- y' S
       "0.4712694272667798`", ",", "0.5257533056184774`", ",", ' L. W. H2 u/ I! p1 A, l
       "0.48620658140716133`", ",", "0.41106838915591876`", ",",
    : R: J) S+ B: z3 B' g   "0.5486894206610674`", ",", "0.007731168540073459`", ",", 1 x' `* c+ i3 H0 A" B& b
       "0.013872406140339109`", ",", "0.3956995051659558`", ",", + ~! ]8 A- W0 O+ U
       "0.3663118256142708`", ",", "0.29094217358055163`", ",",
    & U3 j; `' W$ J- d- C% ]7 H   "0.5453093690736555`", ",", "0.44138898880777927`", ",",
      X9 V* x. Y0 W   "0.42944922031163496`", ",", "0.43092890556748836`", ",",
    $ V- A. [! M% k   "0.5942402821739969`", ",", "0.330046090785457`", ",",
    0 s# O3 z. v- h, R2 X( q; i   "0.18938658036630585`", ",", "0.4263720292858679`", ",", : ?0 }. T# E7 n2 O! X
       "0.23377136184738775`", ",", "0.02232858193309988`", ",", ) i5 p$ i/ @+ u6 ~0 F# f; u
       "0.244364200084268`", ",", "0.5562383565309971`", ",", ; R  P* H2 M5 G' W9 H! C7 ~
       "0.13114103402954333`", ",", "0.5815052048989465`", ",", 6 Q( y4 G1 M% J5 m" J% g) F
       "0.4253455966293501`"}], "}"}]], "Output",9 a* ~8 M( n2 i' {0 X4 F
    CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9,
    3 p; r$ {2 V, ]' d, u$ `6 Q  3.577925312375*^9, 3.577958343257738*^9, 3.577958511784832*^9,
    9 _, ^, T& a1 s$ c  3.5779590518421736`*^9, 3.5779623249157443`*^9, 3.578012452421875*^9}]: t* C: o' r8 Q6 C, t
    }, Open  ]],
    , p3 ^4 N9 J2 G' p3 Z; d
    - O8 n  n, H, ?) m- @: ~Cell[CellGroupData[{# T# ^8 i7 `2 _. S+ Q& {

    2 ~/ U2 J0 c- o! r2 u& ]8 ^  U. SCell[BoxData[: Q9 ]1 @( ~2 h2 y  b
    RowBox[{"y2fit", "=", ; J# b$ ~; p- m
      RowBox[{"{",
    8 K: p% B6 ^$ z) |- |" t   RowBox[{
    7 E7 B' m7 Y* z! {; q1 H& M2 J1 g   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", / N6 p9 @9 Y! I2 F& L* Y; P
        ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - A4 l9 R, ^) ^! z9 `! G
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    4 O1 u/ c5 [5 V* @    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    ) H0 \) W8 h4 Y: O) T    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34",
    2 V; y& t" o, f: \/ }    ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", 7 A% p: b2 u& v; }% |9 x
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", 9 J% T1 d6 h* [2 S7 Y
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    5 r6 a1 e, J' X    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", ' p! ?' @6 C7 `, G7 C
        "0.48531711328591953", ",", "0.48531711328591953`", ",", # r$ s1 l! z, W' T4 F( E
        "0.45086352166650845`", ",", "0.36421192417525217`", ",",
    3 F) ?8 g- |: C9 X! |: T6 i    "0.4285207742559556`", ",", "0.4712694272667811`", ",",
    8 A7 i: f1 \, p" p    "0.5257533056184786`", ",", "0.4862065814071623`", ",",
    : _9 t% @% m' k4 k+ |    "0.41106838915592014`", ",", "0.5486894206610683`", ",", 0 F7 o1 v- u2 o! a# l4 J- k7 O
        "0.007731168540073532`", ",", "0.013872406140339166`", ",", ( O" r8 V4 ^& M. }
        "0.3956995051659565`", ",", "0.3663118256142717`", ",", 3 l5 w* B; k; Z0 K; r
        "0.29094217358055185`", ",", "0.5453093690736568`", ",",
    : k2 W" e- W; F6 ]. m& J    "0.4413889888077799`", ",", "0.42944922031163585`", ",", 0 q# x* ^8 G; x2 o! S$ e: |2 l
        "0.4309289055674891`", ",", "0.5942402821739983`", ",",
    2 \7 M" B# j  c0 ~4 |    "0.33004609078545805`", ",", "0.18938658036630632`", ",", 1 c+ d( I8 ]4 ~6 A# U  z; @6 k9 U- Q
        "0.4263720292858688`", ",", "0.23377136184738778`", ",", ) V9 _  D9 T$ g4 N! H
        "0.022328581933099827`", ",", "0.24436420008426807`", ",", 6 T2 W" N* i1 ~7 s/ a
        "0.5562383565309981`", ",", "0.13114103402954314`", ",", 7 P3 Y! H/ B5 `2 k" C* r' H4 C
        "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]}]], "Input",
    " S5 |1 {  m4 F# E CellChangeTimes->{{3.577959355746303*^9, 3.5779593854019547`*^9}, {  g. p1 }/ _! T; O$ U* ~8 c
      3.5779594223272195`*^9, 3.577959425104024*^9}, {3.57796233399496*^9,
    % v8 f1 ]$ g# Q+ _2 N+ h  3.57796233957977*^9}}],
    % c$ w1 ~  p+ l; k( m
    : F. r. h& I& ?Cell[BoxData[* ]' G! y9 ~+ C+ Z' Q' x3 j
    RowBox[{"{",
    6 m6 @& v8 p2 V2 H. g* c$ j' X  RowBox[{
    9 D! `0 e& f5 K" r, f' ]  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 5 _( u, [. t( W$ M1 n5 }
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    % p9 ]; n0 ?% v& A6 U' p    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    1 \1 ]6 |- R% B5 n   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    / }9 H' e2 r- L$ n. Y7 j& k: J   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", , d9 z1 ]$ K. N1 L3 |8 Q1 e. q$ a
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    , s% m1 C! K4 M- U! v   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", 1 _& m7 a% P8 u$ t9 i2 p, i
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", , k+ Z8 I( \* l0 G2 U- }
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    ' _4 M; K$ }3 B3 r% G/ T   "0.48531711328591953`", ",", "0.48531711328591953`", ",", ' z( q0 H: k) J2 }
       "0.45086352166650845`", ",", "0.36421192417525217`", ",",
    $ V# P6 P4 y! N1 {2 C# y   "0.4285207742559556`", ",", "0.4712694272667811`", ",", , K+ Y6 y0 _3 ^
       "0.5257533056184786`", ",", "0.4862065814071623`", ",", + N: K! I; {/ Q
       "0.41106838915592014`", ",", "0.5486894206610683`", ",",
    . ^6 G7 G/ Y& B2 X   "0.007731168540073532`", ",", "0.013872406140339166`", ",",
    9 h4 F& R: x  I   "0.3956995051659565`", ",", "0.3663118256142717`", ",",
    ) N5 h& n7 c) y( m$ h% T) _! G   "0.29094217358055185`", ",", "0.5453093690736568`", ",",
    4 T" I; n" ^$ D   "0.4413889888077799`", ",", "0.42944922031163585`", ",", ! c0 S# {/ F& x7 a2 F3 U' t
       "0.4309289055674891`", ",", "0.5942402821739983`", ",", $ H: R/ F) S# u+ m9 `
       "0.33004609078545805`", ",", "0.18938658036630632`", ",", ) n" _& j% Y, }4 U
       "0.4263720292858688`", ",", "0.23377136184738778`", ",", , Q3 Y' T/ R5 N9 g
       "0.022328581933099827`", ",", "0.24436420008426807`", ",", 4 V- }# }  ]# g; M2 G! M  U
       "0.5562383565309981`", ",", "0.13114103402954314`", ",",
    & x* L. ~5 i& R! m4 f2 b% T   "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]], "Output",
    ( T1 D8 Y5 {, K2 N) a CellChangeTimes->{3.5779593961191735`*^9, 3.5779594268512273`*^9,   d# M3 c" _5 c7 Q, Z- Z" E
      3.577962342060174*^9, 3.57801245340625*^9}]
    ! d9 `9 B4 z. r. k5 J" j}, Open  ]],
    9 `. N$ o! S5 c2 z# X: d/ B; Z4 ]3 C" F8 k" f/ P" _$ M- M
    Cell[CellGroupData[{, |$ Y& D$ @9 d
    & {" f5 v- W! i9 z+ l5 Y% o
    Cell[BoxData[8 e& j9 Y: [) r' t" H# O# H" g
    RowBox[{"y20", "=",
    ! ?$ O( |: B$ g2 A. j  RowBox[{"Table", "[", 8 Q1 Y7 a+ |! |: {
       RowBox[{"x", ",",
    5 D5 a5 [% f9 W    RowBox[{"{",
    + }/ {9 U+ }! y5 [6 @     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    ; f5 ?: y- M! ` CellChangeTimes->{3.5779253628125*^9, 3.577958351198152*^9}],
    5 k0 N! H3 m- L) M/ k( u) a. r5 W+ p4 e- ?) Q
    Cell[BoxData[
    $ z+ }* H0 y8 b8 }) j9 u1 t RowBox[{"{",
    , r1 N9 Z/ d/ [6 \6 N  RowBox[{
    ! a9 [$ i+ B" l. U$ D6 D  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ! v8 c- }6 r4 `4 f! o
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",: z- l1 y) T$ k! U2 R. r
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", 7 W) U9 E/ @) d8 g! W3 A
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 0 t; z1 m- j0 {$ `- A7 @
       ",", "29"}], "}"}]], "Output",
    4 v( [- f" f# y; R5 J# A$ O. T; \2 [ CellChangeTimes->{3.57792536553125*^9, 3.5779583535225563`*^9,
    6 s9 Q  }, e  _! E" |' x  3.577958515653639*^9, 3.577959053714177*^9, 3.5779623443065777`*^9, 0 @$ Q, Q- q1 ~# S/ ^# X3 M
      3.578012454875*^9}], ]; o. v5 \6 m% I& r# G# z8 K
    }, Open  ]],
    . v- S; N8 }$ @. Z1 y$ P  {& O6 U  b
    Cell[BoxData[) ~) U, x7 [4 q0 Q0 N7 M
    RowBox[{"For", "[", 7 A) j1 ?5 M, z- I7 M
      RowBox[{
    1 \# t" t7 d4 C7 I. T4 b( h# q6 T   RowBox[{"i", "=", "61"}], ",",
    : H' K1 Q5 J5 g5 D   RowBox[{"i", "\[LessEqual]", "89"}], ",", 8 v/ n- z1 s* I' v' }/ D: n
       RowBox[{"i", "++"}], ",", 4 A! \! t1 u; P7 i+ G- k9 A
       RowBox[{
    ( G; q4 [( L. b7 I8 o    RowBox[{"y20", "[", 1 W. C" l$ u) m. J) G. I  h- k
         RowBox[{"[", 9 h0 c4 X7 B* L4 A9 L6 k
          RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",
    : e( m7 A  H! r    RowBox[{"Data", "[",
    0 N* A& f5 _0 c, U) Z9 ]6 Q! F     RowBox[{"[", 0 I7 h8 n! O$ u1 ~
          RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",5 g4 h! W" B# {
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {5 C9 {: G* T( q; d
      3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    . c; s; ]/ |2 q0 S: X6 S  |( E  3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, {; g1 f2 f" u. ^
      3.5779583574225626`*^9, 3.5779583606673684`*^9}, {3.577959056849782*^9, 7 c) Z2 o$ X- @$ ~. C. v
      3.577959058690585*^9}}],6 @4 o8 L9 U# }/ C
    : ]1 h! X$ H* {+ z+ L, O0 A
    Cell[CellGroupData[{
    ' @7 K8 l( F( @% P7 y1 ?% }) ]
    " J( f. J2 y* u. M$ D" M4 PCell[BoxData["y20"], "Input",
    ! i1 v( ^6 J& Z3 r CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {9 e2 S4 u$ d4 V/ w1 X
       3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9, 7 ~# x0 E0 Q1 U) I; t/ d
       3.5779583657841773`*^9}],
    % X9 u  p, ^' U1 {% U
    $ D! ~! i+ u# _2 B, S) ACell[BoxData[
    1 Q; _. F, f9 G/ `2 I RowBox[{"{",
    ! y! B+ B# E% S1 E  q9 u3 b  RowBox[{' ~5 |! j  [' P* p
      "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`", ",",
    ; P* k4 V- N) X   "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",", 7 V0 }, U( X& F4 o# R  R
       "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",", 8 _" h' R9 Y0 o; L* @, }
       "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",", % p4 O: E" n, [% J  F
       "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",",
    1 F7 Y" {$ e7 H, p  q6 P: a; |   "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",", & K$ ^2 x/ t3 z9 d! n; V" R
       "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",",
    " d7 B! b; e) N% R+ A   "0.323944`"}], "}"}]], "Output",. y$ @$ X% @- ^$ I
    CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9,
    1 w2 a" _* [4 e$ Q* V0 ?2 q  3.577925393046875*^9, 3.5779583678277807`*^9, 3.577958517946843*^9, & _9 \/ ^8 W' p9 {- F- R. r
      3.5779590634017935`*^9, 3.577962347629384*^9, 3.578012456484375*^9}]
    - L: m0 N( @0 i}, Open  ]]," w" c$ L! c" T1 W
    : k! o) C, e6 z6 ~, p7 j% L
    Cell[CellGroupData[{
    6 U7 i: M( t5 U& s( [2 r3 I( U5 b3 A/ O& l- y
    Cell[BoxData[, o2 A2 j! ]' }& C6 g* c- w
    RowBox[{"y20", "=",
    $ h4 ]: |6 |8 A% _2 c/ _$ z: v  RowBox[{"{",
    ! ~- k) E. [8 l. F9 h9 z* U   RowBox[{
    % ?! h6 p+ A' o3 x/ k1 h   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      V7 q6 f. a& S& O5 ~; u: E    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 v; q2 `% l) T( w9 t4 o# B; ^
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    / Z* _+ r! N1 n8 [0 \' X    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", 9 f' q) U# y$ g8 P( }, c  l4 G
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 8 H& G3 h: ?' J, y9 G
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    * s, ]+ [9 ~: a, y    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", 2 [8 n* z8 p4 b8 |5 q3 n7 ]
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    ! x1 s4 z0 e# V. P" T$ d! d/ W    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", $ @- h  L0 G2 x' Q% u
        "0.507042", ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", * t4 }; J& f" _% e0 A% E
        "0.338028`", ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", 7 m& e% @0 ^$ q" r
        "0.408451`", ",", "0.295775`", ",", "0.661972`", ",", "0.774648`", ",",
    6 M2 U/ [4 W6 t    "0.746479`", ",", "0.887324`", ",", "0.84507`", ",", "0.704225`", ",",
    4 a. u: C7 o5 M: K4 K    "0.760563`", ",", "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", , Z* v0 D/ ]8 `- F4 L6 C. h7 k6 H  p
        "0.295775`", ",", "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", ; J$ K% X/ U7 p1 V5 L2 r
        "0.732394`", ",", "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", " ^7 S( d5 [$ e5 D$ }6 }; Y5 U
        "0.56338`", ",", "0.323944`"}], "}"}]}]], "Input",* A. {" v" o8 V
    CellChangeTimes->{{3.577959534959416*^9, 3.5779595573142548`*^9}}],2 N/ M3 G' K& e* ^

    + U6 B! e! W" w& eCell[BoxData[9 h/ D, S9 F: b3 f7 v0 W7 }3 x
    RowBox[{"{", 5 p* K) N/ C3 |  I7 d- c; z6 s
      RowBox[{+ Q4 ^& K  H! ]9 w
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", / t1 o, A+ M4 R( x4 c' r
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    : W( }# d. B% b" k. V, F    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    7 F; q; m0 \7 {   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", ( b# E2 @9 L4 |' z6 Q9 {* b4 a4 W
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    ) V( o9 V/ T- c1 m; b- I. A6 z   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    7 E) h8 a/ m. B8 ^$ v+ p+ U   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    ( E* P  ^' _; N1 ^7 M: ^) w% C   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    - P/ e* s) ]% L2 j' K+ M5 N   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.507042`", % ~2 G! u' |. E3 b( M- p( _
       ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`",
    1 _$ C( _- f) N   ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",",' a% T2 q6 H" x/ _# G: i8 b- ]3 f9 q
        "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",", 3 a( G6 \# {6 x' i
       "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",",
    9 @* M8 K, J3 b. A$ p   "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",",   K% d  ~* L$ Q6 d1 ~
       "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",", 1 M- G  D' }8 H
       "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",",
    1 k9 E: V4 f' G$ d   "0.323944`"}], "}"}]], "Output",  O/ f8 e/ n* Z" X
    CellChangeTimes->{3.5779595594514585`*^9, 3.577962351778991*^9,
    + u, v2 a4 W0 p% M, v/ ~) b1 I, {  B  3.578012457234375*^9}]9 J; c) k+ B8 A1 n# p5 T
    }, Open  ]],
      o% s) s4 f4 c( h# U& p) E2 O0 X" T& J0 \" ]4 ]- ^3 Y. }  g
    Cell[CellGroupData[{
    + \: o4 H) C8 S& [5 v3 i
    $ k& x5 Z' M  K( w: B1 \! P0 gCell[BoxData[
    0 N6 N; O& j+ V# } RowBox[{"p2a", "=", ' ^3 l, h* P6 E- E8 l
      RowBox[{"ListPlot", "[",
    4 W$ T2 I# s, v9 N" O, N) s0 J4 d% P   RowBox[{"y2fit", ",", & V. A9 R( @' I2 ~
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",", 9 v6 @1 @, h$ k. D9 e
        RowBox[{"PlotStyle", "\[Rule]", 6 V. j/ \* d0 ^" _( C( A- p4 l$ T5 a0 d
         RowBox[{"{", " Z. p8 A9 |/ o2 Y- e
          RowBox[{"RGBColor", "[",   j$ g: T3 L: H7 C' i' }
           RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",",
    & N1 x, E+ I2 F3 n1 p  m    RowBox[{"PlotRange", "\[Rule]", - z( C' h3 R/ P" k! ~
         RowBox[{"{",
    ; A5 ~" _8 W0 x8 q      RowBox[{
    6 D* t! x5 ]" A* i  i       RowBox[{"{",
    + `! _" ?; o- _1 s7 g        RowBox[{"61", ",", "89"}], "}"}], ",", ! {. P4 `+ V+ }$ a
           RowBox[{"{", - r( D( l' x0 x1 r! y) ]/ h
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", 2 M9 J$ l; f9 b$ O  |1 H/ R/ d
        RowBox[{"AxesOrigin", "\[Rule]",
    9 z; ]( e% |/ l  C     RowBox[{"{",
    0 L2 E: x3 c# @      RowBox[{"61", ",", "0"}], "}"}]}], ",",
    + i% i3 A$ d/ W6 J, W4 a    RowBox[{"Frame", "\[Rule]", "True"}], ",", 7 ?+ k- c7 e" ]* @7 p2 f0 f
        RowBox[{"FrameLabel", "\[Rule]", / u# o% v0 Q/ v& c9 L7 W, u8 `5 E
         RowBox[{"{",
    8 B5 R! V) \  F8 Y      RowBox[{5 j& r' }5 s+ t3 \( h5 o8 ]$ }0 v# `
          "\"\<\:7089\:6b21\>\"", ",", ! g; A  k* k& L
           "\"\<\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\. o2 Q) B! y- ~4 F  S6 m
    \>\""}], "}"}]}]}], "]"}]}]], "Input",
    ; U( c- f. n0 L& ` CellChangeTimes->{/ L' d# m# u" L# e" H/ ~7 N  T
      3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {
    2 x! N& t( G- M% O   3.5779583712597866`*^9, 3.5779583781393986`*^9}, {3.577958536604475*^9, - {( a9 K- ~3 m* b+ u5 H+ K  R. T
       3.5779585491624975`*^9}, {3.5779592802577715`*^9,
    # {& l# \% w# w6 L7 g" Y   3.5779593014270086`*^9}, {3.5779594039971876`*^9,
    ; J* F6 j& b$ k6 E! C/ e' u- a   3.5779594059783907`*^9}, {3.57795949706695*^9, 3.5779595174717855`*^9}, {) C2 w/ ]( G- H% [+ \
       3.5779604302529774`*^9, 3.577960442311798*^9}, 3.57801246978125*^9,
    % X- |0 w) b+ ]1 h5 L$ E7 U- U   3.578012920859375*^9}],
    5 U' y  p# P- S; k0 Y9 Q4 @& w6 s. t' c
    Cell[BoxData[
    + W) S" ~5 k3 {, }$ L+ J GraphicsBox[{{}, {},   X* {- b# a. p. b  M+ C4 C
       {RGBColor[0, 0, 0], LineBox[CompressedData["
    * H9 L$ P0 n# D+ D1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM6 E- i" B/ Q5 M
    /g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ
    . F% G/ q$ u7 j9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P$ g+ W2 {& b9 W, w: S2 U
    ofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC
    " i- c8 }) K4 H0 D  X- GqPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK3 ]5 j3 X: n' ?1 ]
    1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx* B! ?2 J. N* I5 u
    0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p1, ]/ g3 P+ ?, I% K% r6 K
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH( N+ o9 y1 I8 j+ Y. o% o
    99yxuG0PAHw7nyU=
    3 v9 D' x1 R5 R2 |9 {" q     "]]}},
    " r8 C3 K: J# w1 V& w  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    * K; W) U1 f9 y* R2 v3 a/ T# l  Axes->True,/ p; ^: d6 y. i! o) \# @! t9 Z3 B; e
      AxesOrigin->{61, 0},3 J' c& a, l6 w+ a4 c9 s, P
      Frame->True,
    - o4 [6 J6 c: i, R, r2 b8 ]  FrameLabel->{  W4 A! M& G$ @  _. `* _1 Z% J7 z
        FormBox["\"\:7089\:6b21\"", TraditionalForm],
    * P2 _5 F7 z0 A4 h# E    FormBox[
    + h# j- m6 E! J  J    "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"", 6 ?; E( s4 t% c1 |% ~% Z  d
         TraditionalForm]},/ r" ^: @( e' e
      PlotRange->{{61, 89}, {0, 1}},. h, |3 j4 E  K( i  N; G0 i0 ?! J
      PlotRangeClipping->True,5 z' J. y5 O+ F
      PlotRangePadding->{Automatic, Automatic}]], "Output",
    ' d( h. I( ~% z8 q. } CellChangeTimes->{6 w. _/ c5 d0 M4 w' u8 l
      3.577925144625*^9, 3.577925396578125*^9, 3.5779583797150016`*^9, ! S# _: a3 q% ?& W5 e- @
       3.577958519990446*^9, 3.5779585510813007`*^9, 3.5779590670678*^9,
    4 t  I. d1 e- K2 ]   3.5779593035642123`*^9, {3.5779594075383935`*^9, 3.577959430158433*^9}, , X: v3 E- e0 X* K
       3.5779595184233866`*^9, 3.5779604438874006`*^9, 3.5779623548833966`*^9,
      e2 t. X# `0 Y7 x$ Y) j$ O   3.57801247209375*^9, 3.5780129225625*^9}]
    * c) V8 g2 T  Q0 G& O! E' m}, Open  ]],4 {6 `5 M" V) J; H7 |; O2 \7 h

    , j) x& \9 r5 r3 d: F) zCell[CellGroupData[{
    : {  B# K# L( }& C$ c  }- J, u1 L( |1 d' I! B! I6 T- b  \1 A1 S% e& n
    Cell[BoxData[2 o/ d8 x/ Z# E# f& L. d4 T
    RowBox[{"p2b", "=", / {# A5 e7 {, P7 @% T5 M
      RowBox[{"ListPlot", "[", ' f8 l* P( U4 I* {9 q  ?
       RowBox[{"y20", ",", " T6 n$ h6 Q$ b& H. B! l3 X: d/ Y
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    4 o- T+ J. q7 A7 F    RowBox[{"PlotStyle", "\[Rule]", 6 M0 F3 |# h5 ]6 M9 ], D2 M' u4 b
         RowBox[{"{", ( Y8 e# _, y% J7 T
          RowBox[{( W4 y1 C1 ]) |9 \  h$ t/ k4 r
           RowBox[{"RGBColor", "[",
    5 V% p; @' q; z3 ]1 l2 \        RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}],
    % V4 A# f6 }- i* _; P- i! H    ",",
    . f+ i- K5 A7 c    RowBox[{"PlotRange", "\[Rule]", * M9 X' y" E/ p, L
         RowBox[{"{", & i. \# M1 A3 ^+ h: \& W
          RowBox[{
    # X% Q7 I) F8 T& {4 B       RowBox[{"{",
      Y7 y7 @8 a6 |% X. \9 b, f6 q) @        RowBox[{"61", ",", "89"}], "}"}], ",", 5 b, D9 N& Y' q$ T, k% e
           RowBox[{"{", 0 s2 A* W4 ?; ]9 l9 |
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    3 N0 P- i1 T! Q2 M# P    RowBox[{"AxesOrigin", "\[Rule]",
    $ v- \# T. e6 R$ {1 C& L: ~! J     RowBox[{"{", ' J4 r+ r+ n, l$ i( t
          RowBox[{"61", ",", "0"}], "}"}]}], ",",
    : _( f3 r& \/ g    RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",
    ! V7 F. x8 Z. X) v CellChangeTimes->{% k- U8 H% _2 c$ G
      3.5779253991875*^9, {3.577958382429406*^9, 3.5779583843326097`*^9}, : N8 l1 w8 k: w- C2 F+ a( d) d3 |
       3.57795855655691*^9, 3.5779595724462814`*^9, 3.57801248346875*^9}],; V( G6 ~% c: y

    ! e  E* a1 c) x0 S: [: p. V- nCell[BoxData[4 ^2 i  S. R& o; W9 B# z0 f# h
    GraphicsBox[{{}, {}, 5 c0 D# c- g* d5 s
       {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["5 N9 F0 e; g5 X! |( c/ p% p) B- m
    1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn1 A* M. c# s: h* r
    8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV
      i, b' z2 `" o" N' V: R( G5 oc/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc
    0 s' d6 ?7 |5 n: @" m9 S- YiX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk42 n8 q* l4 q, H# z! w% a
    TZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO
    4 |4 @' @2 ?1 H% s1 x1 {& rfzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB/ M4 N% M5 B, n9 H: J
    TWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG
    0 [8 r9 V5 P5 W* w/ j( {p0OYg4Fg/tz63VfsAdsCnzU=
    . J: w: G( d6 u0 h     "]]}},
    / I6 `6 T5 o; Y) C  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],. c# I8 }" |0 N5 y; e* k( o
      Axes->True,
    , p8 K" _2 u' z5 C2 ?  t( f, x  AxesOrigin->{61, 0},
    1 {& b. b, J% N1 \  Frame->True,
    6 c) Y: t; I- N! X7 o& |' j  PlotRange->{{61, 89}, {0, 1}},& F! T( n9 x; m) C
      PlotRangeClipping->True,' S' ^: t& C$ K  Y/ L) A
      PlotRangePadding->{Automatic, Automatic}]], "Output",
      B8 L' r( p7 A( m! ` CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9, : x$ \- u' [' F  U$ s1 h7 Y) s
      3.5779583861890125`*^9, 3.5779585219092493`*^9, 3.577958558132513*^9,
    % H$ Z# ~# Y' w; \! H  E  3.5779590691114035`*^9, 3.577959577906291*^9, 3.5779623569426003`*^9,
    - _: y1 F% `! r( q3 }  3.578012484703125*^9, 3.578012925875*^9}]
    8 h6 u0 x" s. K! v% s}, Open  ]],
    " @. A3 D- y+ g$ b' g; R% \. I
    1 c5 x) c, {3 L) a' h$ l9 xCell[CellGroupData[{  J3 p. W' L" e' `! i! j

    3 J3 t/ ]2 D( M0 rCell[BoxData[
    + E  C4 I$ f5 {% ^ RowBox[{"Show", "[", $ ]5 n+ |( V9 _
      RowBox[{"p2a", ",", "p2b"}], "]"}]], "Input"],
    8 U1 `0 e' u2 W# Q! z4 P  n
    9 d! q8 ?( I$ G" z- OCell[BoxData[
    ; d3 J1 Z4 s% d. I GraphicsBox[{{{}, {},
    , `6 A8 d2 r/ U% ~    {RGBColor[0, 0, 0], LineBox[CompressedData["9 m3 G. {1 V; i! T9 g* @  R
    1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM+ R6 k9 W# e, a6 J
    /g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ) u+ ^7 J( n* X# k9 ~. O; Z" \) O
    9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P. M( M! d2 F. o: U3 t
    ofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC3 X6 q$ k6 w  z8 Q
    qPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK& v# j3 G: D; a: P# i+ o
    1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx& Q' g$ F/ e; I% X8 v# X; ]
    0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p16 {; b4 Y  E# p0 ~4 |; G
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH
    " i9 c" v; |' c' h+ H( ~99yxuG0PAHw7nyU=9 h% b3 c. h+ `
          "]]}}, {{}, {}, 7 O( U4 l% A. `4 l1 f
        {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["$ M, q; W4 R/ c' S' |- W
    1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn
    / j- d2 A2 k. o6 x: q8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV
    % c2 i7 p  O& o# S3 qc/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc: u4 Z0 v2 V4 x$ M- W; k5 r
    iX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk4
      r4 K, X& J( W& `TZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO2 }4 [; e4 J4 P  u. `% {# H2 i
    fzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB& V, G  z/ t/ Y
    TWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG9 \1 @# n" J( n4 d" ~  {3 h
    p0OYg4Fg/tz63VfsAdsCnzU=
    7 s8 P) S) m) q9 k& D! R      "]]}}},3 }# m5 q: v) _6 `+ B
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    + h6 L: L6 Q6 Q  Axes->True,
    3 A: W# h  L2 I/ e5 Y1 n  AxesOrigin->{61, 0},* y* y3 G  \4 p
      Frame->True,) m- s( D1 V. X( v
      FrameLabel->{
    ) d5 ^2 u4 f. C6 \& @' v    FormBox["\"\:7089\:6b21\"", TraditionalForm],   |& y/ t$ B) q. J2 r3 Q, w$ T
        FormBox[
    ( A3 k' M9 G: E& ~( k    "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"", 3 e4 g3 Q; n$ S+ ^6 u2 Q
         TraditionalForm]},! I4 }( q1 Q* t0 U7 ~( u
      PlotRange->{{61, 89}, {0, 1}},9 d# S- Y1 t( n+ U" A) L& S: e! T
      PlotRangeClipping->True,
    , b" S) ?# \/ R) {- m  PlotRangePadding->{Automatic, Automatic}]], "Output",! {# ]; x- g% h; u* Q  Y3 ^- Y
    CellChangeTimes->{3.5779623624182096`*^9, 3.5780124863125*^9,
    + [0 J( J5 ~4 C6 u! z# v  3.578012927734375*^9}]$ k( a2 n$ V( ?- _
    }, Open  ]],
    & h5 {* P0 a9 ~
    5 K, i; p1 k: U& VCell[BoxData[
    / E8 s+ I, M: f5 |: O: _5 S RowBox[{"\:ff08",
    ; J9 X6 |, u4 h( z3 g, ?, M& L" v  RowBox[{3 g: I$ z! u$ l
      "\:5df2\:77e5\:521d\:59cb\:94c1\:6c34\:8d28\:91cf0", ".7406",
    " e8 s0 b; C' C- S+ o& X   "\:3001\:5e9f\:94a2\:8d28\:91cf0", ".4621",
    ( X" s! t0 N. m/ j   "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea60", ".5208", 7 ~- B2 l( Z& E% i" W( }$ n
       "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:542b\:78b3\:91cf0", 7 }( ^3 k7 y, _
       ".2221", "\:ff1b\:76ee\:6807\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\
    - B! ^+ g5 {9 Z( _2 T: N/ u\:4e3a0", ".6224", / a% J" P9 s: @# x
       "\:3001\:76ee\:6807\:94a2\:6c34\:7684\:78b3\:542b\:91cf\:4e3a0", ".2521"}],
    + m8 A. q3 \& Y; ]2 N# Q- b   "\:ff09"}]], "Input"],
    ; Q8 T! Q  k5 t1 n) E' r& V1 h" V$ Y0 J6 `8 \
    Cell[BoxData[
    ) ^5 ^2 o) u" c9 X RowBox[{"{",
    : w3 ~1 {) x6 A2 f7 b  RowBox[{
    8 X7 H. x1 p; F; f, \- `! ~0 O  "\:94c1\:6c34\:8d28\:91cf", ",", "\:5e9f\:94a2\:8d28\:91cf", ",",
    ; L8 I5 \# R# H. }/ F, H, y   "\:5439\:6c27\:91cf", ",", / j4 t* [, r4 c9 M- i
       "\:4e0b\:526f\:67aa\:65f6\:7684\:542b\:78b3\:91cf", ",", 5 u* j( O6 C9 N
       "\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea6", ",", 6 Q# |6 r$ O; b  V% C& Z% w& R
       "\:5757\:72b6\:77f3\:7070", ",", "\:8f7b\:70e7\:767d\:77f3\:7070", ",",
    1 W( ]; H8 E* {" O  B8 n5 X   "\:83f1\:9541\:7403", ",", "\:5757\:72b6\:767d\:4e91\:77f3", ",", % x$ U" \- ?; L/ C5 `0 W
       "\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf", ",",
      N: E5 D* B0 n1 [0 X( [   "\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6"}], "}"}]], "Input"],
    2 f4 G! o6 K+ M3 e. x
    1 p1 r- ?# u+ @* L$ U$ oCell[BoxData[" "], "Input",, j* h+ b4 O# M% g! ?1 e. D! Q* y
    CellChangeTimes->{3.577962834553033*^9}],
    ( M$ q- X, r! y
    7 v) r0 z' L" n- {Cell[BoxData["\:94a2\:6c34\:7684\:78b3\:542b\:91cf"], "Input"],9 y3 s6 ^0 p7 l4 U

    9 I. ^9 G: ]' q2 k( jCell[CellGroupData[{2 d7 x1 [- O( u. U' y9 t

    1 j% Q/ _1 F% dCell[BoxData[
    5 N$ ^) \5 M& ^ RowBox[{"y1", "/.",
    ' T1 q3 W2 T* p1 j3 x* c) Z" O( q  RowBox[{"{", 2 e  G- Y: h! {8 R/ [
       RowBox[{- J: W" ~8 f9 s9 H8 \
        RowBox[{"x1", "->", "0.7406"}], ",", 1 R) h  x, N* ?, ^5 I& {6 E
        RowBox[{"x2", "->", "0.4621"}], ",", , A. \3 l" W0 M9 v) x
        RowBox[{"x4", "->", "0.2221"}], ",",
    6 x7 J3 s: U3 q1 ~* q    RowBox[{"x5", "->", "0.5208"}]}], "}"}]}]], "Input",2 s  R& Q! M' I% H3 y  y
    CellChangeTimes->{{3.57796267209435*^9, 3.5779627224200373`*^9}, {, b" j' T7 }+ W5 {& s1 |
      3.5779627663029137`*^9, 3.577962774820529*^9}}],
    : t; f& w/ P9 @" R" |, B$ A) {7 x
    5 [$ Q5 F# Y! U3 Y+ ]' Q- n7 |Cell[BoxData[
      W; s+ C2 Z5 \/ ~3 q RowBox[{, K0 G- A* G7 t
      RowBox[{"0.2286149508637297`", " ",
    6 v6 M) w1 z* }4 h   SuperscriptBox["\[ExponentialE]",
    / O: s6 O+ P, b, t" ~' d+ k' Y# J    RowBox[{"3.1415926535897936`", " ",
    & O9 p: Y  Q% {# L8 Z% ?     RowBox[{"(", 6 S/ J5 ?8 K3 ]# i( U0 m
          RowBox[{. \$ D( ~( b( c* }& j$ F9 r4 x
           RowBox[{"-", "0.17911224641499998`"}], "-", # e' i3 P. h+ \$ q
           SuperscriptBox[/ q! Q2 h7 f4 s& O
            RowBox[{"(", / z3 d: y/ `7 Q. U
             RowBox[{
    - U; ]% A8 m$ z: L/ v: l1 H# T          RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", * @) J9 }/ |1 r+ ^( s
           SuperscriptBox[* I9 f2 U$ b, X+ }; h1 W  @+ F
            RowBox[{"(",
    + d: c- B, v: P3 f6 _         RowBox[{$ F& @) X. ~; V" v( k1 Y; Q+ _
              RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    ( L6 t3 v# h% R4 v0 T6 B6 G9 {! D       SuperscriptBox[2 ~6 B1 A/ E( d$ o1 d3 }
            RowBox[{"(", 4 b0 P: v4 ?  d  o0 {; b6 [
             RowBox[{
    % V. Y8 R- d& g5 d  ?          RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", 7 L2 L! Q7 s8 C; _4 T( I
           SuperscriptBox["x8", "2"], "-", & f) S0 v2 `: j
           SuperscriptBox[, q: A3 T+ p9 Y0 K% t+ B
            RowBox[{"(", & D) h1 I7 h5 }# {) l2 F+ {# z
             RowBox[{" s( m! c8 ^2 Y
              RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+", 7 L5 L. m3 ?1 J' |9 D' h6 c/ f/ a& R
      RowBox[{"0.020180806675835994`", " ", 3 F9 W" [" z1 W
       SuperscriptBox["\[ExponentialE]",
    " w# N8 s+ t8 O6 D+ G    RowBox[{"3.1415926535897936`", " ",
    - I, k4 n  i) H- o  K! }     RowBox[{"(",   ^- ?" j( B, G- f
          RowBox[{
    0 z+ y# d3 S* Y  j8 }4 |! |       RowBox[{"-", "0.105619387859`"}], "-",
    ! `$ A; N% r6 X, e6 v) y! y3 f0 {       SuperscriptBox[
    % h" I9 y) L3 K: t- q        RowBox[{"(", 1 |: y5 y! K3 I: \& l! r, h: p& q( L
             RowBox[{2 \. p- Y+ ^/ G
              RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    " k- j+ x1 Z, h; W; l       SuperscriptBox["x6", "2"], "-",
    % e# I9 N+ m3 \" v  I  B6 u       SuperscriptBox[3 J1 v5 Q. E: m: N% y
            RowBox[{"(", 9 n; \% `5 n/ Y
             RowBox[{; z, R, Q/ ~7 h8 S1 P8 t
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    . p+ m! z+ ^8 h       SuperscriptBox["x8", "2"], "-",
    & v- r7 e! }+ d: |9 L- q1 I7 `       SuperscriptBox[
    # I! m5 D- H/ e5 _* m2 f+ C        RowBox[{"(",
    - f; o2 g  \5 |         RowBox[{: E4 O( R- Q& {: i8 R) K- s+ i- v
              RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 4 ], p( B, x  l, L$ p; S6 N' H: q+ B, h1 O
      "+",
    * i( F* S2 V1 i6 Z  RowBox[{"0.13092706311748437`", " ",   m2 g' W5 \: J
       SuperscriptBox["\[ExponentialE]", 6 }) ^5 ^# U0 E: g. D
        RowBox[{"3.1415926535897936`", " ",
    . O7 c/ c8 }! Z. v5 u9 |     RowBox[{"(", * j, d- I# q$ w4 o0 x8 a$ V
          RowBox[{2 B: ]5 V+ y3 h( Y6 D. S3 h8 A+ |
           RowBox[{"-", "0.236605670085`"}], "-", . C$ }. ?2 e/ r. U( Q1 @
           SuperscriptBox[
    ; k' j% X) i0 j% {, \6 K        RowBox[{"(",
    , o* v! r$ u4 h$ e( z2 P, z  p/ }         RowBox[{! v' f2 J* i8 K
              RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", $ X' a  |! F0 r- j, z, j2 g$ G
           SuperscriptBox["x6", "2"], "-",
    - I+ w$ `' E" _, x- n" k; Q       SuperscriptBox["x7", "2"], "-", . h5 Z1 D6 k; D& b! o4 U3 X
           SuperscriptBox["x8", "2"], "-",
    3 J0 S; q* i3 G       SuperscriptBox[
    6 f  U% b3 ?6 q) `6 o0 ?4 u: ~        RowBox[{"(", 2 M) ?9 |: O7 v
             RowBox[{
    3 g! L7 i* K' h6 I8 S- ~          RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],   @0 y  ]! k7 A. l2 y
      "-", ) l- A" J$ J8 g  j' C, T) \! |: @3 a
      RowBox[{"0.033459349088924784`", " ", 9 t& h8 A* D+ g( D
       SuperscriptBox["\[ExponentialE]", % \6 g7 q; y# J% U
        RowBox[{"3.1415926535897936`", " ", 0 `2 e! T, ], ~$ k
         RowBox[{"(", 5 _7 r: U7 _4 ?- m
          RowBox[{
    $ C& `/ |; X7 b& I( ^) c       RowBox[{"-", "0.46221081830200006`"}], "-", 0 Z& ?6 {0 Z/ b; J' A2 f
           SuperscriptBox[( U  }* s( }. P8 i0 ]
            RowBox[{"(", 6 e2 b: r. x% q! W" d
             RowBox[{
    * X  |9 x4 ?3 T& K, f          RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    9 }$ Q3 ]& w4 `, Y       SuperscriptBox[
    $ B% {' S( w3 ?2 {2 h7 D        RowBox[{"(", 4 n$ b& [- i& s/ o
             RowBox[{
    * ~- f) I4 Y+ R9 o          RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    6 Z+ U6 n5 |$ s+ `# w. n; q       SuperscriptBox[
    , h8 ~& O/ _) A) T, v; ^- u( L8 _# v        RowBox[{"(",
    / _  N  h6 B! [6 |! B& w  M1 _         RowBox[{6 h0 [. @7 l  y" Q  ?
              RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",
    , Q3 g9 K) L2 E5 f# D3 a  }       SuperscriptBox["x8", "2"], "-",
    0 e! m  _8 t  ?; D       SuperscriptBox[( @$ v8 a8 Y1 P; U! P5 v; D$ |6 k6 N
            RowBox[{"(",
    $ d5 q7 e# j% U% y% b; A0 ?         RowBox[{
    9 N/ k# |9 b5 J4 j/ D; Q          RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 9 z$ A2 |9 O; T
      "+", ' l2 j8 ^- n$ q4 v/ A0 Y
      RowBox[{"0.39611806709006653`", " ", * b( ]+ s( N' K$ K/ k( b5 v5 i% l! N0 z
       SuperscriptBox["\[ExponentialE]", , X# ]1 ~, M' ?" d- B, C- p
        RowBox[{"3.1415926535897936`", " ", 4 |" C+ |8 u0 L1 [9 D% c3 W
         RowBox[{"(", 4 ?1 x# \6 Q) d. h+ m+ V" D# w
          RowBox[{
    4 f4 m* Q  x$ @8 a+ j- y       RowBox[{"-", "0.5837889295140001`"}], "-",
    3 p4 v2 {' _0 a" L% p/ d4 V       SuperscriptBox[
    - U2 z0 m1 w3 c; |# v- X        RowBox[{"(",
    ) {) N6 n: W2 ~% ?" L4 }) P' O$ m         RowBox[{
    ' ?4 O* a; h* [. W8 ]          RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    8 T8 U, v8 U! _       SuperscriptBox["x6", "2"], "-", ' [" l; b4 [$ ~6 ^; x
           SuperscriptBox[
    2 n& n" c: [5 A$ b6 K" m* K& P" u, E        RowBox[{"(",
    4 I# n# s+ B. T/ S         RowBox[{, @  F% O1 @7 y: i/ i
              RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    2 f6 V$ ~) G- n6 q6 u, r3 c       SuperscriptBox["x8", "2"], "-",
    # [4 R* e, K2 y2 H3 D       SuperscriptBox[8 L% `% _, O  o9 k
            RowBox[{"(", 9 P; o3 X* z$ _! v: O  _
             RowBox[{+ ]1 o, @& G) j# b
              RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    5 _  u( L# }* O5 A+ b  "-", 4 ^; q1 r0 _0 E: S1 _: K
      RowBox[{"0.19996885877792045`", " ",
    ! }1 ^* z. |( }5 _* N- M   SuperscriptBox["\[ExponentialE]",
    # Z3 W! |9 \) l9 \- w0 t    RowBox[{"3.1415926535897936`", " ",
    % o! e" V" ^$ c  M( E# q     RowBox[{"(",
    $ a  D2 N+ `; ]; w7 Q6 O      RowBox[{. m) }3 m2 Z$ a' w& _# b0 v( v
           RowBox[{"-", "0.19030188470200005`"}], "-", 1 M( @3 m. W( c$ J  I7 w
           SuperscriptBox[
    / C7 b, [3 j9 b, d7 e' j2 l  @& G        RowBox[{"(",
    8 b2 ]2 i( Y8 K         RowBox[{, ~% U6 l8 ~. ]4 U- M8 O1 j
              RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
      F1 f2 s' x) g$ e       SuperscriptBox[
    6 B+ b# G! ~+ C1 U) D1 B6 x: K        RowBox[{"(", 0 a6 r$ j( C1 U) r+ q; }: G
             RowBox[{
    2 |/ w5 ~, g+ l- r  X( d6 g          RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    , o8 W- W4 V0 N  K       SuperscriptBox["x7", "2"], "-",
    2 P1 a! G8 Q7 X4 F       SuperscriptBox["x8", "2"], "-", ( ?; s3 X& _7 \
           SuperscriptBox[
    & o3 u: v: r) Z, o$ Y        RowBox[{"(", ) n5 O0 U. l4 ^! N' k$ N
             RowBox[{
    - C/ U+ Z+ ^! Y- r2 q  H3 i, s% c' k          RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    ! A5 ]5 F3 M% t" p+ G  "+", + K& j, v& Y" s  x5 B$ E9 S, F: A
      RowBox[{"0.23580523388620744`", " ",
    * Q) e% n7 g# A- p3 V1 P   SuperscriptBox["\[ExponentialE]",
    8 R( l. a, q. `# M, ^    RowBox[{"3.1415926535897936`", " ", 3 V% z0 K1 e! d1 h
         RowBox[{"(",
    0 V2 w/ F) m% d0 N) e- T      RowBox[{
    " m$ b) ?0 f" g& C" Z; E       RowBox[{"-", "0.28518780882`"}], "-",
    4 z. A! V/ ]& W& {* Q       SuperscriptBox[
    ' j$ ?* [0 J8 C0 G6 U        RowBox[{"(", 8 Y4 C' D+ W; `* z
             RowBox[{. D) D* h  ~* R  |, G2 K$ z) U8 E
              RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-",
      w* Q/ ?+ l7 r2 x# \       SuperscriptBox[
    / b3 j( N6 v$ R        RowBox[{"(",
    ) G/ g; @6 l3 U$ Z         RowBox[{4 I1 }( A' n. ^  k3 r
              RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-", 3 t. {6 A0 P: p' K
           SuperscriptBox[0 a, S+ P3 e% h' |" V, Z: g0 Z
            RowBox[{"(",
    - g1 G+ h9 t( t0 X         RowBox[{
    % Y7 c7 X2 G' ^* j          RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",
    # W& s8 V3 B. ^$ g' X9 K6 q# w       SuperscriptBox["x8", "2"], "-", + o& s7 E- a" Q& i
           SuperscriptBox[
    * i0 ^7 [, r# G/ \& V1 K' Y; m7 K% e        RowBox[{"(", 9 k/ b% A0 B5 R# f
             RowBox[{( @4 f4 @$ N! N
              RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], & p! a! d, t: v& A* J- J
      "+",
    % X( ^" d5 M# Z# [. e  RowBox[{"0.667027259367853`", " ",
    ' r; O% ~/ }) E& E   SuperscriptBox["\[ExponentialE]",
    % Z; p/ c5 I  ^/ l    RowBox[{"3.1415926535897936`", " ", ( t9 U- u" D( p- ^7 j$ J2 b1 }
         RowBox[{"(", : M% `9 I: [3 y9 u: @
          RowBox[{
    - ]3 D4 H+ a- D0 F* _* @7 L3 n       RowBox[{"-", "0.11387365200400001`"}], "-",
    % U+ D& V' Y! _3 R( _6 r       SuperscriptBox[& w, D+ l& }7 l, T1 w# t
            RowBox[{"(", 7 Y9 w# @) ~$ f# h. x
             RowBox[{
      f! J- M+ X/ N. K( K/ u          RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",
    7 N/ |. a1 P9 ^3 K* M       SuperscriptBox[4 n1 x( s  v9 ?
            RowBox[{"(", / \0 U7 k9 g  H- ?% i3 L# ]
             RowBox[{
    6 l" h6 Z" Y2 l; v4 d          RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
    . h) ]; u8 ^5 \6 R  z6 p- x       SuperscriptBox["x7", "2"], "-",
    " S  r/ G) Q. [, O; e, e) }" o6 ~       SuperscriptBox["x8", "2"], "-",
    ) }3 c" v- W2 N: |7 X       SuperscriptBox[
    9 o! h6 F6 X2 p% R3 _, C: a) C        RowBox[{"(", 0 v2 c7 g+ I* u+ ~7 S8 R& ^
             RowBox[{& B& E1 m6 b& Y" [. ~
              RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    & A1 I6 w+ n( X& R  "+", 9 o6 `1 C, T2 F# S
      RowBox[{"0.25282438852646905`", " ",
    6 v2 y( j$ Y$ A) G   SuperscriptBox["\[ExponentialE]", ! t6 o6 O& x, t( f* J- T
        RowBox[{"3.1415926535897936`", " ",
    ; W! ~" n; K2 u" c     RowBox[{"(",
    2 ~4 y% {& z* B      RowBox[{
    % ~* |5 u  J& k7 n7 I       RowBox[{"-", "0.11442644782500001`"}], "-",
    # b* \+ a& O% A; s3 G, N       SuperscriptBox[7 r% p# {. x) {1 y5 V6 ?5 `* [$ c
            RowBox[{"(", 2 Z+ D% x4 ^+ i  u  T
             RowBox[{
    - l5 `9 D5 D+ D4 [          RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    - p# ^1 {2 ~6 }. z% B4 q, ?* b3 }/ ?       SuperscriptBox["x6", "2"], "-",
    9 Q& ^! D+ Q8 l0 v6 c" S8 k5 _       SuperscriptBox[, }5 [2 T1 a% V/ N
            RowBox[{"(",
    2 @' Z# x4 L8 `( q         RowBox[{
    . [) _% P- r- Y- x9 H7 F          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    % y- J$ Z' \& G& @       SuperscriptBox[
    + f! h/ l( u# A, p        RowBox[{"(", ' L7 j2 ?& L0 Z  G
             RowBox[{
    . d* U% ^& U, m' [5 F          RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-", 4 I9 w& d. N4 S* `- }' u
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 4 X3 S$ U, `2 Z, M
      RowBox[{"0.07581214474544536`", " ", ) ^. Y" J# b: a/ @
       SuperscriptBox["\[ExponentialE]",
      E: _6 Z  y  @8 _& x1 ^    RowBox[{"3.1415926535897936`", " ", / a: m4 t# b: c7 U& c$ Z
         RowBox[{"(", ' \1 D& l, n; I
          RowBox[{+ y+ L" @, P5 B4 f: O
           RowBox[{"-", "0.21008576609800003`"}], "-", 3 S. Z1 B- ~+ k% ^
           SuperscriptBox["x3", "2"], "-", * Y: B4 p# b% A4 M0 i3 k
           SuperscriptBox["x6", "2"], "-",
    " p! m; `5 n: x+ t( i5 w5 H       SuperscriptBox["x7", "2"], "-",
    : x+ s) E. q  F# R5 M' `       SuperscriptBox[. {! Y4 S" w9 Y' M4 I: f
            RowBox[{"(",
      T, S/ v. F0 D9 L2 @         RowBox[{- t+ T9 N! W; h9 F& f! t' N
              RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
    9 Q9 M( f9 M3 O* C( R% \. v& _) \       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    * N6 S* c& {- l" F1 v  RowBox[{"0.10599338351843121`", " ",
    , M! V7 S4 I/ l   SuperscriptBox["\[ExponentialE]",
    + d, Y2 w$ T' p( {    RowBox[{"3.1415926535897936`", " ",
    - h. c( @0 F2 }' _     RowBox[{"(",
    5 Q) |* R$ ]! p# U8 z  |      RowBox[{
    / R- t. A4 t$ ^$ \       RowBox[{"-", "0.4481471925460001`"}], "-", " G; w/ T% }1 ^
           SuperscriptBox[
    . z$ i3 L- r0 t7 _! {0 A3 z        RowBox[{"(",
    / k+ x" E1 t% Y) K, k5 A. T         RowBox[{* ?! b8 X0 E6 q  t8 G
              RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", 8 S4 ~. n. I9 T. R" S
           SuperscriptBox[
    0 j. p2 P$ c9 }' J; Y        RowBox[{"(", 7 H7 ~, @& F- V2 f. ]6 Q
             RowBox[{
    4 g- e( c" H5 Q* r5 r7 C          RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", " `, s4 I' l4 i: {: K! S
           SuperscriptBox["x7", "2"], "-",
    7 t! X; `, F4 O8 r$ ~  v# r       SuperscriptBox[2 i: t, E' q" z1 c$ [) r  P
            RowBox[{"(",
    9 r" p9 n: j: N7 g         RowBox[{
    3 D* V- J  |$ n, a1 |& ?          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    ) J8 w/ `' Q9 V1 F6 f' h       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", * _4 C9 a" L6 o9 F2 m+ T
      RowBox[{"0.5008208386064421`", " ", $ e) r% e, {1 V5 I4 M
       SuperscriptBox["\[ExponentialE]",
    4 l, N* ^2 I8 j: P. N/ g% Y& T    RowBox[{"3.1415926535897936`", " ", " q$ ]1 M! R5 {: x
         RowBox[{"(", 4 I% k* {4 {( F4 v+ ]! g
          RowBox[{
    3 j4 i$ S4 x; V# [% ]; E( r" q       RowBox[{"-", "0.08722659614000003`"}], "-", , A1 Y, F, g# t* g+ O) d
           SuperscriptBox[- W2 [6 e) w3 h  z3 H2 M$ ?  p1 ~0 ?
            RowBox[{"(", ( K1 V, T1 r" S  z* \9 Z
             RowBox[{
    1 S! B: B3 @* i. I4 Z+ b  L          RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", 4 ]( |$ x/ U# l' y+ H/ b( e9 v
           SuperscriptBox[
    - X! |% H6 m  X( f& v# [        RowBox[{"(", 4 k% `  E- ~( C: ?* K
             RowBox[{8 |" P* B, Q; S+ N
              RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", 7 C- p) P+ b+ e" O+ e2 B
           SuperscriptBox["x7", "2"], "-",
    ) v% B9 ^  j9 `+ c4 S% d9 j$ v       SuperscriptBox[+ K( f" u9 o, i* x/ Z$ h$ C7 R
            RowBox[{"(",
    3 J- R" L. {- t- r  Y( b" S: G         RowBox[{
    3 s. V2 ?5 o  r4 _3 L" j          RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    % o: P2 `) ?* _, @  F9 ~2 v9 I       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    4 v# O" Y  a8 b6 c, c. t& L  RowBox[{"0.32564305572552343`", " ", ' S) X% T. R/ {& I' I8 O
       SuperscriptBox["\[ExponentialE]", , Z4 ^. l, N* i4 W/ y( t+ `- c$ q
        RowBox[{"3.1415926535897936`", " ", + O3 r$ P/ }# `; w/ ]
         RowBox[{"(",
    " }- k* k! m1 j2 E# [+ z      RowBox[{
    2 Y: H4 K2 s, l, ]! J       RowBox[{"-", "0.23738217000100004`"}], "-",
    . G0 l$ f4 ?" m; H       SuperscriptBox[
    ) l9 R* E% ?- E7 ~/ n$ T        RowBox[{"(", ) t$ W2 i( N( X# l1 u9 H# z2 ^1 c
             RowBox[{! z# ^! T- X; A5 r
              RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-", . P2 Y3 b3 ~! Y9 u8 g
           SuperscriptBox[
    1 `3 ?$ s7 O$ Q; q% V+ b1 \        RowBox[{"(",
    $ \7 p. t& l9 D) V         RowBox[{
    # T& E& w+ m' f          RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-", ( h2 h: Q( c: A& m; u7 k$ ^6 \
           SuperscriptBox[+ O, [7 M! S% K0 ^. Z8 Y
            RowBox[{"(",
    , Q% Z5 ?1 \* c! ]/ P* [6 q* M; A         RowBox[{
    & X! f' S' X: x6 m9 h1 f          RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", 3 k" ?+ O* C1 ^) X! J
           SuperscriptBox[
    ) v+ `% J1 @* x        RowBox[{"(",
    7 z. W& p, L' C6 ~# {9 s% ~2 f         RowBox[{
      r7 u8 s/ h; L' j2 x1 i6 f) F6 l          RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    8 |  c6 K2 z  e( Z       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", # j* @4 W0 Q+ I5 }9 c) A
      RowBox[{"0.6665374509702793`", " ",
    $ U# d, Z  N3 _; h5 S8 q, R   SuperscriptBox["\[ExponentialE]",   A5 ?" w- a3 m" Z. O  P+ J" _7 X
        RowBox[{"3.1415926535897936`", " ",
    % \3 I" U+ k& N& R: F0 t; K: ]+ Z     RowBox[{"(",
    0 w" C( j  I* a5 J5 K      RowBox[{
    $ \; [) B, }+ E7 O) Q       RowBox[{"-", "0.19162171876400003`"}], "-",
    . z9 k; B8 J  ?3 U. P1 C4 W% S! Z% x       SuperscriptBox[4 E1 d* _6 J6 s! e5 n
            RowBox[{"(", 2 X) \# ^, s3 V2 H1 Z# x0 L
             RowBox[{  m' m" q& P  Q. b! p3 ^2 b
              RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", ( V+ s; z! r  c
           SuperscriptBox[
    : K7 Q! }6 \# J        RowBox[{"(",
      e/ c, Q( {: U3 \         RowBox[{8 w. ], J$ A, h4 Q
              RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
    ( c* v6 L( X8 ]5 w) U, t& U& V       SuperscriptBox[1 e/ U7 S) U1 m$ \+ \) h
            RowBox[{"(", 1 N! }3 N1 v1 X8 C) h
             RowBox[{
    7 U/ K3 w' M3 Z          RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
    % g; ^; Q8 v1 M0 B       SuperscriptBox["x8", "2"], "-", * L& R9 H" Q& B5 e" D
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", - K4 r; F' o0 O4 u9 T, y9 H
      RowBox[{"0.4812237524557293`", " ",
    ! j( F9 _1 d9 b: M6 }4 x) r; p6 v' k3 U   SuperscriptBox["\[ExponentialE]",
    ! {& y0 Q! a0 F    RowBox[{"3.1415926535897936`", " ", $ F& M: B7 \' M2 B0 a$ W- I
         RowBox[{"(",
    - h) [- `  T7 z" ?- m2 L$ f1 e      RowBox[{
    + ~6 b6 L" ]% C" m. Z       RowBox[{"-", "0.109748954594`"}], "-",
    & J1 a' {" U( P  ^7 T$ [& Q       SuperscriptBox[& r/ h' y2 f. t- n) v
            RowBox[{"(", / H/ H( L/ {9 L, F6 E5 c
             RowBox[{
    ; J8 m0 f' Y- l          RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-",
    + g* M. c4 i5 f* @; Y$ Z7 G5 _7 u) A       SuperscriptBox["x6", "2"], "-", & K: b5 [5 T  C  i+ c+ q$ E# ~) {
           SuperscriptBox[
    , n% p) {5 m: \- j0 x, \        RowBox[{"(", : e& B5 _+ h5 F" P8 c
             RowBox[{
    0 C. w( H3 X+ p5 r) |          RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",   ], `* V) W& M) f9 O0 O" _0 d
           SuperscriptBox["x8", "2"], "-", " \. a5 S+ W/ ?9 o+ }; @
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    ' F' B6 |: V: _" K# i7 m. w8 J: h  RowBox[{"0.176024676254045`", " ",
    , N3 u1 E; N* Z* y4 y! f6 g/ F   SuperscriptBox["\[ExponentialE]", " q+ d/ k8 `, ]; I
        RowBox[{"3.1415926535897936`", " ",
    1 D! q+ i; V# v6 \1 h5 Q     RowBox[{"(",
    6 o/ \" w$ r4 v3 G# T+ F  H2 D      RowBox[{( \2 ~$ y$ }* c# s- d: m1 T
           RowBox[{"-", "0.14616677062500003`"}], "-", 6 o* H8 Y8 c4 Z; z
           SuperscriptBox[
    - P3 T$ T  s- N  c+ H3 y% j8 K        RowBox[{"(",
    3 j( ]. u# o2 Y, \6 |7 H3 r$ W         RowBox[{' T% ~1 I4 Z9 K4 D6 F  @
              RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
    ! l. d. C  G3 |       SuperscriptBox["x6", "2"], "-",
    0 @* c5 Z* p5 w7 V       SuperscriptBox[
    1 v6 n5 _3 ?9 W        RowBox[{"(",
    % i0 U( b0 ^" u7 |/ N& [/ `3 P         RowBox[{( U. w- Z* j5 P
              RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", 1 d$ ~( L3 W! R- m
           SuperscriptBox["x8", "2"], "-",
    1 {8 k6 w; ?/ v9 h, w       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    % l/ G( f# C, i. R+ E( q  RowBox[{"0.5945873894818965`", " ", * ~0 q5 V0 ?) a3 H
       SuperscriptBox["\[ExponentialE]", # R1 x! x. d, I2 w
        RowBox[{"3.1415926535897936`", " ",
    ' ?8 G) ]5 [. q! z+ Y: k' A' p& E     RowBox[{"(",
    # r8 T$ j! k. ?7 |# U      RowBox[{. o0 z4 n% d* J# ]% Y# E. o( ~
           RowBox[{"-", "0.10407011464100005`"}], "-",
    : s" U9 r% `  [  K( O. s& ?: c       SuperscriptBox[+ e6 {" e1 C8 e' S
            RowBox[{"(",
    8 f; y5 p) q3 ]( S( S         RowBox[{
    * ]8 @! D* j- j% I: x$ y/ \          RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",
    9 L& v) i2 p0 a5 R       SuperscriptBox[
    , T. }( U- {; C. g6 S5 u        RowBox[{"(",
    3 ~8 p6 a9 _7 v, M1 A         RowBox[{
    3 h. A3 K! I. ^# h/ |6 |! ^          RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    & }" r6 f8 D" g) C" y3 U       SuperscriptBox[/ g9 m8 X7 d# X
            RowBox[{"(",
    2 s% R1 l) V# m% Z, D! i/ S         RowBox[{
    6 X4 |6 [; Y2 t9 M: o2 x          RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-", ' v3 O& @& q- m: L
           SuperscriptBox["x8", "2"], "-",
    / x( U; H) m! o       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    6 N& ~' K% b  z3 w# `  RowBox[{"0.027591936509660075`", " ",
    5 z# ]& _) _: e1 ?. s; L   SuperscriptBox["\[ExponentialE]", : [% g9 H+ G8 z
        RowBox[{"3.1415926535897936`", " ", & W/ M2 e5 q% Q0 Z: t8 V
         RowBox[{"(",
    + f+ @: m+ k1 o0 J+ q8 O% S, X/ s      RowBox[{2 H/ V0 W+ I$ P; V( {3 V# c/ \
           RowBox[{"-", "0.31770463544200006`"}], "-",
    ' c8 T, Y/ x# t& t7 c       SuperscriptBox[
    9 Q+ P& L4 q7 r; D0 k+ k        RowBox[{"(",
    ( c& P! J5 N5 T4 G- x+ ~1 [         RowBox[{& v; b9 d) `$ d8 s
              RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", : [2 F- p) X7 z$ I7 b/ m
           SuperscriptBox["x6", "2"], "-", + `4 q" }# s  v$ n) z6 B; S: J
           SuperscriptBox["x7", "2"], "-",
    * Q8 k. Y& T! g7 Q/ P$ ]( A' s       SuperscriptBox["x8", "2"], "-", 2 m( W) M+ l/ i8 t) a" T+ M  }
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", ; Y, D8 _1 q8 ?2 |) [4 f  k
      RowBox[{"0.5252475961933536`", " ",
    & M5 {! {! I! N- Q- }; ^   SuperscriptBox["\[ExponentialE]", , n/ ?( l( ]2 A7 h
        RowBox[{"3.1415926535897936`", " ", 9 E2 L0 O5 y; j$ c' n
         RowBox[{"(", - A# N1 D/ e2 e5 b: m% r
          RowBox[{( L0 p8 Z1 ]5 @* i  p  F7 w
           RowBox[{"-", "0.6410867660730001`"}], "-",
    , ^# y' _$ a- q) @       SuperscriptBox[) X6 @0 k% a9 s2 T! F! Q
            RowBox[{"(",
    4 K$ @# U( s0 l$ z$ s4 F) w         RowBox[{
    7 |) b- z5 z$ e8 y          RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", 1 r* m. i3 D. `
           SuperscriptBox["x6", "2"], "-",
    , @  R: e/ v' Z$ [* t$ \       SuperscriptBox["x7", "2"], "-",
    3 W# F( K! t: b8 }  n4 P1 F% o0 z5 E       SuperscriptBox["x8", "2"], "-",
    + P; g& g; G0 Y: V, @0 D: a% |       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", " x8 u: I- U+ w6 Y4 w
      RowBox[{"0.32047284779644936`", " ", ! b  F2 w( i& y1 H
       SuperscriptBox["\[ExponentialE]",
    - ^' [% H& j7 t7 e) m: \: K" n    RowBox[{"3.1415926535897936`", " ", # ~0 T7 _) K5 n+ S$ J# p& Q8 D
         RowBox[{"(", 9 l6 E" Y& ^& ?) ]( l
          RowBox[{
    2 |; v- I( Y& J; }' w0 Q. W       RowBox[{"-", "0.155663887074`"}], "-",
    : K& s3 C* ^* G" t       SuperscriptBox[
    / d) s  z+ t/ S: `0 D' ?3 D        RowBox[{"(", 6 ?5 [$ ~( X. p1 w
             RowBox[{
    8 @4 u: }+ g0 p          RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    * q3 ]1 Y( X/ _) E8 x; m0 L       SuperscriptBox["x6", "2"], "-", 1 }( t& i/ p9 q9 I# A3 A# _
           SuperscriptBox["x7", "2"], "-", 1 q; {/ E: P9 Q  V  u
           SuperscriptBox["x8", "2"], "-", $ f! z9 @: p3 k
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    : x7 v6 ^6 b5 I' W  RowBox[{"0.7528674241482847`", " ",
    6 [8 ?8 T& n& B$ n: N   SuperscriptBox["\[ExponentialE]",
    $ c# V7 m, v3 {/ B( t    RowBox[{"3.1415926535897936`", " ",
    / Z0 f8 |% S; C0 Y  ?# e/ C$ [& S     RowBox[{"(",
    0 y' Q8 S5 _2 h! K. Y' e2 S; j      RowBox[{
    ' B7 q1 o  G; c" n9 t5 W, {       RowBox[{"-", "0.14151232428600002`"}], "-", $ N/ v& ]  |1 P7 ]0 W
           SuperscriptBox[
    ! G5 _  q: d" x7 i' R" Q, C        RowBox[{"(",
    $ h4 k& r  s3 \8 N+ m& m         RowBox[{5 g, R' {- Y- \! e1 g% J; H
              RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", 4 k% ], J1 ^# U( B& X
           SuperscriptBox["x6", "2"], "-", ! m; Y) @. A; i1 [
           SuperscriptBox["x7", "2"], "-", ' Y/ P/ V2 H: B* y. g. V" B
           SuperscriptBox["x8", "2"], "-", # ?! ?- t+ @- p. M  s! j( E9 ~+ }: O
           SuperscriptBox["x9", "2"]}], ")"}]}]]}]}]], "Output",( @2 J: V/ E9 M$ {0 C, o
    CellChangeTimes->{3.5779628386090403`*^9}]
    " E, B9 n5 M0 H) Y2 |2 k  e}, Open  ]],* C" }, k. t2 _8 i, \; I8 R
    ) C: R/ k; H+ i; ^
    Cell[BoxData[" "], "Input",
    ( z9 H+ B2 B: e# G. h! P CellChangeTimes->{3.577962835879035*^9}],+ m; B3 u5 _/ [8 R
    6 \0 t; z8 f0 n
    Cell[BoxData["\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\:4e3a"], "Input"],; x) N3 B$ u5 a+ }& ~

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

    ' F- j* n& O! q( ]这个是用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-7-29 08:18 , Processed in 1.878995 second(s), 110 queries .

    回顶部