快捷通道

QQ登录

只需要一步，快速开始

  注册地址  找回密码

数学建模社区-数学中国

留学>>
返回列表 发新帖
查看: 10617|回复: 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
    问题完善一下！或者把代码贴上！
    ) U  H7 v4 E  k) t/ A* N4 C
    回复

    使用道具 举报

    琳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 * c9 C5 O) `) R. [& F
    神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗

    ' s& X7 c7 P  G! \(* Content-type: application/mathematica *)6 G  w5 |4 O! g( I

    ) U1 \7 e( I! c" ?( P+ s2 C$ ]# B(*** Wolfram Notebook File ***)
    6 t& `) X9 |0 h# N) J) Y- N(* http://www.wolfram.com/nb *)- W  k4 S+ v5 t; q- G5 L2 A

    " `; G/ u/ H$ D& y(* CreatedBy='Mathematica 7.0' *)
    % X' l; L7 T& `" _0 ^& r! I' n0 y. {1 i+ B
    (*CacheID: 234*)2 d; G, e( v1 G6 ]0 S/ B8 S
    (* Internal cache information:  E6 D' w, `4 i; t) ~& ^% J
    NotebookFileLineBreakTest1 `# k7 b$ W, D! Z( r
    NotebookFileLineBreakTest  @, s# t2 |$ z! O9 l  V( W
    NotebookDataPosition[       145,          7]% U& j( w; |2 d' |7 L
    NotebookDataLength[    423629,      11534]
    ) _" Z4 S  E5 Y" q0 ?NotebookOptionsPosition[    412607,      11173]2 D/ \# O! V' v, S
    NotebookOutlinePosition[    412953,      11188]
    / w' Q! E* V; y5 k4 aCellTagsIndexPosition[    412910,      11185]6 S7 V% a9 u/ ?. P3 S+ }2 J
    WindowFrame->Normal*)  q) D" o3 s' l: Y

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

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

    6 Q$ t4 M, S8 f6 _$ E/ [. f* cCell[CellGroupData[{
    2 q7 b+ ^. h9 j6 K, J# ^; x9 a) {/ O  _; l& C+ Y7 T8 X
    Cell[BoxData[% A. M+ M; r! t: q7 h- h
    RowBox[{"Array", "[", ' j, w: D) ^( Z# A; P" `, D# ^) ^
      RowBox[{"CM", ",",
    # o- M. E( @: V% F   RowBox[{"{",
    4 C1 k/ v' F& `: w2 T    RowBox[{"80", ",", "9"}], "}"}]}], "]"}]], "Input",
    ( X) E. A: _/ z% g. Q CellChangeTimes->{{3.577844235859375*^9, 3.577844291953125*^9}}],) q) V1 s5 O2 Q1 o6 i1 f+ y

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

    $ M( j  Q% A: B  D7 t) \Cell[BoxData[" Z( B) M, Q& s& f
    RowBox[{"For", "[", 7 I8 V) `" G( Q1 V
      RowBox[{
    , {8 A" N; o: \0 E# p4 ~   RowBox[{"i", "=", "1"}], ",", " |7 b1 z6 X. u2 P- Z
       RowBox[{"i", "\[LessEqual]", "9"}], ",", & Z, i8 |) o" |& o" q0 G
       RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 1 Q& W) a8 m' m7 b( S, m4 P
       RowBox[{% ?# c9 D2 ~( U0 m6 ~
        RowBox[{$ n6 K3 }/ z  X  _" Q. Y. }2 ?
         RowBox[{"CM", "[", 8 k+ ~- Q& N" l5 B( C
          RowBox[{"1", ",", "i"}], "]"}], "=",
    1 X0 g5 A5 y' G3 k  L     RowBox[{"Data", "[", % h3 O! M% v: [. a/ C
          RowBox[{"[",
    4 C; m. L! M* W5 Y       RowBox[{"1", ",", "i"}], "]"}], "]"}]}], ";"}]}],
    ( X. T* [, h  e6 J' R  "\[IndentingNewLine]", "]"}]], "Input",
    7 K9 r) }# l5 E8 C" j0 { CellChangeTimes->{{3.577844179875*^9, 3.577844181703125*^9}, {" B9 r: O: C1 g: @# [" m
       3.577844217765625*^9, 3.5778442320625*^9}, {3.57784429953125*^9, - @/ U4 ~" A7 l- o
       3.577844347875*^9}, 3.57791328640625*^9, 3.57791338828125*^9,
    ; G% z2 R3 g# m  S7 J4 A, B   3.57791344209375*^9, 3.5779588070933466`*^9}],
    ! g' u/ v# e1 A# G) B1 i5 ~( I0 N' S3 Y2 D& L
    Cell[CellGroupData[{
    ) L  d( U. r: @% V# _# G9 A& \
    2 U8 k6 G2 C- x3 f$ d! mCell[BoxData[{5 e  i9 }! I; U2 h- ]. X. D
    RowBox[{"r0", "=", "0.2"}], "\[IndentingNewLine]", 5 i* ]' ?8 L% H# \
    RowBox[{"M1", "=", "1"}]}], "Input",* s8 l; y4 A2 J5 U9 L& T5 s
    CellChangeTimes->{{3.577844361578125*^9, 3.57784436678125*^9}, {
    , s. M( L6 }5 ?7 D   3.5778457908125*^9, 3.57784580253125*^9}, {3.57784602534375*^9,
    ; f  E" _) L; `% N* e8 ~8 `0 Z% D   3.577846109453125*^9}, {3.57784617128125*^9, 3.57784619321875*^9}, {
    ' ~$ |8 S& O. H/ M  Y) w5 g! m   3.577846583984375*^9, 3.577846620984375*^9}, {3.577846653203125*^9,
    - [( N; `' O# c. a   3.577846691984375*^9}, {3.577846779953125*^9, 3.577846794921875*^9}, {7 N) ^' {1 d8 o3 B& F8 z
       3.5778470791875*^9, 3.577847088921875*^9}, 3.577847409671875*^9, {
    5 h5 O1 T  S+ F2 i8 y6 u   3.577847477203125*^9, 3.577847523203125*^9}, {3.577847586484375*^9, 8 H% L9 ^- Y: c6 w9 o
       3.577847600640625*^9}, {3.577847649140625*^9, 3.57784770196875*^9}, {
    / C! L! ~6 B0 D7 T, U5 V" V/ p$ e   3.57784774896875*^9, 3.57784776490625*^9}, 3.577847981546875*^9, {
    / z6 O9 p) p. J$ \% P   3.577913312890625*^9, 3.577913360109375*^9}, {3.577919262828125*^9, ' r* c* O/ \$ H2 y
       3.5779193133125*^9}, 3.577919388484375*^9, 3.5779605095479155`*^9}],
    # z. b7 }! c( w
    9 G. i/ m( U# X( I9 m: O$ I0 N0 @8 T8 CCell[BoxData["0.2`"], "Output",
    0 O5 @- r# w/ q7 H5 v+ H CellChangeTimes->{2 _) e/ v) M0 q9 ]; B8 T
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, . S1 h( ~  X" D
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    * y& {9 R. F. N; h1 f; f0 l! j2 S   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    8 d! L$ @1 V& c9 i! B& Q' }! E   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {2 _1 \' x# l) d
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9, 9 j0 y* G; R+ E
       3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {) u. S4 @. B+ ?; s! [& F. @
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    8 ^0 t9 O6 \* f6 E   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    ; D, @% _  y% q" s   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    ) M% K8 d& @, w' m8 z  t/ A   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    # l# o2 k2 b% k% ]9 _   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9,
    & _: P9 y+ z, g7 B: `   3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9,
    . H7 f& J! u! n& n   3.577960510686717*^9, 3.578012149296875*^9}],* _- R5 Q  z& l2 g3 Z

    0 v" {) G' h/ c6 SCell[BoxData["1"], "Output",
    . E& j0 p$ H4 z- ~ CellChangeTimes->{
    $ D6 u# Z- h+ A% d. N( T0 Z  3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, $ U; H3 C4 a7 v7 v8 e% E* ?% E
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {  t1 v7 l! r+ r! [
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    3 |" G+ y6 r+ ?, p   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {( [% Q6 e6 Z' J- p" b3 q3 h7 {, C
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    3 M3 w& h1 U7 V  s; u- N   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {, g( q  A7 [$ R# y0 j
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    - ^4 j! y: Z0 k   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {6 Y1 T8 S6 G) g/ D' B/ J6 k9 I+ U3 o
       3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    / P, x  o' v$ ?3 k   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9, 0 ]. [& T% L& H) G3 U* k% A5 Z  e9 E
       3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, & C7 r8 s: N$ u# x) H0 V, L
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, ) C7 Y! S: \  \; f4 s0 q
       3.577960510686717*^9, 3.578012149296875*^9}]: D/ e$ J7 Q$ C% P3 K" G3 `
    }, Open  ]],% R$ P/ j6 Z+ {+ j/ Z
    4 d7 `% o( n- x6 Q, D
    Cell[BoxData[
    7 m* x% k$ a# q6 J8 }2 Y) V RowBox[{"For", "[", 5 T  v* [- p( b( h9 N
      RowBox[{
    & N, ?; ?5 J9 X2 z; ^7 H( _1 X% j   RowBox[{"k", "=", "2"}], ",",
    : |. r( b  @7 p& G   RowBox[{"k", "\[LessEqual]", "60"}], ",", & V" q7 M$ O7 X5 m3 d. l7 x6 v
       RowBox[{"k", "++"}], ",", ; H& d9 f, V& ~) _9 r
       RowBox[{"{", "\[IndentingNewLine]", ' k+ u" t+ m' i0 {
        RowBox[{5 U6 s. f7 W: M' h$ I
         RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]",   B( z* |: i. Q) G5 G' o) a
         RowBox[{"For", "[", " m  J& ?& B" v% t  \
          RowBox[{
    ( K) C+ l5 {- G- L3 O, {* T4 D  n       RowBox[{"j", "=", "1"}], ",",
    2 [6 A4 r. Z  w1 ?: _0 q( |       RowBox[{"j", "\[LessEqual]",
    $ @9 C+ x7 d! }# H        RowBox[{"k", "-", "1"}]}], ",",
    1 F& t4 H+ G" x% }       RowBox[{"j", "++"}], ",",
    + t7 u  Q4 m1 _0 w       RowBox[{"{", "\[IndentingNewLine]",
    " \; ~0 ^+ M+ T. P$ D        RowBox[{: u. m- r( O& g! q3 P5 X
             RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]",
    5 z/ q" K7 _! U0 m. t2 t2 ^         RowBox[{"For", "[",
    ; N6 x+ k% l; t6 B! K          RowBox[{+ O8 j! d1 K' o. @% p
               RowBox[{"i", "=", "1"}], ",",
    8 H6 x) B! W: L! c$ f           RowBox[{"i", "\[LessEqual]", "9"}], ",", ( \; B- h: I$ K9 Z2 C
               RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    6 B( ]+ y0 y" k: m* c7 M5 ~& o2 M/ C           RowBox[{
    3 d# P) G) S7 A            RowBox[{"r1", "+=",
    $ D2 N+ Z; G! {7 i$ s8 {5 j* c             RowBox[{
    , B. Z% h; ^; Z2 a1 X+ v! R              RowBox[{"(",
    # V& ]( L: b* r' b6 @               RowBox[{
    : N5 k' V& U. c2 p5 l. t6 N9 [) K& L                RowBox[{"CM", "[",
    ( c- |+ O2 p, C# a7 W' {6 x% ^                 RowBox[{"j", ",", "i"}], "]"}], "-",
      D% M5 m% m9 n% B( `7 X) L8 I                RowBox[{"Data", "[",
    * I$ i, _3 ~! w: `  i  Y; V& l5 l                 RowBox[{"[", 9 W5 L; z; m+ n7 D. F
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*",
    % z( F: f' P. H9 o2 o              RowBox[{"(", 3 U( y3 f6 e, B& ]6 S
                   RowBox[{6 ]' z7 R- K+ E# D
                    RowBox[{"CM", "[", ) H1 s7 B( {9 c9 P! u  t9 }) c# e
                     RowBox[{"j", ",", "i"}], "]"}], "-", ( A' x$ v8 {( y' W9 n& L7 E
                    RowBox[{"Data", "[", 7 _, e- L/ u& c9 l" y6 c
                     RowBox[{"[",
    + k+ i- ^. _! h! U/ q& h2 u                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],
    4 c: @- M' U$ Q" a4 o1 Z; ]           "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", # ]) ?+ K; C; f8 ^" N( M' F* m5 v
             RowBox[{"r1", "=",
    # R' a+ [# v) h5 m, q; f/ o          RowBox[{"Sqrt", "[",
    % [' |4 L9 T! Z           RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]",
    ) h% W" q. y- h. m. U- C         RowBox[{"If", "[", " ",
    * r/ i! j- P1 x$ D          RowBox[{
    / u7 P# Q4 w1 U5 ~* Z$ W           RowBox[{"j", "\[Equal]", "1"}], ",", 9 V- K& S% @0 T  u
               RowBox[{"rmin", "=", "r1"}], ",",
    % B( ^6 E+ P) c/ w  h8 k+ I           RowBox[{"If", "[",
    : E4 \" a- K  \+ F& S            RowBox[{
    ' e6 F7 |4 C# v. k( T             RowBox[{"r1", "<", "rmin"}], ",",
    & b) [/ Y' T8 C3 B8 s, p             RowBox[{"rmin", "=", "r1"}], ",",
    / s4 N$ I% W6 X8 x# S+ f8 t             RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}], : E% l) P3 |9 V9 t7 K  C) E4 {
            "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";",
    % U% B0 D9 F- |7 T     "\[IndentingNewLine]",
    1 ]9 v  R: w" f) o8 k; o  A, d     RowBox[{"If", "[", - J  W# @) N% G
          RowBox[{
    6 P7 f5 g/ l- M2 U3 H$ Q       RowBox[{"rmin", ">", "r0"}], ",", 3 m5 V9 l5 a7 `+ H0 @
           RowBox[{"{", "\[IndentingNewLine]",
    4 e# d0 `# I; G* I7 J$ H: b, d+ J/ o        RowBox[{
    + [( _; K' ~1 J# ?! J         RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]", : S! `& P+ P5 L. V5 X
             RowBox[{"For", "[",
    & R# c* }: {$ J. Q) ^" u          RowBox[{
    : f$ r% y8 L$ W1 x4 X7 z. s5 @2 T- s           RowBox[{"i1", "=", "1"}], ",", . L; z2 B' b5 m" M) D4 \# N
               RowBox[{"i1", "\[LessEqual]", "9"}], ",",
    : {5 H% d! R" a1 o9 c- z: w           RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]", ( K3 `" _: B6 S* d. q6 S8 W, |
               RowBox[{( T4 C1 Q% @! J4 ]4 D
                RowBox[{+ V; `7 t; Z- T
                 RowBox[{"CM", "[", 3 {3 H5 r. v2 r2 j3 W7 V. m0 G
                  RowBox[{"M1", ",", "i1"}], "]"}], "=", 6 g0 M4 m, K- e
                 RowBox[{"Data", "[",
    1 y3 @( Y( n* @" a1 ?* D$ z              RowBox[{"[", : L( r. Z7 t4 m+ j
                   RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}],
    % R$ R& s& Q6 I8 i          "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",", 3 q  Z; k* N7 E4 T+ j: X$ f
           RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}],
    1 |3 I: W- u  O# w) ?. K7 Y    "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",
    ' R9 @" |$ G" B3 L CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {
    $ C( A1 L$ o' u  x! |0 M   3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9, 6 Y' I  i6 B  z
       3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {
    + b  _: E$ [: ~, L/ J   3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9, " @4 N" v% w5 P! C3 A
       3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {9 j3 \" P( c3 D' D7 r9 |; Y
       3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9,
    / ]9 I1 w) ^6 j; _( Q   3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {9 I# Y5 W( ?$ s. F0 i* G
       3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9,
    $ W2 K! b( {# y: Y( i   3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {# n4 ]2 _: w! W$ k# p6 T& P
       3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9, ! p7 ^2 s* o8 l
       3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {
    8 T7 a" F& a2 h   3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9, ( G& W% L% t3 M3 z+ w! L% G3 s
       3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {* z# J" p* z" B7 g  G$ R6 r8 T$ M8 X
       3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9, , J8 f, ~+ R) @+ Q7 B3 a2 N8 `. d
       3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {
    , u+ f) P. r% G$ `! d# s7 N   3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9, 0 g5 [4 c9 _) [; L6 L  `
       3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9,
    3 `+ G( T  Z6 t$ \& e( N: S: n   3.577958821991373*^9}}],
    : N# f. q* V  a8 x- p: L4 `
    8 z/ `2 Z# K* R, A( g- |Cell[CellGroupData[{
    ( ^0 \. K( ]: D; M! S$ V7 \! M& m& y% r
    Cell[BoxData["M1"], "Input",
    ! C- z* B0 {$ y% ]9 z CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],1 B7 c* @2 \& n
    3 q) U) j6 S% T0 K* b  `
    Cell[BoxData["21"], "Output",
    / l- }5 N5 i' l& o8 q CellChangeTimes->{
    9 M; L+ ^) y3 {; v6 j% a' y  3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {
    2 D$ _# A$ `" R' b! @, b5 k1 G   3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9,
    . M3 ]) H0 x3 i9 Y& N1 B3 y   3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {
    0 U' D* d8 R! u( f* V) g( Z   3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9, , a+ d4 W3 G+ H( i  p0 {/ e) F
       3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {
    ) J& Z- m- a8 L9 M% f; a   3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9,
    # |* O; ?/ S( P2 m: b   3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {6 r; s; w: V4 p3 n% o$ a6 A6 D
       3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9,
    & @2 t( w3 ], R2 c& U9 k  t   3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9,
    " h. ^" Z: ?) K- b* m   3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9,
    1 u- r; v- E3 s2 [. r8 x6 x# a/ I   3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9,
    % S: q% b8 p8 o" ?$ K! D   3.577960515600726*^9, 3.5780121541875*^9}]
    6 |: F3 _* W5 h2 I8 K: f, l3 Y0 C" T: [}, Open  ]],
    + c9 G" _" P; J1 a/ l( E& `: X  g! k3 g$ i, `( m; B9 M
    Cell[BoxData[
    / @7 a# b& V$ Z7 f6 I( P RowBox[{
    8 {1 i) K1 z) A) a! b  RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[", * d8 v; W, o0 H
       RowBox[{"1", ",", "i"}], "]"}], 1 S1 n: ?4 D* x3 ?) i+ f# K
      RowBox[{"\:5230CM", "[", 9 t2 V4 a3 n" a: D; B: v4 O
       RowBox[{"21", ",", "i"}], "]"}],
    6 Z, s! B' \( _! p  "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\
    " V. @4 s8 a% K\:51fd\:6570u1\:5230u21"}]], "Input",0 f$ h6 o7 e: l0 g1 l% d. Q
    CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {6 b4 J7 U* D/ k, t6 B3 R9 }" _& K
      3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9, ) R8 x1 g# A  q0 j; G1 r/ j
      3.577960526583145*^9}}],6 w0 ~  U5 U% ^+ A! W3 M

    8 G8 b; u: r0 {$ |/ j: ^) LCell[BoxData[) K9 o- H# o) B3 M
    RowBox[{"Clear", "[", "Delta", "]"}]], "Input",8 \( b4 E" h$ ^# t* D
    CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],
    $ s4 K& `1 w8 m2 v- N' F! W4 \2 v3 A7 U2 ^
    Cell[CellGroupData[{9 Y2 K; t" j/ {& f4 @1 a

    & J1 u- l, C0 jCell[BoxData[
    * s& U( g5 w' p# z% L) b RowBox[{"Xa", "=",
    8 Q( D: O8 I3 z8 ?! E) |) V  O  RowBox[{"{", & A6 v0 K& N7 S2 [
       RowBox[{4 e+ _6 v! L3 [3 L/ l: ^
       "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7",
    " Q* H  n5 T7 @* k    ",", "x8", ",", "x9"}], "}"}]}]], "Input",* n9 b' t. `; `0 t5 n1 W
    CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],; `+ {6 K, s) [

    8 y/ i* ?: |( l, h+ ~/ LCell[BoxData[+ m* {& j" {2 S: g! Z8 C7 a
    RowBox[{"{", 0 k. e8 a% }$ o( H2 S" {
      RowBox[{
    1 Q& |/ B5 O9 _* f, e% y  "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",0 K% Z4 ^  l* D5 r4 m( T5 k/ P
        "x8", ",", "x9"}], "}"}]], "Output",$ b8 q  E8 F1 @' Z3 s
    CellChangeTimes->{
    . }& e: o. V# {$ ~- x; C: ^  3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9,
    0 H/ }$ I% A+ X" x! z   3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9, . |( B$ |7 N' E4 b0 L
       3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9,   M- o+ r; g3 ?' B' B
       3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, ( ?( _7 d! z0 s) @/ m
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {
    + {0 D/ n9 ]+ Y( \! C/ m   3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9, ! K3 U3 e, Q" j
       3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    4 g- s5 K- D0 ]; S   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {4 ?' I3 V* g, j9 @2 W
       3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {
    . T- X) ]$ K( o1 m; m+ F$ p5 W   3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9, ) D/ ]3 w2 E4 a4 D, X3 b
       3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9},
    2 q2 N3 p8 a  e4 s+ O) s5 l! V! `   3.57801215725*^9}]
    ) \; b$ D0 t7 M: s}, Open  ]],
    " _  o5 I* Z. {6 A( Y% B. m9 U$ e+ `. O" A8 W0 s/ N* U
    Cell[CellGroupData[{
    ) w: Q$ k; ]6 ~  b5 n9 @/ H9 l, P4 k3 [, u& C
    Cell[BoxData[# K# U6 g) a0 }! `
    RowBox[{"Ca", "=", 6 p6 M6 e- p0 S2 R% `# r' C0 O. U
      RowBox[{"{",
    , Y2 [* M$ a6 c; _# }+ ]   RowBox[{2 U$ ~4 W# c* P8 B. u5 z
       "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7",
      N, z! V" U- ^5 w9 I4 u/ ~    ",", "c8", ",", "c9"}], "}"}]}]], "Input",6 Q) \! Y* e5 b6 Y8 q. x( o4 a1 L
    CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],
    4 J8 G! P0 B9 D6 B' y
    + c  Z( i* S% R1 F1 F% V+ bCell[BoxData[, d  D& R/ M. F0 O
    RowBox[{"{",
    ; P" e2 F9 h/ j/ i2 {! M  RowBox[{
    2 T% U' ~4 l3 O* c  "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",
    0 ?2 B8 W2 c4 b4 Z$ D9 z9 O. h    "c8", ",", "c9"}], "}"}]], "Output",3 {! o# f* H7 b% z
    CellChangeTimes->{: E5 `1 ^( r3 x
      3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9,
    8 |2 T, Z! ^& @, `# @- W   3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9,
    6 ~8 f$ E+ _; m8 Y   3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9, - V* P) H9 m; A# v' ^5 E7 s1 n' S* k
       3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {
    7 l8 Z; l- V" ]( v, c   3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9,
    * y, H9 b. ^6 s' M) e, E   3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9}, ) e0 s6 M3 l3 n1 k; v
       3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9,
    % O) _& a* ]1 l. ?) j   3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9, % O' P6 C$ x  u" m. t# t3 H) G
       3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9},
    6 e9 r6 X& D. x2 |/ x; C( `   3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {0 S# B3 o6 E; X+ x1 Z# Q! X
       3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9, 7 @/ h: P0 F) Y
       3.577961904604212*^9}, 3.578012158671875*^9}]6 R2 ^! W0 Q' B& p; ?6 T
    }, Open  ]],) t* X+ n" Q4 l3 ]

    : E2 V# L+ S0 o6 a' s7 iCell[BoxData[& B7 H4 N5 O7 A# [8 \% h( q, b5 T
    RowBox[{"For", "[",
    " F0 x/ g; W6 e2 A! Y  RowBox[{' e7 q- K0 f" x8 L2 r: {  u
       RowBox[{"i", "=", "1"}], ",", 3 `' x0 p+ N$ c# |' ~
       RowBox[{"i", "\[LessEqual]", "9"}], ",", " u! z2 x) C4 ^: Z" o
       RowBox[{"i", "++"}], ",", & c, T) `% y# [0 h+ O* c! K
       RowBox[{
    / V1 ]# i% f  s- M8 |0 Q    RowBox[{"Ca", "[", 9 j% b' U; ]  O& L; f
         RowBox[{"[", "i", "]"}], "]"}], "=",
    % K+ A2 x9 B" J' u; S    RowBox[{"CM", "[", 8 i5 u& W8 C. @
         RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",8 p6 F8 f9 y/ k8 S4 V) T7 U# X6 N3 y
    CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9}, 6 k4 G6 K6 Z4 L8 q. ~: J( w
       3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9, ! F/ c, X' O) o4 K
       3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9,
    ' _/ L) w/ E0 i7 }+ f" g0 Y- w   3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9, 8 G; Q  N' y# o: P
       3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9, 0 s3 \1 f) k9 {! t" X
       3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9,   p- j# a$ f' B" U7 {
       3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9,
    / T% d4 d6 X4 W) @7 L   3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9, ! s; c) w, F8 _7 p1 w9 {! _7 i
       3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9,
    ) i6 M/ h" H2 m4 v   3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9}, 2 Y, o* ]% {* F7 |3 G
       3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {/ L- h, t5 G3 n6 X' _7 A" G
       3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9, , m% V. q6 A( W5 f, j( h' Q
       3.577961906897415*^9}, 3.578012176296875*^9}],
    5 l$ i, f0 C9 v% |2 ^4 b& F9 O# x* ?0 y# z& W7 f2 M0 U
    Cell[CellGroupData[{6 Z* W: U: o# R6 M( c
    ; F- t$ o# K" G  s$ d2 x3 s
    Cell[BoxData[
    $ s0 R! X9 a+ E& z: i/ S RowBox[{
    : [" U# M- [/ M0 s$ D& P  RowBox[{"(",
    $ u* Y4 X! [" L   RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 q8 S' C5 i/ u' p8 Z" r6 o  RowBox[{"(",
    # X* N/ Z& V% }+ s   RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],  y6 G! C$ m2 V/ S( b
    ! d" d- k' P: i- t/ H
    Cell[BoxData[6 q7 `! T/ ]4 b+ i
    RowBox[{& h, P$ j# [! }+ b- ?
      SuperscriptBox[
    % o& Q9 Q. F; `; m! w2 T   RowBox[{"(", 5 {9 |4 R$ y, o# H( ^
        RowBox[{
    4 t# V1 ?/ b' X8 ~     RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+",
    % c8 K% F: @1 ]% J+ V1 J. z  SuperscriptBox[
    & Y4 s7 U  G, L) ]3 d  F   RowBox[{"(",   q. b4 [( h6 ^7 x7 y2 B$ f/ l
        RowBox[{' h: V* K  U! ~5 ~3 N0 t7 U
         RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+", ( O) N5 n6 B' Y. K4 f  o3 t: g
      SuperscriptBox[
    ' H$ C5 v5 U' C5 b9 {- W1 n   RowBox[{"(",
    / c' U/ O( D( o    RowBox[{8 D$ \. w4 ~1 F6 Q
         RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+",
    0 }3 h7 X7 `4 j% o1 Q- B  SuperscriptBox[
    - c+ Z6 E' B* Q( n/ @   RowBox[{"(",
    ! I7 i6 C1 L  p" y1 N% J    RowBox[{
    2 B: m; J! L5 p* Y: ?# j     RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+",
    " f% O/ j9 @* q9 P4 A, w( M3 r* z  SuperscriptBox[" z. N% L1 u5 e. y4 q
       RowBox[{"(", + o! R: b3 e, x1 q2 ~, h
        RowBox[{, ]; G- K) x6 [( X
         RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+", + D" w5 W: |! m+ c3 B
      SuperscriptBox[* ^: V# y0 S$ P) ?
       RowBox[{"(",
    , E/ ]! h. x5 Z2 J- n7 V    RowBox[{$ t/ T2 u* {: E
         RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+",
    1 e8 T4 v: T1 ^  SuperscriptBox[
    + Y( O' a1 j0 M) }' X' Z   RowBox[{"(",
    $ `. m& b- j% p# R; h    RowBox[{
    ! B7 F" r1 P9 G     RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+",
    % G4 Q1 W: @5 r$ }" F+ J7 L7 t  SuperscriptBox[: l' _% y' e6 o5 w6 c- r4 i
       RowBox[{"(", & c; B' r9 J* a+ f6 j
        RowBox[{6 h; O/ l& u7 t. W5 c+ G
         RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+", 8 l# f8 x+ o  J. T1 w  @
      SuperscriptBox[7 l/ j( V/ @' ~6 |( U8 Y3 J( B" W  g8 o0 m
       RowBox[{"(", / J$ B$ p& e5 D  Q8 Z' s2 T
        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",
    , c# b9 ^* P+ D( z& ] CellChangeTimes->{4 O; ^( @7 I( }& ^& o' h* h
      3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9}, # E0 E$ s: ^& t5 D+ S
       3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9, . G& F+ h& A8 {8 [- B' T
       3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9, 0 y; J3 ?. S5 ^' m) G3 @
       3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9, : z4 |3 J+ Y7 z! ^5 k
       3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9}, ) ]- K! O2 K) ^2 x" s1 _$ o
       3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9, + h! M6 P5 d+ r- m
       3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {
    * q$ F, @: t- |- J& B  T   3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9,
    . a/ }% u2 M* N$ z" r! r1 M   3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {
    # b1 h( ]5 D' \3 _9 \/ o" _   3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {
    ! {3 D: E+ S: F+ ^7 n   3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9,
    : Y% M" ^8 l+ C5 |   3.5779618537169228`*^9}, {3.5779618846049767`*^9,
    $ L5 [+ Z# _8 P4 d1 n, y   3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]7 \/ Z* {6 C0 |% q; b& F
    }, Open  ]],
    , `6 {9 Z. \: B2 p; @4 U0 d& R8 F) E1 ^+ `  A1 L4 ~- x* C
    Cell[CellGroupData[{
    6 Z3 {: {, k8 f) m* G+ ^( I/ y' \$ B# @! ?1 K/ o' u1 ?
    Cell[BoxData[, p2 \# @' C6 `, g# s( b
    RowBox[{
    1 s# b5 j. C4 g2 N7 y  RowBox[{"Ca", "[", 4 L8 N8 y/ P" b1 h9 L( }' g
       RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",
    $ j. O; t2 t0 O- U, G; B0 _7 { CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9,   k; ]7 ]) Q  N2 F
      3.5779616465173616`*^9}],
    1 _& `5 T/ Z4 _& `
    6 y) }$ ]/ c7 N% I; w1 G3 @Cell[BoxData["0"], "Output",0 f# M. N" j1 p' _+ f% Z. k0 m: E
    CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9,
    9 I' |! P. U2 T* t3 t  3.5779616484049644`*^9}]0 L* H) }5 I# u" g5 p# G3 f
    }, Open  ]],
    0 r! X$ A( X8 b! y, ?/ u
    5 j2 T  N( Z! M  ]( t/ wCell[CellGroupData[{! `, i" _0 C" r) L. T3 k4 W
    - z" ~) U) r4 ^7 `; `
    Cell[BoxData[
    ( R, O& x# i9 n: }1 U RowBox[{3 F* P' J* ~0 U6 K1 K( C3 G+ d' l
      RowBox[{"Ca", "[",
    3 p& ]. [8 A! H! y/ q2 ]# c   RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",! l! o1 H+ Q* p8 q, s
    CellChangeTimes->{3.577957376235614*^9}],
    7 L, H( r% Z0 k! S% d) P
      f( e% D6 ?- u& A; ^9 }$ f4 R. J7 |Cell[BoxData["0"], "Output",. `+ d3 ^5 s# x) z8 e* U
    CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]5 m0 C, m; j/ z3 U% w
    }, Open  ]],1 e- d0 o; ]9 `% Y/ _- L% q! g- R

    9 ?: u0 C$ x8 `$ v- n0 WCell[CellGroupData[{
    6 q. X  k) L1 I8 y! M$ ^0 Y
    & l3 U7 R, i* i/ s5 vCell[BoxData[' o# I& b' x  g6 V' A+ {5 O0 y* A& x
    RowBox[{
    $ H1 @6 c' a6 w; S6 L4 e  RowBox[{"Ca", "[",   t5 S) y  m6 L
       RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",) J0 m8 o3 {, c9 c
    CellChangeTimes->{3.5779573112927003`*^9}],
    : F" k6 U9 K- {  E, w; @# I2 K
    Cell[BoxData["0"], "Output",
    1 ^* V! \8 @2 d2 y" O, o( I CellChangeTimes->{% n8 S/ T9 W0 h% o+ X: S5 y9 G6 p
      3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9, * L+ @7 v0 j/ X" b7 C0 r
       3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9,
    0 |' H( @$ h8 G- {% i% ]# \   3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9},
    1 X4 X/ W* m+ M5 }# v   3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9,
    : `( U  V& `2 H1 L. H: ?' A# S! N   3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9}, / h! o0 J4 w0 f3 z
       3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]
    # R- e4 V- M; L' e}, Open  ]],; a8 G) x) f: f: N, u6 N- M( d, L$ C
    8 N' u4 [/ u3 E
    Cell[CellGroupData[{$ q" |8 p; ?' N/ O
    9 W$ R9 a5 M- X1 ^
    Cell[BoxData[' W% b5 J- N5 M+ z& P, }
    RowBox[{
    $ m; q. \# x3 J# {( C  K  RowBox[{"Ca", "[",
    - N2 U% \* z) g! v) ^   RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",2 Z! M" c. d9 D& h- J
    CellChangeTimes->{3.577921461734375*^9}],
    3 e* N- E- B" t% B- t1 D% Z4 a3 Q7 [$ |$ _+ r
    Cell[BoxData["0"], "Output",
    $ p) y1 d% B* W, |' N CellChangeTimes->{
    2 l8 J# Z8 a* v! ]# _  3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9, 2 v' i3 v6 I5 G- L2 |  x
       3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9}, ( ]% B; O/ b. C8 _, s8 k+ E  ~
       3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9, % k9 x0 s& }4 O! G  \# I: r
       3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9, ( @) x0 w% R- }2 l4 u' @
       3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]/ V2 U' w% y: ?  w. L  p
    }, Open  ]],
    - _- e. p$ e5 \% Q  ~7 k2 U) {2 ?# l8 l8 x7 M0 O0 b$ t- Z! P9 h
    Cell[CellGroupData[{8 d( w/ H6 \$ d) ^% `

    6 Y4 a$ F- f2 j( y1 ~' m5 wCell[BoxData[
    + A5 ?$ A) c" w RowBox[{! Y; N; d3 L) a
      RowBox[{"Ca", "[", / P% q) c+ v4 I- r& `
       RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",! k, m( |% g2 ^- l
    CellChangeTimes->{3.577957303118286*^9}],0 ]: [- A+ ?6 U+ H; L, K& a
    9 x+ V3 k, R7 I8 j3 R4 E4 n, o4 g# \
    Cell[BoxData["0"], "Output",
    4 e* v  ]1 r0 u  f! Z9 r CellChangeTimes->{
    " y/ K. u: s( I% V; [1 u" O, r/ C& ]  3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {7 S0 @9 L3 {. n- d2 U
       3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9, ! ~3 q, Z5 P" M+ M( W* a
       3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9,
    ( z' Y+ s2 ?# t   3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9, , k* L& k: n, @7 }8 c
       3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9, , H! W- A0 h0 Q) M% y$ c% u
       3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {
    / \' I* @8 Q6 U" Y) Y% v8 f7 W   3.577961889378585*^9, 3.577961912965826*^9}}]: {+ f2 x6 L& O0 }
    }, Open  ]],! n9 F  V9 j" f$ R
    6 r) P% d2 k9 e3 O( h- x: E
    Cell[CellGroupData[{
    + a, s+ y4 b9 v) N, \7 R- f. [" U. N5 ~
    Cell[BoxData[
    1 U5 g, M3 v8 y' K' L RowBox[{& N: h  S' m: h- M+ U
      RowBox[{"Ca", "[", 7 Z! K( H% w* }# {+ l( Q
       RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",
      @/ x" z9 F6 M+ `/ h CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {7 P( q7 z$ M5 E& S* f! G
      3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9, 1 d- \. p  i  \2 g6 X3 m
      3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {
    & F/ X  w; |1 d  3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9, , b6 G% K' [. z
      3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {% F* W7 O5 O: h5 y1 c% c
      3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9,
    ' y/ l: y5 }# r2 k. K1 z  3.577921435703125*^9}}],# r! q' i  [9 E# }; P# j" f

    " B# N6 G: e7 X% W7 V( a5 JCell[BoxData["0"], "Output",
    1 s1 t' K' ]8 |, l- K CellChangeTimes->{! G/ e$ v$ W$ Z& {2 j" w1 x
      3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {
    / E  H# z: m4 p   3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9, 6 G2 v3 G2 U7 K
       3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {$ |9 ^0 p: e1 {
       3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9, & `! w' J* z4 ^4 U5 K7 L2 m
       3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {
    . A( U/ v3 O7 j* y  H; L   3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9, : N3 X4 D# i3 e8 m$ X. ?
       3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9,
    9 D! E: O+ M* Z* [9 L  k   3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9,
    , H+ d& r: H( c4 Y( L0 M   3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {
    ; n5 t% ~0 O& Q6 A3 ^& B   3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9, " l% `1 [1 `8 G, G
       3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {2 G, I7 {) V+ ~- [/ G$ j
       3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9,
    0 t! z  R) z+ Q+ g! b   3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]
    ( V4 t+ S! T5 [}, Open  ]],6 B0 p, b0 q% w
    8 y: s7 _6 s# p: p& {; J6 P
    Cell[CellGroupData[{
    / f% V8 v" F9 J& O8 e( }4 [2 B; }1 S$ e  c1 J  K. j" e/ v# q
    Cell[BoxData[
    - X, N- t4 ~  O RowBox[{"Delta1", "=", # E4 Z% g$ J0 G
      RowBox[{, C. n/ D( v/ t0 g9 {: F3 v
       SubsuperscriptBox["\[Integral]", ) t  }8 ?, J- L  X9 _2 \- n& F
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    8 N& [/ U2 _) P9 B0 A# @5 K   RowBox[{
    * R( V9 I2 C) z    SubsuperscriptBox["\[Integral]", 5 d5 I8 d0 }8 j
         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    4 g! Y8 k3 y# C3 a    RowBox[{
    " \: v0 R- _- {# k     SubsuperscriptBox["\[Integral]", . u) y5 r# ?6 J4 o5 W. m3 s" A
          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 7 g& C) F- L/ X6 r  B9 e. H
         RowBox[{
    . X1 d) D) T% l      SubsuperscriptBox["\[Integral]",
    * e4 i$ ^, u9 `) E. r) W7 m  _; d       RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], " R- p1 e) S" |7 o; x
          RowBox[{: ?* s* T4 e3 k6 B% ^6 q! p$ Q6 E
           SubsuperscriptBox["\[Integral]", : n# e4 B0 y5 F1 P
            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ! o2 K/ o9 g" T7 p0 Q4 o
           RowBox[{
    # T5 j/ F' t6 X* J1 d, Q        SubsuperscriptBox["\[Integral]", 6 q9 m6 E3 g/ x6 J
             RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    2 f. z, ~. y" m; a- n' X5 l% R' z        RowBox[{/ H$ M9 c/ w8 P& ~
             SubsuperscriptBox["\[Integral]",
    / C) E" K+ B+ C6 C- O          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    2 g& a4 l6 @; s/ N; q: G4 s         RowBox[{1 s& R/ g1 i% J; M: k
              SubsuperscriptBox["\[Integral]",
    7 ^( J  S) R$ O+ Q           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ' ]: O! ]) F3 L8 J3 ]4 ]& U
              RowBox[{* r3 F  P, a# O4 Q' U, r- y
               SubsuperscriptBox["\[Integral]",
    8 Z% O& T( ^' g3 k6 [            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], & e& l4 k' G3 R; Q% U: f
               RowBox[{3 D8 S- q7 l. F3 j
                RowBox[{"Exp", "[", 2 z2 k9 g+ |4 O+ A5 U( |+ y. K5 u
                 RowBox[{6 X4 S8 H7 S5 Y1 a% ^6 l# U4 I
                  RowBox[{- [; b, r, a0 S
                   RowBox[{"-",
    $ |5 d3 `0 y+ ~; M                RowBox[{
    6 n9 B- J* N$ T# U. P  Y& d                 RowBox[{"(",
    ( u6 d. q4 R" \                  RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    4 [8 y- A1 Z0 f- U- w) }% E, A                 RowBox[{"(", ! l! h5 J( n. C, p
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", 1 L3 L0 u$ _# t, H& q/ f% t: F
                  "Delta"}], "]"}],
    : Z: W# ]4 s6 t            RowBox[{"\[DifferentialD]", "x1"}], : g2 Y6 h) s* o1 @
                RowBox[{"\[DifferentialD]", "x2"}],
    , ^$ n3 \" ^- w: m            RowBox[{"\[DifferentialD]", "x3"}], 9 y3 }8 F9 D4 n
                RowBox[{"\[DifferentialD]", "x4"}], & R; F7 p$ ^, A* L. w3 o7 ?" k
                RowBox[{"\[DifferentialD]", "x5"}], 6 `! `1 F! T2 M- \' i8 b
                RowBox[{"\[DifferentialD]", "x6"}],
    ( E5 B$ X5 H& o6 B7 k8 P7 R) b* P, U: p            RowBox[{"\[DifferentialD]", "x7"}], . _5 p! M7 b2 F% X2 L) r
                RowBox[{"\[DifferentialD]", "x8"}],
    0 T- o. {/ M/ W. Q; [! v$ d            RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input"," T/ f% s- g5 V2 \+ y. n0 [; r
    CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {
    3 _' a, K5 a9 A- D, A" }9 C* X   3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9,
    5 |& Y5 r0 ~' p   3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {
    % N- m; D% x% |7 G1 x. T   3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9,
    * h5 k: ?+ j9 `( [& L( b/ k' r! ]  n   3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {
    , T  T, N5 K; c( T( `5 R2 K   3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9,
    / Y% R3 ?1 I' G3 d8 X2 v, l   3.577918964453125*^9}}],. h' I3 m/ Q0 e4 B9 F5 A: T2 [
    ( a3 d) x( g9 X# `0 d
    Cell[BoxData[- E3 Y0 }& s2 {# u2 {' j
    RowBox[{"97.40909103400237`", " ",
    , I$ \3 G* m8 ~$ U; K# a8 S  SuperscriptBox["Delta", "8"], " ", $ z+ m# J- |6 `* `/ A
      RowBox[{"If", "[", ' \' H! y5 H* z  n' Q
       RowBox[{
    , E" Q. @- w+ E7 u3 K    RowBox[{
    1 D) s% w; \' C7 b     RowBox[{"Re", "[", * S1 N0 Q7 C$ ], A8 p
          SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",",
    6 X1 D& E, U/ F' B* O    FractionBox[
    ) K% n8 z4 R) m4 r, h. S2 O) j. |     RowBox[{"1.7724538509055159`", " ",
    # H3 ^6 Y7 k+ {7 I! E3 L: _. r: x  a1 c7 {      SuperscriptBox["\[ExponentialE]",
    ; B0 S7 d3 G# K: Z       FractionBox["1.1102230246251565`*^-16", / y9 S4 }5 C* L% I1 p
            SuperscriptBox["Delta", "2"]]]}], " I2 m& I: L- b& Z1 ]
         SqrtBox[/ @5 y; n  r2 G7 M# e
          FractionBox["1",
    0 P+ d$ a* ^* e6 L# t# Y( d3 l       SuperscriptBox["Delta", "2"]]]], ",", % T" K1 s# C' k
        RowBox[{"Integrate", "[", $ K2 {0 i' j5 t: X7 I* x
         RowBox[{$ S% @9 K6 B9 v% g  F" n2 i( n
          SuperscriptBox["\[ExponentialE]",
    - ^: |( e. i+ p) c" q! r       FractionBox[
    # n  D2 y3 M5 O        RowBox[{"1.1102230246251565`*^-16", "-", 8 g7 T# m/ q$ |; u* w
             RowBox[{"1.`", " ", ( Q  G7 x4 {, A- g8 ~
              SuperscriptBox["x9", "2"]}]}],
    3 I4 G! `7 H  s+ _; P        SuperscriptBox["Delta", "2"]]], ",",   W& e3 Q/ a8 F- T# v7 [7 Z9 W" E% B
          RowBox[{"{", + A/ }" ?9 V% R% _) y: \
           RowBox[{"x9", ",", 7 }& P* d  G2 H. e+ Y; A% R8 m
            RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",",
    " D4 j- A& s7 U! `" ?/ m      RowBox[{"Assumptions", "\[Rule]",
    : t/ ^0 @1 {! Q       RowBox[{
    + m- Y% i+ u' ^; G5 @* _        RowBox[{"Re", "[", $ ^3 u6 h! \: H3 C. ^3 }0 w: k
             SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}], # t9 c3 ~0 Q* O2 v2 n4 q' F! k
         "]"}]}], "]"}]}]], "Output",  L5 M% A9 K. M" Q7 }
    CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9, . P0 W: L, R. {4 [1 e* D) u
      3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9,
    . r) A0 M: I; T. G7 m% C  3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9,
    + d9 u5 G+ }% d. q* f- g  3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9,
    + E# X$ ^3 \5 ~2 r1 k  3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9,
    : }& S( d% @; B  V6 _  ?/ ~  3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9,
    # v7 t! e! ]! \) h  3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]- S& f8 H, t6 {' _6 j$ \. h7 M
    }, Open  ]],
    $ B. j% q( J  X0 g6 s3 ], O( P) J6 M
    Cell[CellGroupData[{3 i9 Z/ O8 }6 x3 N7 y- D% A# Q3 D

    ! r! Y& _2 o; l& s! tCell[BoxData[
    6 i( f8 e* F& X: [6 u9 Q( y RowBox[{"Delta1", "=",
    / E$ f- J) A6 p" ~+ |  StyleBox[
    6 ^" a6 s; ~4 t+ C0 c" n6 q   RowBox[{"97.40909103400237`", " ",
    . h+ i2 P$ [) B' O    SuperscriptBox["Delta", "8"], "  ", - `. m4 `' S  V& x# W* \* v; \
        FractionBox[
    3 c8 M* F5 }* l- s3 N0 c     RowBox[{"1.7724538509055159`", " ",
    ( e0 s( M) C' o3 n& z      SuperscriptBox["\[ExponentialE]",   _3 \1 [5 V' Q+ `( E* T
           FractionBox["1.1102230246251565`*^-16", 7 D& k1 `; v# }. x+ W4 H4 `' }
            SuperscriptBox["Delta", "2"]]]}], 3 l% {# [+ f1 o& j1 h
         SqrtBox[
    1 l- z, u+ ]2 i, Z& T! K      FractionBox["1",
    1 D1 Q9 O( X2 f- k% T. O6 Q1 k       SuperscriptBox["Delta", "2"]]]]}],
    / L. K8 [- ?. H, v' M   FontWeight->"Plain"]}]], "Input",
    ) a, t2 m9 I/ F) Q+ r% h CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {# k0 l! A# h3 s" `, u
       3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9, , {3 e0 `* @, p$ f
       3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {5 `; O& u. b; `, K
       3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9,
    4 @) q9 P. Q8 h. [) a   3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9}, , r! V  y- U" r! W" u. ^
       3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],
    ) l$ t* s, E: o, e- b
    * C- O2 w9 f" Y; GCell[BoxData[
    & w8 a! a" E  o% f/ w% z FractionBox[
    + _# X% f5 O: c" E  RowBox[{"172.65311851642346`", " ", ; i; B# ?6 `1 E9 o- m
       SuperscriptBox["Delta", "8"], " ",
    $ `2 m3 }8 P# e2 @' o% f+ V  A2 y1 z   SuperscriptBox["\[ExponentialE]",
      `1 f2 r9 G" i$ u* _    FractionBox["1.1102230246251565`*^-16", ; x1 m4 h* U6 f: K- I9 j& ?
         SuperscriptBox["Delta", "2"]]]}], + K1 c- j- d4 Q* P# a3 @
      SqrtBox[
    + y, R0 F/ O3 ?3 c  {   FractionBox["1",
    1 G& [  |, _# W: k' N* [; B    SuperscriptBox["Delta", "2"]]]]], "Output",
    / M: p* m/ [( i" w2 k# E7 Y" s CellChangeTimes->{
    & A: w" Y/ a, l6 y) ~& D  3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9,
    & }. I9 Z, g1 |8 E3 r6 ^# K) U   3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9, 1 ^% }! p% [8 f
       3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9, ( R# V. {+ \4 n* H; J3 G
       3.578012166234375*^9}]
    . m  Z! H5 f, W$ l6 W. b}, Open  ]],! @7 S5 n+ ^, S0 d0 M1 o7 N) M
    : @  y# G8 g/ v/ v5 O8 ~: [. [( Y, V" D
    Cell[CellGroupData[{
    ; m% @$ I: ~7 a+ O0 \$ ~2 e8 z1 t% j: I0 X% m2 m3 j1 p/ R/ j
    Cell[BoxData[
    * a1 [! Y8 D  A# A- r2 u RowBox[{"DeltaX", "=",
    ! n) [; x8 Y5 a. V" ^4 U' O3 M  RowBox[{"FindRoot", "[",
    5 E. z% i7 o7 s3 m# t8 j3 @8 R   RowBox[{
    9 t5 E3 G" l6 L  c) s) n& L    RowBox[{"Delta1", "\[Equal]", "1"}], ",",
    1 k) V  Y5 h6 e! O! J0 T6 Q    RowBox[{"{",
    5 A  D5 l- p, I# ]* A) y$ t5 w     RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",0 t! G* r. P$ B: I, W
    CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {- C* O% c' Q' V- }& g9 R/ H' I4 B
       3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9, - F0 J) U- J0 S) H
       3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9,
    - x! _8 W+ f* V- p' e   3.57791921584375*^9}}],
    $ j" G4 s5 i2 s$ K+ o1 G
    / G  ~1 B$ ~' z( t" \- e$ z  S  iCell[BoxData[* b) p0 ^2 P* U8 ?% F" o9 G. }
    RowBox[{"{",
    0 r  {# e+ e$ g# y6 F: s  RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",
    ' }2 A. K- h9 r0 Y% D8 x CellChangeTimes->{
    * E( B) e: J: p9 c, o# H  3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9},
      T1 \# m( X& T0 }- E& E   3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9,
    / v: k4 b% K$ S0 l( ~   3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9,
    / i  v1 w4 H& i  a1 p   3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9, 9 i2 ]7 r  t$ r" `6 l# ~) x, F
       3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {
    ! w* m% t; `2 m2 ?2 H   3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9,
      P0 F3 g* l7 h5 X  R# c+ t0 r0 y   3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9, 6 z. Y: ]! W4 W" v
       3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9, 0 n- L1 _9 N+ K$ z
       3.57796070150625*^9, 3.578012167703125*^9}]; `) E* s5 b, e* T2 {$ p
    }, Open  ]],
    4 C* ?7 e, d4 d' w+ h( ^
    ; J+ U* L% D  D. c. V6 K7 c: F$ MCell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\
    7 J% p- @& L6 C+ I\:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",
    2 O, O* n; O- A0 X# k6 ]* [ CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {% K. G1 z; q! o& J
      3.577960705312657*^9, 3.577960707621461*^9}}],
    . x8 f  z& v: U/ ^, x6 L( z9 `9 m8 N; C1 F' k4 V. G) o
    Cell[CellGroupData[{
    " f( U; A+ v- g  F+ _  K+ J0 Z" P) F' e% H
    Cell[BoxData[
    1 S: D$ G' s+ `; H" m, n( Y RowBox[{"C1", "=", "Ca"}]], "Input",' L1 Z. X* S$ s& e& l) n; e) D
    CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],: G* b; @- p5 b6 R- \
    ! \$ g, W% B8 q, b
    Cell[BoxData[
    ( ^9 @$ s# Z0 v8 c# g5 N RowBox[{"{",
    + {9 s. `" T7 J# P; o& t, `: e  RowBox[{+ }3 y2 R0 ?' ?  s$ p* ?) G1 H
      "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",",
    8 [) X2 v  u5 B% ^) {/ ~* ~   "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", & z: d) S) Z9 m# Z" n# W3 S
       "0.`"}], "}"}]], "Output",
    6 O$ `, u6 y" f CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9,   V2 p' e# d( i; }  D2 O& n
      3.577960710273465*^9, 3.5780121855*^9}]
    4 g$ {$ I* U& ]2 G' O}, Open  ]],
    + ^# f) Q8 [! e% W: ?! {7 _* o  R0 B! t8 g- T4 m
    Cell[CellGroupData[{5 K/ t1 I+ L- }4 v' S3 ?' J: J; k! k
    3 a3 H2 H" |. ?  h; [8 s
    Cell[BoxData[
    & d. H0 p) }7 @, t6 }3 a& J! V RowBox[{"u1", "=", , {! m9 G# }1 }- ^3 f3 F+ r0 b. {$ b% I
      RowBox[{
    4 h2 }1 [  u1 ]   RowBox[{"Exp", "[", & K1 U5 ^8 z3 K, b8 b* ?  U
        RowBox[{6 r  S* d9 }$ {  F3 W
         RowBox[{
    ! ^# ?3 f8 ^+ K( ^5 Q5 h4 X      RowBox[{"-", . {2 s# ^3 n/ ~3 i, }& \/ W
           RowBox[{
    # ]& K. c; a2 P* i9 A6 r. ^# [        RowBox[{"(",
      F6 Z/ D* l6 Q8 j1 F& b% w         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", : h: Z6 F/ @+ Z+ R6 h( C
            RowBox[{"(", 0 U+ h% Q9 l+ q& i; O4 i  b& a' \3 R
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],* K8 u( l+ W" Z: p) B5 N
         "]"}], "/.", "DeltaX"}]}]], "Input",
    9 L' W: A* }3 |3 L CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {
    $ f( A, G3 |3 s   3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {
    0 u9 _& |! d* }& D1 h; G0 g( D! z   3.577919193484375*^9, 3.5779192326875*^9}}],9 L: |' X3 M) {. C8 U

    , ^0 o, j6 k. L' n0 C& Z3 O. f5 XCell[BoxData[& C8 }4 r0 B; `( B
    SuperscriptBox["\[ExponentialE]", ! r7 N' W$ b: U2 d" E6 H
      RowBox[{"3.141592653589793`", " ", 9 w( k' o  L/ W6 k5 a
       RowBox[{"(",
    1 V+ F- V+ p* U7 u4 L* C; O    RowBox[{
    # c9 {8 M  ?; ^     RowBox[{"-",
    ' e/ j( V% _; e' f( a      SuperscriptBox[
    # K: N6 u4 S' U% K       RowBox[{"(", , X: n# y# v- _+ Y) j
            RowBox[{
    " ]* _4 T8 f3 E5 Y5 h2 k& B1 W* k         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", # o; w; r4 w' H/ F+ x
         SuperscriptBox[3 u6 N0 Y5 T' l# W
          RowBox[{"(",
    ( E- W! n0 O$ E8 f1 K  \; c- q2 N       RowBox[{# D; Z0 ~' w; ?9 z4 O6 D% X" A
            RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", . E) k, j9 B/ D: \& I# [: E! \7 T
         SuperscriptBox[
    6 u+ S# K' s! I      RowBox[{"(",
    ; h6 j* X; F+ P* X' r% p, D' T1 M       RowBox[{  ?" ^' ^0 z% r9 M) r
            RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    ; G3 q) D0 J4 Q! r/ k3 _- \     SuperscriptBox[
    . u, Z, G4 o# f, `      RowBox[{"(", : X, P# ?  }/ b* [1 U! [, d
           RowBox[{
    . A0 u2 K' T+ }. J$ O' v: m) t        RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-",
    & ~! @! a9 _# ~& ]( c     SuperscriptBox[9 I* E+ Y4 M  y8 a- q
          RowBox[{"(",
    * G- [- B1 w3 I4 P4 [' j       RowBox[{; H0 d9 q1 l# j1 n8 G/ o
            RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-", 5 R$ I0 x: [' x0 q) Q/ Y
         SuperscriptBox[& v1 G( s1 Z5 X! w6 H
          RowBox[{"(",
    ; J4 k1 k& t; m. F/ X       RowBox[{
      \1 r/ R& ^$ @0 s3 _/ |1 B        RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    2 W# Y$ \; Z. F# U' t. K) i) {* b     SuperscriptBox[$ O/ ^2 B/ x. J
          RowBox[{"(", . v- _" J' x: ~* W. G
           RowBox[{+ L. B! q' E0 B3 r7 U
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", % b( Y9 c0 J$ a& @( ~- K
         SuperscriptBox[" [9 v+ W2 [/ q% n. o) j1 z4 N8 D
          RowBox[{"(",
    7 h. p: G* a/ w% P8 W1 @       RowBox[{1 X3 m3 u9 N! f4 q  U
            RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    % B0 S1 t. o6 ], T3 d     SuperscriptBox[9 O! R& z  i% @( S$ R5 P! R# ?6 p
          RowBox[{"(",
    4 h& y9 l1 o+ p! q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 9 }$ Y; ^2 [: o0 S, e
        ")"}]}]]], "Output",; x$ f- @9 O3 P5 x! x1 U( Y, a
    CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9,
    & d& c. Q; f  o# y  3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9,
    " I) W. L) P' v  O/ s7 D  3.578012187078125*^9}]
    : U1 G# [  [( ?! p6 n$ B' B}, Open  ]],
    8 q9 n  n! i% e/ W$ }7 s4 [& |# ~
    Cell[CellGroupData[{; C, I; u' q6 }/ l9 v, p
    ' D9 ~' F, e4 `) L
    Cell[BoxData[
    & ?# C6 A2 {; j  Z4 Z. p RowBox[{"C2", "=", "Ca"}]], "Input",
    5 D! Y7 g0 W) {! C) r: f( t. j CellChangeTimes->{3.57792047321875*^9}],# h) Z# Z: C% e  _8 P7 k( s
    3 x' A1 D4 y" x
    Cell[BoxData[
    ! T) ^0 b8 ]/ y8 G RowBox[{"{",
    ( U* z1 x. t9 T! Q; r5 b  RowBox[{
    * s% C0 V2 G1 P, F* `, p5 m, o  "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    ; o1 p# s0 m- C7 r( V) f   "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}],
    . z# R& d. x  ]* F2 N  g/ k  "}"}]], "Output",
    ; x1 |* {5 E0 K) D, R CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9,
    . D3 w$ Q7 l8 d. L  3.5779607401163173`*^9, 3.578012204671875*^9}]
    . K8 Z  w; n) s; G: g2 g) G+ k7 V: f}, Open  ]],/ Q* n( F' h% K8 T# X: J5 L

    6 [# s/ N  N& v+ A4 P% Q3 J- y  c: GCell[CellGroupData[{$ s+ J9 ]5 Q+ ^  L1 P- }
    8 V' x+ a: X; q6 A1 N  o$ A4 ]
    Cell[BoxData[
    $ w+ w# s- A: e6 s RowBox[{"u2", "=",   R/ ~  [' w# ~! j# Z2 r* C# Y
      RowBox[{
    6 k, D& v  C7 }: @   RowBox[{"Exp", "[", " @5 f% T0 [/ o, V+ J! G
        RowBox[{/ j" v6 r- `4 t, y
         RowBox[{/ J2 m! y# [; @+ {5 A7 Q$ w; r9 z. Y
          RowBox[{"-",
    $ w$ h6 c/ J  a       RowBox[{: W$ Y& h+ T( t! K; X) D+ D, M+ r( q
            RowBox[{"(",
    2 D: F: f% }( D- t, Y4 a         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", % b- W% M' o' o( P) N! n
            RowBox[{"(", # i7 T$ J+ j2 U; \5 E" r8 C: l
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    # d7 ?* b7 T1 e; E0 I" [     "]"}], "/.", "DeltaX"}]}]], "Input",5 G( A" N8 U$ k1 N
    CellChangeTimes->{3.577920484109375*^9}],
    : g8 ?1 g' F1 r: B7 H$ [2 G
    2 G: n& q: x+ V" ~) ?$ k$ l- dCell[BoxData[) o8 T% J+ d8 d9 \+ C- a( S1 n, d
    SuperscriptBox["\[ExponentialE]", & M" A3 W2 |: C* m5 X
      RowBox[{"3.141592653589793`", " ", * @/ u2 j' P9 e# p, h0 V
       RowBox[{"(",
    0 q8 ~+ X$ l, I- h! x( J    RowBox[{
    9 n2 C# l9 K! f     RowBox[{"-",
    5 i6 @6 s% L9 x: o/ p! ?9 a0 Y& ]      SuperscriptBox[  F# |! M7 h0 M3 ^! I
           RowBox[{"(", , e) `  q) R. Q$ k$ i8 @, e
            RowBox[{. `: |" x: z- t8 ]4 m$ c7 |
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    1 _7 Z$ L+ P' W! [     SuperscriptBox[# F% p8 G8 [* h6 F
          RowBox[{"(", 4 P5 L* ?" T. o9 p' v: X" W. k9 P+ b
           RowBox[{
    7 B$ D# j5 \$ o( Y$ e) \        RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    3 g1 g6 J& m& ]: n     SuperscriptBox[
    4 u( O, ?, ?0 d; w3 l2 `# ^, M      RowBox[{"(",
    ' d: J9 |+ G( Y  ]4 z       RowBox[{: P6 t/ v; L. @6 \/ E
            RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", 2 `9 W) V/ `/ P5 ^4 J0 @& j0 {
         SuperscriptBox[- Y% W- Z* d1 J# ?9 ^3 f0 u. c! ?# v
          RowBox[{"(",
    6 [! N/ a4 Y- ~       RowBox[{+ Z- l- t/ o2 P1 r: [  |) e
            RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-", 1 y2 @3 |& C) G: M
         SuperscriptBox[1 g6 v' r3 f- J+ u# L" }7 T
          RowBox[{"(",
    " T$ u& U! ~$ L2 r1 v3 @! D: z! ~       RowBox[{
    7 d1 i1 b3 _! j6 r, _        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    & Y2 d4 x% |4 F4 I/ Q# K     SuperscriptBox[+ f5 C0 p% K  K# Y' Y# k
          RowBox[{"(", 0 O5 \! G0 F4 V) k
           RowBox[{+ A. V" M4 O$ p% |% @- O; p
            RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", " i& Z6 q6 o' V# k
         SuperscriptBox[
    1 A: w+ f7 i' Q# H      RowBox[{"(",
    " V7 q9 |; u* f! Y& n# q: T$ c4 u) I       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    : H  Y/ e  P" [% K     SuperscriptBox[! _9 v; @" y& U! A4 q' P4 s# k
          RowBox[{"(",
      c+ D7 l- F. P4 |/ R  d4 O; o       RowBox[{% V! q& f/ d( G0 u; Z. D8 U
            RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", . E! x$ r5 G3 y* F
         SuperscriptBox[
    6 D- c. B6 S$ G: F8 ^      RowBox[{"(",
    9 y2 O/ W- [1 T( s* s$ |6 e       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 6 I; Q$ s! q& k) X( [) k7 B5 W
        ")"}]}]]], "Output",0 Z& ~5 X" }8 K% s5 l
    CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9, , m- ]: n$ e* }$ V; M4 p
      3.5779607413955193`*^9, 3.578012205484375*^9}]
    9 u( X5 m/ c* V( i# @& F}, Open  ]],$ B3 R7 N) \2 l3 m

    / s1 M0 q$ f. I' ~0 \+ F9 z% DCell[CellGroupData[{
    ; M" S% \7 P$ i4 w, c% d* o8 L
    2 E1 a, n4 I9 o& e( j$ tCell[BoxData[: X2 t2 }) A  {( a4 ?- A
    RowBox[{"C3", "=", "Ca"}]], "Input",, S% ~3 `2 w/ \# n6 Q' F
    CellChangeTimes->{3.57792064125*^9}],
    ! e* k/ ?# q# B6 ]! Z0 r
    * s" d& |5 F4 @! r% N" j  @' O3 HCell[BoxData[
    " D  C, d; m; p& U2 H1 {! o+ Q RowBox[{"{", ! K2 P2 u) D; Z# r3 j
      RowBox[{5 \7 E/ z& y- G& D+ X. P- m
      "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",",
    : A+ l- B  H4 Q   "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}], " w7 A6 ^! k4 I" P, [8 I1 ~  e6 y% p1 y1 h! V
      "}"}]], "Output",2 \5 o* C" p, `  q
    CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9,
    / e( b4 h, x6 V, C! z/ E% F  A- [  3.5779607642027593`*^9, 3.5780122103125*^9}]0 `3 U# j7 h9 \5 i
    }, Open  ]],. ^2 ?8 n) w. E2 F9 L3 l( ]
    7 k( t% |5 O7 N$ D
    Cell[CellGroupData[{
    * ?1 `2 c' f  l- y, w3 J3 i! L
    ' y- X8 j9 N" a) A0 w( K  gCell[BoxData[9 G/ P* o- D& U! h; u
    RowBox[{"u3", "=", 3 q- [: c& y! c" |; J
      RowBox[{
    / P0 C8 c7 \3 b   RowBox[{"Exp", "[",
    * _; j7 ~4 z1 x4 Z9 S* I    RowBox[{! c+ e4 D( f! x1 \* y
         RowBox[{  T# C4 d) r4 `  S& B/ \: @
          RowBox[{"-",
    0 @" T: ^& O4 d       RowBox[{
    7 _" U2 O2 J- C6 a/ S+ b        RowBox[{"(",
    ; @( x( m: t, I- W! K         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ' Y1 A+ U# [/ F        RowBox[{"(",
    2 p# v2 y. a2 g: r# H/ @( W         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    * S+ v' B& M" d; ?     "]"}], "/.", "DeltaX"}]}]], "Input",9 `1 j7 E( B7 @0 g/ {# B: y
    CellChangeTimes->{3.57792064921875*^9}],
    2 p+ @0 i4 |1 T( W2 C/ _0 z( I$ R6 r# ^4 a! ~1 {
    Cell[BoxData[
    ( ~) p" u; Y, z: x/ n SuperscriptBox["\[ExponentialE]",
    $ r! ^4 Y& X$ i( Q7 X& P, Q. u+ E8 t  RowBox[{"3.141592653589793`", " ", " @  \# ~0 Q, o7 |7 s5 S2 G* ?4 w
       RowBox[{"(",
    % t. m9 @6 O1 R, j, G    RowBox[{
    % S7 x0 y* o( @; B. Y& F     RowBox[{"-", 4 K- k" q" x6 _! j  p- s
          SuperscriptBox[
    / C% }$ D1 |1 _* [3 s# y/ ], v* H( t       RowBox[{"(", # l8 Q3 a, ?4 o5 {, V+ D2 C4 a2 L
            RowBox[{
    0 X. T$ U2 ~8 E  Q         RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-",
    0 _5 n# D* W8 n" G+ x! F4 B1 l     SuperscriptBox[! c* p6 K7 f+ t
          RowBox[{"(", $ Z4 V/ V4 g0 [2 I, F
           RowBox[{, m% u, O& \# ~* j# c
            RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-",
    # [( X4 s% y; d( J% A* z( o     SuperscriptBox[
    5 z) j" J2 V, c: o1 e      RowBox[{"(", 2 b) M3 B% a8 j3 s$ O+ O, Y
           RowBox[{
    / h" Q$ ~* g( V% p' k' J% A; t        RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",
    - Y  e" g6 s% P# y     SuperscriptBox[# d; Q6 x( T3 r1 y
          RowBox[{"(", + K1 m/ y6 G4 v; U$ o; K
           RowBox[{5 ]4 J2 @. `. E  Q* a8 n3 d
            RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-",
    9 `; K1 a8 \9 m) ]) l     SuperscriptBox[4 Z# U; T- s/ Q1 h
          RowBox[{"(", ; _: h& Z: u) X  u  D
           RowBox[{/ G7 _& k: S6 B$ Y
            RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-",
    7 G! }9 W0 ]. _7 ^9 M( T/ V5 B     SuperscriptBox[
    - m+ _# v/ H  n) R/ y& P3 c      RowBox[{"(",
    6 R( g0 A6 a  r2 F$ {       RowBox[{
      n2 ?% d2 P# }6 E        RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    / R; S  C) j% y) l     SuperscriptBox[* {- q1 @( X4 D3 V
          RowBox[{"(",
    " S& A8 N1 B" l       RowBox[{% z1 l7 H7 b6 X
            RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-", , |! W2 j& f9 `
         SuperscriptBox[2 I0 |& ~* z! {( t) N
          RowBox[{"(",
    + I2 F/ x+ V! M       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    6 l/ M- n: A4 U5 O/ y     SuperscriptBox[2 t* l* [5 o/ f; a* B
          RowBox[{"(", 2 ^( q6 ^/ s! z+ J( W
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ; b4 q; P% x' b+ p) I0 l$ ]+ u    ")"}]}]]], "Output",0 s; g- b( b- M7 A; j4 q5 _
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9,
    6 O5 A; j; N: C  3.5779607654819613`*^9, 3.578012211515625*^9}]
    9 R7 a' a, L6 N& c) a& `}, Open  ]],
    ' G$ n; S$ x5 Q/ j6 q  ?: A8 L1 r6 W( D7 M5 o! M
    Cell[CellGroupData[{2 |" v# N6 J" b8 V5 z6 g

    / B1 R( Z, R9 ]$ Q0 f& ~5 rCell[BoxData[6 v5 [9 u- V4 U  A" C! w! ^/ d; `
    RowBox[{"C4", "=", "Ca"}]], "Input",
    5 \+ |: r) l# w' G CellChangeTimes->{3.5779207559375*^9}],
    , }# H- Q9 f+ D0 j
    3 o% w) S7 R: R# U1 l4 u, i0 QCell[BoxData[
    0 D6 t$ a7 S- j$ L RowBox[{"{", 4 Z$ h) o& J/ x5 b0 n% e7 ^- C7 o* X
      RowBox[{
      ]% r" {  g4 E8 Q  "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",",
    * R+ S/ |6 W2 E  m  \& K   "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}], 6 X: s, m6 J' w, S) J- K
      "}"}]], "Output",0 x. b- }$ z& X: T1 Q
    CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9,   U! R2 O( E" F: _6 j' F
      3.5779607861363974`*^9, 3.578012216171875*^9}]
    $ ]8 H8 w9 U% ^. B$ o}, Open  ]],2 [# ~; l; n3 @: i+ V. S

    ; b! J& y4 x5 E2 RCell[CellGroupData[{% s" w' {/ v- B/ l' T- J# B9 F
    . I& i2 J6 @# l: t4 n- _
    Cell[BoxData[
    ' B. |) F8 l; G4 S+ Q. W! m+ k RowBox[{"u4", "=", 6 X0 u. f7 d' k
      RowBox[{  G. H4 _3 q. p& O
       RowBox[{"Exp", "[",
    : z' x0 E  \. r6 l8 M1 G; k0 b0 K    RowBox[{
    / A! R) v  D' ]7 A7 c) {, W     RowBox[{
    " l7 T4 O9 L6 ^) i. y      RowBox[{"-",
    ) I" O5 ]" i* m. i) u( ^       RowBox[{
    $ }1 O5 Y: k; d- M  a4 z1 c        RowBox[{"(",
    * F# {; ~6 w& f1 L) r+ }         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", # b! N: I& X+ c2 ^( I( I5 q
            RowBox[{"(",
    . u* Y' M* T" B8 o1 e         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    8 k3 D6 J& {: O8 n     "]"}], "/.", "DeltaX"}]}]], "Input",0 m4 G9 C$ `$ R2 A
    CellChangeTimes->{3.57792076325*^9}],1 h" e( q& O7 P( W8 J& K/ X
    " R4 |# p6 A' ?8 t# i9 U; h
    Cell[BoxData[( Z" [1 H" {6 m1 ?
    SuperscriptBox["\[ExponentialE]",
    ' f% t+ w0 J% Z- s; J& s3 Y6 q  RowBox[{"3.141592653589793`", " ", 1 ]1 v) N% ~7 O) ~5 g2 X
       RowBox[{"(", ( W. W& o; C, b/ N; n6 X
        RowBox[{
    2 l4 z" Z. R2 T1 O& D3 c/ I     RowBox[{"-", 8 _. F  m  q% y$ P% ?* m
          SuperscriptBox[! r2 V4 i& N' B7 L# Y1 s
           RowBox[{"(",
    7 Y6 H' T9 t* B! K( D' H' |) t        RowBox[{1 _$ S$ J  }5 i1 v. k
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    5 Q0 }" I: E, W+ A$ e8 `% R7 _     SuperscriptBox[
    , E0 n( J4 H" a9 G" c3 f% E5 C      RowBox[{"(", 1 l4 j: o& D! |$ b' m
           RowBox[{
    0 K4 J: |4 l. e' D7 a        RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-", 4 Y2 Z5 w* ?% n* \1 t
         SuperscriptBox[2 Q# V) ~: S5 l7 v2 L
          RowBox[{"(", 9 G8 N6 b  b8 f- `
           RowBox[{2 c2 P% ]2 x1 U- v( A: ]7 C
            RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", 9 Y; V# {) X! ^& u/ u& g
         SuperscriptBox[
    9 n$ q, l( H0 u9 d      RowBox[{"(", % G  p" [7 d4 ^9 |" S9 k1 g
           RowBox[{
      Z, Y( S, A& a2 @5 @, ^        RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-", : f7 Y- N  E% ^; b: ~! R2 U2 G
         SuperscriptBox[
    3 F/ s* r7 o8 i* b' f      RowBox[{"(", 8 I3 [8 ~5 K, w( U1 `+ n
           RowBox[{4 C4 @. `+ l/ i# O. X7 }( q$ r
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", 0 u5 L( s. R" u* B. @- `
         SuperscriptBox[
    ! e; a6 O, G" O" L: N6 L, g      RowBox[{"(",
    . M" c" b8 z, M5 I, Q2 \* Z0 [       RowBox[{
    4 W: O2 P! h" W0 l/ w        RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    9 Y' {1 c- s5 S/ y8 x4 [$ A     SuperscriptBox[9 u# f3 W7 ^/ U9 a5 G
          RowBox[{"(", : e& J6 _$ U) m8 x3 x( G
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    - C$ W5 ^4 a) u" s7 k, g! O     SuperscriptBox[+ g, L! K# d' U4 R) s5 ]/ a* p- q* B
          RowBox[{"(", . n, P/ I' v) x3 Y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    , s+ q$ ?4 E; v     SuperscriptBox[
    3 K& |4 p& U: x      RowBox[{"(", ' N" d+ i3 m1 H* M- b9 ^& H0 p, e
           RowBox[{1 b1 f3 E! v1 l4 ]) T  b
            RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}],
    5 P+ L  v* m# W5 p3 N) M1 G* |    ")"}]}]]], "Output",
    + s* H9 J4 k  S7 o$ p4 k CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9, - z7 x) I% Z3 W4 J1 ?
      3.5779607873531995`*^9, 3.5780122169375*^9}]" Z& s! S6 ?. q, [
    }, Open  ]],! ?. e7 k; g* e* _. b8 h6 X
    . q0 G1 b! R2 J( h
    Cell[CellGroupData[{) r$ Y, j" k  |' |0 d

    . x7 {$ }7 D. i! E/ ~Cell[BoxData[# P& E5 ]/ N- v* L. n
    RowBox[{"C5", "=", "Ca"}]], "Input",
    ( _0 H) S+ Q3 D, b4 }: y CellChangeTimes->{3.577920860671875*^9}],
      h1 _8 Y& @7 S, w* M5 h/ l
    6 \9 f/ [7 v7 Y! P2 DCell[BoxData[
    ; U6 L3 K) _" {: r RowBox[{"{", + A9 y) q4 w6 o" f  d" ^( A
      RowBox[{3 b/ {. x6 ~) y* B+ Z0 P7 x
      "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",", $ i5 a5 F- [+ r0 L. j+ |# b
       "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}], " A" D, a. J8 ^) \; `4 t
      "}"}]], "Output",
    + `! u2 W8 B/ G- r CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9,
    ) J( w& v# }3 d" m" o, O  3.5779608137328453`*^9, 3.5780122209375*^9}]
    & I1 s, _: p, Y6 r  f}, Open  ]],' Z: U+ S8 w! }

    * \" ^" w: Z' nCell[CellGroupData[{& _2 c, y: V2 v( e( _6 ]- W

    * Y6 Q5 ?2 K! t3 a6 |Cell[BoxData[
    ) o! j2 c6 s, c% ~ RowBox[{"u5", "=",
    ; G: v, j8 u4 X8 g, u  D  RowBox[{$ t7 r6 u! |  i' J: }' j- X- W9 X
       RowBox[{"Exp", "[", 9 O$ @% P9 \- p  n" t) Z3 \
        RowBox[{
    ( [- {; O" n: ?. I# R; h0 }     RowBox[{
    # `6 U3 z. l: P8 l      RowBox[{"-", ( M0 K1 \2 K* y4 H! V  ^
           RowBox[{0 V1 I4 U/ l# w* W" O/ y1 \4 }
            RowBox[{"(",
    % _. L/ y( h+ N3 u* ~7 i         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
      ^2 S6 v" V5 w1 d( ?        RowBox[{"(",
    / M  Y0 w  B8 x2 y8 I/ T) p( ~+ R! E         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],0 a( U* o4 |( `2 h) ]
         "]"}], "/.", "DeltaX"}]}]], "Input",$ N0 z- ?) L1 v/ N2 }1 w
    CellChangeTimes->{3.577920869375*^9}],
    3 y8 c- W: M" G( N) ?1 H
    4 |# \- V8 E/ u6 I) Y7 NCell[BoxData[
    + [) f- ]$ X% t( i$ q( c SuperscriptBox["\[ExponentialE]", 4 [6 c" b3 W0 d" K' w7 }
      RowBox[{"3.141592653589793`", " ", ) \- F, _4 @/ c; ~
       RowBox[{"(",
    $ L" _3 c! K- ?8 K    RowBox[{9 b/ @5 X) @1 s0 d7 P4 M
         RowBox[{"-", $ k; ^! y, g4 E9 f  r: Z
          SuperscriptBox[
    ; A9 Y( O0 O7 x& Q8 G9 A* _       RowBox[{"(", 5 R5 c3 j4 I" i- |, `
            RowBox[{
      ~8 Y, a- a9 t- S/ j0 n0 s         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    6 F! J0 ~" o  C' ^     SuperscriptBox[! M( d9 B5 I" P) `- b
          RowBox[{"(",
    4 Q9 E2 v1 A. J       RowBox[{- h) o2 g- P+ b. R+ D/ E
            RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    . R7 c% V# M3 S/ H8 s     SuperscriptBox[7 M) E) S+ K: W& x6 T# g8 l
          RowBox[{"(", * l! C! t) [) g1 Y! b( G
           RowBox[{
    ) y5 S1 W  ]+ d& c9 e6 A        RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-", : L0 O& F: Y: [2 n
         SuperscriptBox[
    9 c) E& _! R+ G; b1 B      RowBox[{"(", ! `5 b1 x. i2 g5 Y# I, R
           RowBox[{: q7 I! m% k8 [  x, J
            RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    ; \& G  U" c3 f     SuperscriptBox[0 o8 ?  k$ N# Q% E& `: l  X
          RowBox[{"(", 3 D( G6 W4 T" I
           RowBox[{
    % }% q6 h7 `/ ]" R) H        RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-",
    4 ]# U7 E; G: `# {     SuperscriptBox[, T, i- x* k8 ?' \  c; N# v  N! U
          RowBox[{"(", # \5 n: R3 X. W7 l. g4 x
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",   x' E6 L; A. C$ v9 r6 Z9 _' V
         SuperscriptBox[
    9 Q  G, r$ R, Y! G4 h* G      RowBox[{"(", 3 n0 R8 T( N1 w3 C, T" @+ |0 B; w
           RowBox[{
    + v' d4 C% J% v8 x% t        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    9 ]. ~% T5 v  c2 u* [     SuperscriptBox[
    ; l% y! ]* i/ J( Y+ k8 v      RowBox[{"(",
    ( W) U7 D' F, `# G       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", " P: p! s! L( ^: K
         SuperscriptBox[
    ( L! N; L6 A) |  c8 K      RowBox[{"(",
    " ~& i8 V, u. Q       RowBox[{
    $ ], j- b* r& N8 A7 _: a        RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], 1 J/ H1 X4 F% p, O: k
        ")"}]}]]], "Output",2 T9 q5 w9 e# Y- x" i; h0 ?
    CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9,
    & m- f. t. N! L8 S  3.577960815043248*^9, 3.578012221953125*^9}]/ \4 t" D; ~4 V+ N4 \1 G0 L
    }, Open  ]],
    . _) j* }6 Z4 a& R2 b' R, x1 n2 |/ y& w* r  B
    Cell[CellGroupData[{: t% H3 j( D$ W/ O' L/ X& v

    6 o/ |5 A# N9 D& e: i/ v1 HCell[BoxData[
    0 W5 c: s! K' m RowBox[{"C6", "=", "Ca"}]], "Input",  r! v3 g( `" L$ `
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],
    % j: _" M9 p. `# I# E0 N% K9 m2 m1 Y! K8 U
    Cell[BoxData[% O4 A) F6 W1 J+ z* M
    RowBox[{"{", , }$ g6 H8 X% q  ^, @* o. e
      RowBox[{1 {  H, ^4 e2 a* t+ A6 ?2 E/ n. ?
      "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",",
    , u; g2 M0 _: p  s+ }2 K   "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",", 1 X) D8 N( _. V- a$ I1 W+ B
       "0.494866`"}], "}"}]], "Output",
    * h7 V0 r  {3 P" \ CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,$ e; C% k/ N+ Y
       3.5779608373044868`*^9, 3.578012227359375*^9}]
    7 {6 r& R$ p  x2 X+ t}, Open  ]],% v5 P8 b0 G# U( i$ r
    ( p' U9 m# A8 X" a' m* v2 M
    Cell[CellGroupData[{
    ; Y  U. v3 U  @7 |5 o, ^$ d9 o9 C1 A. }0 v: g' _
    Cell[BoxData[
    : c7 P1 p, r; q, C( e" q RowBox[{"u6", "=", * o, T( D+ L! A6 e. Z
      RowBox[{+ M+ G( R7 j/ W0 D6 E
       RowBox[{"Exp", "[",
    5 @( P$ I7 |  ]1 A    RowBox[{
      a$ X6 k8 j2 ?1 c5 q- |. w     RowBox[{& {# I  ?9 o. [# Y# w7 M% [2 y
          RowBox[{"-", - f: o( s+ a- r' c, P/ q- C
           RowBox[{, G/ a0 J! J8 ~# h) X
            RowBox[{"(", / Q9 d* R' k; o; z3 G% X0 c
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    % |# }! N$ n( S        RowBox[{"(", - x+ @& \9 R3 o4 D  R! w& Q) P
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    % Q& u- T. X" d) u; T3 G     "]"}], "/.", "DeltaX"}]}]], "Input",
    ( ~5 K7 K, J' D+ b CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],! N9 f6 H. ^2 N3 V4 F+ k

    " C% _) H8 T+ X$ F) cCell[BoxData[
    1 N4 @( S9 s" |1 B SuperscriptBox["\[ExponentialE]",
      T. G6 g. @7 c  _/ p2 k& q% R  RowBox[{"3.141592653589793`", " ",
    1 g7 B$ i% _# U5 S0 }) F   RowBox[{"(",
    ; G! {5 r: `1 {" I# N. U    RowBox[{
    5 {$ B! o8 |' v. H     RowBox[{"-", 6 k8 I8 H' j" i
          SuperscriptBox[
    7 X$ o& t" i& D8 l* W" v( F6 \! L       RowBox[{"(", 9 S" N, n4 ~) M$ C5 e/ {# |
            RowBox[{
    % U: q8 `7 I$ \9 L% Q: f         RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-",
    0 Q. A& x  X4 \( |: p$ V     SuperscriptBox[) z! X3 W  t: h! m5 r9 g  B
          RowBox[{"(",
    3 f; I' `) o; \# d4 P( ~3 K$ X       RowBox[{
    ! a: o. H$ p3 |! n        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-", 5 Z, A% x0 J- x/ K* t
         SuperscriptBox[: ~4 n; u6 F- h' C8 i7 d
          RowBox[{"(", 0 e1 F) O5 i" a; _6 [2 o
           RowBox[{
    5 G  E: a2 B; d; x        RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    1 }6 a/ |7 W" S; O2 e! \     SuperscriptBox[/ k" b" k3 k1 e0 k3 b
          RowBox[{"(",
    ; F& c( @0 e3 T6 m       RowBox[{
    ! j) G' r4 a' o" F* @* O7 o6 \        RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-",
    ) v' {5 V! J' h2 c     SuperscriptBox[
    * i  A: q3 _, W1 ~* O1 i* [      RowBox[{"(",
    . N) Z! i# |/ r       RowBox[{0 D9 l* ~# q4 S' Z! J& E: \
            RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-",
    - U  r! p* k5 j     SuperscriptBox[
    , @7 ~; I6 z( Q) O8 j" r: M      RowBox[{"(",
    4 J, S1 Q' m' O* ~. B9 ^) X7 n       RowBox[{8 t0 Q( l6 Z% u$ _0 y
            RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", ; r7 O( I! A% F  o4 I6 N0 U% y) N
         SuperscriptBox[
    7 [) g1 a3 }) E$ ~' j- _. `      RowBox[{"(", " L; d% I5 S# ]1 H7 y
           RowBox[{
    ' p, x& |; e% [7 ~8 v        RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",
    5 W: W8 b. q3 G, I, r% L; R     SuperscriptBox[
    ' E. c6 b! O7 D+ k- ^- U: [1 F      RowBox[{"(",
    4 U" j$ O4 o4 u       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", * ]5 b  M$ i" e( j! Y
         SuperscriptBox[5 _4 v4 o7 |& G5 e% n3 a  C" q
          RowBox[{"(",
    8 r8 l2 U) _3 l3 m+ I       RowBox[{: r, k4 ?2 W- f4 K4 A
            RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}],
    / n/ M. N( M' r# Z; _    ")"}]}]]], "Output",
    , K  r5 d% _" g CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, " k, R, _4 H) z8 b& \! e. R' f, o5 g1 V
      3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]
    4 y" ~9 [( l5 B}, Open  ]],2 f$ e. T( W' n5 e
    , i/ E, J% ]0 T/ n' i- {
    Cell[CellGroupData[{. k7 f$ _+ Y- @' j( G6 s) h
    ' F2 b- U  S& ]
    Cell[BoxData[
    ) B4 J3 K& m1 \# A. ]- S( ? RowBox[{"C7", "=", "Ca"}]], "Input",
    % c4 V- P$ V$ H8 _* s  S CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    ( S& q* `! [4 F8 J$ K% s  3.577921316125*^9}],
    2 m* n/ r9 K) A2 g! Q) I! Y2 T' A' g0 u, H" P
    Cell[BoxData[3 f1 C" `* ?" G: J  b
    RowBox[{"{", 2 R" E8 n# c# K/ x1 i- t
      RowBox[{
    / J& i6 k& A7 h% b# @# E9 y  "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",", ! Z. w" M2 e( W) ~
       "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}], 9 Q" q8 ^# ~) g
      "}"}]], "Output",$ d, o# N! H0 o7 K9 |- ^; k1 ~
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    2 d  J9 u) k' ?0 ~% S# U1 p8 h7 J  3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]
    7 Y: u5 V( a9 [2 U4 N}, Open  ]],
    - n+ {  \  b$ g  d3 t* l* h3 W( T4 P
    Cell[CellGroupData[{
    ( q, i5 l* @6 Y: @. w3 ^1 z$ I! U
    + h+ z# R; k' bCell[BoxData[
    " o2 y' d4 E3 u3 g, B; S RowBox[{"u7", "=",
    # c6 p0 N& r; V, W  RowBox[{  \1 x- f& U# b8 g  ?3 J' v( D( B
       RowBox[{"Exp", "[",
      W, B2 S8 H+ a' U& y4 d$ R  S    RowBox[{7 J: t5 l: A9 p2 A
         RowBox[{2 \7 v  O; p, z- V
          RowBox[{"-", ; g; h* l, J+ d2 N, f# l" v) h0 v
           RowBox[{
    . J3 S4 z# G4 {. I6 ?        RowBox[{"(", / q) v/ g2 U! G+ n2 G& z( Y
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ! u7 p- x( g+ l
            RowBox[{"(", 3 f3 F0 `- d. a+ `2 A
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    7 D# F, k- P1 G+ ~     "]"}], "/.", "DeltaX"}]}]], "Input",
      U7 w5 r$ Q1 f9 g! S8 w2 g  Q5 K CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    5 m0 h. e, ^0 x. k: E8 j) S1 E  3.57792132028125*^9}],
    9 P# I- ^% W; f& O, @8 u
    & z" v  x# _) _: Q4 W" ~% S7 N3 PCell[BoxData[$ J4 h3 h% r9 ~3 z7 ?& r3 [
    SuperscriptBox["\[ExponentialE]", ' p0 K$ x8 p6 c: [, M5 A: f7 r
      RowBox[{"3.141592653589793`", " ", 2 {" T4 P3 V/ e1 w0 J
       RowBox[{"(",
    6 T2 R( S! C8 S2 V/ o  k3 _5 d6 {    RowBox[{/ U3 ~" d% T5 s. p' m
         RowBox[{"-",
    6 v4 S7 n% A* a# W+ H9 G$ A      SuperscriptBox[
    0 E  ^" T5 s% v- e( E8 J9 O5 c; d       RowBox[{"(", 0 b9 ]- y- O% z- i6 |
            RowBox[{
      X# I" F5 k- B6 A/ p. V         RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-",
    , Z- P1 p3 d3 _8 ?4 K+ s& [! H     SuperscriptBox[4 v* I0 q" U* c9 t# G
          RowBox[{"(",
    ) N7 u9 L) x( V- E       RowBox[{; I3 T. @! y3 G" c+ u1 N1 d
            RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-",
    9 B4 `$ H2 P6 s! _( G" \. f     SuperscriptBox[
      Z8 P) \" Q2 h2 F2 V      RowBox[{"(",
    9 v+ ^, z2 }' R* J# J" Y% A       RowBox[{
    % |; M) B7 c0 p: C! w5 ]; ^( }        RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-", ' U' f% O3 k# |# R
         SuperscriptBox[5 i6 m, {9 }! W: ~' g! Q' }! F
          RowBox[{"(", ' r/ k" W2 Y+ l* O
           RowBox[{
    , {$ d3 q: L7 }6 X3 V  R) J1 _- \, b        RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-", ( w7 H2 T, X7 e5 @& X
         SuperscriptBox[- j  F: v2 d5 v% g0 [% S: v
          RowBox[{"(",
    4 k) ?) C% f0 j% v       RowBox[{9 j  i& m8 w: d) m( E
            RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-", # `4 U% b: i! R5 Y3 C4 C. X* {
         SuperscriptBox[
    ) q1 J: e6 e4 t8 x$ u- E1 X      RowBox[{"(", . O: h. A" M- h
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    $ ~( j# }1 [6 w1 s) `3 i     SuperscriptBox[0 v) y5 F, F' Z8 d( g, Q/ |+ V
          RowBox[{"(", , h0 D  Q8 j( |1 `) A/ N
           RowBox[{
    0 e5 @$ j" l1 b2 q        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 4 l" L. ~0 n" x& ]- {; z* b
         SuperscriptBox[- t3 U. f1 |$ ~- H, a
          RowBox[{"(",
    * y0 S0 S; ^$ m& A, Q+ w/ O       RowBox[{/ G& w8 c2 u. y( P" ^/ X- R
            RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    5 h4 W8 t0 ~2 f: L  i+ @7 T% y     SuperscriptBox[
    . ~) s, v' n" r7 P# _8 _) l9 f      RowBox[{"(",
    4 H/ X1 N- t6 [9 @; f$ |6 G& }       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    9 V( U" A" G' h. R/ U8 y* S: w1 M    ")"}]}]]], "Output",
    " [1 _6 l0 q$ A6 B CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    $ `4 Z' H  y' }9 j2 G' d) b  3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9,
    ( F/ T4 [/ p) ~  3.578012251359375*^9}]
    ! N6 s/ ?/ ]% _+ E0 r9 S}, Open  ]],1 [5 H  \4 U! ~2 L
    5 s/ H0 G" P# I2 v+ }3 u
    Cell[CellGroupData[{7 L5 ?  \6 a7 D. G# i1 F2 R6 D% o
    9 R( Y2 a+ Q' U
    Cell[BoxData[( O! x' G* U% z
    RowBox[{"C8", "=", "Ca"}]], "Input",) V3 j* i0 L* y5 U7 x% w
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, 2 o- _7 g2 h7 d# }# P2 A9 K% i" g
      3.577921316125*^9, 3.57792141421875*^9}],+ S) d9 Y3 f0 V
    ; ]3 W  g8 Z5 x5 {
    Cell[BoxData[
    ! V3 l, G5 z) | RowBox[{"{", : m3 [5 u) e" O/ [5 X
      RowBox[{
    . V* P" M1 N  {8 B0 I  "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",", & T2 F; a2 x4 g$ @7 b* ]2 j8 Z% `2 y, I
       "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}], - \3 W9 H, X# r8 Q, \
      "}"}]], "Output",  l" m  t5 @8 V+ l. \/ Q
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    % W3 t6 L- X, O8 h( h4 _  3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9, / I6 B7 _2 ]6 E  U; f$ y
      3.578012260515625*^9}]# z- S2 }; q' |. j
    }, Open  ]],
    3 P1 q7 D0 K; G
    : f. Y' l( H1 T+ }* |/ f, KCell[CellGroupData[{
    & ?$ q, F- P* A0 ]  {& }0 d, v/ H( L/ n9 B4 B' M9 _4 n
    Cell[BoxData[
    ! k, J  P1 H' W; \- S5 H RowBox[{"u8", "=", + I! a& P, x, @4 e. X; |
      RowBox[{
    ( _9 a( s1 ~1 a+ J4 |   RowBox[{"Exp", "[", 6 L$ j1 x2 Y$ j
        RowBox[{
    ! e2 N* q: L( c4 ?4 t6 r     RowBox[{% g6 O4 r+ i5 [: x- d- b. n
          RowBox[{"-",
    1 A; f0 o. Z/ @" z% T* W       RowBox[{# T) l0 t8 n! W) R/ A$ j
            RowBox[{"(",
    , k5 B% L' l* d% [0 z4 p5 i         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    2 d4 ~  t6 N/ K        RowBox[{"(",
    % [4 s7 O2 G. f7 m$ ~         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    : Y' k# ]: D3 f( j8 H' H     "]"}], "/.", "DeltaX"}]}]], "Input",
    # @0 v6 V4 j% L0 H! u3 X CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, ( D' C) F6 e1 p4 f6 T8 t; k' H
      3.57792132028125*^9, 3.577921416921875*^9}],# j% @, H: J) g3 h
    9 G" s1 w. L2 L# H% y3 a
    Cell[BoxData[. _) ?8 Q2 D' G! {" k$ C6 L
    SuperscriptBox["\[ExponentialE]",
    ! w; i8 D- Q7 A" b/ i  RowBox[{"3.141592653589793`", " ", " b. x- c3 e+ j" k+ o$ M- ~$ d- |9 x
       RowBox[{"(", , S" r! P+ E' @8 P' Y) c1 T7 f/ J# a
        RowBox[{
    # ?5 l" @9 @1 W7 E" Y, V     RowBox[{"-", ! J( j) W$ F0 o+ f8 @
          SuperscriptBox[
    2 ?) D+ U& i7 I7 w6 E4 t, c       RowBox[{"(", 1 \% a: a1 K6 T. x  a# l
            RowBox[{
    1 ^/ G+ q" c& ?# l" \7 d1 r         RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-", 7 Z# n4 j# b5 F
         SuperscriptBox[- a: s; m7 K( I( l3 T, c
          RowBox[{"(",
    . c4 D/ L) {+ @: s8 ^       RowBox[{1 E$ W2 h5 U  ~& C* u% o
            RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-",
    - M; t7 f$ `0 H+ x# _) F: Q6 P     SuperscriptBox[
      f/ m& R; R) P0 ?" M/ e7 m# N, O2 o! ~      RowBox[{"(",
    9 a2 Z1 M1 Z& S. }       RowBox[{+ U' q8 \* @$ }3 p2 r$ C4 g* d
            RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", 1 \& H/ j% s+ Y; k. Y/ v8 l) m
         SuperscriptBox[& v# j+ n& K% R2 S) G
          RowBox[{"(", + s. `; q& D: ?+ ?& K
           RowBox[{
    9 G3 x# C- g( O: H- E4 }- r        RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-",
    , j" C) Q# c2 T: }0 t     SuperscriptBox[
    ) T8 t( Q  t4 t& U4 z1 K5 `7 ^# ]      RowBox[{"(", ( g0 Z4 h5 C  |
           RowBox[{
    3 A2 {) D8 T; ]) E+ _% K        RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-",
    ; c" J' ^6 P" o9 ?3 C4 d; v: N     SuperscriptBox[
    4 o0 M5 v: z' }% w- D/ `      RowBox[{"(",
    % b  i* s- v* E5 W       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ( G% ^/ J7 V. @6 O/ J  [
         SuperscriptBox[
    ) j- G, z# @  W# y2 P! s2 T      RowBox[{"(", ' e2 V0 L9 D& V& q9 I7 H
           RowBox[{
    ( X, |+ H, }, X        RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", 5 k; y, m/ {2 F6 `& X
         SuperscriptBox[
    ) }! z' g* z' M, m" w! ~3 J      RowBox[{"(",
    , K, L6 j9 t6 v2 m$ O       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 9 H4 L2 ^4 n4 Q4 ?2 c9 F9 T! m: |1 s
         SuperscriptBox[
    . `' M$ b+ U+ P      RowBox[{"(",
    0 t# p- M% I% N* A) B+ t       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 9 z* W$ f+ f4 M' L9 {
        ")"}]}]]], "Output",
    : h* j% o' s  e! k* ` CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    2 g( l4 ]. d, X  3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9, ! a& |: Q0 |: c0 B- V/ |% y' ?, S
      3.5779608945565863`*^9, 3.57801226165625*^9}]' G/ j) {. }$ Y# w  U+ ]
    }, Open  ]],, C0 Y$ Z) U) |* T- w3 T9 s

    7 n' r2 \7 w8 I+ o5 TCell[CellGroupData[{
    ( k1 @! t9 }; }! `2 l3 q8 k( j6 v& z5 a, e( K, D# D8 {$ J
    Cell[BoxData[
    $ q+ j& ^$ F* f2 y RowBox[{"C9", "=", "Ca"}]], "Input",1 K  {6 ?3 [; T' s8 T) |$ ~& I
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    4 g& x: X" P# L; c3 ^$ k  3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],
    & e: u$ d# K5 d/ ~; ^7 t# n8 `2 Q! `
    . Z2 t  s; V. o* SCell[BoxData[
    & c: G& _7 A! |: s4 A- \) ?* G RowBox[{"{", 4 T% x. j) w0 P) P# T
      RowBox[{; C' m3 a* _  p
      "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", 4 E# V/ ~& n  v4 ]! `4 R1 K2 N2 n" e
       "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}],
    , p: E: v+ r1 \' \( }* Y! U+ R+ X  "}"}]], "Output",
    / M+ L% {; h# B! ] CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    . I- [, T, B( Q2 B/ Q/ k; y  3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9,
    5 i7 y% F* t" L! [9 E  3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9, / i* Z' f" A# Q# T9 |5 w2 v& K
      3.578012268234375*^9}]6 m# q* D; W: n) y$ t' t- z
    }, Open  ]],
    2 @0 |; W, j' F" x1 B8 x+ P4 Q$ ^+ M
    Cell[CellGroupData[{
    ! J, U) K3 H3 l) l' W6 e; M# Z
    % ]0 s! q* p7 }0 V" \4 ]9 d6 uCell[BoxData[' k0 i! D* K) _8 a: H# b5 ~, i/ b
    RowBox[{"u9", "=",
    # _! S+ A5 w' p% n; a* x  RowBox[{
    5 A) r5 U3 {+ A1 n( A   RowBox[{"Exp", "[",   ~3 d6 j, I3 H) N4 n8 I5 [
        RowBox[{' ?: C: r+ \  B* y: }! i" U
         RowBox[{
    , g8 c6 p: E; w% q- W: Z      RowBox[{"-",
    - V7 V0 b5 L4 ~- Z       RowBox[{$ e. R9 v. C$ X  N7 ~
            RowBox[{"(",
    " p0 y8 h* A( ], J) o# y9 p# d         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 0 P& a# F1 A9 h: d1 I( \3 ?
            RowBox[{"(",   w' z" t& D1 b! ^$ g. }
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ m0 s6 S6 Q& k5 A5 c
         "]"}], "/.", "DeltaX"}]}]], "Input",4 u' e2 E' ]$ {# y, m' ~- |3 F
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    7 {! n2 Z- k7 [' d! ?! p! B, T  3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],
    # h/ c( L9 q  J5 O# ~
    ; s& `8 @4 ?. F" l" _5 u# }Cell[BoxData[* Y9 F3 v  k6 Z% c4 V
    SuperscriptBox["\[ExponentialE]",
    2 J: k5 Q6 W. y0 }6 I  RowBox[{"3.141592653589793`", " ", 3 d6 p1 P& _2 w4 U+ b; \& B
       RowBox[{"(", , j* Z+ {; C$ R+ R
        RowBox[{
    - c, u) g# \1 L/ K     RowBox[{"-",   Q( R! q3 z  r' F
          SuperscriptBox[
    8 G- j( l0 A! f) K, g       RowBox[{"(", 5 e) c  t. B: q$ D1 N, U; d. m+ n
            RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-", ) K4 H  u2 P5 n# z+ ]# n
         SuperscriptBox[% i+ R$ o" q5 z5 t. a: {4 z4 T, x
          RowBox[{"(", % E) p. r# I+ A% J
           RowBox[{/ U- X; Z; B  k
            RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-", 0 Z' K+ U1 @3 n) t7 L& _
         SuperscriptBox[2 G! `) f  N1 [) `5 Y
          RowBox[{"(", * @; L3 ~* D- y& h) {  W% b
           RowBox[{1 h/ G) Y+ z  x6 ]3 h+ o1 R- ]  ?
            RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    ' N3 j8 |+ r- Q     SuperscriptBox[5 k' V8 L; u6 p
          RowBox[{"(",
    ; A' M, N' r  X" J7 ^& v       RowBox[{
    - S" Y. I( W; ^2 K9 R        RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-", ; b8 V+ X6 |* L; ?* M0 C$ D" G
         SuperscriptBox[
    , l: Q1 T+ M! [4 D8 S. D1 t      RowBox[{"(",
    # ?" f! _- l4 }: N6 u7 H7 |       RowBox[{8 f5 T9 y" u9 C3 ]5 K3 C3 O
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", % X1 `, d! X0 B; k% Y( K
         SuperscriptBox[9 K7 I7 K1 j# N
          RowBox[{"(",
    # j3 E  t: N9 Y8 @2 {, }5 B       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", # E4 Q5 K% G2 \! m' A7 Z4 |
         SuperscriptBox[
    % |+ a  k% b0 k      RowBox[{"(", 0 a2 L! Z3 b( G% V# M
           RowBox[{
    ' p0 G$ ]/ W! ~) o* C1 _6 L        RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    - c6 m+ A2 W3 c; D. p     SuperscriptBox[
    4 |6 l' A3 d1 K7 y, s$ K      RowBox[{"(",
    + b- i9 ~) s( K+ u) k" U1 }       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    2 Q3 n, O- X# {% t* N3 U     SuperscriptBox[
    ( T: Y" R3 T" H) S/ \2 Z/ E      RowBox[{"(", 5 M5 m$ Q% H5 A3 g' D' f- W
           RowBox[{& C5 R& N; p$ ?' A5 c( P% k
            RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}],
    0 E/ R, T5 o' B; [$ B8 n5 S+ P    ")"}]}]]], "Output",3 ^# I7 k" [! s; s! r% C4 d- k7 ~
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, ' [) |8 v( `/ D
      3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9,
    5 m; N7 I9 [" q) Z% t  3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9,
    - C/ j' B$ ~) r  3.577961530421959*^9, 3.578012269125*^9}]7 E8 H, H+ j4 q% p3 X
    }, Open  ]],6 J" Q5 Z3 e2 T" J

    ! p4 `1 A6 R* ^6 nCell[CellGroupData[{2 {1 n) l& |5 U3 y
    0 Y, m  S; w- \3 i6 ~! n
    Cell[BoxData[{
    , r& L0 ~( b& ^$ o; Z, d6 i RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]",
      t0 {, f4 ]6 r" t# d" U RowBox[{"u10", "=", + U+ s4 J6 F) `
      RowBox[{, F( r$ G$ N8 A- b$ y& N! \
       RowBox[{"Exp", "[",
    " T; H( l8 _0 V: S    RowBox[{
    6 `$ ?2 O+ I3 u" q& ?/ s     RowBox[{
    9 k( Q4 Z% q3 o7 P% Z! e- ^7 _      RowBox[{"-", - _9 X* w* ^5 Q0 R
           RowBox[{4 n! R8 ?# b! Z1 e5 a, `- d7 f
            RowBox[{"(",
    ' B' y, W- {+ l- H$ K         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ( w6 J; j! t, d# x  _$ H8 a9 i" V
            RowBox[{"(", * x6 p. w6 b7 `/ i' u) S
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    0 H' j0 P4 c. E     "]"}], "/.", "DeltaX"}]}]}], "Input",) ~$ H9 L) `3 X( _- C' c+ f
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],
    % O* j8 n7 K  K( r8 R4 A0 p% o
    % M7 f' G( H  n$ G) bCell[BoxData[9 `/ g' i" Y7 ]) ^8 z
    RowBox[{"{",
    # e. j5 A' ?) h: ?4 A7 ?* e  RowBox[{/ Z0 t3 ~0 @% Y* b2 u
      "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",", ' Z7 h0 c" v. Y
       "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",2 e7 c# o8 o5 S# L7 L5 Y# p4 `
    CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],7 s- V- Y* t0 H! m& N
    2 H( E5 h8 w  E8 ?" o* C6 S2 c
    Cell[BoxData[8 \7 J+ X3 K; m( {1 E5 K3 e, s+ T
    SuperscriptBox["\[ExponentialE]", 2 o5 K/ s, l0 [- I$ F7 h* F6 @! e
      RowBox[{"3.141592653589793`", " ",
    9 ]* v7 ?& P) s, C9 `$ x+ O; p7 u   RowBox[{"(", : R7 m8 x9 P. W1 K; A6 r0 E
        RowBox[{
    ) ~) b! I6 N' R' X     RowBox[{"-",
    6 O. d8 Q0 [& O  i6 L      SuperscriptBox[! B/ |: Z  q0 J% w8 }9 }
           RowBox[{"(",
    5 m& b& j1 d: K) m" v3 k  E        RowBox[{
    % q% M( C- `" k2 d+ J         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", " U4 {8 d2 \2 J1 Q9 J8 o
         SuperscriptBox[
    0 L) f7 O2 f& V% N      RowBox[{"(", * y' g" u# F9 C" T4 n
           RowBox[{+ A* U' z' y* R7 Q
            RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-", * _0 v. a  f- d# v* I/ Y9 ~; @
         SuperscriptBox[
    # H3 I; ~8 Y) E      RowBox[{"(", 6 ]! F* n2 b- B" v- D
           RowBox[{
    * Q; W" \- Q9 b- J* t3 k/ G        RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", 0 o2 C9 q+ ~" l& n- R
         SuperscriptBox[! w. c2 F* y2 C; j
          RowBox[{"(",
    7 L6 B8 f8 T- ?- \& }       RowBox[{, C. u  V/ k3 i  Z& [
            RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-",
    # R/ C8 r: Y0 r( w! ?     SuperscriptBox[. k* y; M' X8 w- [/ x2 |* g9 s% s
          RowBox[{"(",
    5 O  z/ I* v. L. G0 i1 G       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-",
    " G( c4 Z9 K3 G     SuperscriptBox[
    . n& @; J  S6 ~8 `$ F; {/ T      RowBox[{"(",
    + E% P0 }4 G; N6 o0 g3 C       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", # A1 @: o0 E' r0 [
         SuperscriptBox[, O% G* l6 l. a
          RowBox[{"(", 9 j5 R. l* @' X7 l8 C
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    4 N% P; V2 b2 r9 m# E2 }4 u0 l     SuperscriptBox[
    % |/ c( K0 T5 x+ Q      RowBox[{"(",
    * D! h8 A+ k) ?- D) e& ^       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 4 b: U4 b; t; j0 i( q! ^7 I
         SuperscriptBox[! G6 E% j* a* d4 J
          RowBox[{"(",
    # I/ ?/ ~, F' L1 [4 @! v6 P  z: v) ]       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], : R# o; M# }7 b2 g
        ")"}]}]]], "Output",
    - i/ X! p. A5 A" R CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]
    2 ]; J0 t# N" H6 g2 s}, Open  ]],+ \& q! i, ]7 n1 ~; b! H( v. J
    ( S6 ~' h/ \4 r5 o9 v) B. L  @
    Cell[CellGroupData[{% B! n$ g; @9 H" J: A# w/ F
    4 Y9 Y1 A% s, @9 K( p% G; U0 ?2 E
    Cell[BoxData[{
    , B; K6 ?# L4 W RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
      N+ i( i8 [; `) C: `) `1 t RowBox[{"u11", "=", / H0 ~$ @4 R* z
      RowBox[{/ v; x* c4 ^" M  j/ h
       RowBox[{"Exp", "[", $ H+ y8 a) B* v# h1 [! E
        RowBox[{
    7 Y( Q+ |/ a6 |3 Y, D! h9 A( H+ ~     RowBox[{
    . z; }5 H  ~' u; c% J2 ^" C      RowBox[{"-", . F7 t6 z% P- i
           RowBox[{/ b: s" |: ^/ r4 T% c* i8 m
            RowBox[{"(", ( a' ^6 f3 j5 j; Q& P
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    $ Z9 r7 v1 x' C3 y        RowBox[{"(", 7 B/ a: w5 k* l5 _. m( Y
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    4 M+ z$ T9 Z1 ~4 C+ g6 S  B     "]"}], "/.", "DeltaX"}]}]}], "Input",
    + ]; X: [- G1 a4 T CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    6 f0 p' {2 a2 t2 Y& F  3.57796154237158*^9, 3.5779615434011817`*^9}}],2 f: Q$ r8 U; Q8 O5 C  I

    0 ~6 f" U, O; G7 U& q6 lCell[BoxData[; Q6 m+ R1 x( m+ E6 U0 Z8 ]
    RowBox[{"{", 2 b0 Z' W" x; p( J' @* f: P, `# M
      RowBox[{: ?+ J2 o% Q+ ^4 y7 ]: q6 X* |
      "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",",
    9 R; J- v- E( C" f1 P   "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    / B" e. l$ Q, R2 J& O$ W3 K  "}"}]], "Output",
    5 D' k" y& l9 A/ H; g2 Q CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, 5 |8 ?3 u1 o: m, b
      3.57801228203125*^9}],
    - F- e7 c. @' n. ~3 p2 N. e" k
    ' E/ m5 C! w7 V( c7 [Cell[BoxData[
    : P/ t8 K  e' X: \ SuperscriptBox["\[ExponentialE]", # {$ [' @& I) [; A! f
      RowBox[{"3.141592653589793`", " ", ) B2 [( _8 w+ v  p/ ]6 y
       RowBox[{"(",
    1 F1 F) r0 Q( m; b/ m& \7 }! f: r" H2 g    RowBox[{5 P/ |4 V/ I& j2 j$ [, z' m3 H2 X0 Q, B
         RowBox[{"-", 5 r, {# y$ `0 f4 x- s3 Y( G
          SuperscriptBox[) x5 Y" c5 s4 [/ M$ K0 Z
           RowBox[{"(", 5 H1 V0 x6 \4 A1 f, U* D' @
            RowBox[{
    % l# y$ a$ v4 U  m- w         RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-", 3 H" w4 Q* u3 D: d( ]8 v4 T
         SuperscriptBox[! x* A- @, R' D6 w0 |
          RowBox[{"(", - g! Z3 a7 Q% e5 m; Y# C+ x; S2 _
           RowBox[{5 E3 e7 o# b5 {6 _
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-",
    " _1 \5 E! S/ M8 Z+ y     SuperscriptBox[  s, @* G3 d: i
          RowBox[{"(",
    ! ]8 x/ D5 s- v( J) m  M- S2 o       RowBox[{
    , y: y/ d, F; i! e& h! w        RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    # H* ?) i2 F: W9 x+ {     SuperscriptBox[
    2 E4 s8 e! P$ x# U) V; j6 b      RowBox[{"(", 0 R* g7 D' g* v" c9 C9 E, j- b
           RowBox[{
    $ g+ a8 U% u7 r        RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-",
    2 c$ }. D0 `+ d, c     SuperscriptBox[
    0 I4 }$ W4 l- w" @6 e      RowBox[{"(",
    2 K7 k7 p; f1 I- W: W8 o  e7 Z       RowBox[{- p( K  l7 p$ Q8 X' c( C
            RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    ! p  ~2 g& I7 ]; I% s! ^. [     SuperscriptBox[1 f$ E$ I7 G7 N" f
          RowBox[{"(",
    ) I5 l5 U% i9 i       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 1 |4 L; r( L2 |8 u5 g
         SuperscriptBox[6 O( E+ ^, {9 Z" w8 u' J
          RowBox[{"(", ! \: m# t7 X( @$ u5 p* \7 J
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", $ S2 M1 {+ \5 C0 }
         SuperscriptBox[) g0 u  t  i6 n
          RowBox[{"(", 1 Z1 S' u# ~5 p7 ]- ~: I
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ! u/ `$ O3 H# {     SuperscriptBox[+ x. i/ ^' `1 o1 J3 _7 p$ q6 e. O
          RowBox[{"(",
    7 P* A9 ]7 T; P. L1 T5 J6 z5 z8 x       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 2 i6 ^# B3 b3 y0 l/ r$ C  F# w: E
        ")"}]}]]], "Output",
    . P% Q9 s, {$ M; }# \( f CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, 2 f" M2 O" n6 u- p
      3.57801228203125*^9}]
      t# i5 x8 D* [) W: K; ~1 ^% t}, Open  ]],
    % c; `. T4 n+ c) i6 z+ `) X5 j$ h+ u% C3 K+ J& V# {# A6 W
    Cell[CellGroupData[{
    ; }* N' ~- v/ e) c( {4 d
    ! V; u% R1 b. s& O; W$ t3 oCell[BoxData[{
    , N& o5 T  z2 g RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]", 7 ~8 E, \1 Z& l% P2 U, E
    RowBox[{"u12", "=",
    * K+ {/ E, ]' K4 {6 P5 e8 |  RowBox[{
    5 A7 F8 v$ J1 [; H; o+ O& c# ^, j0 n   RowBox[{"Exp", "[",
    2 I; V# w9 H) O6 Y    RowBox[{
    2 |" S% B# l6 {; U- w/ h4 D     RowBox[{1 F+ ?/ p6 B& |$ _6 t
          RowBox[{"-",
    2 o5 P5 d" V+ k( A       RowBox[{
    ' O- J! P' C) t' z- J% O        RowBox[{"(",
      t( S! X: S/ v# f         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 5 ~+ \1 q- l" {) t, M
            RowBox[{"(",
      P2 \9 n* Q. ?/ N         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],8 F% S' O( z8 ~, W9 F6 {
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    % k0 `- _0 A- t# P- ~% ^3 G CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {$ G2 a8 f  j. p
      3.57796154237158*^9, 3.5779615576284065`*^9}}],! l' ]5 i  V9 a) _; l. L% V+ f

    4 U, M9 m/ G( [5 D2 R! bCell[BoxData[
    2 j5 z- C& x$ p: ?/ T! F8 r& K RowBox[{"{", # ^1 q" W4 F; p
      RowBox[{
    2 t3 C! Y, z6 x8 j  "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",",
    % e/ m) w% v) w; ]& f+ I( d; F4 x$ M   "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}], . b  ^: M9 z" B8 ~3 @5 M# c
      "}"}]], "Output",9 }4 C( c% d% V" a1 J% Q( M; a
    CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}],
    ) i# `+ i& f! U$ w4 t/ d3 }
    1 p  Y4 C: _+ n4 n* rCell[BoxData[
    9 i) u8 A6 p7 T# X' s5 b  e SuperscriptBox["\[ExponentialE]",
    5 ?& ?4 `: D2 ~6 \' K  RowBox[{"3.141592653589793`", " ",
    2 ]" z3 G) n9 j( e   RowBox[{"(",
    . g4 `$ Z( T' K9 D    RowBox[{/ b; V8 Y, D+ s; J( {5 @/ Y: Y0 z2 ~
         RowBox[{"-", * ]; j( d4 r1 I# Q" D& E% z  O% j
          SuperscriptBox[- O: A3 J8 R3 ], L  h  N
           RowBox[{"(",
    # L% G& @( |* ?& G        RowBox[{' Z) R- |8 B6 `' j& _0 T# {, [. z
             RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ) L& i* r& U/ w/ G! d5 t1 j; h     SuperscriptBox[
    - H( o9 ^) K' h( M8 N" e/ S9 H( G) J      RowBox[{"(", / q7 O0 a3 w; p& B+ r
           RowBox[{
    ! V; {! ^& o& [0 N        RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-", 2 R& C: s! p6 m, K; L) p6 A# c
         SuperscriptBox[
      P" a* h1 e9 ~& C      RowBox[{"(", $ B: U6 D4 A* V2 ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-", 6 a. U$ h% ]6 D; E- S( ~, L' ]2 x4 y
         SuperscriptBox[
    2 ^! B: G- t' n1 o( _1 ~      RowBox[{"(",
    : |( |- w- z9 u1 ~& U% o       RowBox[{
    $ `7 G' x( v  f: n2 [0 G/ {/ a3 ~        RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-", - S% \% l3 K, M2 _& N9 b- V
         SuperscriptBox[% @0 i# d3 p4 t4 y# e
          RowBox[{"(", 1 T# a' j9 n- `# b4 g% Z
           RowBox[{
    6 U5 v6 N8 d$ n* {5 N6 d3 L- l( @  M        RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-",
    ' w+ h! f/ a' d: y  c     SuperscriptBox[
    * ^4 V& P. t9 T) y" _. {      RowBox[{"(", ! U2 R5 J7 |  Y! Y0 r$ X
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    + u# D9 i, u  G0 n! g     SuperscriptBox[
    9 Y( \4 T+ l, h2 ?      RowBox[{"(",
    3 G- i- n' @! ]% F       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ; G, \6 q: b, Z8 `2 `! J, D     SuperscriptBox[. F4 G7 ^* v/ J! u+ n
          RowBox[{"(", - I2 R; i9 D6 c) ?
           RowBox[{# l$ r; x9 }# Z- f: `
            RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", 8 m1 P. f: o  S* `& r0 H9 d
         SuperscriptBox[
    . `, i7 n5 t; V) V- V/ N      RowBox[{"(", 4 S( r; w% O, j% l
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    6 e! O$ x+ b- V* s    ")"}]}]]], "Output",8 j7 j9 [9 w! K  j, z
    CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]
      T% c- r% R' w, u6 r% y}, Open  ]],
    6 h7 Y6 K" Q1 ?0 t
    # R' x% J) P3 ?3 @$ z& e" bCell[CellGroupData[{
    5 N9 t5 }% t; s5 \
    + h: ^4 C- r# F/ @Cell[BoxData[{
    6 h$ c6 w! k8 u1 \$ l$ {$ z  _) } RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]", 8 h* [: p' R2 m5 L; a: g
    RowBox[{"u13", "=", 4 L6 K1 c, _. R$ @+ Q) f' q# E% R
      RowBox[{/ ~# f( ?+ q; o" R
       RowBox[{"Exp", "[",
    1 e5 s/ [* ^' u+ k    RowBox[{" e3 Q; ~2 i: r- b' _. q. `
         RowBox[{3 b' J) z! e  M9 g4 m, m+ e
          RowBox[{"-",
    % h0 t$ b' Y5 i       RowBox[{
    ) w- P! g; R( K# q! u6 k4 J        RowBox[{"(", - @7 t0 c& ^6 S* j/ P/ f6 ]
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", # T) h( g, S3 Y
            RowBox[{"(",
    8 i/ P- k4 u0 X0 w: C- C         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],* F0 S) u+ t: V# ]! N, }3 R
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    9 ?/ ]8 C$ Q, |  _0 |( e CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    ) E; ?! p1 I. B2 _/ l2 K8 q0 V. t  3.57796154237158*^9, 3.5779615599684105`*^9}}]," m6 L' \% r2 k/ \3 s

    9 U( p& y$ G. p0 HCell[BoxData[- V* t; j6 v. M: D
    RowBox[{"{", 1 O4 L+ q' Z* N( c: ~8 I  V4 y! l
      RowBox[{
    ' b" n& E/ T0 `+ Q  y  "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",",
    9 T3 V, ^3 n, l1 e5 U- ?8 r1 `2 ~9 m   "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}],
    5 r" V; A" R) l5 `" }* l2 [  "}"}]], "Output",9 v8 ]5 y& Z& x# ?/ o
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],  \$ [% k% ^& G% o' A- Q

    : {' x' g8 d0 t. Y6 _Cell[BoxData[+ F8 @8 A( P( ]; n
    SuperscriptBox["\[ExponentialE]",
    8 g" n) u6 y8 q/ i. \# B  RowBox[{"3.141592653589793`", " ", * {# n( R* }" ^- ~9 `( S
       RowBox[{"(",
    6 v# B7 ?: p9 k3 c  u% ?# r    RowBox[{# ?' Z! `- q2 f9 F  X+ ?
         RowBox[{"-",
    : h  n$ Y; _# w      SuperscriptBox[7 d) \- t4 V4 k1 U& g
           RowBox[{"(",
    ) ^' g  Q* W: q5 L$ A( |        RowBox[{; S! Y9 E* Y& D
             RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    . A( y' _" i! [" Q# Q     SuperscriptBox[
    ( l9 U+ |! \2 w( L      RowBox[{"(", 9 l( Q6 I. ]. ]  Z
           RowBox[{
    - C. K) M3 \6 Y* O$ d        RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-", 7 z$ s8 B/ ]8 W6 g
         SuperscriptBox[. q$ |* [6 B" M. T) i" A
          RowBox[{"(",
    ' l  Z! |1 j0 t, b2 G, [. |. c       RowBox[{
    % f4 O! B# G, |( B  q        RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", 1 `- @/ U" K* n( ?' s$ V6 E. e/ F
         SuperscriptBox[. J" [5 j8 r0 P! Y( {
          RowBox[{"(", ; D$ V9 N( z1 G8 q0 b7 C0 X' P* @
           RowBox[{
    / j' F" A- u/ P        RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-",
    3 A3 S7 E. Y2 Y8 g$ d4 [5 ^     SuperscriptBox[9 Z" I. L! b0 i: U% w, Y
          RowBox[{"(", ' H) S/ G# T/ Z$ T4 e  c
           RowBox[{
      v) d4 u8 V0 O3 u: i        RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-", 7 |  E) S% w/ Y" p2 ]" ?" H# F5 a
         SuperscriptBox[$ D' A  W* O% h5 E. b  ?' ^
          RowBox[{"(", * c9 m/ ~" j2 o0 j8 f8 [
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 4 Y4 k7 d* d3 O, T1 Z5 k6 @
         SuperscriptBox[
      Y2 V# D% d1 x5 f1 F# e* A      RowBox[{"(", 8 `, m3 ~' Y# ]9 F( z3 b; G
           RowBox[{2 e: A8 \  M4 o* P6 V6 u
            RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", . f! ]# K( s% j0 [4 m- w
         SuperscriptBox[3 _. {3 m3 t0 ]9 |- z$ ^
          RowBox[{"(", ; I$ W3 V" H  V8 N9 n; [( p
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ( t4 J" g) t5 \# A5 T) T
         SuperscriptBox[$ G; h  Q' B9 }& r* {; Q- X
          RowBox[{"(", 4 ?/ k4 j. J5 i! u, H
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ) s2 J- E/ n" v
        ")"}]}]]], "Output",* _' T9 E. W  \
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]& K( [; W' U& ^2 I, f1 f
    }, Open  ]],
    , i5 L1 {; W4 J, J6 I7 r! w$ k4 a
    4 j+ L# ~$ ^3 p. {% M- G4 J* XCell[CellGroupData[{
    5 I8 G9 o) C/ P, }$ t; K. `/ X9 W# ~% w4 r7 Q* j( X: C4 a" J
    Cell[BoxData[{
    ) n; }  R$ _9 l6 p! p RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]",
    / V% D' S4 P4 J; p- y0 v1 S4 x' q; \# M. l RowBox[{"u14", "=", . L  j$ O9 r8 |, J% t5 g* U6 W1 B
      RowBox[{
    ( `' k3 e, [$ l. I) s& B  V   RowBox[{"Exp", "[", 5 i, O" A) b$ ^/ x9 i/ K
        RowBox[{8 b  P' f6 b3 B! B7 w! L
         RowBox[{
      F6 s. G3 v3 }4 [  v, ]# V      RowBox[{"-",
    ) _- z& ^; O. D% ?7 A( W6 E4 l       RowBox[{
    , d3 h% n- k' y( V4 O0 e        RowBox[{"(",
    / B0 r, J4 T7 V9 i- c% J         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + f/ N% }5 X5 ^, P) ?( _        RowBox[{"(",
    % _8 P# v: j4 i         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ! [  h7 J1 [8 |9 ~0 H" O     "]"}], "/.", "DeltaX"}]}]}], "Input",5 l8 g' a. Q5 e9 M
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {2 ?# l+ y( }8 Y6 ]8 I  m
      3.57796154237158*^9, 3.5779615663176217`*^9}}],
    " ]: s, X  ~4 f- I" G3 Y" }
    - q; c, _  B* s0 x1 E9 e- jCell[BoxData[
    , X2 M9 u& L- j1 D7 P) n: z RowBox[{"{", 6 M& b6 ^) T  t4 f6 r% a
      RowBox[{
    ' I/ V/ `& G2 J) l; W  "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",",
    ) R4 x; z# c9 ]   "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    : z* J& h! s; g" U7 N  "}"}]], "Output",9 }) Q6 o& G3 \
    CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],
    5 B8 O6 s6 c% K: _6 t9 m0 {( T  S
    Cell[BoxData[: x$ w" N" D3 h* c" j0 X
    SuperscriptBox["\[ExponentialE]",
    1 g6 H6 }2 b, [" c  RowBox[{"3.141592653589793`", " ",
    9 u" f# H" W2 b   RowBox[{"(", / B9 c2 }" P3 t/ V* X
        RowBox[{
    - D& k# C- C9 U$ g" Z% `& m     RowBox[{"-", % B; E9 h/ B9 r2 c( Y2 `
          SuperscriptBox[# X! i/ }. c: A% b# e2 ]
           RowBox[{"(", 6 M8 P# b9 ~) e4 y
            RowBox[{
    3 o& z$ H0 R+ f: _         RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-", % H& J& b. P  a/ D$ D  A6 Y
         SuperscriptBox[; W8 j! X2 D* ]) j3 Z7 Z; R
          RowBox[{"(", - q$ y& j" I' u- m# q
           RowBox[{
    , o# o6 O; p9 L6 J, }  X        RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-",
    0 Y. \' q: D6 h- s6 U( p     SuperscriptBox[
    0 q; g" h, ~; B5 Q: W% E      RowBox[{"(", 4 ~% h5 b! m  f9 @- c1 q
           RowBox[{
    : A- {* k: ~: G# G" k$ e* z        RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    - Z0 p0 c) ]* W: j     SuperscriptBox[
    * ^7 ^- f7 f$ R- B8 N      RowBox[{"(",
    % ]1 ^0 }: z% Y+ G* Q* n       RowBox[{5 C. G/ u9 t# R' a6 W2 l0 }# `- w
            RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-", 8 t& _; p. h6 L) Z9 o* l
         SuperscriptBox[& q" o6 `. O; N5 V
          RowBox[{"(", / A! r3 R" Z! B9 k8 N0 b; J
           RowBox[{
    3 A) G7 @/ g+ ?9 G& w- v        RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-",
    ( @9 B5 N2 ~4 [: o" A& ]# e/ [1 d     SuperscriptBox[
    " D/ O- U1 W4 I# O: P* x( N9 r* v8 W      RowBox[{"(", ' z+ S4 k- m$ U
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ( B- f8 e0 \% n( R2 l     SuperscriptBox[
    6 b5 \( H% d- m4 I      RowBox[{"(", # {# d% R/ S' T8 X4 q
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", , K4 x# g% Z# b
         SuperscriptBox[* C4 T0 v4 L9 S' X) }
          RowBox[{"(", $ Y* m$ B! p: z
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ) i# C0 K, N) [, a; q     SuperscriptBox[
    & g0 E% |) p$ C- I      RowBox[{"(", 8 ^& _: W/ N8 U. X
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ( H' Z. `3 N5 ]2 X: w7 y0 c" R    ")"}]}]]], "Output",8 I  ]8 `: D$ p- e4 a; m1 U
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]
    2 s. }1 e! J" R# \' ]}, Open  ]],
    5 s$ @% s. G2 q9 A' D9 V* l2 F6 H' T. o
    Cell[CellGroupData[{
      S1 o1 X4 S5 y- C$ M+ b5 v) w5 w$ g! B( a' J! Q" z7 W
    Cell[BoxData[{
      D9 P% u$ f& F) f( S* i( w, C RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]", 9 p7 _# R' ^+ p  K% Y; J
    RowBox[{"u15", "=",
    ! k& ^7 `8 K3 K% E( H! Y9 e  RowBox[{
      g9 _0 Z! C! G9 v   RowBox[{"Exp", "[", , ^) u! j4 Y3 j7 C( p" M* q2 R
        RowBox[{- `" a6 V+ p6 P4 h& E
         RowBox[{% w0 h7 A! l# p) t" f) u
          RowBox[{"-", ; _( Y# D4 S% e( n  m
           RowBox[{: J; Q/ {3 k+ ?5 r
            RowBox[{"(", 9 m2 g- |  P5 y
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 7 U8 q6 R( \( x4 B& {4 h
            RowBox[{"(",
    4 @  x" X% K# u1 o         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],( P6 _8 [- J/ c
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    % H0 n# R" F- A% S& [ CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {2 A* ~0 ^3 I& q$ [# J8 o
      3.57796154237158*^9, 3.57796157098203*^9}}],
    $ N1 E5 u4 r6 b' N! B* J# S$ k$ G" f) O
    Cell[BoxData[$ q" E, i' _- @
    RowBox[{"{", ; }  }# g, S4 Y3 R, C, \+ O
      RowBox[{
    5 |( i8 `2 i0 Y: Z, W4 |, V6 T/ a! j5 z" Q  "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",", : @% X. k8 `7 z5 G
       "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],   y9 ?( L1 F9 {; ^
      "}"}]], "Output",6 p0 @# Y0 i  q1 K# B" }2 m( `- Q
    CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],. d$ [/ p5 \9 W

      {/ x: O+ d8 ]5 k; x- |Cell[BoxData[
    . [/ }% O6 W1 b1 v  l SuperscriptBox["\[ExponentialE]",
    5 [( P5 x( {: H6 o, y  RowBox[{"3.141592653589793`", " ",   A8 h. e3 x4 Z+ ~, H* F) C: t# B
       RowBox[{"(", - ~" w! R- o# r( B7 i$ i7 ~0 v
        RowBox[{
    . u; V+ `5 f3 j4 _6 B' f     RowBox[{"-",
    * H3 t% K+ _% B# e7 }% D6 d      SuperscriptBox[7 i- ~* Q3 Z1 r" y" |) h8 w' S
           RowBox[{"(",
    " V( u. E! h; @  t  p        RowBox[{
    - ]2 v; s- a" T: n' X         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ' v3 N2 W4 g, [+ [9 i     SuperscriptBox[
    ; ]+ N, b$ n  g' q9 E3 d5 L      RowBox[{"(", 8 }7 ?" Q) e: i2 `
           RowBox[{& B8 a5 p2 q4 F" A
            RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-", , g3 P! d. Y1 A; l
         SuperscriptBox[( D4 g  N* _; _+ j/ D' t& K3 H0 `6 e
          RowBox[{"(",
    ) s" M7 d% [4 I% D1 Z       RowBox[{/ N) }/ r6 ^- r( }6 ^
            RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", 3 V, f7 K# Z4 W6 u2 D5 R
         SuperscriptBox[, U% ^! ^# ?- w: F) W. j& K
          RowBox[{"(",
    ; c: K& m% T5 ?- c       RowBox[{
    . ~7 p2 i4 L% C- f) B        RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-", 7 E+ A7 j$ P! R3 V" e, n/ m
         SuperscriptBox[
    ) q7 `$ P: O! B2 P$ }3 j( m0 @  D      RowBox[{"(", % U7 T, P" }# ?6 |+ O
           RowBox[{" ~1 G- Z: h% Q' j. @  h
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", 5 b" U/ _. Y9 e% L5 q1 D
         SuperscriptBox[/ x) g9 ]  d. z1 H
          RowBox[{"(",
    5 w! E0 e) ]# c       RowBox[{
    7 Q0 y1 G7 }3 T# Q. p+ d" I2 M        RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
    % Q" L  E7 M! F: a) p  F     SuperscriptBox[* |* t- C! W3 O7 t0 \
          RowBox[{"(", 7 u$ g8 N8 ~  ]% g/ M
           RowBox[{& [5 E6 v# T+ \- r* W- C- m+ @& G
            RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", / I9 B/ L4 B# }$ ~. C% q1 v9 }
         SuperscriptBox[
    1 j1 }% y2 ?3 l      RowBox[{"(", % F7 M3 U5 C* p: ]5 p. @
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    - E, ?2 a+ E& z! T( ^     SuperscriptBox[  a# O/ g1 t6 J1 N
          RowBox[{"(",
    . ?, ^1 G& b  l1 P       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    7 G7 }2 ~' D' Q' {0 |, |9 _# _7 V    ")"}]}]]], "Output",
    . K" i8 {/ |. ~: i5 r0 q6 B CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]
    $ Q4 |" L: A7 S}, Open  ]]," _, X8 L$ V& O
    ) I/ s) x7 L7 S# e
    Cell[BoxData[
    " ^* Q5 b0 s% u5 {& ? RowBox[{"For", "[",
    " M3 X* @: G( d5 ]  RowBox[{
    : r' f( o* }3 P   RowBox[{"i", "=", "1"}], ",", 2 h: c( P/ R/ |6 q
       RowBox[{"i", "\[LessEqual]", "9"}], ",",
    + c* u- L4 B1 N8 E* r7 F   RowBox[{"i", "++"}], ",", 2 Z2 ^. R. V0 i3 a3 c0 i$ Y% s6 [
       RowBox[{
    ' W* q8 J' W, A8 R    RowBox[{"Ca", "[", $ e3 r' m) J1 l/ X+ G$ O: k
         RowBox[{"[", "i", "]"}], "]"}], "=", " n' C3 L/ ^7 c7 G6 m
        RowBox[{"CM", "[", 7 \' r7 H- z9 h) e4 O4 k+ @$ ~$ V' P
         RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",4 `: I! L( V4 E; A  ^9 f7 n' V
    CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],; g- n0 U. l; v% K6 [+ h

    , E( Z$ f1 g! q& y5 G3 m  qCell[CellGroupData[{, Q5 P! K8 t: Z+ ]  m
    / s: @; w* x' ~& d( |( Y
    Cell[BoxData[{
    ' R$ A( d# H1 c. K6 X RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]",
    ) Q) r- \8 X% a$ Y/ a RowBox[{"u16", "=", 7 i2 l- m. e. H; a) O2 Q' o: m+ Z
      RowBox[{
    $ g0 N& N) n+ B# x$ k   RowBox[{"Exp", "[",
    ! n: V7 ?9 r( f8 ^    RowBox[{* y* {7 v( h! C  w! `$ X: D7 k
         RowBox[{
    " A: Z( b$ J# |  a& d2 ~3 ]! z      RowBox[{"-", 6 @5 W! f( }& j3 m6 G
           RowBox[{
    , ?) W" n2 G5 r, q- \* ~        RowBox[{"(", 7 Y' m; A) X; k# g7 F& N8 U
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ; X( g  @. X) s5 w0 ^0 f) i
            RowBox[{"(", 3 S* i, \: {9 J) V8 X9 K& e
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],( ]) d& Z! g8 C% C( m2 ~1 G
         "]"}], "/.", "DeltaX"}]}]}], "Input",: G, L& ^1 v3 {% D: Q) s# K& P5 n, h
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    $ A  Q( Q$ [2 x  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9, , i( S1 m2 L3 m. v
      3.5779615751004367`*^9}}],; d- _, J1 B" c, b

      q! T% @" Z: p$ WCell[BoxData[4 ~; A; V, A. U$ ?; m  ]
    RowBox[{"{", # m2 }; `% `) r
      RowBox[{9 m. B% ~0 R* a
      "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",", 7 G* Y$ e- ?( O* d+ K- `0 P' U+ x! P
       "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], 1 g; X3 x' [- F! U- n& \0 e& q
      "}"}]], "Output",0 x3 }6 F- t. E* b
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],
    5 a; ?( j9 g) X$ o9 r- K* z
    8 }5 u( O2 V, a9 s$ Z) ICell[BoxData[# s5 B7 K+ U8 b
    SuperscriptBox["\[ExponentialE]",
    4 z) g. x% q# e; G  RowBox[{"3.141592653589793`", " ", 2 @; p' g& g6 F# @. k7 M
       RowBox[{"(",
    2 ~& z6 _6 P2 m9 D) D' @    RowBox[{3 i3 W( }- f* q8 w6 M. R7 I5 S
         RowBox[{"-", ( s$ m" O6 E0 Z5 K: P6 Q& P/ i7 `
          SuperscriptBox[
    ( R& p5 i( w! m$ T% H1 y       RowBox[{"(",
    2 R' q5 O; W, p# b        RowBox[{+ [* J7 @+ a: v/ I& [" |/ \) a
             RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-", ) R  L/ I$ E' P' F* E" p
         SuperscriptBox[
    6 _$ M+ ?8 ^8 z5 Q: N! E      RowBox[{"(", % l/ Y% t7 `" j7 P
           RowBox[{
    " I9 y+ Y9 c8 \7 w/ \        RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-", + P3 d, J& ]0 I% i2 I0 a
         SuperscriptBox[. G& B8 j3 P9 U) g2 |% ~  g
          RowBox[{"(",
    , F. t* P5 Y* W% A$ l       RowBox[{
    - o& P, Z4 d* V7 g/ ?' ^' I) Z        RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", / i2 \# ]- C1 ^9 x9 V0 [" O. G  _5 G
         SuperscriptBox[
    8 G6 B$ s0 u0 U" D      RowBox[{"(",
    4 z$ }5 ^4 ]6 m3 ]6 E       RowBox[{5 o' Y4 g! ~  }  U6 `, w% }7 M- v
            RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-",
    ! f, r9 X* B5 T9 X0 z; Z7 C     SuperscriptBox[
    ) X; I& x* T$ a) g      RowBox[{"(",
    ; p. i+ b0 X  d3 r/ `4 o( ?& s4 K       RowBox[{7 P; y  B0 b0 ?8 }- ^- ]5 x) W) S
            RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-",
    % H" Z+ i! B1 T$ x     SuperscriptBox[/ P( \2 E" ~# |8 T* I
          RowBox[{"(",
    9 \4 p0 J- ^  R: {& J0 a- s       RowBox[{
    - p2 e- k) c! F- u$ \. o        RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", * j: A3 s; T. }5 @$ ^7 l+ Z( l1 Y+ y
         SuperscriptBox[* d  `& ~5 ?$ A( B/ n7 V: j+ v
          RowBox[{"(", ' V5 X: x8 O& H
           RowBox[{
    # u: j& Z# i$ @5 H3 g1 M, V3 k7 g5 Q        RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", & b/ P/ k9 g$ Y  X2 D, F
         SuperscriptBox[$ R' }" P# G% L! z% w
          RowBox[{"(", ) c& D  H$ C: s$ x9 G8 f
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 7 d* C5 v& P  E- z' J
         SuperscriptBox[: p% p* ^2 ?# \$ [
          RowBox[{"(", ( c( L+ V( _, ~( @* X  `
           RowBox[{
    7 O5 m& y6 x& ]" o        RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",1 @& g3 B9 f. P
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    1 i$ o: W; R' i2 t4 e( I/ _9 L: A8 v3 b}, Open  ]],0 d: a* v) N7 Q: ^# S9 q' y
    3 D8 y5 d3 @( g" i( |% x) J
    Cell[CellGroupData[{, z& ]- M) o/ a8 M  P* ]
    8 J" [) a: ~* h
    Cell[BoxData[{# M4 m" {  ?9 ?# H4 X* A2 |
    RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]", $ B* E- r0 E/ u2 Y$ X2 f) T
    RowBox[{"u17", "=",
    2 r$ @9 I% T: C& s* _2 Y% ~+ W+ e' M  RowBox[{+ k- l0 \! u( i0 {- E
       RowBox[{"Exp", "[", * G% H2 R8 j' W. Q0 o# o
        RowBox[{0 s; m. z  s* y! Y! s/ E9 k- j' ?: K
         RowBox[{9 T2 A  I+ O, r/ i
          RowBox[{"-",
    . Y$ _; B9 k+ m       RowBox[{
    9 \' t# z' F0 ~! z        RowBox[{"(",
    # o; q# S) ^% H( y         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    , f( V* F2 z5 c- l' h& _        RowBox[{"(",
    - E+ T6 X7 G& x) g         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],, f1 \/ d6 y1 k3 Y, Y
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    * ^" h6 }: P) s' a5 R. {6 T/ V CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {" V  k4 Z" u0 Y5 M/ n
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9, 7 ?* j" M+ d8 n0 z9 f6 D! z7 |
      3.577961578953644*^9}}],- @( b4 n  w8 k. f7 a  B' [+ h

    * w& M# e, A' g( E" V3 \' l0 a0 OCell[BoxData[  y$ }" b; }  T
    RowBox[{"{", , I/ T% r9 |% V) h, k+ ?9 y6 M
      RowBox[{
    & M& e. h# f4 P  "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", # x- D0 t1 N1 ?7 U
       "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}],
    2 c1 a$ \0 C! F& a3 x6 o5 H; d  "}"}]], "Output",
    / y4 U4 A2 g0 Y. l( C6 W; g CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],( F3 O4 y9 o  x; j; \4 d

    1 I2 \; O( }- i9 r6 SCell[BoxData[
    ' `9 u! z- q) }( p1 Q2 ] SuperscriptBox["\[ExponentialE]", % N7 A+ J. N8 Y/ K3 b
      RowBox[{"3.141592653589793`", " ",
    2 E4 N, d( f' o   RowBox[{"(", 6 l! {# @  a# ?' I
        RowBox[{, [% }. X, n3 V. J& f1 \( a
         RowBox[{"-",
    ; \7 |  f$ X9 H% {) Q$ X' n% x0 K      SuperscriptBox[* ~0 J( L$ u$ _, }6 M
           RowBox[{"(",
    - U, f3 O/ Z3 r% ?( p2 V* M2 i) X        RowBox[{
    & \3 R% B" V* w% u  C$ C8 c         RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-", 4 m6 @2 `4 D2 `: P6 p9 X
         SuperscriptBox[' v$ ]- H% X5 U2 s  h' O
          RowBox[{"(", 5 i8 h5 G& G" V6 }
           RowBox[{
    6 M* G1 O; H* {7 ?5 f        RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-",
    * F; i% r! a$ m     SuperscriptBox[( `7 M+ C) H! m9 j2 z
          RowBox[{"(", + D$ ?4 g7 ~$ S, k* l5 e7 w$ f; z
           RowBox[{
    / h* |0 n8 V6 o# J8 f        RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", / O$ C* M% P0 \* i0 H5 v& V
         SuperscriptBox[
    , r* p* h  e' I      RowBox[{"(", ( h/ S6 ]: `+ C  V- M  F; j
           RowBox[{0 H2 J3 u4 Z5 a: Z
            RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-",
    8 [7 Y6 s# c! z' \$ B     SuperscriptBox[9 Z6 {0 f, w/ K
          RowBox[{"(",
    " I0 l: _. ~! u4 o( P       RowBox[{
    8 P! ^4 l! s; J7 c, N% t1 J" p        RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    # v0 y+ _8 S/ M     SuperscriptBox[& @' S# }$ I$ }. s$ r2 ?
          RowBox[{"(", 4 F4 O% b. k( c) F8 q# r
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", . D- Z4 S4 r/ }, \, b! I, l
         SuperscriptBox[
    1 S4 G: n8 J% Y/ Q5 S$ p" ]      RowBox[{"(",
    ! i* g) d6 ~0 V# q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    - I# n! N+ F: F9 U) m8 @     SuperscriptBox[
    4 v: d/ v1 N- i! J      RowBox[{"(", ! k; {$ {, f" Y' X
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    2 S# L, z" v4 }2 a5 b0 r     SuperscriptBox[
    3 n9 J: q1 t' }/ }3 _. Y4 }      RowBox[{"(",
      h) L+ n* D0 I+ n& b4 r( V% y) s       RowBox[{7 l- b' P5 [) U2 G
            RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}],
    1 ~  I' d6 x9 t% Q8 \9 Q( p' d" f    ")"}]}]]], "Output",2 ^! ~; L. P6 [) b
    CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]
    2 N; H" `3 {% k6 j2 L: y8 `# P}, Open  ]],
    ; B# q! W3 a: D6 v7 x4 f9 B0 @+ V6 _* s# j, t' v0 I# Z
    Cell[CellGroupData[{
    : O' t- K& m  \$ C& V
    # f4 U& Y8 P, T/ W6 ?" BCell[BoxData[{
    $ w# C$ U. @5 Z* B9 h0 S7 Q3 c RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]", 1 T! m  U: r$ F; }0 j! x
    RowBox[{"u18", "=", 9 t, s; e5 n7 @  f. P# H
      RowBox[{# i# G5 x5 X0 k$ l( w8 x1 |, T
       RowBox[{"Exp", "[",
    & Q" D- ?! L$ D! @# C8 O0 z    RowBox[{/ ^- K* ~" G+ u" L: J5 i. ~
         RowBox[{
    4 _: u+ N+ l, Y* r1 v1 H0 K      RowBox[{"-",
    3 Y* G# s- _" z$ C4 c       RowBox[{; a% ~# c: {; t# D: s+ S
            RowBox[{"(", " B+ q. [" a% T8 E
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 1 k: Q0 U; l. p( f! N6 D( k
            RowBox[{"(",
    ! s4 f- F# q- @" ^7 w$ d! l         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    $ v+ I; e& X* |1 w  u! x! u     "]"}], "/.", "DeltaX"}]}]}], "Input",
    . V2 A# v* M6 @3 N$ X) t% x CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    5 V( e' E% `6 s. n  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9,
    - D) v! M8 W0 U( T( h" t4 C* ^  3.5779615828848505`*^9}}],9 W9 f2 `8 A. j+ o2 k( F+ Y6 Z9 ^

    ; l. B! g; m1 k) f4 A3 vCell[BoxData[
    , u' V" h' Z7 x8 T RowBox[{"{",
    + o! V; }, G3 F! J- h: B  RowBox[{
    3 c2 a: y* g7 o! v  "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",", 7 Q6 ^8 F$ T" T0 X; I
       "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    1 ^- W# I( x( k  "}"}]], "Output",
    - r+ ?0 B$ V4 O7 B# K CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],
    & n% c. W1 f8 M0 B" z
    1 _0 u9 f5 ~1 f6 E! x' [Cell[BoxData[
    - p( K- ]4 \9 B# [ SuperscriptBox["\[ExponentialE]", 7 F6 b6 @( L1 S8 }; `& L8 a
      RowBox[{"3.141592653589793`", " ", ) L+ ~) |5 D0 X! ~* J" A, X- K
       RowBox[{"(",
    . q' U0 c; H& d    RowBox[{
    3 B5 T6 R. I, o/ ]' N     RowBox[{"-", + [& k6 w# }9 K  o7 Z& F9 L
          SuperscriptBox[
    , x; m$ v  G7 `9 x  b* n       RowBox[{"(",
    & j3 N8 q2 S+ ?        RowBox[{
    / \7 e# r% ]) y: \( t         RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-", % U3 @0 o/ w' ~( c/ a0 e3 Q$ k! n
         SuperscriptBox[
    . a- n9 ^- G- F& O5 f      RowBox[{"(",
    $ [8 _) A5 h" V5 \7 L' C* Z       RowBox[{
    ) ?  g; ^0 B- A. H5 C* U        RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-", . ^8 L" F$ q2 M# a, n( Z
         SuperscriptBox[5 `/ r. j  @# N
          RowBox[{"(",
    9 e/ D! |8 }* D3 J$ L       RowBox[{# Z. B" i' o- d
            RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-",
    ) [: j2 t! X: X, E' G( X, F/ ]     SuperscriptBox[# A  b; l8 K$ R: F
          RowBox[{"(", 2 y/ I! p: u1 b; E, O
           RowBox[{1 Q( D3 ~$ i  y
            RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-",
    , h0 Z  m& T2 J2 C* ~9 a; M) l- k6 E     SuperscriptBox[$ b$ i) ?( p( m' g% W: O; p
          RowBox[{"(", 6 p6 t8 ^9 z( M* h* u, Q- x! `
           RowBox[{6 @: n4 v2 F6 N  S
            RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",   h8 l0 c# i2 _$ F
         SuperscriptBox[
    ! b' L1 b' g9 E% ?1 E& Y      RowBox[{"(", 4 r; m& f  C2 R
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 1 q3 Y/ N/ j+ N
         SuperscriptBox[
    0 p) U* B) ^0 ]; \% ]: |      RowBox[{"(",
    - H/ q* o# }" u       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    / f+ m* L9 W- ^- b5 J9 k     SuperscriptBox[  E" l! r2 H% q+ \
          RowBox[{"(", , M9 e6 A5 c& u+ S* D! g
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    $ a( g  R* v6 P( f  ~     SuperscriptBox[) b1 n% D/ E" F8 n; u. w. Z$ [. u
          RowBox[{"(",
      U3 r, m  m- k( t/ p7 J. Q( V+ g       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    2 f: n6 z& U% h5 }: n* o+ g! X    ")"}]}]]], "Output",
    ; N! v, S% M! J- I9 \9 u/ U  U CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]3 d( h9 ^$ I+ ?2 x: w
    }, Open  ]],
    2 {3 Y- |' {) f& U+ |  B) e
    1 j! U5 B) Q# p: _5 hCell[CellGroupData[{% a0 M+ N2 E* e: E

    ( T% }! q5 f( P3 G  |7 o" a' dCell[BoxData[{
    + D+ C9 _% v) U, ^  { RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]", 5 E: z3 v: T3 l3 _) S8 q  g
    RowBox[{"u19", "=",
    / [; r! _" w, q& r1 V6 t( q4 V  RowBox[{* ~. N' k& n. D* J( `
       RowBox[{"Exp", "[",
    7 t5 q$ K, X2 r1 U+ K# `1 g) ^    RowBox[{" l. g$ w$ G3 S' F. Y$ n4 _
         RowBox[{
    ! n( x! b4 [# {5 m; B# x3 w" v: c      RowBox[{"-",
    " k3 Y& a; F# _# ?8 h       RowBox[{
    2 E  j( U+ \8 G* ?8 y4 {0 |( ]2 U        RowBox[{"(", . v6 g, q# l- Z8 I& O
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", / P$ y  L' G1 _3 \7 P
            RowBox[{"(",
    7 _" K2 G8 c! e& `+ y         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    / s+ W0 L# F/ C( R     "]"}], "/.", "DeltaX"}]}]}], "Input",0 D. K- T" w7 z; T1 ^4 {
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    # o9 L* M: t6 z0 p7 j  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9, 8 H- N7 W/ A- `, t) m7 d$ G8 F( \' `- L, Y
      3.577961588890861*^9}}],
    8 q" _8 M! R5 O9 B( k  G3 F5 p$ t- f2 h* S' L* F3 `5 L! P
    Cell[BoxData[
    2 I; b" K& v  T& A: U/ b RowBox[{"{", 4 d* C. A( U9 q+ _
      RowBox[{% D; k3 x4 ^! S3 d$ v: N9 r
      "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",", 6 T5 ]  p4 Z, V! K5 k3 S4 B
       "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}], " E- v3 @2 }. i, W- G8 [
      "}"}]], "Output",5 j. J! x+ ~1 ]% }' N  F3 v+ Q% m
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],* f% Q3 s7 b* @) k9 d+ b) U& k
    6 ~0 S; y( P5 S# T
    Cell[BoxData[! l' b9 j4 s! Y$ O
    SuperscriptBox["\[ExponentialE]", / N/ e. T7 T" ~( q( \- h  d
      RowBox[{"3.141592653589793`", " ", # |# K1 D& {- C9 r
       RowBox[{"(", # _7 [9 q5 C# ]# D- P
        RowBox[{; b3 f% U4 j/ O3 X5 _
         RowBox[{"-",
    + K' J+ s, `+ t* g      SuperscriptBox[, |7 }, s4 r/ d; N5 |5 {
           RowBox[{"(", 8 u( J+ g' [9 Z7 G- ~5 c5 _& Y
            RowBox[{" I$ ^; H  E2 }7 }
             RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-", 8 m% S* d% |: _0 Z; X  F3 l
         SuperscriptBox[+ q/ k7 X2 _9 e8 [9 d
          RowBox[{"(", 7 {8 }! j9 k" T' ~
           RowBox[{* ]3 M8 Z. z% T( r+ J3 u
            RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-", 3 R* m5 X8 n/ x1 ~- X' V9 s% `& V" K
         SuperscriptBox[; {/ u# a: R' o# F- Q2 G% [2 h; B
          RowBox[{"(",
    & [& f( ^" w% V  z+ a       RowBox[{
      D8 m" a1 A  i/ K7 B        RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", , G( J% @4 v$ }. h" U
         SuperscriptBox[
    ) V5 k4 O6 W" x6 c      RowBox[{"(",
    * m4 L% |$ g, |6 R5 M) \3 ~, ?       RowBox[{) {% y: N$ k8 V# C' c3 f
            RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-", % v3 I1 H; t+ a8 X6 Y
         SuperscriptBox[
    0 v: M9 P4 m( T2 T* W      RowBox[{"(", 2 d) ]6 a" u. \) J: u; K
           RowBox[{
    $ X. j: L) x) w        RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-", " z% j0 ~: x! K( _7 }3 U
         SuperscriptBox[
    9 i8 ?7 U9 B/ p; W      RowBox[{"(",
    , K. A3 h4 E7 R0 z: \7 o  z+ z       RowBox[{$ T  c# E& l: X
            RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", * ?/ ^; r" Z- L/ `: S
         SuperscriptBox[1 _) I6 V! s  b0 P- N+ v
          RowBox[{"(", ) [: `; V8 a3 ?
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    * d6 w) m+ }3 R/ k: j- M' E% W8 V     SuperscriptBox[# f! P  P* _9 E# L& H
          RowBox[{"(",
    ! o+ [5 u( _8 C! y5 D4 [& A6 s       RowBox[{
    / I: f9 T# G5 Z$ A$ [        RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    3 p2 `4 E5 e' [+ x3 b+ W0 Q& n( T     SuperscriptBox[
    ) @; \) _+ q' V      RowBox[{"(",
    ; y5 _1 i0 N% h- p( L" f1 K       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 2 P4 \# y1 P! p- R
        ")"}]}]]], "Output",8 ?+ g: ?# Z+ }, W- L2 a2 h
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]
    $ S) F7 |! d; J% o+ h, `' l% }}, Open  ]],' A2 R. _( ]; c: }/ v; x

    9 E+ E: u7 i1 |# V- KCell[CellGroupData[{
    * I% h1 K. z! @& S0 s6 {2 K/ O/ Y
    Cell[BoxData[{; V& ?% r9 N9 s1 f0 ], y
    RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]",
    : U, ?2 h) N8 q RowBox[{"u20", "=", " G5 @) z3 V8 _7 k. J
      RowBox[{
    0 n5 G4 ]! W+ [0 h5 D, c( l" Q  t  d   RowBox[{"Exp", "[", 0 j6 g) A4 K! d/ t4 F6 X  w
        RowBox[{
    $ P1 |( a! a: k2 T7 {: @     RowBox[{$ q( ^" ^8 E  S  @, B
          RowBox[{"-", 3 V9 {: r7 t& e- W
           RowBox[{  P! o$ t" Y/ F1 Z3 S$ z( I
            RowBox[{"(", ! c& y  f" H; ~$ |/ q
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ( j+ ]! ^& s# R        RowBox[{"(", ! o6 R, }) ?  t" h, `! d9 |! ~( \" H
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    . x6 }4 Q' G; q3 ^     "]"}], "/.", "DeltaX"}]}]}], "Input",
    $ P! v) E# K  R. K CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {! }/ K6 }6 {0 J+ l; W; w$ X) L
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9,
    # ?( X% O$ `' }" @4 c6 \- Z  3.57796159382047*^9}}],
    8 K9 y9 x9 t# m4 D5 Z+ O: m- C' _! U- d. R3 Q+ T
    Cell[BoxData[
    $ t3 h$ Y7 U0 r RowBox[{"{", 4 K- B+ t7 s- a8 d+ Q( z8 A" m3 z! {
      RowBox[{
    5 k! k& H$ `- ]% _- n# V, K  "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",", ' `7 A3 ^; k* X8 U, W
       "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}], & f7 n, ?) _6 C3 u& j  ]; k6 l; {
      "}"}]], "Output",
    ! C! x- s2 L/ Q: L+ P CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],
    7 L' R1 @$ Z7 m* d1 R/ ^( |$ L) G6 r( w9 }( c; B: y
    Cell[BoxData[% G+ J& a7 T, v; R) q
    SuperscriptBox["\[ExponentialE]",
    6 M1 u2 a3 c) c. G, r  RowBox[{"3.141592653589793`", " ", 3 g% g: l6 E& b- h* l
       RowBox[{"(", ) |, X$ B* b1 _8 C0 e" R, H
        RowBox[{
    : s8 W4 _/ b/ z% |  F- y, v+ o" F     RowBox[{"-", % h4 m3 ]8 |( p# J
          SuperscriptBox[
    # A% \0 @, }5 J* _' p; n. [7 v5 a  E       RowBox[{"(",
    . F4 v, q8 s* N& `$ P7 {9 a7 B        RowBox[{4 v6 Y* J+ @/ a0 ]+ Y
             RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-", 5 u1 ^3 Q; S# T! S
         SuperscriptBox[
    5 U$ \5 G7 u7 L      RowBox[{"(", ' u, v( t& w+ T# K8 ]
           RowBox[{9 T7 k/ V) _9 u( g7 H& S$ s
            RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-", 5 B  S) {: E9 D
         SuperscriptBox[
    ( K& s+ ?% J5 D0 [% H      RowBox[{"(", , F) X4 d9 p4 T4 X+ z
           RowBox[{4 @; s$ I  n2 b( k
            RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", ; V. c, E$ s+ f0 n, u( [# J
         SuperscriptBox[
    3 }. e/ U8 z; @( ^3 i      RowBox[{"(",
    ) C% @4 J7 Q. q& {) I1 Q       RowBox[{
    / ]4 ^1 A+ _4 o; a/ q        RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-", 3 G: P) a$ ?6 g0 Z" p
         SuperscriptBox[3 K6 a6 S7 [1 L$ ?1 ]( _* c
          RowBox[{"(", : i8 J8 H+ x9 w9 B, Z: Y
           RowBox[{6 V& Y6 Q! u0 {  W, O
            RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-",
    ! e2 h) |, k$ \& c  e     SuperscriptBox[# Y+ i$ E$ t$ L, j# }/ P
          RowBox[{"(", " Q3 u8 S% |! d" R5 p
           RowBox[{
    6 H( K3 ^! x0 m& y2 P; n7 i        RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", ; O- c: C; D- E$ r9 Z+ J8 l, j* o
         SuperscriptBox[6 V4 H6 @/ ?( G1 k
          RowBox[{"(",
    4 O$ D9 A/ P5 G6 m       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ) C' ]$ |6 z$ _! q$ C" `$ r& v4 \
         SuperscriptBox[
    9 u& ]. f5 a: n$ H( G0 B      RowBox[{"(", 1 g- Y+ _! I9 m& H: H* M
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    & k. d% |: f- n9 b     SuperscriptBox[, p% b' K! R4 }$ K
          RowBox[{"(", 8 d( I. ?& L" F* j
           RowBox[{* I9 d9 V+ G: _/ `8 \
            RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ) P" Q( l* s/ m& y
        ")"}]}]]], "Output",( |+ S+ U) I# j1 v* m
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]0 X& f& y, ^+ C- h# O! J+ _3 }
    }, Open  ]],) F5 Z- g, {& [$ _0 r! W% B

    7 L1 l+ ]4 S3 A7 o8 ]1 k5 cCell[CellGroupData[{- h) ~; q- C; ^  ]4 ]

    0 |/ R/ e4 j  R' N; b% |Cell[BoxData[{7 @3 I1 D% ?1 A# p$ {0 `) O
    RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]", ) F. w4 u. Q- o: B+ g# [
    RowBox[{"u21", "=",
    4 ]% N, @+ u) q  RowBox[{; t1 ?+ i' n8 T0 ]0 @
       RowBox[{"Exp", "[", ; ~# _* A" P: f1 e: W. e
        RowBox[{
    0 g* l5 M6 f: z! f* I     RowBox[{6 k! x' z3 z- ]6 Y1 T' u; i% m  H
          RowBox[{"-", & r! n0 g, o+ c7 y8 J  G
           RowBox[{
    : Q+ [. i+ e( G  d        RowBox[{"(",
    $ e2 A9 e; U+ i8 q8 G) E         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ! E# L7 N0 x+ z- c7 G        RowBox[{"(",
    5 P# x# V8 G2 R# K( ?' @4 {" S1 u         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    0 f; X% C* z+ H% X0 e& s3 e. j     "]"}], "/.", "DeltaX"}]}]}], "Input",
    / j1 I' A  U4 }5 M# H+ P4 e8 D: u CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    * U( ^, h) @3 A& V0 G! @' z  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9, 8 }* h3 x3 K/ b( n$ `# r' G
      3.5779615991556787`*^9}}],: N8 I# A/ s. \/ I

    1 g! H. K. F! ?Cell[BoxData[
    % Y2 N0 V* k* `' o RowBox[{"{",
    # {' }. j1 g# Z; c0 _( T  RowBox[{
    ) i) Y& p+ z! K& z  Q  "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",",
    + |  U. f8 m1 |/ L; b4 ^   "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}],
    ' f$ H0 l5 \9 T' {& b4 w7 d  j  T  "}"}]], "Output",
    , u% T' d: F: P$ A0 H" G/ ]" j& B CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],( K0 A4 H- \3 x4 l" j
    , N# o( S8 B9 n7 C6 m! c
    Cell[BoxData[6 x* M; M) o% I/ {/ M# \& p, `
    SuperscriptBox["\[ExponentialE]", + o$ Z$ i7 }( A3 R! h
      RowBox[{"3.141592653589793`", " ", 7 p1 L, w6 ]: F9 o
       RowBox[{"(",
    ! H, @6 o& n9 [    RowBox[{* F& c( N( o' c! w8 y0 A3 w% K9 c
         RowBox[{"-",
    8 ?$ F6 D  }, V  [" P% `      SuperscriptBox[
    3 {# m" o: R( |8 h& A; @+ h; J       RowBox[{"(", + e% v2 D4 d  s. F; Q
            RowBox[{5 y$ b. w$ T5 L/ }  C7 L# \3 F
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    % ?: s$ ]& q1 ?" P3 _     SuperscriptBox[
    ( x# C" x& _0 j- d- L8 D      RowBox[{"(", 2 g5 E4 b8 P* o3 X2 G. o
           RowBox[{) t' i. i% v. Q) R  i
            RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-", 3 O6 |1 F* }; F, D9 x& ]4 w7 Y# b
         SuperscriptBox[" ?6 ^: H7 Q9 x
          RowBox[{"(",
    1 h7 F( ^% x  p       RowBox[{/ j7 y3 k! ^( w6 j) J* h
            RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", ; Q0 i4 \" Z0 h+ l% b9 e
         SuperscriptBox[
    3 s8 ]; X1 j2 q4 |2 n3 T      RowBox[{"(", , Z$ d+ B$ J7 H
           RowBox[{) E1 O; q. n7 A- |7 M, i
            RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-", ) r" L6 K- n" q: `3 y1 s% P% L
         SuperscriptBox[
    6 {# x  L& L% x( v% M5 |+ ]      RowBox[{"(", ) x# {3 K8 ^# I, J
           RowBox[{
    ) |: d! r2 c- _" H" i        RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-", 6 P/ A2 j  ]0 v
         SuperscriptBox[
    ) I) P7 t  [2 r  t6 p: r      RowBox[{"(",
    + v$ f2 ?5 I) ]) R       RowBox[{1 O2 q) @5 h- N- l& \
            RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    , f5 L' m7 z* b9 U9 i8 }" w     SuperscriptBox[
    - ]$ ^: l# z$ D' T! |+ D% A5 X. X      RowBox[{"(",
    . ]) a# X3 e* g, W' \       RowBox[{
    # b0 ?, X6 L$ ~( S        RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", : W1 b5 D5 i( x1 y0 V
         SuperscriptBox[8 |# n* z* g; H* {: [
          RowBox[{"(", 1 B2 e' s, K  J" |7 P: i
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    4 v6 a, ^1 h! c+ t     SuperscriptBox[9 w! C2 P- W, S* ^# {7 M' k
          RowBox[{"(",
    ( f8 C  B! `' Y" q  k5 x       RowBox[{
    0 n8 }* y: N6 R2 v5 s        RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}],
    " R/ w" R8 t; l2 O# m    ")"}]}]]], "Output",
    . J8 m" g& P, l' a9 p CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]
    6 ?3 J1 L0 i8 c: t# I( m}, Open  ]],
    6 p* B( @7 l+ ]2 C! w8 M6 p/ I, D0 e2 J5 t
    Cell[BoxData["\:62df\:5408wi"], "Input",3 t" N% \2 _/ ^
    CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],+ ]! ]+ ?, y& O0 h
    4 {! e# X$ X' F9 D& L
    Cell[CellGroupData[{
    $ ?( Y1 U. k) g  @4 S# r+ n+ W5 `% d  H7 x* R/ {; u
    Cell[BoxData[- K7 Z! a# |3 @' @
    RowBox[{"y1a", "=",
    ! e8 [  h. z: _4 Y2 q! e  RowBox[{"Table", "[", 9 ^' U4 [: g! j0 l8 @
       RowBox[{"x", ",", 8 |$ R# s+ C+ e  `9 t+ s3 W, S0 r
        RowBox[{"{", " h  e9 @$ j  d1 c
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    # U8 ?$ K+ N# c& H/ _% ~9 I+ G CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {/ m5 X! a& F" s( F6 j: U* t
      3.5779226649375*^9, 3.5779226810625*^9}}],
    ) m. q7 y8 F" N0 T1 V+ x4 x# @
    ( p1 e( J7 E2 _; YCell[BoxData[) u* n. e4 A8 |" h! |; o0 F6 ~
    RowBox[{"{",
    / ~" x0 ~1 [4 A2 @2 X  RowBox[{
    % [. X5 Z: F1 g% q$ S9 `  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 l3 S! Z3 C( w0 o7 {   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",2 E! R/ Q. h9 l* i, z
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    6 `) D. l1 k  `( b   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    + d# V- |! Y5 D& @8 p* m% l   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", / M# b6 x2 K/ Q; q$ ^) [4 I
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    / g# J6 \" i$ H. q. {9 L0 ?3 K   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", : s$ `! R! V( E8 q$ ~
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    + i1 f1 Y9 x1 n, y9 L   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}], , l. U+ Q5 y7 K' }) z- }
      "}"}]], "Output",& d0 J! q0 H. M: f" Y: G
    CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9,
      b& E% Z- G1 y# P2 B5 Z  3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]
    5 C  R$ [' |( ~$ v4 t( Y/ N}, Open  ]],
    * e( S" }# i& P# ]) b
    8 D/ Q1 Z$ f  c1 M2 xCell[CellGroupData[{; D6 X! J" s- _

    - E- ~; X6 }$ h7 P6 B0 TCell[BoxData[
    " u# g% a$ {1 X3 d4 o& H RowBox[{"Data", "[", $ ~6 C' {  w) z" b
      RowBox[{"[",
    1 d3 `* a+ p, v   RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",
    8 q/ p7 C3 Q4 I( h/ C! S  I6 E3 Q2 j CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {! Y$ P9 K# K, T1 H1 n) J' M1 E
       3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],$ {7 i9 V$ T, i0 c1 b8 {' \& Y

    . p+ `( z$ H- G  C! G+ ECell[BoxData["0.899882`"], "Output",
    ' s9 \% r2 l8 r5 z* k$ x" j5 D6 a CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9},
    * d2 ?! h) ~# Z( Q& l   3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9,
    2 V# z1 c9 d7 A& L3 a   3.577961929080654*^9, 3.5780123419375*^9}]
    ( e# M9 o6 w2 F, S3 r5 [, o" t}, Open  ]],7 w. O* I8 u! N$ c9 C6 E' p5 l

    2 k# @2 ^: U& T, S3 u/ o6 t2 TCell[BoxData[
    * F- H2 G% q# B8 n RowBox[{"For", "[",
    2 M. N, r; w: a9 l/ l5 u9 _7 X/ v  RowBox[{8 r: I- {) z+ ~# c, \
       RowBox[{"i", "=", "1"}], ",", 7 X+ y1 _7 b3 L1 _% c' e% f
       RowBox[{"i", "\[LessEqual]", "60"}], ",",
    $ A/ H6 O, i' F& W  O   RowBox[{"i", "++"}], ",", ; R9 M# T4 i  O, ]; z
       RowBox[{' z; }- f' t& D" m" q
        RowBox[{"y1a", "[",
    5 |& _# Q6 ^% ^6 L/ B8 o     RowBox[{"[", "i", "]"}], "]"}], "=",
    . ]6 j8 U: _# F# q/ F! h    RowBox[{"Data", "[", / z9 X5 ^. U  I# v; u
         RowBox[{"[", ) ^, D, G. l! ~
          RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",' Q& Q; |7 \0 _: V
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    7 m! Z2 P& ^' r" ^  _# A   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    2 V; g, ]+ C! a( s" g   3.577922923203125*^9}, 3.5779588839702806`*^9}],% b* `' H# T5 k# Z( A5 f6 M
    # {1 W8 U8 T+ |% E2 J" O8 h
    Cell[CellGroupData[{# r9 b. Y% t0 w5 N" F

    1 b% n; c9 `& D$ |$ ^; X! P1 Q1 _Cell[BoxData["y1a"], "Input",
    4 b0 J, D! ^+ d, o1 ^2 k: U CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],
    , V: B- g' c% a7 c! N
    0 n% V6 z% [: ~+ g' WCell[BoxData[
    9 ^9 A- U$ q+ a RowBox[{"{", ! _' [2 ^% z8 H* y. s+ B4 X
      RowBox[{
    ' N( O: V5 G# f& C+ Y  "0.277091`", ",", "0.220259`", ",", "0.899882`", ",", "0.265607`", ",", . O, n. x" Z! m7 X- M9 J8 g0 G/ U% Z7 z
       "0.642226`", ",", "0.306243`", ",", "0.186985`", ",", "0.175501`", ",", : D( Q; s) o' C2 W* }- _/ d3 q: G9 @
       "0.147821`", ",", "0.352768`", ",", "0.23881`", ",", "0.095701`", ",", . i# X2 ~! X5 X, D
       "0.162839`", ",", "0.335395`", ",", "0.160483`", ",", "0.398115`", ",",
    0 t) F1 f, ~0 u" ?. B   "0.157833`", ",", "0.315665`", ",", "0.492344`", ",", "0.638398`", ",",
    ! E, ?  i! A1 b7 y6 F8 d9 M   "0.392521`", ",", "0.362191`", ",", "0.114252`", ",", "0.401355`", ",",
    9 f1 \. i6 f. J/ r: d6 r; S/ ?   "0.827444`", ",", "0.676973`", ",", "0.331272`", ",", "0.845701`", ",", 6 c' Q+ Q7 }% b9 @
       "0.287102`", ",", "0.`", ",", "0.050059`", ",", "0.254122`", ",",
    . t9 B, n) k: w6 f* f. Z( C   "0.086867`", ",", "0.659894`", ",", "0.317138`", ",", "0.605124`", ",",
    . D: Z* o4 p; h+ v/ Q; J$ c$ ^   "0.32126`", ",", "0.595406`", ",", "0.555359`", ",", "0.333333`", ",",
    6 a* K3 O& [6 O: q   "0.149588`", ",", "0.493522`", ",", "0.224676`", ",", "0.410188`", ",", 2 r4 t7 k7 v! U7 D" k# E- y4 I, j
       "0.668139`", ",", "0.102179`", ",", "0.380742`", ",", "0.319494`", ",",
    8 N, Q/ K5 R* h1 X& P+ r   "0.031508`", ",", "0.292108`", ",", "0.329505`", ",", "0.337456`", ",",
    ) \, S8 U/ I) ^- f; A9 x& V   "0.766784`", ",", "0.676678`", ",", "0.541519`", ",", "0.064488`", ",", ! Y' ?" B% a0 l6 \  O+ H0 s
       "0.463192`", ",", "0.388398`", ",", "0.262367`", ",", "0.290931`"}], + |+ {$ y+ O9 n7 p) }  x  k
      "}"}]], "Output",
    ( y5 |" `) ^: e- c+ Z9 V1 I6 o CellChangeTimes->{3.57792293246875*^9, 3.577957577756765*^9,
    8 l' t5 A- M. m1 m5 n  3.577958888806289*^9, 3.5779619425902777`*^9, 3.5780123438125*^9}]
    ; U1 ]# k1 f& J1 i/ n8 e/ e}, Open  ]],- p# `6 G/ q  l) b- x+ E& J2 u9 Y% [
    ! O4 I6 `: X) n& H0 V( a; `
    Cell[CellGroupData[{& u; ?7 r$ A+ v

    8 T1 i6 n6 E: p- o! ACell[BoxData[* d* ~8 z( ~/ [0 x
    RowBox[{"m60n21", "=", # _6 ?* ?; Q- E
      RowBox[{"Table", "[", & z4 U; {# u& N6 I" U
       RowBox[{; b0 R6 J. q" ~) b
        RowBox[{"Table", "[",
    ( ?9 ]5 j7 u. [0 j     RowBox[{"y", ",", 2 N$ T. x7 P1 s" b
          RowBox[{"{",
    0 Z% K0 }. i3 K0 B% H$ r: i: L# X       RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",",
    " G0 V& x0 \& |# r; N- G0 Z2 b: C    RowBox[{"{", " K/ R' T4 f: l( H
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",3 b2 L* _# s. Q- h9 m& b. B
    CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {
    2 i# k. l3 y6 o' t" p  3.577924052828125*^9, 3.577924101671875*^9}, {3.5779619669419203`*^9, ) o+ b( Y. [+ [$ q! v
      3.5779619706547265`*^9}}],+ P: ]8 o% T3 k6 j0 |* H" |

    0 z: [- u( |# gCell[BoxData[8 a3 T( i* p" w/ J6 [; k+ a; S
    RowBox[{"{", & _4 `9 ?- Y3 s. i3 O) ?0 a7 e
      RowBox[{7 w) ]& t1 u# \, M
       RowBox[{"{",
    5 P! J/ W# b: K" k# Z9 f    RowBox[{
    0 g  ?, Y4 |# T    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & e+ ^# L' @% ?# M$ h- t      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 @* {( \6 J9 \! M     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) m, C( d) W: U  t1 D     "}"}], ",", 3 \8 `) \, A* L$ Y7 Q6 N, x8 R5 @
       RowBox[{"{", " V# b* r0 o4 J8 W, _/ L$ _: X( U+ m
        RowBox[{
    ' d+ [/ H+ m& A+ i    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ m9 k3 v/ T/ V5 _% C4 w$ O
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; a0 V; R% @8 Y# Y' u$ c3 E# ^     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ e( ~4 y  a/ {1 V& j$ ^+ u
         "}"}], ",", * ?/ r( h/ V1 X
       RowBox[{"{",
    ) |& z% s# t9 c- t, A9 B" C5 n    RowBox[{
    , [: v1 }6 L( X3 n" q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",, l4 ^& q! e- \7 S; J4 J5 v! d
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 a, t3 H' v$ \1 M# h
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    4 l- j  M. p1 ~0 a     "}"}], ",",
    & m& Y/ g0 K: H2 g  W+ ~- F1 {8 k   RowBox[{"{", $ n8 R7 {' k- m) J8 l" p' G' {" o
        RowBox[{
    ! p  y; V+ d% b* e    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- B  _. A" [6 V4 m. n. u
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % t$ L9 p& B5 u/ y     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! a7 ^# v. l$ W. M, p6 [% d     "}"}], ",",
    , b" A6 n7 p# `   RowBox[{"{", * e  }' l+ e* {: A9 K7 p! ]% B- y; {
        RowBox[{
    1 b: o4 o8 C, H, k( V' g    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",: E4 H! S5 f" c+ e8 J
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    9 @3 e9 y2 f& I9 T# Q; B     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! l& Q; b0 g5 w* p; Z+ d( L! Q7 g     "}"}], ",", 3 @' k3 }0 Q8 b1 T% d  u0 B
       RowBox[{"{", ; K8 z  j9 R4 X9 t* T8 }* [5 d% a
        RowBox[{
    $ B! F  y" O" Q' u    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 `0 x) G6 P; R4 U& k. k      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 \" u3 ^2 ?' b2 J     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 ^: v6 N; n" M. V/ `, t
         "}"}], ",", / P# W" T# \: |4 w7 f& r
       RowBox[{"{", ! I: w  ~5 z/ y
        RowBox[{, T8 q( u) S$ [
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    " A6 O2 t6 I( m" c7 \      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! {7 F) \6 |0 c
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 X. O2 c) C' X  f  J+ ]
         "}"}], ",",
    / k2 H+ Y, v  S% ~/ ~9 j+ L6 T   RowBox[{"{", * E0 O; d& H& V7 b
        RowBox[{% P: c7 x( x. \# N7 {5 v
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 }. x/ P* [; P1 Y$ ?" Y" P
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) D! y4 V- W0 v     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, ]" h" w7 D  P, G" q: b" a8 c
         "}"}], ",",
    9 w  h, K3 ?0 H) M* g! ?   RowBox[{"{",
    , p% L7 L0 S  z# e7 Y0 u% K* Y    RowBox[{
    ) U3 d! e9 Q  C' x( Z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",; v/ b( Q( ?, L( }" h  W
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , J/ }, F8 ^  Z* J     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    4 ^0 Z. I( W, i3 f0 m+ s     "}"}], ",", / G) W6 j$ t% g, T, c! |8 C: o! {
       RowBox[{"{",
    , X8 A: y2 B& N- I2 }    RowBox[{* _& Q3 x/ o3 O" ~
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 \4 i- [& e+ k2 L$ S" C
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : O3 A$ x; K8 `/ _* a     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) J- ]( J: _% {# q     "}"}], ",", ; T$ `4 G/ X% a8 R1 @% `
       RowBox[{"{",
    9 j' h7 _! K: ~6 G    RowBox[{$ ]. I# m! J( G2 v5 o2 q
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! w/ O# v9 p1 O+ b$ w  {/ [      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 E  K/ ?8 y. @; j5 R4 r4 C5 J" e- Z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( X5 b! M. ~. X8 W% Z3 V
         "}"}], ",",
    , s% d) N/ F! T7 W* a2 M5 |" A( c   RowBox[{"{",
      T- U! r$ F* ^" K; Y    RowBox[{4 S# T% i9 q% G9 x' S
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 Y( T0 u8 I! ~2 X
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 U1 @- {( ^, V     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ x' H7 e. E, t3 X, p4 R( \7 W
         "}"}], ",", . n1 x) x3 c8 u% v
       RowBox[{"{", 8 Y4 H  Z) h- ?
        RowBox[{. F1 ?  l& H+ q. z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : c# R) a6 V$ ~      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / B; |! l" ]3 Q" V9 R9 S
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 I9 [0 K5 e! B2 O
         "}"}], ",", % U. q. r8 V. S4 C5 R; q6 l& m
       RowBox[{"{",
    7 @1 t- d/ L5 k  q; z    RowBox[{- V- J9 J, s) Z! _2 g
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    1 ?" x& G; F6 F" q+ n' D6 Y: {/ }      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) J- I# n5 V' ]+ v6 h3 [0 N! t4 m     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ M& C2 H7 @2 w9 e4 F1 @" |- L; b; k
         "}"}], ",", 3 w& Q' y+ y+ z6 d' @
       RowBox[{"{", 0 Z1 U+ U5 ^7 j1 M
        RowBox[{
    4 p- x* m. v( r$ F    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 P0 Y4 H& q# a
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
      m8 I% t0 `1 [     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) d9 M5 \, [0 w# g5 Z' a: D  r$ i     "}"}], ",",
    $ _' L3 B1 D( x' Q: ]5 |0 u( x0 H   RowBox[{"{",
    " x' x* Z8 n' `1 [" O    RowBox[{, w" d0 n# p7 u9 H& z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",# O' x$ |' z6 H$ y  R
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - ?  _: A! x* T' j1 V( s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , l3 N& S% X% T: T! ^: w     "}"}], ",",
    , s# F- w* V$ y7 o' z4 U   RowBox[{"{", . c% t0 }2 d4 Y- i+ G% y
        RowBox[{# G1 Z7 c! R) G! F2 I- K! Y  f
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 p; G8 S' u, S7 |9 ?% i1 l6 n% _
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 J0 ]: D. x3 ]1 v  x! |7 i     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],: m% t" S8 ]4 v6 C9 n5 m- H7 j& m
         "}"}], ",",
    2 o7 m9 d% \) Q; O& ?5 W   RowBox[{"{",
    - J- {" P' p2 q) W    RowBox[{
    9 N7 v# ?1 D6 y0 N% |    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",# w, g2 M1 @+ f, e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 U# v: E- C* m! m2 P0 q
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ Q! ]# U* @2 _1 c6 M
         "}"}], ",",
    7 F* q! G4 [& q, L1 j   RowBox[{"{", ! d5 s+ }6 d6 l9 x, i( y
        RowBox[{' [6 l4 k: S; G; h% T
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) G# j3 Z3 i' b
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & ~1 K- d0 \4 ~+ ~$ T' u     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " y5 ~- W  Z' l- @) _' C     "}"}], ",", 2 z, k. v) B! v% x: R3 d
       RowBox[{"{",
    * ?" i/ W, u- F; ?+ Q, m, A    RowBox[{
    0 K; Q7 g  |7 y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ; a& Q- r, s0 Y) R" _5 K' |      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' }7 w  P2 X9 H1 d( f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 U) X# b2 u8 r9 F     "}"}], ",",
    5 Q; j. G2 r" z5 q) k9 {2 k& M   RowBox[{"{", # G* l( i% m5 A% W: S7 n
        RowBox[{! j: K) J' ^# @9 j# x
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 i* t6 U( }2 Q( F! @! B  C5 Y
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : S- v( p9 M+ D' R: F, N- ?) v     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. f8 n1 d6 ^: b) g% Q) {0 h
         "}"}], ",",
    4 d1 c+ r% C! o& H& x   RowBox[{"{", 8 |% Q& |2 `: d' P! t
        RowBox[{2 j  }/ K& Q" {
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. z) B9 T. u8 `) J9 P( q* ]
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' K3 o; v: S% R# f- P     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 o& d/ q1 D3 F  u0 p# l
         "}"}], ",", 7 Y$ V  N+ l- {! z1 I3 ~. p
       RowBox[{"{",
    6 J: V' K8 [2 h; E) `/ G  H/ g    RowBox[{; [$ I; |4 c' h( s7 o6 s5 n7 G
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," y; e+ C3 d  @$ X
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 l  V. ^! Q$ t7 ^     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ b" \0 D- N- P' n3 E
         "}"}], ",",
    8 p5 f& N' g, ^/ J9 Z   RowBox[{"{", . o0 h' D4 u8 }* Z: e3 c# n0 |
        RowBox[{
    5 x; B' J- a% V0 \. q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& y$ r& x/ P$ Q  L/ U* x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % \8 K9 Z" K# U: Z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," t+ j- F. s  z# I% E
         "}"}], ",", 0 L$ [. I# {& j: O3 `$ x% j
       RowBox[{"{", ' `& Z7 k' j) ?
        RowBox[{" [* p( d! {& B4 E. ~4 }
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! o- z# x1 p, u3 q
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : _) C; L9 m: h2 o1 Y6 t0 ~' i     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + H$ v8 r6 Y4 V$ ~/ I6 C9 ^     "}"}], ",",
    7 n8 V+ W" K/ [; f   RowBox[{"{",
    2 T" _7 n) M/ L* u+ q, F5 w    RowBox[{5 k, _/ d8 ^$ V+ D
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 _& w2 M; Z+ r! W8 O6 M      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   L$ R4 J# ~" a; T' L
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    4 E" d9 j0 d8 C5 W! @     "}"}], ",",
    ( a3 e. B; C  y5 L   RowBox[{"{",
    ' e" x. X0 Q, q( w0 \    RowBox[{4 S5 Z. c( P2 J: \
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      K% H. q- z0 v6 v% E0 a8 A" v      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 2 E6 H- f# Q& U  ]# D: j. M# w
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! S2 m' a' c9 v2 w2 {% {8 g
         "}"}], ",",
    / r2 u( c* `+ y   RowBox[{"{", 5 a& K+ ?2 `( g/ U
        RowBox[{, [# n& |! a$ B
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. ?1 y  q# R% O# n$ t/ w
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! m' l8 L7 y* M2 h3 w- s. ~5 m: s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / V# L$ }* x" ]7 u. a% T% y     "}"}], ",",
    5 V0 K; I% I! w% V5 d2 H   RowBox[{"{", / y% c( V$ M1 K, A) |3 N
        RowBox[{. m0 y' M3 L( f' m
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ( d) M3 p5 Y# y) \; V, B. o      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - R6 i% [; h2 [( e6 l- U4 }1 x     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " g5 \  f+ V5 w2 z: o+ X     "}"}], ",",
    7 }7 O- A+ Z/ J1 U8 K   RowBox[{"{", & m, D+ `; o( S( m* ^: I5 A
        RowBox[{5 e4 q# N, i, s+ x0 u1 Q% I
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," r# Q6 Q. v4 W* e% ^2 |1 M
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - ?5 D6 ~9 b* x     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . y+ E4 ~7 M0 c' y! l7 N& i- R     "}"}], ",",
    ) G' }% \/ |# |5 ?   RowBox[{"{",
    9 W2 d1 x# O2 E3 Z    RowBox[{
    4 U! N& }- ]9 _& V* u' g# i    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 [) b' `; D2 L2 P. O+ l      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " o0 t1 p4 u( [2 q; ?
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],  t" F; A- U  A4 e
         "}"}], ",", 8 g- H7 ]6 c2 o
       RowBox[{"{", % f6 s" T4 R  a2 }
        RowBox[{3 b6 s  }: k. h0 ^7 H# Z- ?: W
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , Q2 S7 }7 m5 X7 q: Q* K      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # U6 l% O- ?  m$ U: H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# B& G2 P+ M& F; _
         "}"}], ",",
    9 g0 @6 v- l8 c& J& V2 E   RowBox[{"{", 4 m2 n. [+ b" A  g! t' M% k
        RowBox[{
    . o6 f5 L% E* X/ r0 j5 F    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % k1 x) {% ^2 _: J: i' \# E6 |7 A- Q$ a8 C      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " ~; }0 ]2 Z, [* R. Z' f! x
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    0 [: k! F$ a1 ]) Z     "}"}], ",",
    6 y4 v+ X/ i" n- h' I   RowBox[{"{",
    1 ]1 k) K; _) a# K$ U: _    RowBox[{0 d+ e% _+ Y( b" }1 O- T4 d7 W
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 K3 [3 ~0 E3 K
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & E( b$ ~4 `+ E/ r     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # J( M* R) U" M2 C, b; r     "}"}], ",",
    5 m3 @- H& \9 [: l4 _) G   RowBox[{"{",
    ! Y/ k# q% w& P% X* ^    RowBox[{
      \  m) Y+ W4 u& k    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",, L8 u* e( p; |
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 _- d& H6 I* C, s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : J9 G# }' p0 b9 ~9 _4 V     "}"}], ",", ) g: s, u8 C8 b
       RowBox[{"{",
    1 O: ?2 a6 @2 h; z  a$ M* L    RowBox[{
    - s0 C8 T$ z; z1 B) o3 m    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& l: C6 ~$ w  H& t# H9 X; T
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   \0 H& W7 k" g$ a0 ?1 y8 i) S
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 J- x6 _7 `  j     "}"}], ",", 0 }5 ]: `: @$ m: v3 u: c4 s3 K. R
       RowBox[{"{", , w2 X; B& T% n
        RowBox[{$ X1 G0 O3 n0 \
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / ~7 y" `  u& r( ]: l      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : B$ F2 \/ G+ `2 @( g! V! u     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( I7 n8 `  v, A& n- S9 a/ ~
         "}"}], ",", % J& T' Q0 g. }8 ~. Z
       RowBox[{"{", . L# r5 R; P: f% F) o
        RowBox[{
    # ], B& g7 l& f$ u3 y! ~    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    * I5 }5 S5 [7 L      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # r' _# C1 a% y) L" L     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , a" ^$ @8 j" H* @, y     "}"}], ",",
    # f! q' G( W  u$ M; v5 i, L   RowBox[{"{", " Q/ q/ Q$ b$ ^6 Z, ~* [
        RowBox[{
    3 w/ O& J) O' i, C2 \6 o# d    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 H: _  U$ A( g" b1 b; `/ Z
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    4 L& H6 B) l' g  x. V     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 L# C4 ^, Z, l/ V
         "}"}], ",",
    " d# l. B% @  p. F1 j) V   RowBox[{"{", 4 j3 U5 U# T; C/ W
        RowBox[{
    ) x! e: Z5 l  `/ ?% `* `$ R* H: J% f4 C    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      K: c+ O3 `1 A5 o6 e7 }0 a4 h/ I      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   O! Z; W9 n5 ]: x+ _& ~* J& q
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    - n- S# K" e4 p) G     "}"}], ",",
    % X0 ?) }2 R& a! R" G" H& y+ K   RowBox[{"{", 2 b/ W4 x' {- `4 G* I
        RowBox[{
    - _; J7 D5 y0 p, C$ d    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 d! n& i! T; H/ k
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    $ L, X5 A8 C2 T2 S+ M  @* y' P     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + K; M3 n0 w; ]' C0 p     "}"}], ",",
    9 R% b$ C. ]7 A: {9 g/ l   RowBox[{"{", 2 E1 u  {( f" M+ h
        RowBox[{
    ; |. g' e) [. j0 t    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 {9 k6 x) P7 N* m+ |( O% D2 J
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 m( {0 y% _% L9 Q2 x+ _* s. }     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    6 M% J7 A3 A! |9 ?& ~0 K# u2 o; s     "}"}], ",", 0 T  m, x) |9 b# X+ _. P
       RowBox[{"{",
      v3 G1 J2 F+ I: s    RowBox[{9 [& l/ f6 W, ^' p/ i. ]& Z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) A3 C, ^5 T! Y) j/ h
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    . h8 N  o; M( ~     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 }# C! a) W" o4 K" ^% d4 v& X
         "}"}], ",",
    8 R# u6 V+ N) Q- I: {4 E   RowBox[{"{",
    0 f, b6 ]' U3 y3 t+ e    RowBox[{' O7 p: l& Z8 o; l2 ?
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ i  T) M3 `/ t4 w1 r
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # l) `* y  M) _9 Z: C1 a
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],3 I# v  y4 W; C
         "}"}], ",", 4 Y- e* Y2 u/ ?2 L9 t9 c
       RowBox[{"{", % X) ]) e6 l( `
        RowBox[{
    1 w' l) N6 p! `0 H9 j8 O2 G    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / J- w& U, M  Z/ ]% S      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - Q; u0 r* @+ d     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / \+ F& f3 }) \* t5 }" a     "}"}], ",", ; }" [$ \$ W  E8 E1 M
       RowBox[{"{",
    2 h; `1 S8 @# T6 G/ X    RowBox[{
    : q' K* K6 Z$ p! F) I' h1 N    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! L5 G* F2 E$ k$ [- f+ y0 O      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % P0 {: L( Z! _. D' J8 }% {% D     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],7 b! M) `  Y3 C6 E" j
         "}"}], ",",   l3 |: P1 O: H% F* H- z
       RowBox[{"{",
    7 J% b! D+ Q2 k, b' L    RowBox[{; ~. O+ m# M1 K
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",5 b' N0 [0 R4 G
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 z0 I0 p7 E$ ]6 p3 V4 t2 C/ O" t* r4 d     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ B+ p$ m" m7 X: q3 p1 [/ N
         "}"}], ",", 0 H1 F' v/ \4 X" `# t9 ^0 f
       RowBox[{"{", # e! j7 v% D! I8 d
        RowBox[{" p9 Y3 g# Q7 ~( G
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & ]# T+ A% N) e7 U      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 i  h& n6 B2 e8 O# g; \& `
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# r5 Q! j$ _9 `3 Y; ?$ \! z, ]
         "}"}], ",",
    # B/ _) {7 X7 O0 i+ @4 ~   RowBox[{"{",
    7 n& K0 O( a7 N& O% A+ |0 W$ t    RowBox[{" W& H" O. L% c1 A6 V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    * s" h3 a% Q; F5 j3 q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - w# l; Z& i9 b. h* O% d     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, ~4 h+ Q5 B$ X
         "}"}], ",",
    " ]. Y; R( [! I" b( h  u, D   RowBox[{"{", ; _" B" D+ I1 V/ T1 q* p6 N
        RowBox[{0 |$ [, n8 ]7 o
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. }. R' j4 X3 w5 V
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - y( t  ^7 D9 d+ N2 M, [6 P6 L+ M' f
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , E% v8 V8 `5 r     "}"}], ",", / m2 z( ?1 r& \) f
       RowBox[{"{", 8 ~! {7 X) S3 s9 f% W! q
        RowBox[{: j7 ^8 F- y* ~2 {- B
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - ^  N+ p  c# j) o7 ]' ]. J      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 e0 i5 D; J' Y; ^) u" b% W     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 H! u5 x1 S9 G2 o% |( F! ]* ~5 ?     "}"}], ",",
    : |6 I2 T/ |0 A) U- T9 Q   RowBox[{"{",
    - U# X1 `# K( H2 Y, ~7 ~    RowBox[{2 F1 i# x9 p. s/ h/ f% |+ P
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ p, z9 h, b5 c5 z! u) {  C% I3 l4 j
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 J: n3 G7 y$ O9 B
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / k% z4 K) w" m/ m$ n     "}"}], ",", * s/ U8 x+ B/ D( [5 m# f( X
       RowBox[{"{", - V# ]6 I4 j* D7 q. P9 P
        RowBox[{" j% E, Z9 z( V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    6 s" k; v5 Y5 O! I# I9 _7 z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / \4 Z& D# D& y& k
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " u; ~0 @; {/ O  o% n     "}"}], ",", 5 p, _* `% N$ ^/ V5 L5 ], C
       RowBox[{"{", 3 F2 e& b- h( {0 e& s
        RowBox[{
    6 S: [2 a/ {4 D3 g' ]) L    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 P+ g2 X7 n% D/ [) l5 g4 }( r      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + @/ u: T1 B$ v/ g- F5 R6 H
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . u& J: v) @. O9 ?3 @     "}"}], ",",
    % |  w# }% L1 o- }6 x9 [, G0 z   RowBox[{"{",
    5 L, X  ?/ t+ C; ?  Z3 ^    RowBox[{
    # f$ L8 S3 Y* Y1 |    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ) {  }( W! i6 U6 y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' {# n: U( _1 a     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! X/ |4 V& S. X5 U- b9 t
         "}"}], ",", 2 U" r1 [+ M$ E/ }+ F
       RowBox[{"{",
    : z0 M, G% {# Z8 N( t; k" J    RowBox[{
    ! S" n  S. f1 x' f# d- t% n. ?    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ; ?7 t# `9 g9 D# F1 E4 c      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 z( R8 V/ y( J$ i1 b- ]1 e     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 r. z1 U; ^, D" O) D5 S2 t/ Q
         "}"}], ",",
    5 K' I( {+ r1 ]& D" I1 _   RowBox[{"{",
    & r" f+ m: g2 ^6 p    RowBox[{1 N; t  ?8 ~2 D! k
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",- W( L; ]1 |  G  I1 r
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - w( H! Z/ f- \1 i! i
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 ^7 I8 e$ A2 Y
         "}"}], ",", , f8 c  Y& {% ?4 N! x
       RowBox[{"{", 2 y0 Z( S- H% \  {
        RowBox[{7 K3 T, z) r" t
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 J+ C% m: k; r3 E2 M
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( C4 E% g6 e% U
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," @: [# K3 B: k( ^% F
         "}"}], ",",
    4 R+ U% ~5 L* W' u   RowBox[{"{",
    8 D8 X+ b( g; I    RowBox[{
    - A4 A6 H$ O, V* g    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," j% y! ^+ ^+ I) x/ Z) H# j; P
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 K9 p) S# W3 L  D4 s7 U
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],3 r& M* h2 n3 l  \9 O' ^
         "}"}], ",",
    6 g4 p* u4 d: ?   RowBox[{"{", 0 U/ C9 ~6 b+ C% {+ Y3 ]+ s' Y
        RowBox[{4 k, t7 m; c  N; r/ d: H* Q2 f
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 B. ^$ z+ u: ]8 w4 B$ ?      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 i3 o0 ?! w2 S1 v1 M+ V     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],- k* X' {1 f: J6 ?9 Z$ c: L
         "}"}]}], "}"}]], "Output",$ ?" ?$ L! L5 O: D* ]
    CellChangeTimes->{6 \, p3 K: V0 G0 D$ V7 T; T
      3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9}, % A& _" k8 P# O! _2 F) y
       3.577957579987569*^9, 3.577958891536294*^9, {3.5779619459910836`*^9,
      P9 B: @$ X9 X   3.5779619748823338`*^9}, 3.578012345453125*^9}]' b3 F( h0 h; T( b. }* Q, M
    }, Open  ]],
    & }  k3 `( s! W$ q( X
    / ]3 m( ?* C/ q2 H  Y, ICell[BoxData[2 A* G3 P; p3 ^! Y6 [: ]- H6 ]
    RowBox[{"For", "[",
    7 F6 z' H5 `) A" E" L' ~  RowBox[{# R8 E; F+ c3 L! v4 r1 f
       RowBox[{"i", "=", "1"}], ",", 9 |1 }6 L* X/ ^! m- R, Q* `
       RowBox[{"i", "\[LessEqual]", "60"}], ",",   P6 h& }/ g  t7 T2 H
       RowBox[{"i", "++"}], ",",
    $ N8 L/ E0 [, m" }6 k   RowBox[{"{", "\[IndentingNewLine]",
    ( q/ f. E4 v; \: U    RowBox[{
    - P# e. X# Z- y9 y% C     RowBox[{
    . a& Y  N% h+ H; v      RowBox[{"m60n21", "[", % }  j9 u1 ~. r2 _  A
           RowBox[{"[",
    4 F2 E* h2 r; K3 P9 F        RowBox[{"i", ",", "1"}], "]"}], "]"}], "=",
    $ N9 n2 P6 w9 ]( z$ g      RowBox[{"u1", "/.",
    % A5 Y, ~" `# @" y6 d8 s       RowBox[{"{",
    3 w: ^7 T, Y4 S" ~# t        RowBox[{' t0 Z- b* m5 n& T& g. X8 t- o0 z
             RowBox[{"x1", "->", 9 K: a2 l2 S) R( |" k
              RowBox[{"Data", "[", 7 l( \; V% J9 w# a
               RowBox[{"[",
    - w6 x# R  e  N. T6 C            RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", $ T" c% O3 y  |% {4 O
             RowBox[{"x2", "->",
    + g2 k3 S$ e' ~3 x! ^2 f# r          RowBox[{"Data", "[", & u# N0 Q* r( b1 o" K  y
               RowBox[{"[", " k* Y) n- w' {
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", ' P  l( F- p" f" A$ n
             RowBox[{"x3", "->",
    - E% ]* {8 a# |1 p: f5 _& h          RowBox[{"Data", "[",
      \% P% A, }) v) D3 ?$ r           RowBox[{"[", 5 [, P# v; v5 x
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", & g7 [/ m6 `1 N( u2 R; C" N- R8 v8 \
             RowBox[{"x4", "->",
    % b* ^  L1 y4 }' @          RowBox[{"Data", "[",
    1 p+ c+ M  |7 t& {           RowBox[{"[",
    ; k5 Y5 t3 C1 ?! }% }. s, Y            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 5 X4 f- v( X4 u: X' f# r
             RowBox[{"x5", "->", ; T* }" R# N5 a* }4 e4 v
              RowBox[{"Data", "[", ' V6 E( ]- E  @1 E; @* b
               RowBox[{"[",
    1 y# X3 y3 h/ j9 x2 l" a; b            RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    & i- c1 j: H# a, d7 J         RowBox[{"x6", "->", , P! e/ m* V0 r3 w7 O$ s
              RowBox[{"Data", "[",
    : ~/ Z+ Q& ]' p/ x; X& e           RowBox[{"[",
      O& }5 k+ q3 U' o% Y0 Y% R9 m9 U            RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    9 |2 Y8 t# V% J* {         RowBox[{"x7", "->", + ]' t2 n& i5 M3 U/ a/ ~
              RowBox[{"Data", "[",
    ! Q" ]4 T3 V4 T6 ?! J! Y           RowBox[{"[",
    2 |8 J  z- w" I+ u8 f            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 4 z' t: Y! \- H1 b: w1 N# D- G: i" H
             RowBox[{"x8", "->", * R- C! q4 [/ W/ M! L. e
              RowBox[{"Data", "[", ; {- Y0 h& U0 f. I
               RowBox[{"[", . t$ O' S- p. e$ ]4 z
                RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
      R  H+ B' [( e/ k  K) \         RowBox[{"x9", "->",
    7 ^/ y% ?2 U, a) }' _% q          RowBox[{"Data", "[", + u0 v% S4 t4 Q
               RowBox[{"[",
    $ m6 ~- E9 i2 z- @/ [& Z8 I# N% Z            RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", 0 _* K! ]$ O: _1 Z7 h
         "\[IndentingNewLine]",
    3 ~3 K2 V. [& G& k: J" m. g. y     RowBox[{
    ) E3 W; G4 f! w& R) W7 O# t( n      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
    * |* w7 ?9 r8 y: H神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗

    . o2 g5 g9 I% g& Q" f7 T! l6 B0 G(* Content-type: application/mathematica *)4 f) O$ m/ q' |/ x

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

    4 `: T, k$ n* x. l- \7 MCell[BoxData[
    8 d& b4 h. A# y; L% M6 p RowBox[{"For", "[",
    + I# B$ n; [" v1 ?% \1 e* E  RowBox[{
    / T' @4 g/ C5 p  b0 i3 o5 N   RowBox[{"i", "=", "1"}], ",",
    . ], A* [, ]* A' x, t/ h   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    . T# C/ S. B( q0 c   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    0 }$ F+ L8 R2 a# _) j* F7 d   RowBox[{
    . g3 R8 C9 j( g8 J. Q2 h    RowBox[{
    ; Y; ^5 H% A& v+ T     RowBox[{"CM", "[",
    2 A, H2 \$ i) A  @  ?% d. m      RowBox[{"1", ",", "i"}], "]"}], "=",
    : C# L4 m2 g5 m     RowBox[{"Data", "[", 3 |! V  Z! S) B7 B
          RowBox[{"[",
    # h+ f' @, u+ t% c, d8 l       RowBox[{"1", ",", "i"}], "]"}], "]"}]}], ";"}]}], # ^6 o4 F" d5 G/ T& ^8 s
      "\[IndentingNewLine]", "]"}]], "Input",
    3 w, ~& _0 |  @2 [  l% C# h CellChangeTimes->{{3.577844179875*^9, 3.577844181703125*^9}, {/ v: B" B% K& F9 r0 U3 w4 l
       3.577844217765625*^9, 3.5778442320625*^9}, {3.57784429953125*^9, ! ]4 Z2 A) _7 d8 \  F* a
       3.577844347875*^9}, 3.57791328640625*^9, 3.57791338828125*^9, . K5 G: b6 J# Y4 j& X' l
       3.57791344209375*^9, 3.5779588070933466`*^9}],
    ( @2 W% ?8 \" i; e2 G$ p9 g5 u, \' X6 L, b' }8 c& B+ }
    Cell[CellGroupData[{
    ! B7 q2 z8 e) m# o* \, m$ P
    ; R" x8 w- `3 R" V9 WCell[BoxData[{- z/ _5 ^+ y/ ^: t
    RowBox[{"r0", "=", "0.2"}], "\[IndentingNewLine]",
    0 ?" A  Q0 \6 ?4 v7 X4 F5 W+ [ RowBox[{"M1", "=", "1"}]}], "Input",
    ; R! w: ]$ Q# y CellChangeTimes->{{3.577844361578125*^9, 3.57784436678125*^9}, {6 E/ I' p+ m4 Q, X( z& n+ A
       3.5778457908125*^9, 3.57784580253125*^9}, {3.57784602534375*^9,
    , q$ x6 B1 Z( z& U4 k  h   3.577846109453125*^9}, {3.57784617128125*^9, 3.57784619321875*^9}, {; u% s6 A0 z8 h! u
       3.577846583984375*^9, 3.577846620984375*^9}, {3.577846653203125*^9, . _& V0 i! `: N' m
       3.577846691984375*^9}, {3.577846779953125*^9, 3.577846794921875*^9}, {% w9 G$ J/ k7 x3 M: F4 E2 u
       3.5778470791875*^9, 3.577847088921875*^9}, 3.577847409671875*^9, {3 Y! j. _0 P$ y% s
       3.577847477203125*^9, 3.577847523203125*^9}, {3.577847586484375*^9,
    7 e: g: X0 W. j4 n   3.577847600640625*^9}, {3.577847649140625*^9, 3.57784770196875*^9}, {8 I4 K  U' a# `0 W1 B+ J
       3.57784774896875*^9, 3.57784776490625*^9}, 3.577847981546875*^9, {
    5 F  _/ I0 M& v/ X   3.577913312890625*^9, 3.577913360109375*^9}, {3.577919262828125*^9, 4 A( S% p8 T1 o( ^8 i
       3.5779193133125*^9}, 3.577919388484375*^9, 3.5779605095479155`*^9}],
    9 x2 H9 q9 f6 I& Y3 e! ]6 u! U. J' V/ P3 q
    Cell[BoxData["0.2`"], "Output",
    7 S. f# |. y  @& [" X- p CellChangeTimes->{4 E. x3 y! R) y% L, b
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, ( N- {8 U+ c$ A: o
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {; i; g/ h7 M8 n8 {! R
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    , j6 f/ S" }: o; U   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {
    - h. E- l0 L7 }9 @- D2 m1 ~   3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9, 7 R6 r0 h3 N2 E% a  K
       3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {" w7 Q2 Q+ H+ A7 L
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    2 |8 ]% I  _, q2 F, U   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {2 u" S' T; [( d2 ?3 S. n
       3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9, # q* `& F% \" |8 T
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    , ^! f% e- V3 X# e! ?: D6 m   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, ! ~, a4 H! b; l  y' m5 L
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9,
    # E% p* r! R6 c! F/ @! x   3.577960510686717*^9, 3.578012149296875*^9}],$ B# k' R2 f0 J. r
    " ]$ x& x) ^) |- `! E8 V
    Cell[BoxData["1"], "Output",
    7 n+ b& l" `# l" w) v CellChangeTimes->{
    / C* f. F3 y7 M+ B/ q5 f6 L: _, j. u6 J  3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9,
    9 i/ O0 p! t3 B% |' p   3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {) t: c8 A( |& X  M7 [; p1 d9 g
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    ; q! |9 b2 {9 d4 ^" J   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {! G3 _  n/ t7 Y! Q6 o) l6 v3 s) z) M' i
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9, 2 G  M- n6 r  I' i$ l
       3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    " m% |/ [5 A5 ~; F& A   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9, $ }6 m9 y/ D9 H" o5 I+ T
       3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {( A4 G( [' T, V
       3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    7 [4 G. q; K( T! W   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    ! u, q+ j1 f' F4 W- a8 f$ S   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, 8 ]( b' J) F: F, u. U
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9,
    + J. E$ e$ P+ v9 |   3.577960510686717*^9, 3.578012149296875*^9}]# C# h% K; E" d
    }, Open  ]],
    2 t* j% w, |, m7 {/ W, F) @& N. T
    Cell[BoxData[
    - y. A3 l+ ^/ ^6 E: U: X RowBox[{"For", "[",
    8 i6 s+ S& W: A% Y. [3 f% D5 a  RowBox[{* u1 s" f$ Y/ O2 j& Z
       RowBox[{"k", "=", "2"}], ",", 6 U; C9 g  g+ \0 I
       RowBox[{"k", "\[LessEqual]", "60"}], ",", 2 e+ Q7 Y% C6 N0 n* c. }& u
       RowBox[{"k", "++"}], ",", 8 X+ H* m8 S$ @. {
       RowBox[{"{", "\[IndentingNewLine]",
      y" V# _- ?  j. m3 e6 l    RowBox[{' Q3 ]: U3 }7 w! t; ?0 F! E
         RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]", 1 q: z* b7 y, H0 p% g
         RowBox[{"For", "[", % N* k2 O* |4 ^1 {
          RowBox[{
    9 s* N0 `$ l+ {+ N2 s/ L       RowBox[{"j", "=", "1"}], ",",
    ( T; N  `1 O+ m9 V- ?; m% ^       RowBox[{"j", "\[LessEqual]",
    1 \0 E9 X7 D5 h        RowBox[{"k", "-", "1"}]}], ",", 8 b. n2 Y1 k5 u, G/ W) s
           RowBox[{"j", "++"}], ",",
    4 A9 h/ S2 s  Q' i+ r; T6 ~3 S: k4 J       RowBox[{"{", "\[IndentingNewLine]", ( y4 A& z* R" N0 @$ M/ h1 _- c
            RowBox[{" F; s5 O% Y( B; I/ E% m
             RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]",   L5 M/ n4 c9 h% n# a' t5 Q' b
             RowBox[{"For", "[",
    4 h+ ], t- i( q  K# ?8 z          RowBox[{
    8 e: Y+ I/ O4 V$ _0 i/ z* m5 h           RowBox[{"i", "=", "1"}], ",",
    ( T3 f$ \7 X( y% _4 B) q           RowBox[{"i", "\[LessEqual]", "9"}], ",", 8 P1 i7 f2 L% [  ~! P2 w8 o
               RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", - q& j; f. Z& ]8 U1 s
               RowBox[{- j$ r: ?0 N  j; J( d
                RowBox[{"r1", "+=", 0 R1 ?7 M4 z8 T5 ^' D3 F
                 RowBox[{
    # `9 A) f" ^+ x8 G) A              RowBox[{"(", / l/ r( M8 s0 e, h3 x8 X/ |
                   RowBox[{
    ) d3 }7 Z+ \( b3 C6 B7 k. z                RowBox[{"CM", "[", ! s/ H& o% O! J- W! D+ D5 [
                     RowBox[{"j", ",", "i"}], "]"}], "-",
    % u2 O& l' a) {                RowBox[{"Data", "[", . Z- o: _3 {6 j4 A1 p! A
                     RowBox[{"[", " p3 ?. p( U; ]; G5 d5 G' c
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*", ) o3 E, \: c' ~- ^  L3 j
                  RowBox[{"(", * Q. Y; Q# j8 M1 o
                   RowBox[{! l+ ?: s& p) ]/ _7 i$ Q
                    RowBox[{"CM", "[", & c& k, y3 K8 Y8 h9 }0 |
                     RowBox[{"j", ",", "i"}], "]"}], "-", # \: C2 f; W. A! T  G0 c$ i
                    RowBox[{"Data", "[", - h' O" p4 z- `# `- ^; d: w1 [/ Q: R
                     RowBox[{"[",
    0 j$ A2 M, I, J9 Z! N' }8 P) O3 Z( w                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],
    # j% L* a* o! U) f) W" B+ m           "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", ! w+ }0 e8 A, Y9 C- a1 y' e
             RowBox[{"r1", "=",
    1 U9 c$ Y' I. q          RowBox[{"Sqrt", "[",
    , g( W1 b' k$ {8 W2 N$ c           RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]",
    * S' i9 h; H2 n         RowBox[{"If", "[", " ",
    9 E% h9 N* Z: \, n0 x! a7 Q; y- u9 z          RowBox[{
    + z4 P. T# ]9 P- A* u           RowBox[{"j", "\[Equal]", "1"}], ",",
    % A7 g% b& p9 }9 w% e# M           RowBox[{"rmin", "=", "r1"}], ",", ( `8 q: B1 d; ?/ x
               RowBox[{"If", "[", % C% z) T: F2 u8 z' q
                RowBox[{& N9 s( M8 f" }. X
                 RowBox[{"r1", "<", "rmin"}], ",",
    . w9 J; U4 J: G0 j0 k4 h3 g+ Z             RowBox[{"rmin", "=", "r1"}], ",",
    0 }* j2 F9 \! _$ {6 F, B0 e' u0 s' `             RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}], 2 i. a6 V$ {% a( L8 R! V, n# e* j+ x
            "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";",
    ) x7 t# I: T" z. Q     "\[IndentingNewLine]", 1 p2 v' C) H! \3 |( d- G. p
         RowBox[{"If", "[",
    ( {9 e; w6 o, A2 H5 v      RowBox[{
    $ ?- z- z+ g" [" |" F4 ?       RowBox[{"rmin", ">", "r0"}], ",", 5 A* m' W  ~1 g! O8 r/ A
           RowBox[{"{", "\[IndentingNewLine]", / `& o+ Z" y" e4 }
            RowBox[{* ~! K- ~& ~0 q
             RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]",
    ; ]6 `, P% h! f" v8 f. h         RowBox[{"For", "[", 5 k' I, E" L1 {* l8 }
              RowBox[{) y% a- m3 f; ~  T2 u, S
               RowBox[{"i1", "=", "1"}], ",",
    5 f1 b5 N/ O4 ~9 [           RowBox[{"i1", "\[LessEqual]", "9"}], ",", : o, A5 ^$ x* s4 @. p4 f5 Y
               RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]", ' ]5 F! V1 T! a0 w, C8 g* _
               RowBox[{
    + F$ H/ d" n3 S6 `' Q+ S1 Z            RowBox[{) i0 p9 P$ j8 q+ p) X
                 RowBox[{"CM", "[", 3 l7 ^( o- C: l6 L. G
                  RowBox[{"M1", ",", "i1"}], "]"}], "=",
    9 w1 H; g* e; g- q" L             RowBox[{"Data", "[",
    4 e% r. K# R) t9 G# `: U( M              RowBox[{"[",
    ) A$ C& M  b  D; K9 V1 g2 D# H! G               RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}],
    1 ?4 d( H- L8 o+ p3 H! Y! O+ ]          "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",",
    4 N+ h5 ~3 ]- Q+ ^. V       RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}], 7 o: u- k- q  ^. v( D; _
        "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",
    , Y2 C& N4 [) j" Z; Y' x1 s4 ~" L4 |9 [ CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {& ~' ?1 B: h  {4 L; \3 X4 Y
       3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9,
    3 O* |6 H6 @, h( H/ z( p   3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {
    0 g% [6 H: ?. S4 j: A3 X3 Q* {   3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9,
    * t* W0 F) ^( m, C# H% S/ m   3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {3 `: c) d& L9 q
       3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9, 1 k. d/ |. Z# Z: C8 I0 Y# S( b" h( h
       3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {
    / V! q! e/ s( [; H) \" z   3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9, $ N- }& v3 M9 {, a" C
       3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {2 Z/ N  V# C7 y+ b4 U
       3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9, 0 \5 L5 a4 Y( O# x
       3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {
    % o! d' b0 P( k/ x% z   3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9,
    4 }$ ?$ w9 j! G! c9 _' G: h1 B2 A   3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {; m, F+ A' a8 D% `. v' y
       3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9, . P% j5 Q" e% ^# ^! a8 W
       3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {
    ' w& \% u8 d1 B- l7 Y' f0 ^& s& P   3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9, ) [5 D) y9 r5 |  \' X
       3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9, # v* D% U# M# r' s& ]3 \/ I
       3.577958821991373*^9}}],
    9 t0 ^5 q. H5 M' h4 h4 L+ Z9 G! e9 W1 H% j, u6 Y8 L' g
    Cell[CellGroupData[{& ^# M, T$ g" D& r: `# O& p
    1 l4 {' B4 f9 ]
    Cell[BoxData["M1"], "Input",
    4 \# U- l9 a; `1 T' P; m CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],) X5 |, G  Z. h5 E

    2 Z' c. ]) J+ |) nCell[BoxData["21"], "Output",8 [, Q" t7 K4 Y; t
    CellChangeTimes->{( u3 `+ I( x% k* A, Q# b8 f
      3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {0 G2 `3 Q4 m5 O, w
       3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9,
    : A- X, u  z; @9 S% b; H( r, R   3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {! d4 J7 \* g. q0 \& ?
       3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9,
    ! m& |. \# p/ N, e   3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {; o0 A, j8 r0 e9 X* i% x
       3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9, ) E! R# d  Y: L1 i/ ~6 B) O
       3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {$ ~# h. D5 n! J% h8 P
       3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9,   }' _9 \$ }& u) H/ |3 F. d. z0 f
       3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9, ! W, _5 @9 ?4 b; j
       3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9, " B- L& b8 k) p6 A
       3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9,
    & E3 C! m- L7 `   3.577960515600726*^9, 3.5780121541875*^9}]
    6 B. _+ [- X! e. P/ d: n, v4 l}, Open  ]],
    6 ~. c5 C# M' {" S4 z. z1 y; u
    Cell[BoxData[0 p# V& B( N; i) T  x# a1 J  D2 ~
    RowBox[{7 Z8 u2 {) V7 t$ a
      RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[",
    ! r+ ]- H6 w+ x9 s0 v# N   RowBox[{"1", ",", "i"}], "]"}],
    5 X$ F& H( r- s" o  RowBox[{"\:5230CM", "[",
    ! ~, T+ e* s5 e3 E' D   RowBox[{"21", ",", "i"}], "]"}],
    / u5 n5 d# [6 I( P% C  "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\
    5 {5 e" s  r7 c2 C5 n7 _* M\:51fd\:6570u1\:5230u21"}]], "Input",
    8 E& U# l6 Z- ]: S+ @0 b CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {. h5 D" P+ k: P! F) }5 r6 r$ J
      3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9, 7 p4 ^2 i, r' V" j6 R3 L9 o
      3.577960526583145*^9}}],
    ; A' h0 ^! a/ D$ e2 _
    $ U. H. O& p7 K; K5 LCell[BoxData[" p% X9 F! g) i: v- X
    RowBox[{"Clear", "[", "Delta", "]"}]], "Input",
    9 j) z! }, v, i: p3 S0 H CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],/ X8 j3 h- ^! Q$ f  c1 k' q* L* f

    1 ~: @0 t6 C; V7 n' |Cell[CellGroupData[{) U! }( h7 _! c: z9 l

    8 x# A& s( c- n2 Y3 ?% LCell[BoxData[
    + b; d8 N' j0 e RowBox[{"Xa", "=",
    ! F1 R- m" J1 Q. S1 T  RowBox[{"{",
    + V) c. c$ k  j( q4 h/ U& [   RowBox[{
      Z0 r$ t2 i  B, [7 ?. C, f   "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", 8 N. u# `0 p1 k7 a- G& m
        ",", "x8", ",", "x9"}], "}"}]}]], "Input",5 \& \7 y6 k" f4 L. R& Z
    CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],: t" A  ?' P/ {! J' _7 g& H0 W: f& z

    ) q% e2 S, ~6 C' z9 yCell[BoxData[2 D' d) a& A; Q  H6 D! |$ D7 D  J
    RowBox[{"{", 2 _# h! Y% S% u2 {0 U* n9 F
      RowBox[{
    * M) R6 N2 M) ~! t- X  "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",' f) `0 _+ O+ z' Q! D2 S
        "x8", ",", "x9"}], "}"}]], "Output",6 M6 i  ^% j* b1 p7 n0 {% y
    CellChangeTimes->{0 A  e9 f$ L! ?7 D! `
      3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9, 3 J/ A0 m8 J% W9 \
       3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9, 8 C6 b" T4 ^: A+ t
       3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9, 6 l+ j! M1 T2 q1 U0 Z
       3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, ! r3 m: ~5 O# E( V
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {- s( K/ k" e7 F: `
       3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9,
    ( E5 J$ W3 N3 s9 U   3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    # T$ I" V; p, G! x   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {
    . P( c3 Y3 r9 g1 R; ?5 [1 R# F   3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {
    . e2 E) Z) F& ]. i   3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9,
    8 z; D6 m8 @- l% d. \  T- T$ y   3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9}, . I3 Y- g- `! P8 n$ R/ C
       3.57801215725*^9}]
    # `: |& a) r, y2 k0 X}, Open  ]],( K, p5 x* u) v: ?$ G

    5 B$ [+ |6 O, `/ ^$ A* JCell[CellGroupData[{1 g/ n8 T; q1 I2 G
    8 r9 Z: A. @8 c
    Cell[BoxData[7 Q3 O, Q" ?) F
    RowBox[{"Ca", "=",
    # w4 j8 {& ^% Z  H  s' j  RowBox[{"{",
    $ t/ z  B) e9 j5 a8 {+ m! ]  b   RowBox[{" _2 G5 S0 A1 Z: M7 d$ Y3 M4 ~
       "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7",
    8 E* J" z( N; o    ",", "c8", ",", "c9"}], "}"}]}]], "Input",
    ( G: y* Y+ ]: B CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],
    % I4 [; B* A7 Z6 f4 |& }2 {" C" E, {' v. h2 W
    Cell[BoxData[
    ! I( m6 u( S$ A0 I! @$ b8 p2 V) h RowBox[{"{", 0 W  l+ y& g& S6 m( i6 ]
      RowBox[{
    , w0 y( U4 |, K8 D8 a4 F  "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",
    1 s+ D8 V9 y6 o7 V7 X; y    "c8", ",", "c9"}], "}"}]], "Output",
    ) y& ~2 u6 M2 C  ~4 m, g/ I* b, b CellChangeTimes->{
    3 Z3 |1 `! i9 v! W9 l  3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9, / Q9 I8 c$ k  K2 j# l+ y- b1 b
       3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9, $ W5 g+ a. h1 Q, b+ g" }4 Q  O
       3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9,
    % y) T2 T3 y1 Y9 v7 B' g% ~  j   3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {9 Y7 F% ~& B6 N. z, O4 _1 R
       3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9, 8 ]6 U, N" R& p! q0 V
       3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9},
    . X7 x) }3 J$ w! I+ L   3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9, . Y, q  y1 ~1 j# n2 }( y
       3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9,
    8 ~) B2 I9 \4 r; {3 s; A   3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9}, ' E6 X' Q$ h/ S, D1 o
       3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {. O+ y$ e4 A3 \2 B1 q' g& D
       3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9,
    . G- `1 d: w7 b5 f   3.577961904604212*^9}, 3.578012158671875*^9}]
    9 P: \) E6 F) R1 S/ S, @/ F}, Open  ]],
    - N- v) H4 k- w; }) S( X3 d& w& S' o9 q& M6 k6 ^3 E5 Q; ~# d  g5 x- T
    Cell[BoxData[
    ) j" R  C- ]' j+ ?( y9 g; k5 [ RowBox[{"For", "[",
    7 \' q1 z) t+ C: A7 R7 d" c  RowBox[{; `5 D1 s$ S6 E* E
       RowBox[{"i", "=", "1"}], ",",
    ' |3 i8 E; H: U. l* A5 C   RowBox[{"i", "\[LessEqual]", "9"}], ",", ; J4 n" Q/ S6 g6 A( j! s
       RowBox[{"i", "++"}], ",", 9 A) W! ]3 o1 U$ v
       RowBox[{
    ) n: i1 w' C3 G1 |* G$ p7 J9 G    RowBox[{"Ca", "[", + F0 w$ M$ @; `  x2 w
         RowBox[{"[", "i", "]"}], "]"}], "=", * Z" T: S9 f* |. z$ D# R8 n
        RowBox[{"CM", "[", ; j8 m2 i/ K$ u' B& x- q2 o4 T7 D% o
         RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",
    9 `# }+ Z& j, \; }8 l CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9}, % s5 o; m, |7 r, O. R* I" W" k& u
       3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9, 9 v, [, s5 i4 l: H
       3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9,
    ; u. L7 T9 M1 j4 z  O   3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9, ' F  \% e, W; C- e; h' t0 [  s+ _
       3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9, 2 d7 z. Z6 m8 ^' R2 o- E
       3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9, . W2 k5 F2 V$ J7 I7 q$ a) w% m& R
       3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9,
    + [: _! P1 O2 |# e, [. _  L   3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9, $ X) Q' E, P; X8 S6 i* b! F. ^
       3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9,
    8 K. S) R" Q2 Y6 n   3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9},   Z, i5 l# e& S
       3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {
    5 u: x- m, z/ H, z1 E   3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9,
      h% ?; o& g! T" z   3.577961906897415*^9}, 3.578012176296875*^9}],
    # ^% s; ^5 \* z' }' w+ }, g8 C$ R/ A5 I5 z
    Cell[CellGroupData[{5 S! B& [- X  i6 z6 }
    6 q! N9 S& v! [% _" K
    Cell[BoxData[
    1 d2 P8 m3 T6 D, J/ V RowBox[{3 m3 u3 J2 m6 `
      RowBox[{"(", 2 {  H7 G$ D% g% K  V
       RowBox[{"Xa", "-", "Ca"}], ")"}], ".", : \6 i# l0 s" X
      RowBox[{"(", 7 b! X3 i' n5 F( k3 z
       RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],
    % {* j# b" g% u1 c& I/ ?; h) W& l8 `
    ! _% o7 x% l; FCell[BoxData[
    $ @8 u$ k7 G) Z$ D: D3 k* J: x RowBox[{
    . `8 W0 U. R1 `# Z& ^  SuperscriptBox[5 @% x' z8 S1 x$ b$ B: W; ~4 S
       RowBox[{"(", 3 {* |  b; ~3 Y& v
        RowBox[{9 i7 E" F$ l. y! k
         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+",
    : j, Y$ _; `6 [* d  SuperscriptBox[
    7 x+ X) m1 ~9 }3 ]$ X. r0 z   RowBox[{"(",
    1 x2 p0 D" w' b$ c* W    RowBox[{
    1 v0 W5 `8 ~9 |& {     RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+", / K! z& y) L6 s: d4 |' A
      SuperscriptBox[
    1 d* T# Q( N+ c   RowBox[{"(",
    ! {/ P' Q7 [$ K; M$ z    RowBox[{
    - T" y" L  \- l2 o: b! z     RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+",
    ( @0 s  K# o# M* V  z7 b2 l! W  SuperscriptBox[) a# I  |2 Z4 L& a, v2 f! _
       RowBox[{"(",
    2 ~4 Z3 J. W( }, z* c- c) v    RowBox[{
    5 N4 S, }- `9 s! e. K     RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+",
    , ^' x: r. Z0 R7 M2 D( |, M  SuperscriptBox[' {: q" S% c7 p$ ], K; n
       RowBox[{"(",
    & M/ I8 ~! i. d& r    RowBox[{2 T" S0 \" x& z+ u( g% \" L
         RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+",
    + _! R& r) S$ G  SuperscriptBox[
    3 S4 j) C+ K& k0 |/ S' _/ w   RowBox[{"(",
    ; C3 o' R$ g0 u. Q9 @, h3 A    RowBox[{
    / a# z3 ]( m+ \' \/ r& k5 x$ Y     RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+", 4 h! n4 a: B% C& F/ F
      SuperscriptBox[
    " h6 ]5 j6 ^+ t: U! y5 v" W   RowBox[{"(", 1 B5 C# v2 o; Q" j9 }% H2 o. Q6 ]2 y# {: L
        RowBox[{
    - q& @5 n5 ^" j. Z( s1 T     RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+",
    + l3 J" Z' _6 R" Y# ]0 O* r. x) ^  SuperscriptBox[
    , U+ W( e; A/ K- j3 q1 k   RowBox[{"(",
    2 t; Y4 B- _9 ~" g$ ~    RowBox[{
    ( K7 }: D: c3 K! |( F     RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+",
    7 ^& m; T2 [2 n$ B& @$ @$ w  SuperscriptBox[
    , S. ]! a8 v: G) o6 }/ X   RowBox[{"(", % }& f$ {6 I2 e5 r3 u' u
        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",5 ]' T1 M: }! {, {  D! P$ D
    CellChangeTimes->{
    # R1 V( N. R5 C7 u  A1 Q0 q  3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9},
    + |. G3 }2 v- V   3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9,
    9 J: ^, [; |( z0 a' Z' y# a* b   3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9,
    6 f: O5 w. X8 `# U# i, `3 G( ~   3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9,
    : C/ o  }! E- H' z# i& V7 K   3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9},
    5 W5 U7 p: {/ A/ z- a* b+ @) ~   3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9,
    7 X1 D) ~7 F6 z   3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {
    . i* h+ D4 ~, ^   3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9,
    5 J* b: v# ?. {$ e. d0 Q   3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {
    " x$ N" n- o5 w6 Z6 i& L: b   3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {% O; \5 L' E# g
       3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9,
    ; S' ]( W8 T) m* K9 ?& l- n   3.5779618537169228`*^9}, {3.5779618846049767`*^9, . ]/ E& P  {- n' v
       3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]
    * P7 {: Z/ q4 p  w/ t5 u; N% x& |}, Open  ]],
    0 R3 a& Y5 _9 s9 K/ z5 C, y. ?! N
    Cell[CellGroupData[{
    4 E" x9 ?7 o) @$ {
    5 n, O1 `9 |$ z' x( jCell[BoxData[5 |+ J4 K. ?' V& N& U# O  }
    RowBox[{! {3 E! i7 [6 H6 w* ]9 Z0 R
      RowBox[{"Ca", "[",
    % w% N( v9 M. q3 X) h" x9 J, d   RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",5 n0 t% |& |2 S6 L& \
    CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9,
    , V) c- B! o: j4 n% o  3.5779616465173616`*^9}],
    : h3 I9 H1 y0 K6 H" P! @% a3 D7 M# b. k4 F* w% [+ Y/ A+ [
    Cell[BoxData["0"], "Output",
    ) T1 [4 ~7 n+ j6 c7 u; i CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9,
    1 G* N6 i) I% q+ y  3.5779616484049644`*^9}]
    8 ]: j5 _5 l2 W9 e" F; q' T}, Open  ]],
    ' z5 K& F+ [% r3 m
    " c  V1 H5 X( K' B7 [Cell[CellGroupData[{2 ?2 w4 a4 f/ i" H

    ' \! @0 h* L( I# }Cell[BoxData[: t6 W4 m  t8 X4 }
    RowBox[{+ j" R0 ^+ e6 O. h$ N" A
      RowBox[{"Ca", "[",
    % X; a) ]* n/ F2 q   RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",
    , M4 R% {9 j5 i: E+ v/ q4 y CellChangeTimes->{3.577957376235614*^9}],
    2 S9 j! p# W7 b0 Q2 P( u/ h( X% G+ |7 C
    Cell[BoxData["0"], "Output",
    + J) s6 r( F- X" F8 J6 o6 a CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]2 _9 o9 b+ F! \2 I! C3 I% }2 d
    }, Open  ]],
    + m! ^. i% F4 A: C+ b+ x, ?# `8 g; C  g
    Cell[CellGroupData[{
    - e0 j+ h. ]8 j( b& H& r) {5 [
    0 M# h9 e3 d; }' o8 y; L9 `4 [Cell[BoxData[
    5 t3 s0 Z& O. } RowBox[{
    2 z2 u' ]9 ~8 Y. q& @5 M1 Y  RowBox[{"Ca", "[",
    5 C  z( t3 [. L  a: r   RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",
    ! f- Y' h3 R" q/ B4 S: F CellChangeTimes->{3.5779573112927003`*^9}],
    2 {  c  M+ k! G3 F8 g9 S8 e( U& `; V8 y2 L& |
    Cell[BoxData["0"], "Output",
    8 ~, ~( N( x! `- R# K: a: ^ CellChangeTimes->{
    3 h2 J/ Y6 k* Z# \  3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9,
      K* r# U" W8 p: ^   3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9, 5 f, K9 q( d* s. }% ^( f# c
       3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9}, $ ^  U$ b1 `6 T9 L/ q# I1 f* Z
       3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9, + O$ a5 |- L8 t4 e+ Y0 J
       3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9}, % V4 ^" L$ ?$ `0 M
       3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]
    . o5 y! E7 U2 _+ A: v( K: j" q4 d+ [}, Open  ]],0 f# X8 A) d8 T3 z
    0 P7 v$ J6 b7 W2 ]8 O% ?7 h# b% e
    Cell[CellGroupData[{) a" y) |/ `* W: h

    ; C3 X, W% d) X. |Cell[BoxData[0 T/ @# y2 l5 ]1 D4 U, H( ~* n
    RowBox[{
    ! g/ z+ N- `. p; `+ f8 a  D  RowBox[{"Ca", "[",
    ! r! P+ n6 y: l# t7 M   RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",
    # e0 b3 r8 T" J; z CellChangeTimes->{3.577921461734375*^9}],
    # H  Q! f5 m2 C; t4 T* g! y2 M1 K3 A) L/ d
    Cell[BoxData["0"], "Output",
      s# |9 |  G3 I$ K# x# t CellChangeTimes->{
    0 `5 [3 |# Q) n6 m. U  3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9,   e1 _7 o& Q+ ^& s( \6 w
       3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9}, ' \$ [$ `: U. y" d/ b3 [- Y) B
       3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9, 1 W/ a% w; M6 x' f/ a
       3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9,
    8 W; N+ L; \7 y( n   3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]
    9 H0 i+ B+ J+ W( B  S}, Open  ]],# k! l' k0 [4 i5 ~

    ( F5 c+ B3 V5 @Cell[CellGroupData[{0 ?% G5 X* l, E5 B
    + g5 H4 O" \4 G
    Cell[BoxData[
    3 f* b! Z, B- _( a0 c RowBox[{, a) q: [4 V' O. @% ]
      RowBox[{"Ca", "[", - h, K" q4 Y" L/ k
       RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",% e; d5 q( ~- S8 _/ M& n  O
    CellChangeTimes->{3.577957303118286*^9}],
    1 c( P: i4 Q% C. M- W, D: C
    : s8 S3 e4 ?5 @, F: m. uCell[BoxData["0"], "Output",
    % _1 n! L6 t0 H4 E CellChangeTimes->{$ u, J+ D) \2 q3 M6 T; f8 `
      3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {; |) F! B& [/ {, D
       3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9,   ~0 ]( h' [1 j
       3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9, ) C( u8 o! s! Q, {- W- @
       3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9, 7 H& l2 }9 k( [/ v
       3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9,
    $ O* @3 f5 j/ R; d+ v9 X% Z/ l   3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {1 u% N+ O" c& v2 b+ a
       3.577961889378585*^9, 3.577961912965826*^9}}]
    4 a  U- j" z$ m* u, N}, Open  ]],7 S' e/ W2 L0 L$ D1 l
    ( e8 L) U& r# ?: k3 ?
    Cell[CellGroupData[{" q0 G! W4 a9 ?3 Q9 ]) w

    5 o& y% h) d$ e- G% D: jCell[BoxData[
    1 Q1 z! O, l6 k& Y5 |( `, g RowBox[{
    4 A! r$ R6 f; R4 M  RowBox[{"Ca", "[", , f! o4 {' i, x* P
       RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input"," z! u; x) ?0 e( K6 d
    CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {4 ~% M  Y5 k9 z+ I$ K1 h
      3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9,
    ( `3 b: N, m, O# X8 e+ l  a  3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {/ A8 Y  J6 q0 l6 d5 [! t
      3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9,
    % R/ V. K2 X, Q/ S, g/ I  3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {
    . t0 w% P3 [2 A  3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9,
    1 @5 y3 d2 Z# F  3.577921435703125*^9}}],4 n; D- G# C9 W7 i5 ]
    " i; D( q" e  N$ U
    Cell[BoxData["0"], "Output",
    ; C: s* G" r$ B% `7 e7 K CellChangeTimes->{  }4 G: a$ f( d; A$ G. t6 i
      3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {
    : ~' }; N2 ~' i   3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9, 7 S2 U4 w; C2 K) D  V1 ]( K
       3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {/ m) X" U% [, x' \; e+ Y. r* K
       3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9,
    ) Z+ m$ R1 e) a; \8 r& O6 Z   3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {
    " Z1 A* L# Y6 p* o0 x3 j: J& c   3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9, ! P1 C7 Z/ l/ c2 Z, C- K% P
       3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9, 1 K# V; d2 W7 ?' s" s
       3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9, 8 x2 D5 G. O6 d9 s' ~
       3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {
    ! N/ B3 o) t3 j3 }8 @' B   3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9,
    6 c. E' E0 g; D* B   3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {
    ) K& l6 A' U2 |  }* Y2 k% `0 E   3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9,
    8 r. ]+ p( X: |4 R1 d3 ?   3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]
    ' j1 b6 o2 ~0 x: E; F+ M}, Open  ]],6 I7 ^- W+ ]1 b( P

    * F7 |4 m  Z) f9 K( O, iCell[CellGroupData[{
    ! M+ q. i1 d+ b: Z( |! h5 `) A! \/ j  d" R- ]; P1 R8 ^  k# j0 W
    Cell[BoxData[
    0 [- K) t4 {# r5 ^' s RowBox[{"Delta1", "=",
    * f+ [+ B) @0 ]" Q: d& o* s  RowBox[{
    2 }9 O1 K2 F! E$ b( e* o   SubsuperscriptBox["\[Integral]",
    9 o& B. N5 c5 u4 o0 f+ J    RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 5 V5 z% x. V' w- i: v4 P* F
       RowBox[{
    " F( l4 k8 ^+ \- w, a! Q    SubsuperscriptBox["\[Integral]",
    " s. ~& n" p6 H: `. k! \6 i     RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], , W, _$ e2 }: ?( S$ g
        RowBox[{9 P4 m6 |4 |; H5 D
         SubsuperscriptBox["\[Integral]",
    ( k. C7 R- }, Q8 o- U0 |; |      RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ' U, v1 H  e% f( ~
         RowBox[{( v( _, e  j+ J/ ?  u4 {
          SubsuperscriptBox["\[Integral]", * G3 W% f9 c3 u
           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 6 z  T0 Z( N2 F6 j/ F; o& c
          RowBox[{9 K9 s2 @0 V; |% D6 u% Y4 {0 W: Y. Y
           SubsuperscriptBox["\[Integral]", ! l, v! n3 t( Z2 H
            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], , h9 \; v4 |5 X1 Y* \; @; I
           RowBox[{
      {$ I0 e3 E, |  W+ b; h* q3 P7 _2 _$ n        SubsuperscriptBox["\[Integral]", ; j: T" z' D7 v; Y1 H* |
             RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    ) m' l# S5 v$ V; Q  o        RowBox[{1 m2 v; w5 Z$ k* f" }; A. C
             SubsuperscriptBox["\[Integral]",
    7 ^( Y" z9 ]7 s$ F8 L# ]% R, h1 p          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
      P5 v) Z2 {, M0 T( V9 w# ~         RowBox[{; W- s. k0 l8 l, i2 q# M# }
              SubsuperscriptBox["\[Integral]", / T# H- e- ~. P) T$ @: m. I
               RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], - P, l6 U" j* L/ O8 i3 ]; t
              RowBox[{
    1 K+ D- t( s1 j  b' @+ m& M           SubsuperscriptBox["\[Integral]",
      K3 p$ O' ^4 C            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    , [2 V" _1 R, {: M# u: C, `           RowBox[{; _* c/ E, x: i/ v+ t; X
                RowBox[{"Exp", "[", ! V. @1 N# ~( L; f$ x
                 RowBox[{# x& P4 G, P4 Q' n# M
                  RowBox[{& W0 l4 V7 V6 l  u/ I$ _+ W
                   RowBox[{"-",
    $ [+ `' S4 |1 l! A# k# D1 I                RowBox[{
    ! {, Z, @7 A$ W                 RowBox[{"(", 1 J. n. \& C0 l$ k
                      RowBox[{"Xa", "-", "Ca"}], ")"}], ".",   Y- g( b7 p* i- a2 f
                     RowBox[{"(", 4 x# ]% t0 v- g
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", ) \4 j% L, j& ^0 M6 A5 I
                  "Delta"}], "]"}], 8 H& D0 @0 o! |
                RowBox[{"\[DifferentialD]", "x1"}],
    1 G* [% o; j6 P, A            RowBox[{"\[DifferentialD]", "x2"}], / |( g! R3 g' R' P! C/ Y# Y
                RowBox[{"\[DifferentialD]", "x3"}],
    ' R# j) I) J  y* \            RowBox[{"\[DifferentialD]", "x4"}], 2 N- V, S8 `; i" A
                RowBox[{"\[DifferentialD]", "x5"}], 1 N) P) }0 P  n$ n# U* V: n
                RowBox[{"\[DifferentialD]", "x6"}], 7 W2 A1 e/ M4 p! Z- v
                RowBox[{"\[DifferentialD]", "x7"}],
      ^' E% j( T7 B* E& ~! B$ i8 C% |. A            RowBox[{"\[DifferentialD]", "x8"}],
    , a( a- {- R& D6 l& U            RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input",3 |9 `1 g5 z7 e
    CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {' x0 k! X9 z: Q# |- G0 S& L
       3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9, 3 l; H2 `: Q% U3 Z
       3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {
    3 y+ F4 x& ]: u8 t: l/ Z! r9 u   3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9, ; e+ G3 r0 Z0 S- y: S- |! s
       3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {
    ' k1 K. _$ s; F9 s/ H   3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9,
    8 V0 \1 k3 P! o$ W- Q: w   3.577918964453125*^9}}],
    - R  i- I. x) E2 r5 l
    4 s' t: ]$ B/ q" L3 ^( oCell[BoxData[1 y, l& @3 {. P3 o
    RowBox[{"97.40909103400237`", " ", 5 S6 b" `! Q) a: R  {+ c* g9 H2 F
      SuperscriptBox["Delta", "8"], " ", ) h$ T% R1 c" Y7 M
      RowBox[{"If", "[", 6 F- b5 P  ~/ F! R$ @) x, \3 |
       RowBox[{
    , b/ G/ t+ v: p    RowBox[{8 H9 s5 t4 G  U3 I0 s
         RowBox[{"Re", "[", : L/ F9 w* a3 G
          SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",", ) T7 a! t/ L& P  |& v
        FractionBox[
    , \! g4 Y: C3 i     RowBox[{"1.7724538509055159`", " ",
    8 O, i% w4 Y9 g" j/ i# ^      SuperscriptBox["\[ExponentialE]", ! U: z/ l" Z2 u% u/ n
           FractionBox["1.1102230246251565`*^-16", 5 @  @+ q7 \& {8 ?- I3 i
            SuperscriptBox["Delta", "2"]]]}],
    ; a+ z/ M, l( a     SqrtBox[+ r8 a* Z! s, u! U
          FractionBox["1",
    ; R9 H0 S$ }7 k+ l4 h       SuperscriptBox["Delta", "2"]]]], ",", . [& P9 ?3 h& ^: e/ I
        RowBox[{"Integrate", "[", 3 j7 v0 d7 @+ b: P- T7 H$ N
         RowBox[{
    8 n, ^1 M1 |' U8 i) ^4 W. v      SuperscriptBox["\[ExponentialE]", 4 K  O. J# [" R/ N6 v" L0 Y9 {" G# O
           FractionBox[- V8 Q% P$ H$ f$ k: a; }8 M
            RowBox[{"1.1102230246251565`*^-16", "-", ' m/ ~% O8 |) i  u
             RowBox[{"1.`", " ", + h3 n/ e' _( t9 }: V
              SuperscriptBox["x9", "2"]}]}],
    * a/ x4 u- E: I, g9 {        SuperscriptBox["Delta", "2"]]], ",", ; A' ^( y6 N8 L" |) U) T
          RowBox[{"{",
    5 ^3 ^5 x; }: J6 I9 O6 I4 ?9 @: B       RowBox[{"x9", ",",
    " W7 B7 T, i2 ?/ y/ K8 g        RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",",
    2 a, o) ]3 R% h" t5 P: H( C      RowBox[{"Assumptions", "\[Rule]",
    6 y5 E8 M9 Y% I+ T2 m6 G3 ^       RowBox[{
    " ?. O  U) m2 o  k0 r        RowBox[{"Re", "[",
    ( W7 f& D# G' U+ x         SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}], & m: l! A- v# {8 D
         "]"}]}], "]"}]}]], "Output",6 d/ E! R" b5 G& Q
    CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9, 0 H* @7 D$ b% {% ?: b/ n# A' h* E+ a
      3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9, 6 F/ k: {. _  c/ g/ s( b& y
      3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9, * Z1 W$ ]  ^- a+ k0 u( r
      3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9, : y7 i. W. ?- W1 ^
      3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9,
      R! V! x! f- n  3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9, . a! W& ^1 a" }, }
      3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]& ~: I9 c: ^+ N2 A8 X# Y9 \$ u6 i
    }, Open  ]],- j+ t. C3 k9 o, a4 n1 O

    * m( Y; v& O/ `Cell[CellGroupData[{% F) {3 d. r; b; n6 I4 |
      d5 }3 S) ?9 a+ i
    Cell[BoxData[
    ! M/ G1 n+ h- A RowBox[{"Delta1", "=", 4 z" f' ?" K$ l+ D5 m# @' k
      StyleBox[7 g# H8 @: l, c, S, v
       RowBox[{"97.40909103400237`", " ", : T% M+ u2 c- v9 r- ^7 _
        SuperscriptBox["Delta", "8"], "  ", & ]! @8 S( H$ @  K9 Y$ V
        FractionBox[  r8 Q2 f  B  N0 ?' }& }+ T
         RowBox[{"1.7724538509055159`", " ", 2 T: l3 @! e7 u# K
          SuperscriptBox["\[ExponentialE]",
    5 f# `  `. a5 s; x. e* y, l* }+ I0 H       FractionBox["1.1102230246251565`*^-16",
    + L6 H+ Q% Z6 F/ [6 V        SuperscriptBox["Delta", "2"]]]}], + z% F, y9 t8 C9 a+ m3 p) N5 B
         SqrtBox[% \& v+ _5 T* _% ]8 M' u1 [
          FractionBox["1",
    # t' M  F5 b* L  V0 C/ ]  Q       SuperscriptBox["Delta", "2"]]]]}],
    / F; }: ^7 p: h+ D$ O0 R, \: z0 Y   FontWeight->"Plain"]}]], "Input",
    - m6 K4 b2 ?% Z; o" P- b CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {
    $ m* B. L; M  Z   3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9,
    ) ^2 S- A* K4 v6 k* T, W1 w3 K5 p   3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {6 l$ u% Z# N2 v, ~4 u6 Y
       3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9, 0 M, a7 m5 v2 t! v# s7 z1 F
       3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9},
    9 h! y9 b0 i: w) |. x   3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],
    2 q3 y0 z5 n. t# l, N  i8 Q
    " s* B' {; j& H: j  m* E3 s; M+ aCell[BoxData[
    : s0 ]0 v" I: E# ~; H FractionBox[6 l# w5 \1 @7 N/ k+ i  z  h8 o% A
      RowBox[{"172.65311851642346`", " ",
    ) s+ _2 h) f8 S/ N, V9 E$ ]# k8 J   SuperscriptBox["Delta", "8"], " ",
    + h/ f# o& ?& J9 `7 d8 m   SuperscriptBox["\[ExponentialE]", " L6 V3 ?; b+ n- s! r  u# C/ y
        FractionBox["1.1102230246251565`*^-16", + L' r, J; p+ ~1 B$ U* c1 T. v
         SuperscriptBox["Delta", "2"]]]}],
    % ^! _  u2 s7 G+ h& ?" x/ z, C+ m  SqrtBox[( t) s" `- D. K4 i
       FractionBox["1", $ ?+ y. K" k- z
        SuperscriptBox["Delta", "2"]]]]], "Output",% i2 H( E4 Q- C7 ^- s7 ]% X
    CellChangeTimes->{( m1 u" s  X# }4 [, ?
      3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9, 8 z/ R& c" l, Z4 h7 w  @) K
       3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9,
    ! k( F  P: P* R9 r   3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9,
    ' _6 }; j2 T( u; e: ]! [   3.578012166234375*^9}]: _6 ?( ~1 H9 S9 v/ W3 ]. w
    }, Open  ]],
    5 h. t- Y/ B9 b- Z+ `/ R: M1 c% I' l6 y+ q' N: t$ h  l" H
    Cell[CellGroupData[{5 Y4 ]# p4 |8 `; d3 }

    ( _5 s4 y1 F: N' |* U+ y2 r& D" jCell[BoxData[- N0 K/ X" T- i$ k8 G
    RowBox[{"DeltaX", "=", " p" N- K! l. G6 {
      RowBox[{"FindRoot", "[",
    6 Q$ t4 d3 j' w6 b: [( N   RowBox[{
    8 Y6 W& ^  r  N5 h2 A    RowBox[{"Delta1", "\[Equal]", "1"}], ",",
    - {: [7 O& s* t; g1 w9 |    RowBox[{"{",
    : A! G2 B* Q1 H( D& L     RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",
    ( h* T( T/ q: j: U" s$ t CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {: ]3 h) |8 m1 Z2 @6 P! S
       3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9,
    ; C& U. r" U" v   3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9,
    " q5 `7 D  |+ p3 b& s; }! O2 D   3.57791921584375*^9}}],
    7 M1 I. G9 m+ b0 y  H" |( _! f) t( @$ J& k! b
    Cell[BoxData[
    , x) {& X7 a* T RowBox[{"{", * \, J5 C* K& U8 m
      RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",
    , u6 S# T1 L: u CellChangeTimes->{
    ' s! V5 T+ r3 p+ v  3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9}, 9 w# @. l/ Z- \. V2 |5 z
       3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9,
      a9 L7 w, G/ x6 X   3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9,
    - @! M* H/ K: o0 B3 W   3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9, 2 o0 y. A; {: ^3 {- w1 B- F
       3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {$ }& Z  e% ?  \& w& w! @
       3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9,
    ! T# {- C. P. W- k+ x0 A. T6 W! n/ q   3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9, # t3 x( ?- i3 ]6 K, H# G
       3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9, . s8 g* D- x, _8 M
       3.57796070150625*^9, 3.578012167703125*^9}]
    ) G; U2 [2 k% G9 ?}, Open  ]],' V6 R. X' U% u: @' S8 g

      ~' V) u! c6 p# ECell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\
    5 j" `5 t- d) h& E% r% c8 @\:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",  w. b5 i: e$ k+ c3 ]* ~" g/ g
    CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {, l  o6 l/ }" k, ?8 Z" d
      3.577960705312657*^9, 3.577960707621461*^9}}],; L8 g6 J" g4 c

    * }' Q8 z' E+ `Cell[CellGroupData[{
    / ?5 x1 K7 D2 ?% Q) g# U* {
    " D# c6 I/ ^. lCell[BoxData[
    ( z9 H/ x! g! _4 G$ L5 f RowBox[{"C1", "=", "Ca"}]], "Input",; l/ @. M4 W2 P7 B  u+ G! _
    CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],
    ! G  t1 Y' ?( f  Q! u7 W* d: D, X# Q9 G3 A2 w4 y* R
    Cell[BoxData[3 t( A8 D; @4 p$ \5 D5 L
    RowBox[{"{", : q7 Y* X5 z7 }& P( f5 X5 }
      RowBox[{, o( m' ]" S) i+ Z" t
      "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",",
    4 Z6 ?: Z2 y+ J   "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",",
    . ^8 u! Y9 X# L7 K. t2 y+ H   "0.`"}], "}"}]], "Output",8 y, W8 E5 B5 g8 G/ j0 M* q
    CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9,
    , g; r; n8 {$ y- l, k  3.577960710273465*^9, 3.5780121855*^9}]) `; s9 N( W0 R6 s0 q- s
    }, Open  ]],6 N3 }4 @6 K5 K0 f
    2 H; D( _5 M% |# ^/ ?* G9 A9 `
    Cell[CellGroupData[{
    0 `' D$ [3 O* [* Q2 M, D7 E' V7 e) N8 ]# I/ i' b
    Cell[BoxData[8 U$ `' d" A8 G' t4 ^8 W
    RowBox[{"u1", "=", ' r3 s$ b1 c! }& S
      RowBox[{; P7 n+ @& y& a# B
       RowBox[{"Exp", "[",
    ) j, K  r8 y" q1 |9 q    RowBox[{
    2 j- h% w. c. ^1 O, g) J0 L     RowBox[{# O. s+ ^1 L" H6 f
          RowBox[{"-",
    8 Q: G+ B4 s3 t       RowBox[{6 V7 h4 D+ B4 t! _
            RowBox[{"(", " E# z# T- Z* t/ p5 Y, b
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    $ a8 r8 _) Y  j. {, U& L0 R3 Z; N        RowBox[{"(", - W% Y9 W) K# U6 [% L7 Z% f( M! T
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],8 W' h, N" O6 P/ r
         "]"}], "/.", "DeltaX"}]}]], "Input",6 y0 ~, E+ [# n- ~  j! J1 I4 }
    CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {
    8 ?/ [0 S& k% E( l" c) u   3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {
    0 u0 s6 L" I+ C   3.577919193484375*^9, 3.5779192326875*^9}}],
    + n& X# ]5 o7 b$ `# R
    & N6 L- z6 D! s6 @8 j$ ]2 kCell[BoxData[
    . l; ?2 h  S9 \7 a7 f5 t( ] SuperscriptBox["\[ExponentialE]",
    ! v8 @  U( _6 C& ]  RowBox[{"3.141592653589793`", " ", 1 Z# _6 t3 z/ _0 N5 E
       RowBox[{"(",
    6 z: h4 |+ @/ F. a% l7 P/ t    RowBox[{6 ~1 i( [' ^# w7 ?- {# K
         RowBox[{"-",
    , {+ U/ [" B+ n9 u      SuperscriptBox[2 T% e5 W6 @$ S( G6 d  w! Q
           RowBox[{"(",
    : b5 `# d) K. f1 K. y7 D        RowBox[{
    1 K3 j+ g3 |! n# r9 h         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", % a1 z( _& m4 [) ?5 @5 c
         SuperscriptBox[' }# v% e' H9 I- _! M  Z
          RowBox[{"(",
    # e( U- v9 T6 g) B* K3 Q       RowBox[{+ ^, c  a3 y; b; N
            RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", 4 d2 D1 y1 W( i8 e3 \3 Q8 B
         SuperscriptBox[
    # }) B. A6 ~: Y$ n! t      RowBox[{"(", ( n  P& ^+ p! h# x4 @
           RowBox[{
    : }) z- q' y  Q' V# |( |3 o        RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-", 3 N3 o% d* L/ T  t
         SuperscriptBox[+ m+ b! [3 R7 U* L# |# ^! |$ d
          RowBox[{"(",
    , }4 x, K% e. p8 T* ]) g* B; {       RowBox[{* q# A4 k% \( ~9 F2 I0 p6 Q: Y
            RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-",
    ) o, I3 N4 C* I% P- c/ d9 u* n     SuperscriptBox[2 S$ }8 h; q' L5 n( ]( A
          RowBox[{"(", 3 R; m2 X4 W1 b% |) g! x4 |
           RowBox[{
    # C; P8 B2 g. q0 B        RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-", % _1 o) g" V" u7 S' p9 V! U$ j
         SuperscriptBox[
      e) E  y3 M) C& G: m8 T$ N      RowBox[{"(", 2 c' ~7 b! z, I, U* {1 e
           RowBox[{
    2 _* P1 F. @, H" L8 e' {        RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    . {* H1 \7 M3 V* V     SuperscriptBox[6 u, r) f6 d3 h1 C, t/ y0 ]/ _
          RowBox[{"(", ' L! {7 B5 C+ e8 Z/ b4 M$ _9 U4 f& ~
           RowBox[{
    1 E8 d3 ]2 N1 D4 \- Z        RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", # C* \/ v  Q" _- b, p0 r
         SuperscriptBox[2 ?/ y# I# b9 {) L2 K* i
          RowBox[{"(",
    5 m: y8 F- m" h       RowBox[{& c: M8 w1 p. h" Y- N
            RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    1 N) u9 {+ T! K$ `& ]; a     SuperscriptBox[0 |& G  k% U5 L, @' B
          RowBox[{"(",
    : R, L0 C1 T4 g       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ) @- E# W# F0 f0 s+ Y& M4 m
        ")"}]}]]], "Output",
    ! `- S& u' x3 N) G- O7 J, d CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9,
    3 G2 C( v  B9 o6 @3 x  3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9,
    1 _6 \: Q7 X8 o. A4 T2 r  3.578012187078125*^9}]* Q. n3 B: i9 ~8 o
    }, Open  ]],6 f" t2 O  R2 v2 B* ?) m

    * _5 y$ L3 G2 _$ _! ZCell[CellGroupData[{
    1 C4 ^) \. `; Q' ~2 ~/ Z! C, L7 Z! M3 L
    Cell[BoxData[
      E2 V+ R' G4 K, k5 ^! s RowBox[{"C2", "=", "Ca"}]], "Input",9 [; F0 P$ A, I, Q6 |4 Q
    CellChangeTimes->{3.57792047321875*^9}],
    - J. A; v* u1 G# e! f3 S5 y1 v( [. t$ G
    Cell[BoxData[: Y8 w/ z$ t  v2 n$ o
    RowBox[{"{",
    " ]* ~+ M4 i( R& U( ^( N; }  RowBox[{
    3 C; D7 Z( c& q/ M0 c  "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    ! M6 g" d9 y8 T   "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}], 0 F! V* s% b* u1 u& k' ?1 C
      "}"}]], "Output",
    ' S9 ?, H! S2 o1 n) ~+ H2 d CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9,
    7 G7 j4 i0 f+ s  3.5779607401163173`*^9, 3.578012204671875*^9}]
    " k! X% M) x. S) X}, Open  ]],
    3 f3 g4 @, V4 n- q( J* a& y  T' L5 e9 r* _0 M9 h+ d
    Cell[CellGroupData[{
    5 E: x& s3 p$ \. u+ J* q0 G9 k) z: J+ R0 C
    Cell[BoxData[
    1 |% t; G) p6 [( M2 Z! m RowBox[{"u2", "=",
    ' H  M6 v/ y6 p$ L1 X2 l  RowBox[{
    ! ]# a+ h% i  J* m" k) v   RowBox[{"Exp", "[", ) y, Y2 C  O; h- ?
        RowBox[{
    . |  ?5 e$ e, N     RowBox[{
    2 f. s( \: h; G7 N2 h      RowBox[{"-", 5 V. h( {% `4 i) T
           RowBox[{" B: {5 V: f, @4 b% a" {4 F) u& Z
            RowBox[{"(", / O1 f2 O: X# ], |  T& U! i
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ) M  h+ o; r! }) [, Y, n! x        RowBox[{"(",
    & t3 i$ \9 F1 ~2 ?, D         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ `  @1 ~+ G7 d( _
         "]"}], "/.", "DeltaX"}]}]], "Input",( i; k0 |* t; v5 \% T4 ^7 S% c
    CellChangeTimes->{3.577920484109375*^9}],+ v4 Z" a( l' p1 s/ c: {3 f
    ' X) }# m- _5 U+ I/ a# P
    Cell[BoxData[& g0 ~2 ?1 v: r
    SuperscriptBox["\[ExponentialE]", " K: d: r# f) x& a7 i- k( Z6 J
      RowBox[{"3.141592653589793`", " ", , x+ ^0 K# b! c
       RowBox[{"(", 5 o6 ]5 ?( X  x# B3 p( @
        RowBox[{
    - c( t( S8 N' I' T     RowBox[{"-", # s% O; {( J  \. D# J- ]
          SuperscriptBox[
    ) S8 t5 Z% r9 s. F% z       RowBox[{"(",
    + y: m5 h: X9 V% d. ]        RowBox[{
    " b3 E4 C9 S! u8 k         RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",   S4 k2 Z' F4 F8 X
         SuperscriptBox[
    . i: \" l1 B( o3 q# K      RowBox[{"(",
    % v% ^* x( V, C  }       RowBox[{
    2 k3 B9 M! D8 L& v+ G' d, J        RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    # s- J0 f* E+ F- I     SuperscriptBox[
    / a6 q9 l8 f1 I' e; c      RowBox[{"(",
    : g" y, [0 A' [% w- z* ?       RowBox[{
    , ~, n( @' m2 f: J2 R- R* P        RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-",
    / P- x& s. T( M' o) V     SuperscriptBox[: P9 Y5 q4 d, K2 ]) K( J
          RowBox[{"(",
    6 L1 |0 g( J  x& w9 n       RowBox[{
    8 u) y: U# W* V        RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-",
      ^  {1 |3 c' h; [" v/ `& n$ c     SuperscriptBox[
    . D) G! ^3 B% e# a9 w      RowBox[{"(",
    ; P0 P9 K3 }% N7 O6 u       RowBox[{
    ( f9 H& ?; O  L" K4 ~  \7 Y0 d- O        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    4 O, {9 Q4 B  t6 o5 D     SuperscriptBox[' d& j6 N/ H* D6 z# ?: z0 T2 `& n
          RowBox[{"(",
    0 n5 Z  q( v3 X/ X9 B; s       RowBox[{/ y0 X: l' s, Q
            RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    / n8 J8 u6 U/ T     SuperscriptBox[
    8 M8 j/ T% V* i8 g0 ?) n. E7 D+ D      RowBox[{"(", , U, X. z' d3 h, R. \. B
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    & Q( e5 O( j3 }8 Z9 m1 C& R     SuperscriptBox[
    8 F5 }% E7 M% h* r$ m0 m      RowBox[{"(",
    6 ?8 w: E; i7 k       RowBox[{1 U9 D% i# Y% ]6 V9 u8 Z6 Z
            RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", ' G' C% r6 `% u- _9 b# c8 r
         SuperscriptBox[
    3 f- Y% V  g% o  x9 V" O      RowBox[{"(",
    ; Y& q( X2 d7 D0 c       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ! H$ n3 y  d0 }2 d" s
        ")"}]}]]], "Output",1 K- p  d0 `% P# H: X8 z2 I1 j
    CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9, 6 p0 T8 f9 J6 c
      3.5779607413955193`*^9, 3.578012205484375*^9}]
    ' k/ D- \2 J, C$ P, ~}, Open  ]],
    . u  f- X& @) j. i0 p  Q5 r
    6 U5 k: U$ ]5 CCell[CellGroupData[{: J1 w5 f- w- L: e1 g" S& @
    4 b6 s4 d- J# T9 ~
    Cell[BoxData[
    3 n, Y& d1 z" b+ y RowBox[{"C3", "=", "Ca"}]], "Input",( t& U" A2 v$ B$ F
    CellChangeTimes->{3.57792064125*^9}],- `4 c5 I  }+ X* M7 ?
    8 P/ v& c: w& C1 @; \
    Cell[BoxData[
    4 v; @7 U: z* W RowBox[{"{",
    : p  R5 ?/ A$ |5 X& m8 U% K" }  RowBox[{
    # K4 m& t7 S5 Z0 \7 ~) u  "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",", 7 Y9 r+ P& I3 H0 F. I
       "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}],
    8 \* U3 v6 \% F9 r  "}"}]], "Output",7 F% r5 R; ^2 P, c- D2 ^
    CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9,
    5 R* x: J( b+ g; p  3.5779607642027593`*^9, 3.5780122103125*^9}]* r& i6 t4 c+ J# v' j5 ~" A
    }, Open  ]],* y) S/ \2 u1 ?0 [8 T% e; T1 P
    ! v( q6 ~" t% q, I* {
    Cell[CellGroupData[{5 [# F3 q7 Y! ^# }4 l

    ' `, ]) g+ b* V: d, D3 ZCell[BoxData[
    . f# g% j7 [# f RowBox[{"u3", "=",
    & L3 e! [: J( t1 Q4 V  RowBox[{  g7 c" ?3 @/ L+ O" j8 d" e
       RowBox[{"Exp", "[",
    $ V$ D6 j8 V2 E! B8 u5 _! J    RowBox[{- p' ~* A5 x0 P: }5 E) T/ \
         RowBox[{' e' `8 J4 K% b
          RowBox[{"-", 8 p3 V5 j& V: {6 O$ \
           RowBox[{
    + H$ m9 o: _# M6 l7 d        RowBox[{"(", 1 E; G! \" ]# k, w
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ; K7 `% N2 I8 B% R' n
            RowBox[{"(",
    # g% A/ Z0 U# w# a# R         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    + r" n3 x9 e% H: K1 k     "]"}], "/.", "DeltaX"}]}]], "Input",/ l- C4 T. F; J5 i4 B7 _& k$ a
    CellChangeTimes->{3.57792064921875*^9}],
    6 n% F+ W/ O" ?- @9 X; A7 e
    $ H; k% U. i9 vCell[BoxData[  |9 q) ^$ G, d/ x
    SuperscriptBox["\[ExponentialE]", ! J4 [1 H5 s2 R, e- T
      RowBox[{"3.141592653589793`", " ",
    % y8 @3 w- L2 ?; b3 m  s% i   RowBox[{"(",
    " f) z) j# U; q4 i2 ~) b: I" ^: u    RowBox[{
    * p, r6 ^3 f+ P4 S: f7 {* ]. b) T     RowBox[{"-",
    4 V  ?$ {& {8 ~; ?5 n( j      SuperscriptBox[
    : z7 t# P1 P; N6 ]6 B( {       RowBox[{"(", ( q; i& ?$ r* o8 T* p% W1 q7 |
            RowBox[{
      c# t" i2 {, E' n- i. [4 F  X; L6 s         RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-",
    1 s+ F2 d( S: a0 i     SuperscriptBox[
    0 A: I; _/ c; N. g4 ?' z. L2 p      RowBox[{"(", & b/ z5 ]2 \6 r' k
           RowBox[{( g$ [* A; {1 ^% i
            RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-", ; b7 @  C0 t( w  t0 H* a* V! @3 ~
         SuperscriptBox[1 }' ?- }( w7 A$ t- n& N' ?
          RowBox[{"(",
    # g, N6 R$ i7 r2 `       RowBox[{3 ^5 p; P6 m3 D" t
            RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",   l: \6 O' V9 u( T' _
         SuperscriptBox[. @; H2 U: X2 q: h5 Z
          RowBox[{"(",
    ( C, |" r$ t8 T       RowBox[{
    # j7 q6 h/ R& y/ K        RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", $ V% b$ Y- S" _" |% Q: f
         SuperscriptBox[
    # U1 M8 b( H4 l  I0 Y7 h* [      RowBox[{"(", . n5 D3 L! g1 `/ o/ h+ {
           RowBox[{
    ; k, @  R2 d4 _9 f( c& v        RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-",
    * B/ P' T9 K4 t6 d: ^: H3 ~$ p0 R     SuperscriptBox[
    6 T( }  q0 g  }5 R      RowBox[{"(",
    + r# U2 E0 Q" I: [) S       RowBox[{# a. T7 k$ [2 R
            RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    5 ?$ o4 ]& L! f0 k5 N9 ~8 N+ \) j$ w     SuperscriptBox[  \. N& q9 J, n8 \" _* e
          RowBox[{"(", 2 s6 l* s. f7 t; }* K5 Z9 G
           RowBox[{
    ' Y$ f% u4 j0 s        RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    . `9 }& k- S( v; L9 b1 U     SuperscriptBox[# e0 [( u! [9 D( J1 a
          RowBox[{"(", - L/ ~; O) `/ J3 |' \
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    " C# R( x( ]. g6 M) M! J     SuperscriptBox[( j0 J1 @: v8 Y: }
          RowBox[{"(",
    " K" x2 p3 \! y9 |       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    0 U0 l  h& Q0 A0 V    ")"}]}]]], "Output",
    + J$ K9 h. ~5 M+ @: f/ m CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9,
    1 m" H" c1 G! V2 [8 |8 K) L. }# e  3.5779607654819613`*^9, 3.578012211515625*^9}]0 }! Q+ V" f1 c  {$ B. u
    }, Open  ]],
    0 F9 X+ C- z" s  u8 q' G* s! X2 e
    Cell[CellGroupData[{
    ( H7 B+ L! |% s# Y8 V& m( S# l" K8 B+ L
    7 i& S) ?& Z' U+ H( UCell[BoxData[% X. k2 y: m+ |8 D1 P
    RowBox[{"C4", "=", "Ca"}]], "Input",5 G* ^6 E. I( u" D7 Y" w+ ^
    CellChangeTimes->{3.5779207559375*^9}],: `6 A. s/ h; p* F2 S# ^0 c

    ! \& O; E8 K' ACell[BoxData[
    " ~2 T/ m3 \) Y+ P RowBox[{"{",
    0 L/ Z$ N! {4 i9 G1 V0 ~+ H$ b  RowBox[{  w# ]% f3 x& Q6 U* g
      "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",",
    + a+ T" z* {* @% J* |  Z) u% I   "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}], 2 T) W: f+ x4 w9 N) v) o) ^( l& m
      "}"}]], "Output",  ?2 }& X# }( o, T
    CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9, $ t% L5 B2 t) c  {0 ~0 ]0 Q9 W
      3.5779607861363974`*^9, 3.578012216171875*^9}]
      Q) i5 _7 I1 B5 p. ?3 }+ t}, Open  ]],
    ; s1 L$ ]+ ]) o8 L$ ]" o  K9 X5 _
    Cell[CellGroupData[{$ V/ `  K* `* @8 g
    ; S  X2 ~! e/ q( f
    Cell[BoxData[
    4 S+ V9 M/ |) K& U, _: @1 m" ~ RowBox[{"u4", "=", ) H, I& V/ {9 T/ }3 f9 ^& F1 E
      RowBox[{) D* M  F0 n! B' F
       RowBox[{"Exp", "[",
    , s0 C& P. [+ J  k3 O2 P5 v    RowBox[{
    . s+ ~! k1 e9 i7 s% o/ n     RowBox[{
    6 a9 ]6 V) U, w$ b; d8 @      RowBox[{"-",
    3 r  z2 u" u- L# E$ h5 T( c       RowBox[{
    + V6 T# L% h7 Q+ l        RowBox[{"(", ) C" L9 P  R7 L  o  _' H# Z/ R7 j9 H: G
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ( N+ I7 `1 C4 w+ K+ q. Q
            RowBox[{"(", 4 K7 y+ `4 P; Y" ]+ ~7 e
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    2 u0 q8 @/ A1 A9 B! u# J     "]"}], "/.", "DeltaX"}]}]], "Input",+ k8 {, P/ Y+ ?/ v+ k
    CellChangeTimes->{3.57792076325*^9}],9 G3 ~! G6 v( N
    4 }: m, z- z  N& f( z$ a/ g6 w0 C6 w
    Cell[BoxData[# R/ y# J. _8 t$ @5 M  v. e% D7 Z
    SuperscriptBox["\[ExponentialE]", $ \* O+ E. j- h+ _  S8 W
      RowBox[{"3.141592653589793`", " ",
    $ e9 ^1 U7 D0 n! d9 |   RowBox[{"(", : K+ F4 Y+ j* z. R1 k/ h5 ~
        RowBox[{% l$ Q% S5 f# [+ r  w  _' M5 Z
         RowBox[{"-", . j3 W& Q! @# r- y! G4 W4 k
          SuperscriptBox[
    3 j* \( K1 J; \" Z4 @4 L  i) ?       RowBox[{"(",
    , a3 z0 O, t3 S3 y( M        RowBox[{
    ! A* s% \2 o7 ]/ J3 ^* w2 F4 y         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    $ R8 T. s$ i5 [! ?# T! ?4 W     SuperscriptBox[: A: I2 c1 h8 [4 g) k8 ~4 _
          RowBox[{"(",
    ; b. p: I( n! s6 J0 A( p# D9 j       RowBox[{0 P" A" r# ?0 f: P2 Y5 Z
            RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-",
    5 b- X# ~: n; v% u     SuperscriptBox[8 a0 l5 F+ M% [  g) Q' F( O
          RowBox[{"(",
    $ C) |% `# j+ e  S7 v       RowBox[{8 Q. m# @6 [3 B/ j2 v, @6 E) _1 n7 Q
            RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", / a* \: Q/ s& x
         SuperscriptBox[
      Y8 J) d1 m. b  ]% C% {      RowBox[{"(", ) i) O1 X, M9 _) r5 k) o- Y
           RowBox[{
    $ w( P$ b: I) y" m, n( _" N, i        RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-",
    0 |- x& A7 F+ ]0 u& }" K     SuperscriptBox[
    # |2 X' z, m" b& V      RowBox[{"(",
    ; w" c) \( \# w# _8 Y: x9 ^+ d       RowBox[{+ f) t+ u8 b# t8 X
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    , q# p8 V; m1 p  B+ R4 x: B     SuperscriptBox[7 T4 ]# t" e7 L4 l
          RowBox[{"(", 2 |& C& F/ d' l3 M' ~' ^& Y
           RowBox[{6 e. Q, M* e$ r( W6 |5 D- d
            RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", 4 k; A. `  t$ ^
         SuperscriptBox[% L, p* |3 F0 v; ~$ y, [6 a2 E
          RowBox[{"(",
    , N$ I1 D! N+ n       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 0 H9 z* G8 l$ M. B! T6 ~# n
         SuperscriptBox[6 ]* A/ @. G8 \! V# _! @" y
          RowBox[{"(",
    3 @- V( M! _$ L1 G% y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    : F' W, K! W, u$ m7 Y# ?+ r     SuperscriptBox[0 `$ F4 H$ Z  j0 P! Z0 o
          RowBox[{"(", / U  T3 Q- K8 o7 I* _: S2 E+ e
           RowBox[{
    ' X5 l, _& i3 I* I; D        RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], 2 Y& p  a: V2 l) O
        ")"}]}]]], "Output",
    " d1 R7 z% E  s CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9, & x/ u3 \& ^/ \3 }. b+ ~
      3.5779607873531995`*^9, 3.5780122169375*^9}]
    $ J" ~6 C- y8 R4 F& g5 p}, Open  ]]," \  T& Y+ }* L7 u
    ' s9 |. ?, s, b9 N8 S  w
    Cell[CellGroupData[{. b6 r8 L1 @: ], A8 j

    ! D" N. J9 T8 }- h) wCell[BoxData[
    6 R; [$ e6 Y4 v4 ~$ i- w RowBox[{"C5", "=", "Ca"}]], "Input",, W% m( _6 e$ w, D) x7 z; c
    CellChangeTimes->{3.577920860671875*^9}],- i, @4 J/ o/ p/ \
    6 }/ ]! R" @# e; A1 ?0 m
    Cell[BoxData[
    9 U0 r7 v, ^! e! i! _ RowBox[{"{",
    ) C" t% N! m  ]3 X1 X! C) @/ `; H2 X( V& ^  RowBox[{- I/ X, k( N# Q# z+ z; Q( K9 S
      "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",",
    : X- o8 ~' K6 T) G   "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}], : [- a% H+ }- s4 A6 o  X0 r( O! b
      "}"}]], "Output",7 }2 L5 A1 d/ z6 T! t
    CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9,
    7 T2 B4 W: V! q+ p% x8 [  3.5779608137328453`*^9, 3.5780122209375*^9}]
    : W9 \& h9 _7 a3 a}, Open  ]],* c" U& r5 p* q$ ~( i

    ( K9 T/ V$ v7 f; e& gCell[CellGroupData[{3 z5 i; W8 X% }$ e, s$ V! C

    2 n! k( ~) E8 w  X9 k/ TCell[BoxData[
      v- ~: @+ w# h2 ~( i RowBox[{"u5", "=",
    # ^# P4 r6 r: s1 \0 P  RowBox[{( Y" |" {0 T0 ]
       RowBox[{"Exp", "[",
    4 x* ?* S$ e4 h9 D    RowBox[{& @+ n  s' c3 g5 C4 B
         RowBox[{) _( G- F& B/ T, K
          RowBox[{"-", 5 q( Q4 W& C( `0 f
           RowBox[{
    " M5 h  r* {$ m" i        RowBox[{"(",
    - p. N5 T* i! r7 d- H. p$ B+ X         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    6 o+ z5 h! F3 R* Z3 ]        RowBox[{"(", 3 |9 O, V& W6 f( I3 Y, v6 P
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],% ?7 Q- `( i8 s& g# y( k0 j. j/ p
         "]"}], "/.", "DeltaX"}]}]], "Input",$ j0 ^4 n* j  s. O) s
    CellChangeTimes->{3.577920869375*^9}],1 s! w" M/ M" Z* s- P( }
    3 l! W2 n+ ]# }
    Cell[BoxData[
    5 g) n5 ~- o! \  B  Z+ d$ w SuperscriptBox["\[ExponentialE]", $ ]7 k. B1 ]' b* b, v
      RowBox[{"3.141592653589793`", " ", , y/ P1 o' P% ]% |/ T
       RowBox[{"(", " }; N9 B  x" X' U# s" o2 J0 O  g
        RowBox[{- S, w8 Q- O$ e+ |  p& |1 e
         RowBox[{"-",
    : z$ K3 W$ [4 v+ F& T: }7 Y" t      SuperscriptBox[/ r3 f% a$ f6 J$ o  l( L: t8 \
           RowBox[{"(", * G. y. N/ E7 I
            RowBox[{
    4 k* B5 Z6 \3 F9 |  e% R5 C         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    : u# Q$ C: w. x7 o3 v. L3 ?) {     SuperscriptBox[7 j/ z" s' M; R' o" m
          RowBox[{"(", 1 f4 d/ ?6 k3 k. s# @' K
           RowBox[{
    ( {& V/ _8 j' j! t        RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    8 u& L( h- Q0 c     SuperscriptBox[# O5 E2 `; s& l, ~' d0 J
          RowBox[{"(",   w( @6 z# Q9 E9 f+ H! D# z8 ~
           RowBox[{+ S0 N5 W" Q( ~8 v
            RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-", 9 a9 X1 z: G6 Y# Q' f
         SuperscriptBox[
    ! p  E; m8 m& j# u" p: G2 J% p2 _      RowBox[{"(", 6 z- a& }8 o7 _4 N+ e) p
           RowBox[{
    * l. I0 {- j& o8 o        RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    2 p$ G9 o9 ?0 A* g+ m4 j3 j+ T     SuperscriptBox[/ h1 G  x4 j9 L" Z: D
          RowBox[{"(",
    6 h- q. a6 L4 w! A" q( \       RowBox[{
    ' ^2 q9 }; y( p" n( {) n        RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-",
    ( @9 C( D8 `% E" P& r5 ~     SuperscriptBox[3 h  Y0 v( G( o4 ?- o% X. P
          RowBox[{"(", ! ?2 ]2 ], w$ A* `" ]5 J
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", " V6 F# I1 r7 s
         SuperscriptBox[
    9 D( d5 F) C. b0 x% G+ g& |      RowBox[{"(", : M% `, D2 m8 S7 @6 G. U
           RowBox[{
    * ^+ b3 g! [0 k1 b; v5 \/ r, y        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", " l: B6 l2 F" \7 K6 E0 n, ]
         SuperscriptBox[0 T9 |4 \8 N  R3 l9 I5 d
          RowBox[{"(",
    ; ]* C, x# Z/ X$ {$ ]# k! x       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    4 M# N2 u" a7 H5 N1 W     SuperscriptBox[/ L9 H' a' ~2 J" k2 p
          RowBox[{"(",
    3 }' N5 |, J# q3 @& e3 ~       RowBox[{
    9 Q9 T. ]& b8 ?, `1 H        RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}],
    3 T7 V- P& O" \. \/ S    ")"}]}]]], "Output",
    4 J, K7 E4 J- b4 }4 x' U CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9, ' E. t' t( q% r9 h  q) T
      3.577960815043248*^9, 3.578012221953125*^9}]
    $ j9 x0 _2 l: _9 s: p" }8 L}, Open  ]],
      @2 E" u2 y( Q  D7 X( N
    7 Z6 K0 V2 L8 ~Cell[CellGroupData[{
    . `3 G$ ^' e4 {1 g  e3 q: J; w
    8 |! V. C+ [1 y* F2 O( I* k" N) YCell[BoxData[/ I. Y7 \! b6 @2 n7 L
    RowBox[{"C6", "=", "Ca"}]], "Input",& a# r" l' O7 ^6 k
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],9 z4 d" y* ^2 D1 y- l# z$ w& q
    . h6 k( U2 c5 }
    Cell[BoxData[" ?& s7 Q& f( t) A' d, m' V* o0 ~4 H
    RowBox[{"{", 0 l2 j1 f$ _( Q* H, O& b
      RowBox[{% z8 A/ ~! y0 ]6 r
      "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",",
    0 p3 s: f# \7 K4 X8 X0 N   "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",",
    " [, s0 L" v; i0 D! ^, R   "0.494866`"}], "}"}]], "Output",
    % g% n& m2 ]* E2 Y) j3 y CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,
    ' x9 j/ U: x# i) e   3.5779608373044868`*^9, 3.578012227359375*^9}]8 s4 k& J* f: E+ }/ k
    }, Open  ]],
    6 ^3 c3 |  ]5 A; j; v8 R( b& v7 ?; s/ o
    Cell[CellGroupData[{/ U1 [7 R6 C4 _; d1 p$ c, y
    3 ]+ z) ~2 G8 s3 G6 E
    Cell[BoxData[
    5 `8 [1 G3 r$ I+ {4 j) j) T2 Z RowBox[{"u6", "=",
    8 M: Y* r, ]4 _. B8 Q4 B. l  RowBox[{
    & H: e( c% m$ T. x, w1 X. |( d   RowBox[{"Exp", "[",
    . A) V' p7 f8 Y7 b2 N9 O+ l    RowBox[{! @+ M2 [$ `, b5 c/ R! }( e( W
         RowBox[{( h9 f+ g5 C# ~1 s5 a& l& O
          RowBox[{"-",
    4 N& M! D& T0 L" ~) u9 b4 ~! V       RowBox[{
    ! e* W) D* ^$ ^: Z1 K        RowBox[{"(", 2 ?5 c& C# q( r! L7 k" {2 D% v, Z
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 1 x" d( T4 z- f4 Q# u1 I
            RowBox[{"(",
      K6 g% g- |4 S1 ^) p. B         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    8 I% W( W$ }* t) i7 o3 ?7 M! I/ l     "]"}], "/.", "DeltaX"}]}]], "Input",
    - b, V  W) E8 i# ~+ g& `, ?3 Q% q CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],1 ], l6 K1 l. m# M. r
    8 ^; g; X0 {  l
    Cell[BoxData[  Z6 h9 H  Z6 u3 f  W: u$ ?
    SuperscriptBox["\[ExponentialE]", ( n, N, _# B2 H% o; T2 }
      RowBox[{"3.141592653589793`", " ",
    / E/ V1 b0 \" F6 H, n$ C   RowBox[{"(",
    + X9 G+ D/ e- [& ^  j1 d- X    RowBox[{, W3 P8 `$ L, ?  I: E
         RowBox[{"-", 1 U; l4 W7 R  S6 Q/ |- D
          SuperscriptBox[
      O  D) N  ?/ s( W( T: S       RowBox[{"(",
    4 b( n; N& q# l  u( R        RowBox[{$ i& Z' J& G; M, j3 X
             RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-", 9 }' w6 m! Q: y1 y+ Z& T: A
         SuperscriptBox[0 B9 R$ ]7 h8 y7 O
          RowBox[{"(", + V; O% c. c- B3 N; m- ?2 ]
           RowBox[{
    6 _& e; o% Z/ i        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-",
    - M# K. ?0 }3 E. v. I+ R  V     SuperscriptBox[5 m- f3 S' E$ c' V7 b2 a1 i! P$ N; R
          RowBox[{"(", ( B( r( ]$ o, [0 o* D7 Z2 P
           RowBox[{  F% U* `4 j4 B! ^! M1 z- d
            RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    * ^$ E; U2 l% R     SuperscriptBox[& \! p. v  |3 _. o
          RowBox[{"(",
    : Y$ w& [5 @* X& f( |       RowBox[{
    ; B7 o2 T: t: y% V, D4 q, m, e        RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-",
    * j& D. `5 ~  c) j! E# t     SuperscriptBox[
    2 J8 F- h7 ?0 I6 O' H: i  C      RowBox[{"(", % T1 ~" @# A+ a. D$ R, Z/ K
           RowBox[{
    0 o" [4 N( U% y6 ]        RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-", % Y/ T8 u0 }3 `
         SuperscriptBox[
    6 L' g1 E! v( Z  c      RowBox[{"(", / g$ u2 {: r$ {
           RowBox[{
    , c' n  R' ]% ]: w. c! R3 o        RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    , ?& X. @' x; H$ t/ o+ ]     SuperscriptBox[
    # t: [' O2 _3 Z3 i' o( c0 s4 z      RowBox[{"(",
    ( Q# g! J) g$ H/ L; n4 ?! H       RowBox[{
    7 e. @3 ]8 \4 v/ W7 o0 |        RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",
    9 a% ]4 u% M! T# W1 }, A* j) Z" F     SuperscriptBox[
    : ?  J6 M+ Z& G( J      RowBox[{"(", + r- H- g( T  N/ l. R$ S
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ' Q: [  u6 d) p% w- y) @2 S/ J
         SuperscriptBox[
    ; g8 L' m8 x2 N( ^* {      RowBox[{"(", " G* \* n/ q3 t; u
           RowBox[{% e1 z1 K- y2 U1 k
            RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], , d4 f1 I8 E1 U3 {2 S  P! I8 e3 I( t
        ")"}]}]]], "Output",
    ( q- U  l. ^# t) U3 S! _& l! b CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    - i5 g- V7 w% f  3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]
    ' o% @  F7 k( o6 i}, Open  ]],1 Z8 B9 j: O2 |$ U' d9 _

    ; W- ^, Y) D+ \, qCell[CellGroupData[{
    6 H5 g: G: [: m( v- A
    , I1 Y) u7 @1 B6 R2 `! {9 m3 p$ ?( G- wCell[BoxData[
    6 o7 [0 A; W3 m) G, y RowBox[{"C7", "=", "Ca"}]], "Input",
    ! j% D+ w; n) M$ N4 T8 h% K/ n3 c& L CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    ( h: |' K( m" _1 k& I  3.577921316125*^9}],
    4 H/ b- k5 ?5 w: u, q
    , [+ }, }: w; {( W/ s0 ?Cell[BoxData[
    : \- r) p% L  { RowBox[{"{",
      A& H9 O+ S, K- N& ?  RowBox[{* {) ~: z' x* `; {
      "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",",
    / i) I6 M! i3 t   "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}],
    ) K. r7 {6 A5 D/ t% ?6 W3 `( M  "}"}]], "Output",
    3 I8 ]3 X. L; ^( n CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, $ L: v, W  \6 m
      3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]
    - D" L0 M" d$ x; u, z0 z& K}, Open  ]],/ V$ `$ H( W$ ^4 f$ A3 z1 q

    8 ?, `3 t5 S0 D  @9 jCell[CellGroupData[{
    " F2 d' r1 }+ B# `1 g  Q! N
    3 K3 l9 g5 I9 b& p2 ~7 a" PCell[BoxData[
    & h0 b8 I; E$ c! ^+ W' I, r RowBox[{"u7", "=", ! c1 I. L  D/ J4 u. _7 h' p/ ~7 [
      RowBox[{
    # b- L( d5 Q, d* _   RowBox[{"Exp", "[", 0 G8 Q8 @; ^! U* {
        RowBox[{
      M+ @; \* i. X7 c2 M     RowBox[{
    * h& B: [/ l8 d) w& Z      RowBox[{"-", 9 W9 j: A& a7 A" E$ C1 Q- F% S
           RowBox[{- p. o+ j% D9 T: {. c
            RowBox[{"(", " ~/ o# }0 R9 |. [
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    , t6 z( a- Z/ G& @% w. Q8 ?: P        RowBox[{"(", / M; q2 J; o. _6 O2 H
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ [- I# q" A$ s  w# U
         "]"}], "/.", "DeltaX"}]}]], "Input",
    ( Q1 a9 G. |$ f6 E- l& \2 \ CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    ( v( H4 u# Z4 W" \  3.57792132028125*^9}],
    % k' b: A2 @8 Q) x$ B5 B& _  f: F$ v1 o9 K4 `/ v
    Cell[BoxData[& a/ S$ O- U0 W3 O' E! g) V5 u
    SuperscriptBox["\[ExponentialE]",
    , k, R& N5 A% L, [7 V: Z" b7 N  RowBox[{"3.141592653589793`", " ", 9 E! ^" i2 p, M  R( D2 I
       RowBox[{"(", 4 U* B2 N! h/ V2 p
        RowBox[{
    0 [' [  R' X0 c4 ?' J+ U     RowBox[{"-",
    8 w7 R& g# C- x, d. m      SuperscriptBox[- ]+ d5 H% R+ C# E+ u- t
           RowBox[{"(", + r( k+ B+ Z* \4 a- q9 q4 m1 Q" [
            RowBox[{
    % G+ m" K$ @6 w& d         RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-",
    9 F5 D* H% a( v" L. O8 d; N/ y7 o     SuperscriptBox[+ K& x2 z! f# ~; z9 e
          RowBox[{"(", 3 g% e) L& o! X* Q
           RowBox[{
    . A) I# D& P& z" ~        RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-", " W* l  k6 @) U$ N
         SuperscriptBox[
    . U$ L+ _/ m# z% g" S5 q6 G      RowBox[{"(", ' [6 k# k3 y8 T; p1 J+ \4 D, k
           RowBox[{
    0 R2 u* [& _% ^. k9 {        RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    3 e- j- R# h% M1 `# j     SuperscriptBox[
    " h8 M. ~% s# e. h8 _0 y. V      RowBox[{"(",
      u  {+ q% Q" H       RowBox[{9 ]8 C1 o) ]4 X: c
            RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-",
    5 Y/ r8 i  X$ V. Q# h: S     SuperscriptBox[
    $ _3 S$ {: Q( g) \! V0 q      RowBox[{"(",
    9 y) t( M* e1 X/ m' a) M1 U       RowBox[{. m- w" X9 X& X) U# u3 r' ]
            RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-",
    $ \& j2 s# \7 v% D     SuperscriptBox[
    7 l6 k! {1 {1 k& g      RowBox[{"(",
    , p2 ]$ i4 k: o' m$ I8 Y. f  B       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 6 c& k: E$ N" H' y0 ^' u" ~5 I
         SuperscriptBox[
    . x/ l6 Q. P# b' Y) q/ u0 Q% y      RowBox[{"(", 5 x& ]" t0 `( p! ~5 U
           RowBox[{& Y/ p+ N* J# j4 V
            RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", ( e) @, V9 q% A0 f
         SuperscriptBox[, ?, H/ I# W! r1 D3 L- E
          RowBox[{"(", " {5 \; b" m/ N& o
           RowBox[{8 I& j) G0 y3 a; U
            RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-", ) O8 e! ]' \0 B6 q, X! A
         SuperscriptBox[
    ' t8 L/ @! U$ {& Q8 p      RowBox[{"(", * Q6 k8 E+ x: j. j9 [  ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    7 m: ~5 O0 ]/ @- o* z7 L5 f8 S! S    ")"}]}]]], "Output",
    ( L: J8 b+ s# o! T1 i CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    3 p8 G  s- _, v: M  3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9, ! W9 M& ?4 e( J3 k" W7 `
      3.578012251359375*^9}]
    . Q" S! l$ n5 \! `: C! r% r2 K}, Open  ]],1 D! |( s: G- L: x

    " o) Y" N5 o+ ACell[CellGroupData[{
    8 G3 j* c- R3 L) ~6 \5 A; O  m0 X) k: N; f9 C7 X
    Cell[BoxData[
    ! @/ g% r; U0 E& w  g! ?; i RowBox[{"C8", "=", "Ca"}]], "Input",
    - I' [' l7 x4 N/ c" ^2 h CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    2 E. d- p  }) ]9 r  3.577921316125*^9, 3.57792141421875*^9}],8 l  V; N9 f: `
    9 d% W$ K3 C! f1 h
    Cell[BoxData[. y( t- R$ r9 W7 C0 |9 [
    RowBox[{"{",
    ; y" H( c* w, r  RowBox[{
    2 V0 D4 c. S1 x! t  "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",", " x5 U- ]. ~; P
       "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}], 9 f5 |; m$ g% R* H$ c5 I
      "}"}]], "Output",
    - p# z3 q. o$ p& r; { CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    - `# Q, t' I8 K# Y7 j; K  3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9,
    * Z5 g. m" T* f7 ^# ?1 u. e  3.578012260515625*^9}]
    1 A4 s3 e  K! F& O) X9 A}, Open  ]],& c, f( R" m1 b/ y  x6 `
    3 d0 X2 m, b) \$ {7 i, n2 z) n
    Cell[CellGroupData[{
    & y/ a1 P7 l" B& ~4 ^4 ~; ]* g! y, i8 E( {# |
    Cell[BoxData[6 v3 Y/ C3 ~& }- Q/ q4 Y& k
    RowBox[{"u8", "=",
    - N* [3 L8 L& _( Z% y  b8 ~  RowBox[{2 Y/ E' \3 Q5 r, s* p, @
       RowBox[{"Exp", "[", 1 \4 B7 L$ r, H1 D% }
        RowBox[{
    $ n; k2 [* ~; D1 V0 \     RowBox[{
    & Q) T4 N  e. y      RowBox[{"-", , C8 @( @+ W0 r: |3 m4 H/ v5 q
           RowBox[{
    % V) \) m3 C1 |7 F        RowBox[{"(",
      p( _, f& _+ l+ Q5 a         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ( {2 M* l* i: b% x" O9 S/ q: }3 b        RowBox[{"(",
    6 ^4 e( d7 Q- j' s( i         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],. T( r, \. i7 r. M+ ^5 u
         "]"}], "/.", "DeltaX"}]}]], "Input",
    ) x& Y* g& Q# W' n# Z CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, ! X9 `5 `0 p" R
      3.57792132028125*^9, 3.577921416921875*^9}],
    $ w$ x- L6 m8 t5 u0 T* N. O- F: [6 L1 `8 v! U
    Cell[BoxData[5 k1 B2 u$ I9 F# X2 C* K
    SuperscriptBox["\[ExponentialE]",
    1 {# V- B9 K$ l) r* j  RowBox[{"3.141592653589793`", " ", - a- N4 `+ ^1 @, D* b/ D
       RowBox[{"(",
    - n/ m! R  W2 f, ~5 C6 R0 g9 |    RowBox[{
    8 s$ S4 @! z& M. [8 R; {& k6 T6 ^& Y     RowBox[{"-",
    8 _4 _1 ~$ z) }, X8 j* X/ w      SuperscriptBox[1 y4 t- X9 J9 N- U: q8 o! t
           RowBox[{"(", : T7 v# z9 l/ h  m& \
            RowBox[{0 v  [' p: j  J+ E2 i( d
             RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-",
    6 h( s( s& l; q' |' T2 o     SuperscriptBox[: n6 d- V, G! m
          RowBox[{"(", ; U7 w  X# c2 m2 P% ^, n
           RowBox[{4 Q6 `! ~0 R0 M. y; N
            RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-", 0 A5 G! l: u$ `8 E
         SuperscriptBox[
    7 o3 ?9 H) D+ t0 Z8 f9 }/ @' V      RowBox[{"(",
    # f6 K4 g+ G& V  L9 B       RowBox[{1 @+ A  w# m8 N: F! d
            RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", 4 Y1 W$ e  ]9 d( C2 i! R& y3 ^
         SuperscriptBox[
    * D5 k0 \4 t, A8 {' y( V      RowBox[{"(",
    . P: F. U; k* Q- Y. H0 |       RowBox[{
    ( O0 o8 d1 \5 K8 G! p        RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-", 2 \1 V, r+ i. i: C  D6 X
         SuperscriptBox[. s+ z5 g' x& U- n" E1 c
          RowBox[{"(",
    : V# ?" L6 C) @       RowBox[{
    7 ~: m5 ?: n% M  F# H2 @        RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-",
    6 U. V( S0 u2 G; L% ~, M$ Z     SuperscriptBox[9 g! Z6 ~  y3 d6 D2 O
          RowBox[{"(", 2 ~. s+ F, x$ }. ]
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    / s( T) C: K" A& X1 I6 t* r     SuperscriptBox[
    ' I" c6 {4 l5 u# i3 y) S      RowBox[{"(", % A' Y3 W9 S5 N  w
           RowBox[{
    9 G; c7 C4 R0 j; U6 K- d        RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    1 f1 F# d0 O; `* U# n     SuperscriptBox[
    ) T7 o& ]% Z6 F2 k      RowBox[{"(", ; |9 M' i! P% j$ j9 @4 _! J: H+ d8 Y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", : t! L3 c; W0 i: l& ?! m) ?* b. u
         SuperscriptBox[
    , Q( F3 Z  t1 W      RowBox[{"(",
    6 v3 }3 N9 m/ n' J6 Z       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ; A, @3 U' Y9 m) l' G! |0 U    ")"}]}]]], "Output",, y" l2 v% r. `1 S% A5 C  P) J
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, ! D7 W; M8 t- T
      3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9,
    9 i: [& H$ b9 M% y2 d  3.5779608945565863`*^9, 3.57801226165625*^9}]5 S; W$ b. w- Z# v2 ^! i
    }, Open  ]],' c+ o+ h! a3 }: ]; c% H* w
    # A& W2 q! F4 V! b
    Cell[CellGroupData[{
    2 c& q, Z) K* P$ A0 P5 H$ r8 b
    # i  b4 N& q% }8 W' h- I9 u% S$ JCell[BoxData[
    ' j  [% v1 H. }, N+ f9 R8 y RowBox[{"C9", "=", "Ca"}]], "Input",
    : `+ ], z: Y: T: _ CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
      T, m8 X7 A7 M7 \& [! V5 A9 g+ f  3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],
    : a% @* ]7 V" c. O
    $ X  l( |" c4 Q- U) R4 \Cell[BoxData[- ^' H: P2 f8 D; m' X
    RowBox[{"{",
    , l, T$ a* {: \2 v0 r" S  RowBox[{- I8 H3 b) M5 l/ m/ X* k
      "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",",
    ; P  s5 ~! X3 {) R$ k   "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}],
    ; v: d- C% o4 q4 Y  "}"}]], "Output",
    0 E; W6 [4 |% W" L7 [' { CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    ; t7 `) O/ j* c. U! |  3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9,
    : {4 Q3 S0 d) J/ D  3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9,
    " ^6 t7 H3 r- b  @) _) ~" Y6 @  3.578012268234375*^9}]
    * m( X; W3 t# O3 m8 l}, Open  ]],
    ( r3 U7 }% l5 a( N% F, x3 h7 R, L+ ^& i7 @) X
    Cell[CellGroupData[{
    , \- h, P6 Y1 n- m
    " ~7 S( `" U" N  Z' GCell[BoxData[, Q) N/ L8 l6 b9 ]- Y$ A
    RowBox[{"u9", "=", 5 Y, U0 U9 j" k; R5 C  o
      RowBox[{8 ]8 |$ U1 O, S: }
       RowBox[{"Exp", "[", ( z- c, L/ n5 h9 d9 }" ^  y
        RowBox[{
    ( l2 Q% ?6 @! _1 z% E     RowBox[{
    6 m3 F( l# ]" s2 H. z3 ?3 ^      RowBox[{"-", " |  P6 S# K8 n$ o; L% _( o
           RowBox[{
    ( t5 p3 Z: X; l9 w# `3 g. j        RowBox[{"(", ) v  s- {) F% j; A
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    % q' k5 L. @* L1 a+ o+ a6 J, y/ T        RowBox[{"(",
    3 @$ k- a: X2 X% X         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],$ c, `( W. v( j8 k5 b0 R
         "]"}], "/.", "DeltaX"}]}]], "Input",
    7 E, e# O* A4 T% M9 Q4 F CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, / n. [# G7 h1 j% `7 D- P
      3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],2 J2 T9 v  e& K+ X# {/ n* k

    # P" [1 d- q5 R: lCell[BoxData[) x9 C  x6 Q5 d. u+ J; W
    SuperscriptBox["\[ExponentialE]", 1 v3 U4 H" {. n! R" Q
      RowBox[{"3.141592653589793`", " ",
    4 `; V4 q) d1 H   RowBox[{"(",
    + t$ n* Y& m2 U% P; T8 _    RowBox[{
    , g5 K+ w. j# b, q; A) O6 n     RowBox[{"-",
    ' ^# O9 q0 R( p1 e1 {# d; d      SuperscriptBox[, `! ~( d+ A) p1 v( ~2 J3 M9 {
           RowBox[{"(", ! T' J5 e" M8 E
            RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-",
    : c# h; i' k1 c/ v' \9 K3 n. \0 U: ]     SuperscriptBox[. q" m) `" y# z' J2 R
          RowBox[{"(", : \* N& [, k1 J1 L  y
           RowBox[{
    $ b5 d) _; {( H2 m2 r1 h$ L" ~        RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-", 9 x$ h" v  B# ?9 i: i% P
         SuperscriptBox[
    , G$ P/ r4 Q8 H+ r3 O9 a4 @" [- _" ]      RowBox[{"(",
    8 w$ U1 G7 n$ D( j5 {2 ?  g       RowBox[{
    & J( b8 u  C- k0 _        RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", 3 x) i* j% B' L$ q1 y
         SuperscriptBox[
    / T* `2 C8 S7 b- a3 l      RowBox[{"(", 6 q0 ?$ E: k( r  R5 B+ v
           RowBox[{
    $ ]7 ?& H1 G% M% ~        RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-", ; A# N7 R9 M1 _- ]7 S& g  R4 L, v
         SuperscriptBox[  Z6 K! m& V* l3 B" y
          RowBox[{"(",
    , C  X  {& o8 T% N+ ]       RowBox[{; u$ e; k. x% P5 S( F
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    , x. _2 }0 C7 ]8 I) z+ u: B- ?     SuperscriptBox[: R9 ~8 m2 ~2 d' o8 Q$ O3 C& E# X+ g
          RowBox[{"(",
    ; m; e3 z, B3 g+ V7 `' b       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    1 L/ F- M5 |/ `; e( u9 [3 s: T     SuperscriptBox[  r0 h% p# V# ^) Q4 \
          RowBox[{"(",
    & {: u- {; K+ e  _# u  N       RowBox[{+ W  n& S% ]& P$ j2 z, C2 P  R
            RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    ! q. {3 o" I! O# \0 _- G1 ~     SuperscriptBox[
    8 s  U/ m4 U- e0 i$ S3 q      RowBox[{"(",
    ) r  ?8 K8 G  M0 c3 E       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ; ^7 F7 ^6 a: |5 c
         SuperscriptBox[
    ) X2 s7 V- Z8 v4 i3 x7 l; P      RowBox[{"(", - Q  R8 s6 b4 D5 y* K4 a
           RowBox[{
    : m/ {  N4 E7 ]/ }4 Q# T" w& a        RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}],
    # q) p8 Y' D, p9 d9 _/ V    ")"}]}]]], "Output",
    , j2 r# ]2 W$ m* g* N CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    9 e' f7 R  c9 |: c5 h( [  3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9,
    / i8 ?) p- _# x* c  3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9, " Y. w$ s% I0 ~: c  s
      3.577961530421959*^9, 3.578012269125*^9}]
    - |% b6 ?0 |% }. b, I}, Open  ]],
    ! H. J2 I( {5 Q* J* C5 z% T# H1 N" L% E( ~* [- F) H
    Cell[CellGroupData[{: d% E* J" h& X: F' Q" l+ h

    8 |) Q& A2 D1 `  _+ A% h/ F8 hCell[BoxData[{0 F! W7 R# h: B3 f& P+ N) s
    RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]", ( a% t. {: _; p$ U6 ?1 j: ~, z
    RowBox[{"u10", "=",
    # S+ B$ i: `7 u  RowBox[{; p  Z4 z1 Z, W0 X# B6 H
       RowBox[{"Exp", "[",
    $ c, L, [9 |& N" Z3 I    RowBox[{/ p5 ?% [; k! C0 _' n% ^+ e
         RowBox[{4 w- m; ~, t) P& z7 G: `' \
          RowBox[{"-", " G; @: A7 I1 l4 r: G, v
           RowBox[{9 B; S/ k0 {9 K' j+ [; i
            RowBox[{"(", + E) r! ]0 @! u8 q
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    - Y( B2 b2 |3 u+ @! I! X# D        RowBox[{"(", ( Q, k8 Y/ W1 M) P/ ?/ A
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    2 X1 u" _% u; n& q! j     "]"}], "/.", "DeltaX"}]}]}], "Input",
    6 @* P  t" |* ^- U/ p CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],4 V) c# v! ?& k

    4 S' w4 v6 i4 ?- z1 ~! b& ]Cell[BoxData[% j5 \: s' `/ J9 F# P( e) l1 d3 d
    RowBox[{"{",
    # d; ?$ T" ]9 N3 I( p& e" j  RowBox[{
    / X5 o/ f  y( s1 F& x# _" `  "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",",
    ( r3 C5 K# O2 }- R( Z   "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",* o4 ?% h1 c1 _* f: C
    CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],  Y, ^) ^6 @1 k# m4 N) X. X
    - A6 _3 K$ z+ c5 m4 X) ~/ P0 f: Z
    Cell[BoxData[
    ) I7 k% u4 v, |/ h; Y  @& X SuperscriptBox["\[ExponentialE]", " E, _' |: R* _; F8 I8 Z% f
      RowBox[{"3.141592653589793`", " ",
    5 u( D$ `8 l5 C" Y4 y4 ~; e   RowBox[{"(",
    7 s7 @0 K. b. c; d* O3 {; _* O    RowBox[{
    5 Y- x* k* {. R3 B  Z9 N, m     RowBox[{"-", ( K  |. u% l, R/ k6 k. Z# L' l$ |
          SuperscriptBox[8 C) ^9 M" I: h! [) |! B& L0 Y
           RowBox[{"(", 0 b( |2 M& p) ~' `0 V
            RowBox[{
    ! z+ l& u( L4 a* d) t+ t$ C         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    2 _; v/ {* j+ d9 g1 j7 P     SuperscriptBox[% G4 S# b6 t2 ]  k4 E! a& u
          RowBox[{"(",
    + E$ I1 n+ G/ E( ]       RowBox[{
    ; n7 l4 s6 W( Z; n& l2 I( |        RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-",
    & [7 ?& n  L# \. T     SuperscriptBox[, P6 S* F# A" M( d- L
          RowBox[{"(",
    6 c9 j6 l% Y! d5 d       RowBox[{
    " B  c0 R. T% w% [        RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", 5 u8 C8 n  l/ l  N
         SuperscriptBox[
    ( @8 O# C7 o. F9 ]; m9 k/ @      RowBox[{"(",
    ( R9 F5 i0 o" e1 R: D       RowBox[{
    ; P$ ^" y2 k! A        RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-",
      e, f+ t" T8 I, s! j     SuperscriptBox[5 ?; x3 w/ i& c
          RowBox[{"(", 5 _- D5 Z2 n+ ~* q/ w1 q# `! l
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", : Y4 M; q- B8 @
         SuperscriptBox[
    ) g  }' C9 g  F# Q2 y      RowBox[{"(", 7 n' t6 _3 t) u% y7 y) O+ B
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", / ^( b$ E, R! w* Y
         SuperscriptBox[) }* V9 Z/ V: g; X
          RowBox[{"(", 1 ]( w# t# u8 G, B; `
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    1 `2 h) O5 {4 O* @$ N. `' k; d( S/ P+ u     SuperscriptBox[$ C6 \, @. D' o2 A
          RowBox[{"(",
    1 I. M2 _+ C% l) v% e       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    1 h% u" {- q6 k0 C. F4 ]     SuperscriptBox[
    # o5 T9 F5 k7 x& w& S; f      RowBox[{"(", " [& d7 V5 ?) Z! U. j8 r
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ; {7 c$ R& K; }4 K    ")"}]}]]], "Output",
    9 d; _5 b6 F  V- q8 }4 a- N CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]" r$ `- V3 ~3 T) b8 V% e
    }, Open  ]],, q/ |  W; U: T3 k

    4 s! V# M3 R4 P) ^- HCell[CellGroupData[{$ R+ b( Z# l8 I; Q/ R

    ) n. |, T" ?4 ICell[BoxData[{
    " @! e: D9 F8 f2 a) C$ f1 n RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
    " Y5 S4 _# X" s; X: G: T8 E4 d RowBox[{"u11", "=",
    : x8 Q) r; V9 g( g0 q  RowBox[{( c$ H3 V9 L( k3 }0 n
       RowBox[{"Exp", "[", ' E% A2 Z) l: t: `7 v
        RowBox[{* s  x; E$ Z$ y* n2 |$ O
         RowBox[{
    ( f: T9 F. r4 n! y# [      RowBox[{"-",
    7 b7 ?& r* a3 q9 k       RowBox[{' y4 u  \; b4 P5 ]2 E8 W
            RowBox[{"(",
    4 g* ~" M" u* L: O7 U         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    : t! L, K  F, D" n2 F( v0 u) V+ @        RowBox[{"(",
    0 ?. j# V: c( y( r% t         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],4 R0 p1 K: p. l/ n# u8 u$ |" F
         "]"}], "/.", "DeltaX"}]}]}], "Input",* d2 Y0 K+ Q' K0 Z) a; Y
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {. U! `) _3 p' n) p+ G0 s# p/ Y
      3.57796154237158*^9, 3.5779615434011817`*^9}}],7 ?  G1 l# h7 M/ I
    5 K8 E3 V2 T% S7 R5 h& {
    Cell[BoxData[% e2 ?' P6 ]3 ^8 g: N$ A0 h
    RowBox[{"{", , G4 x9 T/ I! L+ G9 L( f
      RowBox[{
    % P" H- U( o' E. R1 d  "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",", # q  }/ N6 ^  l  ~
       "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    % B9 G1 H0 p! o4 O  "}"}]], "Output",/ |! b# R: z4 t$ y1 J* P* L
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    7 V+ e/ C3 A8 @5 I  3.57801228203125*^9}],
    * S6 [5 x0 d: N. P9 }0 r
    7 l/ l  _" Z1 v& K7 C; XCell[BoxData[
    ) M" G* O7 i- S% y- O6 d6 b- ]; W1 [ SuperscriptBox["\[ExponentialE]",
    * G/ j! v/ t/ I+ K% [4 q  RowBox[{"3.141592653589793`", " ",
    8 o- e! T% ~( F0 R4 b4 H1 Q  c+ {   RowBox[{"(", ) W0 I( C! s, I0 X& [1 H
        RowBox[{% p' N) t7 c8 r) Y# g4 K4 g
         RowBox[{"-", * i; f0 F$ J4 j. q- U, T
          SuperscriptBox[/ m& K+ U: H8 _3 [$ i8 |7 Q) P
           RowBox[{"(", 0 Q4 {: f3 Q8 c/ `6 V
            RowBox[{
    ; K+ L/ H. G( v, {7 ~( J% M1 I         RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-", 6 G- q; z% `  }, Z5 z- W  ^
         SuperscriptBox[3 U8 S) K/ [2 c" k
          RowBox[{"(",
    - ]( J1 @# ], }2 S9 j       RowBox[{4 ^. `% r) a! o1 i: V
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-",
    # r9 P0 C9 g0 b3 U. q/ }- l     SuperscriptBox[' p% C, e. p6 @
          RowBox[{"(",
    2 s; P/ _+ k- A" h8 |       RowBox[{
    9 i: Q. ^4 P3 H/ b! O        RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-", ; i$ b: c. T( m& E9 b0 N
         SuperscriptBox[
    ' G! U' R9 ]+ l/ N      RowBox[{"(",
    ! w( X# j; s; s( N; B       RowBox[{
    ) U4 c" |1 P4 k- f! v* A5 W        RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-", 7 |1 |: }/ |, {5 c
         SuperscriptBox[2 @! o7 C" p0 V/ C, b& ]% P8 R
          RowBox[{"(", * e8 O) N' |5 o6 @
           RowBox[{
    7 l% o. v0 n' s8 y        RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    ( V: r0 X. j$ p  I     SuperscriptBox[/ c7 N* c; a" ~" o8 z* R  W  N. U! _
          RowBox[{"(", + k% m8 j" l! V( N, x
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ) F3 F* Z' Y' @- [% r" q" o/ A     SuperscriptBox[
    ! g6 N7 Z  l8 K& s+ q, j      RowBox[{"(",
    - s7 n) N6 R. l" H       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    " j, y$ q- V$ [+ U5 N) H     SuperscriptBox[
    : x6 q) {1 ^' S/ {      RowBox[{"(",
    7 h3 I* v: J" L/ j" b       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    5 z* d4 C+ B6 ^8 J     SuperscriptBox[
    0 R0 s. G5 D1 d9 M. P- a) ]' C      RowBox[{"(",
    ( n5 c% |2 X$ J) M$ G  c" C       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    9 `8 G$ \! F% O7 W- w" \    ")"}]}]]], "Output",
    . Z# I  d' W- ~7 ~2 J$ c CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, ' \: }5 r1 s, {$ L! p5 x2 ?- Q
      3.57801228203125*^9}]3 [( T( L5 U2 h: _: N
    }, Open  ]],
    & t4 v" R7 M/ [% E" O+ S: w% X3 J
    Cell[CellGroupData[{
    / u! ?( Q2 X5 r  A% d8 w5 L) F" S1 s$ I9 L( l
    Cell[BoxData[{
    5 M1 `# O6 w5 x3 e' S1 @; x7 F RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]",
    3 e: f) V7 s* J5 [+ ? RowBox[{"u12", "=",
    7 p2 G% S0 X" _& s. R: ~  RowBox[{$ l7 {& _  @/ B: t
       RowBox[{"Exp", "[",
    # q+ S7 s5 D( Q) q' p- a6 b    RowBox[{3 Z) L: o7 N$ t. ]# Y/ t
         RowBox[{
    " k) |* @+ v4 R1 |/ u$ W/ W      RowBox[{"-",
    7 d# ~0 ?0 R& L2 U( E2 W& c- q       RowBox[{
    + z1 @$ \0 d2 |7 B* Y        RowBox[{"(",
    5 s3 |; S$ ?9 ^$ S         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ) }+ X' n+ i% e) Y/ V4 D8 E, Y+ o4 K
            RowBox[{"(",
    6 Y6 k$ N5 B% l  M) [( D- _         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],4 s  H. J; X" }$ k* w( ^
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    " a( i0 n# {6 ]+ G CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {4 u. }+ q+ n- @5 N1 Y' b( H/ H
      3.57796154237158*^9, 3.5779615576284065`*^9}}],
    ( l, r( ]- i# D  @" `* k7 u3 C: B4 C0 x
    Cell[BoxData[
    6 t2 `/ i5 E3 H+ E RowBox[{"{", & n& i& O# M" Z- t) T4 T) {4 O
      RowBox[{9 y, g' J* H$ X/ j  C
      "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",", & F& G$ [& ?" e0 s4 K
       "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}],
    & X( ~1 N- Q& l9 A  "}"}]], "Output",. t: e: I/ s$ Y: [* \6 v/ d( }
    CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}]," U# K! r3 L& ?+ v0 W: R

    7 M, ^1 O* {, T9 yCell[BoxData[8 C  [) r- }! {, ]- _9 L
    SuperscriptBox["\[ExponentialE]", 1 I7 j5 L: M# E
      RowBox[{"3.141592653589793`", " ",
      j' F& C6 G' P& |' e8 H2 w2 M- M" x8 K   RowBox[{"(", : ?3 c. Y! @- C4 l; c( I8 y; b
        RowBox[{
    9 S/ F5 q( D# w' h! j) P4 }3 D     RowBox[{"-", 2 z/ h8 a" ~7 `
          SuperscriptBox[/ x( X- e9 G3 Q0 Q; P3 ]
           RowBox[{"(",
    . {5 @/ K+ L9 b* c$ X        RowBox[{$ Z. g/ W! N, f
             RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-", ! t. f, X$ v) K8 C5 j0 B& U
         SuperscriptBox[- @; x1 [7 F# k% ?& m9 w+ c/ Y
          RowBox[{"(",
    : T/ P& h7 v6 t       RowBox[{. b8 z2 V# J, A$ C) h
            RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-",
    $ S5 r7 \' j- r& o& f0 Q  M     SuperscriptBox[
    0 f) p0 T  I" |8 |7 X5 l, l9 s" a/ j2 o      RowBox[{"(",
    ( g4 n0 }' m" P8 o- J: A       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-", : Z/ ~5 I+ u4 E7 C* r4 L
         SuperscriptBox[
    8 Y7 m3 c8 D% S, C4 F# f      RowBox[{"(", % m% z" q+ C% D$ d! g1 @
           RowBox[{
    7 ?4 @, }, j- ?& t( j* i7 b        RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-", , Y( Y8 D, v( Z1 I  |' Q! R
         SuperscriptBox[
    # h, v/ l5 M, H' K) j* n* X, r      RowBox[{"(", : m) G5 c  C; w
           RowBox[{" H" Y- A! m6 V& F
            RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-", 5 t& ^& H+ j2 E4 R
         SuperscriptBox[: X$ Y* v; h( `4 z; x
          RowBox[{"(",
    3 C; I/ r2 L/ M1 K: Y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 3 ]( S4 n( s  a3 U, I8 X
         SuperscriptBox[
    . a( v$ S7 D1 u9 ~- u: u8 T      RowBox[{"(", 7 V- {: h* s: U/ n2 g
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ; ^7 N- k4 Y$ ~% H
         SuperscriptBox[
    ' n. p9 N! M7 G0 Q# ^+ N0 {; _- X      RowBox[{"(", $ @5 g8 f  r1 Z
           RowBox[{- r/ p6 z$ K5 x. l" {7 Q& E
            RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", , {! x5 y3 G  i* J5 P$ {+ F
         SuperscriptBox[  k- f. I+ |6 i, V7 M9 r
          RowBox[{"(",
    # ]9 F# T" `& T/ e' R( h2 s( w       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 6 z$ t" b5 ?; |; D6 ?
        ")"}]}]]], "Output",
    5 V$ a" R1 |% U CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]& j1 C/ r/ b  Y+ j3 o1 h( k' r
    }, Open  ]],2 b' e4 B- ~' c$ x" g6 s0 `

    5 f& }% m2 `! gCell[CellGroupData[{- ]$ l- T7 I& N7 f

    5 ^9 k; R5 L1 E( E* n$ iCell[BoxData[{! C6 N8 T7 j$ v! q6 y, f
    RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]",   x4 P- d6 l2 p% n" w( A9 q! a$ I( d
    RowBox[{"u13", "=",
    . M& m, |) S$ }( n0 `. X4 l% l  RowBox[{$ _6 C0 K( z1 v! N$ d% A0 H
       RowBox[{"Exp", "[", ' m) I9 K, m4 ?, N# N0 E3 [: y
        RowBox[{. x4 R; L' v' K4 s8 W# Q( f
         RowBox[{" K% V! ?$ A- ^
          RowBox[{"-", : Z$ X" n& e) j6 i0 C
           RowBox[{
    3 G& ?! P/ ^6 Q4 e5 R0 G        RowBox[{"(",
    " t+ K- k/ L1 G4 j         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
      _8 s. |4 H0 }; Y9 A& x        RowBox[{"(",
    $ \2 D( j8 ~9 R" [; r. r0 S         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    7 P- U. C% N+ B4 _- S4 T     "]"}], "/.", "DeltaX"}]}]}], "Input",
    9 O. g; ?: x# H. m" R4 W$ o( |! z CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    * v! X' `; T/ z- V3 O  3.57796154237158*^9, 3.5779615599684105`*^9}}],3 h( n2 `. {) c& D

    ( \) y" w/ D  A% V: k6 mCell[BoxData[
    1 b, u( H7 Y; |6 G: d RowBox[{"{", 2 O' X$ n  p: f! D1 y
      RowBox[{5 K) O% i$ W* ]+ Y0 [' y
      "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",", * _2 V* c$ U+ H8 Y- E3 j
       "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}], " W6 l) S1 {( P3 j" q- w
      "}"}]], "Output",
    # n& m  M6 k% b7 x. i, O. g! j1 p CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]," G* Q. B3 S- R& A

    . C! O! A9 V* _7 y, @/ qCell[BoxData[6 d( n  E$ ^" S' a
    SuperscriptBox["\[ExponentialE]", / W2 A! b: r! b4 h- R
      RowBox[{"3.141592653589793`", " ",
    2 p5 ?" K7 L, E3 P% s   RowBox[{"(", 1 A! X& h# \0 M  r* D/ }
        RowBox[{1 @/ l0 r& z" ?% i% j7 R  ?
         RowBox[{"-",
    2 G. `" |# K5 H      SuperscriptBox[
    # s5 @+ C$ F+ T+ O, }' u       RowBox[{"(", 6 X+ j/ w2 p7 i9 Q, J% e
            RowBox[{4 T" c" J6 ]) }' X" Y
             RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-", % |4 H5 P& M% ^1 i% Q2 p* [
         SuperscriptBox[. _& F( Q  Q5 r  K5 S- u
          RowBox[{"(",
    : |9 d6 l4 x2 H+ o: Y       RowBox[{2 [- n6 Q7 R' `7 [2 `
            RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-", - ~: q( Q8 m, E4 U% F
         SuperscriptBox[
    . J( c! Y( ~* W" T2 m/ H1 s6 k      RowBox[{"(",
    + p( p. J# Z3 H! c) Z( |. s       RowBox[{! N- ?6 u; c2 l" y
            RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", 5 |! t- c1 q8 ~: [
         SuperscriptBox[
    , z) Q& q7 \3 f7 b$ |9 M      RowBox[{"(",
    $ Q! r& H! x, k# N6 M       RowBox[{; r  b4 d0 j1 f( v
            RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-", ( f6 M7 H+ R6 U5 s
         SuperscriptBox[' {$ ~2 a& n9 S
          RowBox[{"(", 2 P' B4 D6 l4 p% L5 O  C
           RowBox[{" v9 C% ?2 c# ]9 }$ X+ g
            RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-", ( w9 w* F9 o6 y  G$ ]! \/ E
         SuperscriptBox[
    + n0 u8 A% M- R0 C. q0 @' z6 @      RowBox[{"(",
    - B2 Z2 \3 S2 }" ~) ?2 _       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", % t; N4 A. O5 E8 @$ O( J
         SuperscriptBox[
    & k- S' t1 Q4 ^9 D# g5 G" _' M      RowBox[{"(",
    8 k  v9 r9 v4 Q3 m( N* D       RowBox[{
    " J* f  n) Y# D1 M! K3 ?        RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",
    2 k4 U, _3 |! p3 s2 d$ h8 z9 Y     SuperscriptBox[
    $ g$ W8 i; S# A% G      RowBox[{"(", ! u$ c$ t6 G+ Q3 U% m: s/ O' X* [' n
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ( P; A" {+ ~2 e; i9 J
         SuperscriptBox[
    # l) m$ y* O" e3 c, q  u      RowBox[{"(", " `* e1 L0 A. |$ n4 @" ~* N
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], + A  E. C! W. N9 S6 A# d" R
        ")"}]}]]], "Output",7 l9 E+ N4 H& V5 M. i2 E3 A
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]6 y' X( m/ g; |; n& {7 Q9 v
    }, Open  ]],$ N* W" G* u  }( I% u' W7 W: d# R

    4 Z( J8 |- L7 L0 I7 Y5 I8 hCell[CellGroupData[{
    $ E- g. u/ V% u' ~; N& Y0 M( [$ J$ ~" Y9 Q$ h3 M' E- l% E
    Cell[BoxData[{
    - v6 {2 R/ }' J, \: } RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]",
    $ \! E- a1 b8 M3 x RowBox[{"u14", "=", : p% R7 J! V  M
      RowBox[{
    + f* L3 ?( O5 Q' r# o   RowBox[{"Exp", "[", ( Z" m3 V7 ~% W# @' |
        RowBox[{# |" G- V4 r  n! a! N7 q
         RowBox[{9 }& O1 J+ g  d
          RowBox[{"-",
    4 X) O2 g. [( u5 P9 M       RowBox[{
    ( L5 e# X' z- ~  |0 z/ h        RowBox[{"(",
    8 G1 T0 U9 a; t3 a  B         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ) t: I/ x& G, e: g6 a        RowBox[{"(",   m4 b$ M1 K; W$ P' z( [
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],  {1 \: A( t* y/ n. {. `* v8 _
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    . B, j# H% y% A; @9 Z1 m CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    / W) E  ]% V, j+ q; o  3.57796154237158*^9, 3.5779615663176217`*^9}}],1 o6 D( c# z3 X
    . M% c; D! [$ F" f
    Cell[BoxData[
    4 ?; S% t5 y, j& K RowBox[{"{", $ I& s- V% p" b( C+ h9 L  |
      RowBox[{4 L. q9 s0 l$ k( P
      "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",",
    ( n$ d  d' }9 e; P) m   "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    * Z, S/ ?5 b  u! G  "}"}]], "Output",& a1 I! f0 y) H0 h; a
    CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],$ e5 Q% G  s7 ]: W4 m
    $ L# C& K/ i( `7 b7 n
    Cell[BoxData[+ [) h: O" V! V# z+ D5 d1 j
    SuperscriptBox["\[ExponentialE]", 5 J( C- S; j, K4 |8 U! g
      RowBox[{"3.141592653589793`", " ", - U# x! ^$ [; d/ D# X8 ]
       RowBox[{"(", 4 t3 e' x9 B4 }3 W
        RowBox[{9 \  d. q# D) ^$ x. S+ ~; N
         RowBox[{"-",
    0 E8 x3 m  w; U4 H! ~2 @      SuperscriptBox[: L* S1 j+ h4 d
           RowBox[{"(",
    5 L3 v( o9 J2 g7 @1 m# z; @        RowBox[{
    # U  }; e; j0 G, y, P9 g         RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-",
    / _0 A" h4 r5 P     SuperscriptBox[
    " c7 E9 ]( ?( y4 X( K      RowBox[{"(", 0 Z4 r6 h- O3 W, [; X
           RowBox[{( k% w7 y% E- u3 k
            RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-",
    % L4 y9 P6 p  U: b5 H5 j9 U     SuperscriptBox[
    ( @. }6 s  T/ S, E0 Z      RowBox[{"(", 5 ~: e. Q8 {1 U9 J) `
           RowBox[{
    : C' o5 y# C5 x        RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    $ x. }! s1 i. K     SuperscriptBox[! M. Q) C* i2 R4 w  N
          RowBox[{"(",
    . \% [% l0 l, P       RowBox[{: V  C2 r1 h% H) X; W  c
            RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-", " U, T8 z6 n. a5 m
         SuperscriptBox[
    " k9 v9 E; N4 [5 n' v6 c% s  G' j% D      RowBox[{"(", , U9 p, ]9 S, [) I: z
           RowBox[{
    / S: R, _4 [+ Y. V- G, N        RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-",
    " u6 Q8 C2 W( H7 q     SuperscriptBox[
    - N& }$ u" Y- [! S/ ~      RowBox[{"(",
    # _6 Z7 v# D. ~* k5 e       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 3 o; o% e9 X5 [$ S+ I7 f
         SuperscriptBox[# I' v" k) J# Z, x
          RowBox[{"(",
    ; E, X" Q& P" Q2 k# r, [       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    4 a; H/ `0 l3 V5 Q/ `) g# G2 T     SuperscriptBox[
    2 L' R. l2 t+ M, b  m2 O; h      RowBox[{"(",
    % f# R. _' S+ x# D6 ^" j# k/ ^       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 3 r: m4 M: I% i0 D) ]/ ~' n
         SuperscriptBox[
    & ~2 M8 {- s, s* p/ @      RowBox[{"(",
    1 T4 S: H" `& U, M4 n" G& y/ ^       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 8 |) I& t& T7 V& \* r7 I
        ")"}]}]]], "Output",1 A3 V* E4 d) J; G7 Y
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]0 K/ ]! X3 z5 [7 F
    }, Open  ]],
    % P) y( n7 T  V7 N! j9 |: J5 y; @
    7 ~- b/ A4 s' ]Cell[CellGroupData[{
    . {0 S! s) X" M3 K6 f
    7 H) C8 B, Q4 Z; H/ T! e+ U" `Cell[BoxData[{
    0 Q. g" C7 J3 j8 g RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]",
    & ^& Y/ @9 @; k* N$ b! F: s RowBox[{"u15", "=", 1 _* j: Y8 X4 C3 |' {
      RowBox[{8 M7 D: N& ]/ N! h5 a
       RowBox[{"Exp", "[",
    " x" [9 K2 e- B7 P+ M. S. O3 D    RowBox[{, t9 X3 H4 L+ `& N
         RowBox[{
    ; c! D  M0 N8 p3 c/ t  t$ s      RowBox[{"-", 4 a: [/ L/ V0 ^: `' X; _8 O* U* Y
           RowBox[{% G2 u+ f! N5 @9 x/ z3 r
            RowBox[{"(",
    1 `3 }/ t6 D0 s. k: a: G6 `% Q         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    6 P9 z" D* `- [        RowBox[{"(",
    & @7 O5 x& g0 J" f; O: M         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    + r' w3 J/ Q* p8 e* a- ^6 z     "]"}], "/.", "DeltaX"}]}]}], "Input",
    ; S$ T; V- j4 P CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    2 M% V3 v5 I$ I4 b/ V  3.57796154237158*^9, 3.57796157098203*^9}}],5 Q$ c0 c! Q' b/ ~' e7 b+ D9 ~. c% _
    / E4 R. Z3 ]$ l" W4 S6 W% x1 G
    Cell[BoxData[( r9 G+ j0 C$ r, C3 W) Y
    RowBox[{"{",
    4 {1 H( I. I/ W8 ^8 J  RowBox[{
    7 u; \+ u: N6 H0 S* K6 C; ?  "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
    2 ~( c7 T! h$ j2 q2 e+ F   "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],
    & [, H4 [, N" j7 C+ [  "}"}]], "Output",4 J! y: n  K* R' v8 b
    CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],
    6 S8 R' @* w4 f  K
      p) Q# l" P+ PCell[BoxData[, k" J7 u8 t2 {
    SuperscriptBox["\[ExponentialE]", 7 f1 Y& c4 ]1 t% w3 Q( S
      RowBox[{"3.141592653589793`", " ",
    $ |" w* K; k# x- e" U; K   RowBox[{"(", 2 |, w: g1 J. [# p  M, f" P2 y
        RowBox[{0 X/ c5 V' |+ z9 }
         RowBox[{"-",
    1 ~  c1 B, L) Q* p, d7 D      SuperscriptBox[
    0 B' m  b+ j% J       RowBox[{"(", " s: k* v3 {) N/ O$ m3 e+ b
            RowBox[{% ~" k9 P& X1 Z; D
             RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    / `4 m. c2 W/ Z     SuperscriptBox[
    ; J2 |- `* n* C: b9 M      RowBox[{"(",
    . ~% f; R- d5 q0 ?       RowBox[{
    - J" J$ L5 Z: n/ K) W        RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-",
    5 j6 h# L) u% j6 F/ N     SuperscriptBox[
    ( v; D1 F( N9 X' y4 i$ j4 V2 w      RowBox[{"(", ! C1 u; x5 ^3 f1 c8 F8 X* n+ p
           RowBox[{
    ) a' W0 v  ^4 d8 W7 B        RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", ) z, ]2 X! R8 J1 C
         SuperscriptBox[
    " `4 g& T3 N+ F% T, i9 `      RowBox[{"(", " G3 Q; u7 i% ?% p
           RowBox[{
    + f8 s$ D2 N% u( Y. K5 O# F+ ^        RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-", / G+ k7 m; G3 Z4 Z* Y
         SuperscriptBox[
    # [7 Y) E; d3 k      RowBox[{"(",   Q3 V. J7 ~9 E3 q3 F! o9 \; H
           RowBox[{
    - E( O  _% K( }0 V        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", ; x+ Z' E* V* m- l
         SuperscriptBox[6 @, P( _5 K  j; ]
          RowBox[{"(",
    / Z1 d, o7 v: A) w. Y       RowBox[{3 n( J+ i* R9 y
            RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",   w2 P. F2 [4 p0 I( \& {$ A" d
         SuperscriptBox[
    8 ?( C" Y1 F3 X      RowBox[{"(",
    2 x3 X1 a  z+ ?8 S- I       RowBox[{
    2 Y4 E' z9 ?8 }/ \! w& {5 h        RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", 4 B6 n1 I8 q: j& C$ `+ s0 O+ l
         SuperscriptBox[
    % p) L8 t) r4 I" l+ [: {: _; |      RowBox[{"(", . c4 {/ e8 @5 t0 ?9 X" q& M
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    & X/ ]! l: I& I) N, X: E     SuperscriptBox[
    0 E' _" Y8 d$ Q" r      RowBox[{"(",
    ' R$ v4 o  N' V6 n6 C4 p       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    9 @9 o& E7 p* h8 x: l. n, E  {7 Z    ")"}]}]]], "Output",1 Z/ D0 o  H0 P5 q
    CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]5 t% o' j( Y4 t/ J9 }1 S4 M
    }, Open  ]],+ A) o/ O* K: _& N3 m% o
    & R7 \; b$ c( U
    Cell[BoxData[- ^/ h/ x" Q6 a5 [
    RowBox[{"For", "[", . C' ]" q. Z6 Q; F3 \
      RowBox[{
    ! q# w+ |9 F! n  P* D) Q   RowBox[{"i", "=", "1"}], ",", ( I7 P/ P9 V$ S$ z/ f. t- e3 Z
       RowBox[{"i", "\[LessEqual]", "9"}], ",", ' y. d# I) A% g6 W  o. ~
       RowBox[{"i", "++"}], ",", # k8 Q; V4 q6 Y. A6 [
       RowBox[{6 J; k" ]8 g9 T/ d: r
        RowBox[{"Ca", "[", 4 o( ?- O9 V5 e7 [$ O
         RowBox[{"[", "i", "]"}], "]"}], "=",
    ( H; f2 Q0 e0 l# @6 d    RowBox[{"CM", "[", 0 q/ X- W* I, G* ?' p4 }
         RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",* @% M" m6 @/ V) Y" f# ~' D8 Y
    CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],, ?/ u. o! K4 S; B! l7 ]  G4 B
    0 D; w8 j1 @# I3 a! g; W- L6 \) _
    Cell[CellGroupData[{. G6 y# _' T0 P
    ( h6 M$ `' v# ]2 o, D" h
    Cell[BoxData[{
    5 }7 q7 b3 D) e) t- V+ R& o7 ^ RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]",
    " U, a) d  p* v$ c1 k+ |) E# _ RowBox[{"u16", "=", ) Q6 K" v2 f+ c& w& E$ v
      RowBox[{
    / L# q+ m. l& q8 _   RowBox[{"Exp", "[",
    - L# f, L  i4 F    RowBox[{
    9 t/ P$ {0 [1 t, l6 N. a5 H4 z2 ^     RowBox[{9 y" g' Q" v* D) J8 j
          RowBox[{"-", 9 x- ~# O5 G* D
           RowBox[{" v2 W) I' ?$ i& H% _8 H! A9 O. j6 C
            RowBox[{"(", 8 ?1 k) [8 I( D  {& F- b  }' U! I
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    8 f) ~7 n2 B# n  k( f& c* `        RowBox[{"(",
    0 a$ }, [/ f1 D$ r) y         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],4 t( Y: p% `( }6 _
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    - j# P+ ]1 y. V( Z3 M CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    * i; f1 I* H  w2 w- P* f$ x. S  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9, * Q1 T% K+ |. l7 M) f5 ^* G* F7 q7 E
      3.5779615751004367`*^9}}],
    ) K- ]8 G* {3 u' T3 a/ e1 H) A' S- T* l3 P
    Cell[BoxData[1 F) B9 T4 h8 C- p, K
    RowBox[{"{",
    " h! J9 a+ k4 _6 W& ]  RowBox[{- t! ^8 o5 t) e& f" k
      "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",", 0 J4 Y2 z$ ]: [/ h2 |+ X
       "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], 3 Y8 \. O6 \: S3 |* ?
      "}"}]], "Output",7 m  `( C" _6 W3 }  ~  [3 h
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],
    % p0 s) `9 G& ]2 b8 W* G2 [8 P$ {  ?( l9 f: X1 ]
    Cell[BoxData[( |. |" m5 {  R; l2 i" o" t
    SuperscriptBox["\[ExponentialE]",
      w+ c+ P; i5 R& y* B- L  RowBox[{"3.141592653589793`", " ",
    3 Q9 z' ~9 g! X/ ?# g) ]: I% V2 o   RowBox[{"(",
    ' m. z, Z+ E) p% D* C7 N" ~8 [    RowBox[{
    4 q9 A3 V+ n7 Y/ E     RowBox[{"-",   S" c. ~( F. d. d& H  k
          SuperscriptBox[0 F' s& r" ]+ M  M
           RowBox[{"(",
    7 S/ h6 m% d* f; c9 v$ Z) ~6 L        RowBox[{' x, d/ Q1 `3 r: w
             RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-",
    . H: b' L5 h: M; v, ?% W/ W     SuperscriptBox[, w4 `) H* C# W# D
          RowBox[{"(", * m/ {' Z7 u6 {8 Z& e
           RowBox[{8 O5 K# n# l8 m/ Q  n
            RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-",
    / M% J- R  O- }( P; v     SuperscriptBox[
    7 y9 ~' |3 H: S) r2 J8 \      RowBox[{"(", ; s. O( f! s! V9 t6 z  u
           RowBox[{( D, U. n3 Z' I/ u+ D. |* a
            RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", 3 V+ k" b  _" z% M* R6 J1 g
         SuperscriptBox[
    8 t$ ^1 Q1 G) E; G; L8 K      RowBox[{"(",
    ' s2 f* _2 G! o% K; Q5 v       RowBox[{
    3 u2 V3 Z" z- n" y) l        RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-",   s- U7 P4 n5 c7 p
         SuperscriptBox[7 w9 V4 G1 {- K" J7 O. Q& r: E
          RowBox[{"(", 1 P: ]$ ~7 H: P( k# _
           RowBox[{
    ) ]( ?8 h( x# O, C9 a* k) }        RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-",
    5 V2 z. ^- O! t9 H& H     SuperscriptBox[5 g( B" G4 f2 h+ _  D0 U
          RowBox[{"(",
    1 u8 Q8 _# y7 ^1 K* k& j       RowBox[{
    ' M8 J/ M! k( c" T        RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", " Z" {2 c7 D% b- O( S5 z
         SuperscriptBox[( W; R7 G  T5 T% X- b0 f
          RowBox[{"(", / E: T& q" `. I' G2 q0 K5 h1 m" a
           RowBox[{( S. L3 B$ f+ ^: M3 q6 ^
            RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-",
    % D0 w0 S: }" T     SuperscriptBox[( ]7 k7 s/ s1 A* u1 h
          RowBox[{"(", - ?. \4 R/ ~  p
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 2 {& c2 h8 P& |. u" N
         SuperscriptBox[$ z; n8 W4 B; n5 ~* O4 S
          RowBox[{"(",
    8 [' I$ R; G* y% t% l       RowBox[{
    + g% K2 p7 m, C  o/ k- ^- b0 C& o: v        RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",
    3 C9 f6 @/ X0 k% W3 m6 ]9 X' p CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    7 n% W: Z: V6 A}, Open  ]],1 l- N, f2 v% D4 `+ ~

    % h% Z% [0 J7 \Cell[CellGroupData[{: N& Y3 L* G; u& t( o8 ?

    % p+ R/ X$ Z4 m" @$ R/ Q+ r/ UCell[BoxData[{0 K$ O1 z& b+ {% O* P& ?0 b
    RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]", , W% ]. j8 Q0 p% {0 q
    RowBox[{"u17", "=", % h% G* M- O) h% h3 R
      RowBox[{
    9 U( v; W  K- N. o. f( O: L0 m% Z2 Z   RowBox[{"Exp", "[", / o+ B: L$ v3 |" U
        RowBox[{
    # L! a# }/ D1 u3 p) q& H8 ~     RowBox[{* a7 K2 {! q5 U- X* p2 `4 M
          RowBox[{"-",
    / S5 I, B+ w6 t       RowBox[{0 l5 T8 s7 f8 g. |- S
            RowBox[{"(", % z: l2 X: W, W: x
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    / v2 X* z' J" f+ w        RowBox[{"(", / l9 U" N  }/ t: _
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],; c& i8 B4 n8 S* ^: i
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    3 G) J  V' b. H: U+ } CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {/ C$ Y: Q4 B% Y' {' h0 X
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9, " }: b# D3 n, _9 O- G2 ~
      3.577961578953644*^9}}],9 Q  Q; |8 C: t& n- z& B& j- h
    8 O  H: v% V% @6 W
    Cell[BoxData[; G4 T2 x* D1 x9 z
    RowBox[{"{",
    + @+ y! w, b8 C9 D7 X) C& ~  d  RowBox[{1 |+ l7 y. O& o4 h
      "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", 7 G/ Y0 [! r! F1 t6 e+ w0 r# `
       "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}],
    $ S7 [0 N4 ~! x7 @6 a  "}"}]], "Output",. _7 D& G# q  @# D6 n1 Q& Q
    CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],. q# x) ^6 f0 T) A: m0 f+ Z. j

    / j, {9 q# |6 _0 SCell[BoxData[
    ) r% J" l) J. l( S9 P( F8 a0 r SuperscriptBox["\[ExponentialE]",
    " w$ f7 v2 c* e" \  RowBox[{"3.141592653589793`", " ",
    $ T4 X0 U% N8 W5 ^- b, c1 i! c   RowBox[{"(",   P3 E7 o' C  _( \
        RowBox[{
    2 S% z# j6 N* U( S! ~6 ?     RowBox[{"-", ! J3 u) }) R/ R5 B+ S
          SuperscriptBox[) C( _# w- L' z( ]. k
           RowBox[{"(", % k3 A; Q' v; p/ y' [6 Q/ @! s  ~3 I
            RowBox[{# y6 j- W" u  R4 B) `3 E! e3 }' |% C
             RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-", / b% O% R3 h2 i
         SuperscriptBox[
    9 q0 A: s% _' I      RowBox[{"(",
    $ M8 z3 i& |: _( B1 m( ^* p       RowBox[{0 w$ P; g: Y( B+ n
            RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-",
    ! w" Z# U1 |6 Y8 l2 J& F7 A     SuperscriptBox[/ [; V9 l9 |. N9 w
          RowBox[{"(",
    & w6 R: H# e% o/ ^! J       RowBox[{7 q3 z/ m+ m9 i0 i0 O3 y
            RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", " c, c& o% w, p
         SuperscriptBox[9 ?3 ?! @$ d4 C7 X6 x5 a
          RowBox[{"(",
    - j* J- l0 \  e7 @       RowBox[{2 J9 O8 e4 P+ q& X- k4 G( A# j
            RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-",
    ; s+ L$ K$ q: d5 R     SuperscriptBox[
    " O3 `7 x$ X) T) |6 G8 d1 e      RowBox[{"(", + R  S4 ?! |0 a- \
           RowBox[{
    ; r7 |2 d0 z" K5 T2 H        RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    . v% m' ?, o" k9 _; L& p. f     SuperscriptBox[7 v" g5 {7 j# I3 l8 V& g: L* u) n
          RowBox[{"(", 8 L, D* M/ Z: m, x5 ?
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    8 `6 \3 Q% f" _3 a$ C9 J' e$ }     SuperscriptBox[  R0 m3 S  n$ k6 J/ q. A# J
          RowBox[{"(", + a! t8 X. Z7 g5 N+ w
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 5 |7 {8 D% f+ n0 p" C( [0 R
         SuperscriptBox[
    ; I" A0 y4 T* G/ z% O      RowBox[{"(",
    ! {- [. j2 @! j/ {       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    $ y% u1 {- s' Q/ ]5 B* Q4 C  ^5 x/ o     SuperscriptBox[
    # W, B" ^; A* N. G      RowBox[{"(", ! }* x, ]- ^- t* B
           RowBox[{: h. m! v+ m6 ?1 Q7 q: i8 C8 a
            RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], 5 E$ Z8 F9 t( [) c% f2 B
        ")"}]}]]], "Output",
    7 T: i# p3 u- ~) `5 c9 g CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]0 u1 N( V( [: F* b2 Y; e: I
    }, Open  ]],
    : z2 M/ V( J1 [! M6 j) O: w0 {
    4 U5 F8 @* A$ D) m! E: e2 {. I+ VCell[CellGroupData[{
    ( o  q8 R. o9 g+ }
    2 \; V0 P7 y2 c9 y! N( p2 X. @Cell[BoxData[{0 ^+ w: y# v% |% T' P" e- _; t
    RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]", : P' n2 M% i9 V6 n  P
    RowBox[{"u18", "=",
    5 p" _0 v8 D( _) W! n8 ]# M# d  RowBox[{, ^" `  h4 e3 }- G# h4 A# Q
       RowBox[{"Exp", "[",   m' z3 M5 j1 i) v$ z; T2 @
        RowBox[{
    # `+ O$ P, b2 W. J* F9 f     RowBox[{4 ]5 L/ X' n0 n: C, Q7 H1 Y+ w
          RowBox[{"-", 2 \( |5 }; `4 n5 _  v
           RowBox[{& J! E$ q, Q6 e; R2 o7 m, ~7 B
            RowBox[{"(",
    $ H) h% H) |$ _* N1 Z         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + n1 \. s1 |% x4 I: L        RowBox[{"(",
    ' ?$ E4 g4 Y/ n$ n! v% K+ O- O         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    - y/ {4 p6 [7 g1 o5 n     "]"}], "/.", "DeltaX"}]}]}], "Input",8 z# r* ^! h3 g& D
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    . g1 E0 X, E7 V  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9,
    ' ], Y) A! u1 B9 r) t0 g. i7 P9 C  3.5779615828848505`*^9}}],
    0 C* p) D) Y7 ~
    ) T" U1 E5 C& w, c; TCell[BoxData[
    2 R( I/ W5 J6 ^5 ~) j4 [" Z  z5 e RowBox[{"{",
    0 ?$ _1 v. Q& D0 u  RowBox[{& O' J" U8 L: s5 P! `) `+ K8 |3 E* `# x
      "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",", 3 [. _! A; G6 o3 k- g4 F" B
       "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    ) S9 Y4 y. `% a  "}"}]], "Output",( \0 F7 N4 E" i( X7 M$ e/ p
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],
    # I0 Z% p6 _9 m& @/ q( r5 A* ]+ k+ I0 }  B
    Cell[BoxData[( {9 q. k" Q: J; ]
    SuperscriptBox["\[ExponentialE]", 8 [8 x& o% ]; S; w$ n: t% I
      RowBox[{"3.141592653589793`", " ",
    / Z, x; k; j; t6 k   RowBox[{"(", # U+ j1 a$ k! y0 Y% s  A2 L
        RowBox[{
    9 o- r- Z" N+ v1 L- L0 b1 i     RowBox[{"-",
    6 D7 J8 q- q) n      SuperscriptBox[: S& `; W  h! y3 L
           RowBox[{"(", " c9 {  ~8 f# C* j. N; C: l! u
            RowBox[{9 m( s; |3 y5 X
             RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-", ; C' c1 W& a& N
         SuperscriptBox[
    , K, P, b* c, K      RowBox[{"(", 1 R, F, a5 `* n( n) |, o
           RowBox[{. u4 X/ Z0 e% Z* N3 R+ [+ g
            RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-",
    , D, }% l1 p4 ]) j7 J4 W     SuperscriptBox[
      H$ W8 W  s1 ?6 O. q! R# C      RowBox[{"(",
    1 s+ ^9 Q& i# E" s  O! h       RowBox[{
    ! t7 J% ?' U& {: z6 v( F        RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", 5 ]8 K1 L' Z+ p5 {
         SuperscriptBox[4 S9 O& B! h1 a3 E; H, k
          RowBox[{"(",
    - t; C7 a- S% ?$ l6 Z% l       RowBox[{
    $ Z  h" R8 j+ U3 I        RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-",
    2 ^; Q/ e- v& x2 [     SuperscriptBox[) S" w" v5 u8 z
          RowBox[{"(", & Y7 F- Y6 N  [
           RowBox[{
    8 ]( n9 o$ A" V4 [( m; X) {: B        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    / E: @3 _1 _% l5 v8 ?  f* X" A7 p     SuperscriptBox[, C) k0 ]. S6 J1 t- a" @
          RowBox[{"(",
    8 b; U* _7 ]2 v7 T       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    " |7 X  u  f$ ~8 `4 `9 R% L& _) I5 x% [     SuperscriptBox[0 K7 G4 X/ P% b2 B) v" n
          RowBox[{"(", 8 }. D! ^7 ]; x
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ( {7 Z, \  h8 y) ?
         SuperscriptBox[
    ' l+ }" e$ X. K. k      RowBox[{"(", - q( r: k' T$ C4 c7 R
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    5 `, g6 j; @+ N* X' S     SuperscriptBox[2 e7 y8 u" T% V8 r
          RowBox[{"(", : G5 ~2 i. G- p' W/ c) R& |# _
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 1 L9 l% q( f* N$ D) z' J
        ")"}]}]]], "Output",0 q; _6 o0 d' A4 @3 c
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]# P# P, Q' g2 e7 w& G4 u
    }, Open  ]]," \/ Z5 S7 w- I4 y
    / {! \' h- l- U9 o( ?( J* J
    Cell[CellGroupData[{
      o* z# }1 @# x2 G- I5 \* K% `3 }0 r0 b4 V6 h2 O# v: K" Q$ E
    Cell[BoxData[{% p: Q$ v  [, m8 V: T
    RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]", / ~1 M4 z0 S% T; X5 v; z. ]8 L& Y
    RowBox[{"u19", "=", & S% i2 s" s1 v1 `+ A- u: {1 ?
      RowBox[{% |* q$ `* ~9 z  ~4 P5 _; |, Q9 y
       RowBox[{"Exp", "[",
    : v0 }: m8 x- E5 i( _! n: Z    RowBox[{
    2 G" h4 w; \% C+ t+ B7 y# i9 K0 L     RowBox[{) Y. D! b$ S* X0 W1 q& m
          RowBox[{"-",
    4 F  s- @# c: g% C+ N& n1 ^- J7 s       RowBox[{4 ]: @7 Q( u* r& }9 v
            RowBox[{"(", 0 d. i' K6 d: q/ Z! x
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    * U# V$ E3 x, F7 c7 m$ U, P        RowBox[{"(", ! q# I2 u" }4 i" n' J
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ) ?' F! Y. X! Q0 H* f3 o; U( a     "]"}], "/.", "DeltaX"}]}]}], "Input",
    ) @8 V- S! W' |5 W" u CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {% Q+ O2 y* p" Z! }& q* ]- ~$ ?4 v3 X0 [
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9, 8 d$ h! A! p) J' v4 P2 X% z% g0 c
      3.577961588890861*^9}}],/ o8 p" W. |' N# s
    : Z' J8 J+ F4 i8 J/ M. w
    Cell[BoxData[( Z1 i  J/ e; z- J# }$ {
    RowBox[{"{",
    % b1 u% O, ]  x3 g; Y7 o3 o  RowBox[{4 L' z% S+ g$ j! m% ?8 g
      "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",",
    2 r  b3 J' U# V4 d7 p6 Y4 ?9 r* A   "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}], : v7 X. f, @7 E
      "}"}]], "Output",+ X3 ^6 q8 Q% t+ y/ v: e
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],
    1 R  z' o0 b4 V6 u. @3 D% y2 D- s0 u% Y) E' _
    Cell[BoxData[: Z( ~7 a6 H3 k. \/ ~5 {
    SuperscriptBox["\[ExponentialE]",
    6 O  N! N" A" |0 f  RowBox[{"3.141592653589793`", " ",
    ' M- y% Z( W6 J! h; X   RowBox[{"(",
    ) ~! N" [/ [4 P7 L    RowBox[{
    & b9 |* c3 g, }1 p& I6 r* v" O8 \     RowBox[{"-", " [! M: c2 a6 c, t) }$ @
          SuperscriptBox[
    / g$ r/ ^- u! ^3 b  Z4 h& ?2 f       RowBox[{"(",
    1 }4 X5 ~) v1 D        RowBox[{
    ! a" ~0 F4 p" S# h, p, {         RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-",
    , f. Y. T7 ]/ G     SuperscriptBox[- n8 ?  }- p2 h' _# x, l# u0 s  G
          RowBox[{"(",
    2 z: l6 p3 C; O+ C' j) j       RowBox[{  e3 R' @- @, @% f4 i0 N
            RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-", + T: c" x1 f9 O; s( P6 N& k1 E
         SuperscriptBox[
    ) d' V4 I( `9 t8 u6 l- }      RowBox[{"(",
    : k/ E$ ^( ^( _2 W       RowBox[{4 G3 R; i: N8 h( k
            RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    ( y+ {. ]6 X; i: n, {     SuperscriptBox[/ f1 M1 a. i# f& k
          RowBox[{"(",
      S$ L* R+ E! \8 T$ o       RowBox[{, F4 D% l0 k6 z) {1 ?' t! Q/ }
            RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-",
    3 l3 C, I% q2 N# I- ]& b     SuperscriptBox[
    ( b9 v* v) g6 `: Y8 I2 L      RowBox[{"(", 6 m9 ]* Z; {5 d/ e1 {
           RowBox[{$ X9 c8 O9 F  K2 ^! A/ @5 }9 ~* X
            RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-", ' ~: J# |& F# ]. n8 M8 B
         SuperscriptBox[
    / ^% i9 w! G( m0 _" `( ?5 O4 W      RowBox[{"(", ( G: j  D* a# j7 @1 }$ ~
           RowBox[{' Z5 y& s# O, a) S, d. `
            RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", * _& Q  n) f/ c2 ^
         SuperscriptBox[! `' A/ [' p$ G7 E( l! \3 S  P
          RowBox[{"(",
    7 J5 L$ t0 Z0 C$ M       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 7 T3 J, E+ _( y/ U$ n  t
         SuperscriptBox[5 h! j$ g! `: p/ C' J
          RowBox[{"(",
    $ n* K! g+ K( l9 K( r+ P: N5 u       RowBox[{! s6 C4 C' }9 t7 z" f4 P
            RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    " f+ c5 B2 B( |1 f8 N) L$ I9 s     SuperscriptBox[
    6 h( x8 E6 _. o: Q  @      RowBox[{"(",
    ; ?$ D& u: L$ q6 H/ O, _4 T$ S       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    $ l$ N) a  L$ Z1 A7 O# K* H  g5 \- v& j* P    ")"}]}]]], "Output",
    & _3 d! a# P& C/ \ CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]
    3 ?4 w7 }9 m7 O3 i9 c}, Open  ]],
    2 K5 C9 L; L0 c7 o+ Z" R4 k9 o8 y% B  J
    Cell[CellGroupData[{- i7 O' c9 T  B8 V% ]% m6 |/ y
    1 o7 h1 _! S2 T( k) t
    Cell[BoxData[{- W+ ^; V* w& l" R/ b  z  B* a
    RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]",
    - }8 o  ?% S8 p( @( `8 I: B RowBox[{"u20", "=",
    $ q, M3 I* S% B5 [) Q8 `  RowBox[{
    ' F# u8 m8 \0 G( D   RowBox[{"Exp", "[", ) I$ `& o2 e3 g& P4 F0 z6 o
        RowBox[{" P9 S& q+ \3 M0 b' h$ ]
         RowBox[{
    , v0 w0 H- P) F; a9 r      RowBox[{"-", ' p" c( [* |; j9 P
           RowBox[{
    2 w7 a! R% j5 H* |" F+ Z+ M        RowBox[{"(",
    4 ?6 a4 L2 M- K# Y! m         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    * t) \. V: H* u& ^        RowBox[{"(", 6 M& j5 v2 q' p) }5 k' _
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],4 Z  p! `4 ^# O9 ~0 p) ^6 O9 a
         "]"}], "/.", "DeltaX"}]}]}], "Input",7 U! p  Z' O' {$ Z6 [' \
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {: c) \* ?' [3 k) G% J  S. g/ m
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9,
    : Z: v$ y0 F- v, ^  3.57796159382047*^9}}],
    / ^# Z0 d( s% w" W& K7 P* |/ o7 ~+ v# k3 D1 w- B4 @
    Cell[BoxData[& v/ ]6 W) O; i, h; L) x; P  x* p1 @
    RowBox[{"{", , S1 a2 g! `5 b4 i
      RowBox[{
    6 n# J$ p- I- a3 n5 |; k+ r  "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",", & t' U! i0 u0 T8 \3 L
       "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}],
    1 Z$ D" \  R, `  i9 v* k3 _% \' G7 _  d- y  "}"}]], "Output",
    9 O/ L4 D3 A! G! m7 B CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],
    " Q9 |+ W9 H, }% H! A, s
    2 j( r, Z4 ~# p8 @' qCell[BoxData[& _+ L3 T# w6 v4 C! c  K0 B) u
    SuperscriptBox["\[ExponentialE]", / C% f" D( s1 a6 w, s  Q0 O
      RowBox[{"3.141592653589793`", " ",
    - O( P) b) e. t! V   RowBox[{"(", 2 w# V: {! l8 K
        RowBox[{
    & n/ A) D# [6 l9 a5 q     RowBox[{"-",
    ( c! R3 D* E1 z; v; h" F  ^      SuperscriptBox[2 t# {& }) p% k" @  B/ G( J" p' p
           RowBox[{"(", : ~- R' Z& Z/ T9 I) U
            RowBox[{% [' L. E( }: J' J. O
             RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ( H; \: {" B0 B5 M: j. U     SuperscriptBox[; J) x' o' W' M, T
          RowBox[{"(", ! P9 @( N) A, U' Y$ T3 c$ Z
           RowBox[{/ x: ^3 ~; {3 O3 o# S( W. H+ Q
            RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-",
    - n$ U0 Y6 m+ ?" s6 r+ T     SuperscriptBox[& t7 z% K( k3 z9 y9 x
          RowBox[{"(", $ i, a* Y3 A: h3 U+ i' z; M3 G/ K
           RowBox[{
    - l. U, ]! t1 D3 d' I* D        RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",
    % r2 _# s5 _* O, G% y7 a     SuperscriptBox[, G8 H) l8 L( ]: i( Z- K  E" [
          RowBox[{"(",
    ' U9 x% s2 z( n2 x       RowBox[{1 v8 @- X- ?5 ]7 f3 E+ `* V
            RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-", # _% F# L% p) `* X. Y
         SuperscriptBox[
    0 }' M. l9 u4 i      RowBox[{"(",
    ( R+ s- R! F  _# |8 h6 A8 q; V       RowBox[{' Z* T- I$ q$ S
            RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-", 2 M' f' Q; X  N9 v% K+ E
         SuperscriptBox[
    3 }" q! Q9 S; }+ j6 Q      RowBox[{"(",
    * [* @5 W$ P% L       RowBox[{
    . w! b' Z0 i1 b        RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", 4 ?/ y0 K. M) h9 m' T
         SuperscriptBox[5 n( p) Z% q0 M7 _! L. L
          RowBox[{"(",
    1 [5 |! B$ k5 G0 _       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",   n. X5 \& r5 X+ t0 r0 u+ Z
         SuperscriptBox[
    8 F1 n4 q; a$ X3 u  g      RowBox[{"(",
    ( [2 ?  A! z5 k$ M  u- y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ' C# C* x7 K: e: [5 u# J, u     SuperscriptBox[' x9 ^# H. Y' k# y  d2 c! i6 e
          RowBox[{"(",
    " ^% V3 Q0 h; k+ G4 I0 r! j% S1 B       RowBox[{  k% c3 M# H+ P
            RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}],
    # E; z0 N0 c7 r! c% R9 F; x    ")"}]}]]], "Output",% {0 A" G& Q, P, [* e
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]
    " o3 l4 ]* c' s$ d1 {& g}, Open  ]],0 L7 f: k& w! Z) N- J
    $ x( w" x+ d1 w; n& ~6 N
    Cell[CellGroupData[{
    $ R/ G$ u# |: Y. }# G! M
    8 O9 d) N6 K: t; G( `9 ~. w( ^Cell[BoxData[{
    2 Z+ ?5 l& J5 Y- Y RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]", % E. t8 E  i' p& j0 B# B9 i
    RowBox[{"u21", "=",
    9 K1 D" H% S& W* k4 Q% e  RowBox[{
    2 s" Q/ j" n  ]5 o6 u* g. O   RowBox[{"Exp", "[",
    1 N( j/ U  d3 g- K3 H2 s5 y- X    RowBox[{+ y! U5 q, _" b
         RowBox[{4 L! l% {4 l8 v4 ~
          RowBox[{"-",
    6 W1 q, Y0 G& n3 ~       RowBox[{9 ^( Y5 X1 q3 c  s; H( o3 [
            RowBox[{"(",
    4 [* E, k- I: W  t6 z         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    : T& c$ v: y% `. J3 ~2 y2 m6 Z$ D        RowBox[{"(", ! N) X7 B( R# y3 k! E
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ h6 \+ }4 i5 G4 P4 d( m( E
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    8 s. g% j9 r, ]" A CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
      c) r, e8 u* A' O6 N/ b- _) P  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9, 2 C6 Y5 v+ w) z: i8 i
      3.5779615991556787`*^9}}],
    + H) N3 {2 D9 y: |: T7 W* P
    / J: P7 ^- v  aCell[BoxData[/ B' n8 S4 Q- T: z3 z# [
    RowBox[{"{",
    & Q# u/ N# B+ \6 v7 k9 F  RowBox[{
    1 G  `# O2 z. F+ \* x, R+ u  "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",",
    * I: Y, f5 }. z+ X# \" D8 Z   "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}],
    * L6 @( M; a' I" A: a% p  n  "}"}]], "Output",3 H% W  @) ?/ r# f3 ~  r
    CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],) b) S# ^* u, L
    4 u& F) r$ b7 I9 c) M! S- P/ }' O
    Cell[BoxData[
    ; C5 n1 `$ v( ^5 a( I1 e SuperscriptBox["\[ExponentialE]",
    ) X+ m5 {5 F- K1 G' D  RowBox[{"3.141592653589793`", " ", + l( a2 T" W1 [1 @
       RowBox[{"(", 2 p7 A0 e9 Y# z6 H8 Z6 {) L
        RowBox[{9 Y8 @4 {# |# q7 K) p
         RowBox[{"-",
    1 J6 ]" o4 X* t      SuperscriptBox[
    & T6 N. \/ I$ @' Q0 |- Y       RowBox[{"(", $ M8 b: s  b, _
            RowBox[{
    + o+ @9 e  t/ g+ s1 [3 x5 @         RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    2 [9 G# M* {0 O" J4 d2 E4 _     SuperscriptBox[
    ( t* f5 v7 X/ {% N  \+ X      RowBox[{"(",
    & U! i& E8 U( f       RowBox[{
    % |1 [  E1 \; i; u5 U$ j        RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-",
    : Y/ C4 H( u# n  g7 {     SuperscriptBox[8 K" |' o7 n, ~8 j
          RowBox[{"(", 7 V  Y1 L+ u7 v5 S
           RowBox[{( q4 k- a4 \, J, M3 D( _4 y: U+ T
            RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", 2 t8 n& s% |/ Q6 Q' [
         SuperscriptBox[
    3 @/ f* [1 p, [6 w2 I2 G      RowBox[{"(", 2 g2 l! b6 B4 d5 |( ^: [& c
           RowBox[{
    2 ]# Z5 ?3 ^. H        RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-",
    0 o2 n9 y- S5 ~: A# l8 {     SuperscriptBox[+ L$ C6 F7 D, i
          RowBox[{"(",
    " l* I8 i1 _1 J, U       RowBox[{
      g1 b: e+ h$ E' [0 j& C        RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-",
    ; D1 {1 B# o3 s/ U! _8 S' J     SuperscriptBox[; i% p) D! f! P% P3 c& T4 f
          RowBox[{"(", 0 P$ W+ m; G. O7 c
           RowBox[{
    & l; y7 {. g) g        RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    * m: j, }) T* D6 U  d; \% X     SuperscriptBox[" C5 w9 B  h, A* s( n/ q) ]0 ]7 S
          RowBox[{"(",
    ! L0 a( P+ l- W* J  Z2 s% y* v/ Z; l       RowBox[{
    : \' u  O+ T9 q0 V4 Z% X* h        RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", 3 _1 P+ ~4 v% {( H2 H9 \
         SuperscriptBox[
      T9 a# p* {) o0 e/ T3 N      RowBox[{"(",
    ( \5 Y- E% C4 O; i# _       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    8 F! R: |; l+ y0 O' ]9 d     SuperscriptBox[
    4 F- J- Q. p; }4 M      RowBox[{"(",
    % g! n8 C& Y' c7 T- ]       RowBox[{( G  d" c5 I  j
            RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], # M% W9 U* |) k) U4 r! _9 W, r- I
        ")"}]}]]], "Output",
    % q. \# e& B, i* D+ J CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]) r9 k9 o* f- F; t3 v. g  c5 z
    }, Open  ]],( N  G0 ?' E2 K6 C# i

    8 S6 k/ w7 I, A# v. {: {  t# ~$ K0 SCell[BoxData["\:62df\:5408wi"], "Input"," j2 V6 C6 Z: T, `# P/ b3 v, f
    CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],
    , a* B# N- I! f7 @
    5 ?; f; b2 Z8 A4 d% TCell[CellGroupData[{
    ! u% s# E1 X7 x- }! s) z4 b; X0 r- J( ?  t6 i, ^4 e" K
    Cell[BoxData[
    0 w+ _( B9 |. w" C$ g RowBox[{"y1a", "=", - g$ N, e# Z/ {2 v# F. B7 D
      RowBox[{"Table", "[",
    ! T% x  h3 `7 J4 g5 w% r  f   RowBox[{"x", ",",
    2 F- M( _  b. C6 i    RowBox[{"{",
    * E1 }  r* ^" d) u) ^: p     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
      f+ O/ w; @8 m( p' c/ f, |0 z CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {! s) F) _- _+ u9 }4 L9 i. [
      3.5779226649375*^9, 3.5779226810625*^9}}],' c3 d% S" A8 |8 d$ v% s& [+ w+ f
      ^; E0 ]4 W1 i: R( Z
    Cell[BoxData[5 y4 ]( b7 n: n
    RowBox[{"{", $ @$ y  I0 U; x. V! [+ P* q
      RowBox[{( f9 _$ d2 x8 T$ L/ z; R9 U; ~
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", / F+ M" g( ]/ a" J; M; @6 O# X
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    # Q" y2 @) F, X# b2 C/ A    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    % J6 Y0 H( f) k4 V4 P! [- t% E" D$ q   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    7 [/ _% m# y5 g8 }5 l" f( N7 d   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", $ [; k- T2 E& o- E- @
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    - l) ?) |- e9 m' G: @   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    ; k0 r/ J& U- ^5 M7 x( k) \! h" K   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    # f8 H; O% r1 J1 S4 a, g7 X4 A   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}], # W' G5 F# J( r9 \
      "}"}]], "Output",
    ' @3 J5 ?. {, B+ w, t CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9, . F$ V7 f8 U' y' i! ]- S7 D
      3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]/ x# @7 }# N$ i; E+ z* H9 `! K
    }, Open  ]],4 e  F, W2 U" t, t7 n& p
    # n, r7 b5 O1 K
    Cell[CellGroupData[{) \" d9 ]) {" N

      j6 ^6 k' N( ], v, GCell[BoxData[" y8 j3 q2 Y0 ]/ r% I
    RowBox[{"Data", "[", - x8 D" \6 c9 m
      RowBox[{"[",
    3 Y* u1 Z4 C9 C1 _" v( o3 u   RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",
    . L: s; g6 u. j8 \. H- u8 _( m5 G$ E. Z CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {* ^$ g! J9 s. v" ~
       3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],  v" U! Q4 J5 x$ D
    ) G2 H7 _) N1 H9 X* y8 o) ]
    Cell[BoxData["0.899882`"], "Output",
    / B4 t% G8 A, _6 m0 K8 L( k2 L" | CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9}, 1 Z/ \) r3 g% ]
       3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9,
    8 ^2 T3 x) V4 O! v3 O   3.577961929080654*^9, 3.5780123419375*^9}]
    6 O6 {, v  Y; k3 B}, Open  ]],
    & n% I* m3 R0 R% c& d, Y* E& z) d% Z! v
    Cell[BoxData[
    " m/ L0 o/ v4 @2 O& p& f$ @ RowBox[{"For", "[", 7 e  `7 c; F  S; j& Z
      RowBox[{# v' G$ A3 H/ O7 l( X) P7 b
       RowBox[{"i", "=", "1"}], ",", 3 d5 `" c3 {& w/ S6 H, W
       RowBox[{"i", "\[LessEqual]", "60"}], ",",
    $ _3 A& q& R+ i7 G% Z4 m" K; t   RowBox[{"i", "++"}], ",", 0 }0 x6 n% ~; x" O3 b$ ]
       RowBox[{! `- m. D' {1 q+ I4 j
        RowBox[{"y1a", "[",
    4 X! J4 ]* x! U     RowBox[{"[", "i", "]"}], "]"}], "=", % f' o6 Y: f7 C' I
        RowBox[{"Data", "[",
    : k9 k) S  a, r, c     RowBox[{"[", * C( j. Z/ }8 J! R4 n# O( [
          RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",0 P4 r8 N  n* _* Q' z5 V/ Q5 d
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {3 z5 N0 }7 u1 x
       3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    : \: A( }; H7 e; ^0 n$ a) }5 J" o   3.577922923203125*^9}, 3.5779588839702806`*^9}],
    5 y3 w; C- R. c/ W/ a' @
    / ~$ J, i/ q2 @4 f" j4 MCell[CellGroupData[{
    ' p, u( y8 q4 d/ u: H( h9 X+ N* ~/ z6 z/ h. z! t# i
    Cell[BoxData["y1a"], "Input",4 K3 r2 `0 c; V) ?" u
    CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],% P! r6 x1 {" I& J% B

    ) e5 G/ p' T: [0 {$ T) a! eCell[BoxData[4 B0 y+ _( f" w4 I0 A, z/ l" S6 u
    RowBox[{"{",
    . W& O0 x( x- j  o5 H  RowBox[{
    ; `' _8 i1 g' Z2 x" s& _  "0.277091`", ",", "0.220259`", ",", "0.899882`", ",", "0.265607`", ",", 8 P2 M& h7 _+ \' S
       "0.642226`", ",", "0.306243`", ",", "0.186985`", ",", "0.175501`", ",",
    % g/ r' ?$ G: q   "0.147821`", ",", "0.352768`", ",", "0.23881`", ",", "0.095701`", ",", ) z, f$ P* ?9 K8 P0 g4 b& E: I/ |
       "0.162839`", ",", "0.335395`", ",", "0.160483`", ",", "0.398115`", ",", 7 q4 T/ n/ P; D0 H
       "0.157833`", ",", "0.315665`", ",", "0.492344`", ",", "0.638398`", ",",
    8 O  B4 t) b; d8 M4 h+ L, ]   "0.392521`", ",", "0.362191`", ",", "0.114252`", ",", "0.401355`", ",",
    . F! D4 _# B2 A( d" q   "0.827444`", ",", "0.676973`", ",", "0.331272`", ",", "0.845701`", ",", & i  p( u' Q  e# F
       "0.287102`", ",", "0.`", ",", "0.050059`", ",", "0.254122`", ",", # O' a  [4 ^- _. ^9 ~* \9 J7 H
       "0.086867`", ",", "0.659894`", ",", "0.317138`", ",", "0.605124`", ",", 7 N/ Y# }2 W) B
       "0.32126`", ",", "0.595406`", ",", "0.555359`", ",", "0.333333`", ",", / J) o5 @# V; k' i" O$ m
       "0.149588`", ",", "0.493522`", ",", "0.224676`", ",", "0.410188`", ",",
    # o, v  W' q4 v   "0.668139`", ",", "0.102179`", ",", "0.380742`", ",", "0.319494`", ",",
    & {3 m: p* g1 O) |8 [   "0.031508`", ",", "0.292108`", ",", "0.329505`", ",", "0.337456`", ",",
    " e9 Z: J; \$ m; ~3 p   "0.766784`", ",", "0.676678`", ",", "0.541519`", ",", "0.064488`", ",",
    # a1 e5 Y) z2 S   "0.463192`", ",", "0.388398`", ",", "0.262367`", ",", "0.290931`"}], , L1 x4 R1 R" L/ e, p
      "}"}]], "Output",# C: t6 K- g" T: _8 B1 [! {
    CellChangeTimes->{3.57792293246875*^9, 3.577957577756765*^9,
      v1 h, P  a8 S  X5 `2 n2 y" o  3.577958888806289*^9, 3.5779619425902777`*^9, 3.5780123438125*^9}]
    + }8 b( c& C2 \5 ?" M}, Open  ]],
    ! g: ?* K. c  b1 C* m7 f/ |! R; [9 h
    Cell[CellGroupData[{! Z# c5 f2 }- U

    9 X1 q0 c6 Y4 k- Q6 fCell[BoxData[0 m/ x. e1 w4 p8 @- s
    RowBox[{"m60n21", "=", 2 V  c" ?; V$ q
      RowBox[{"Table", "[", ) \8 ~. t( x/ d
       RowBox[{
    6 i* {  Q& }9 }: S1 f# `  f    RowBox[{"Table", "[", ) |* o/ p; y: o4 M' ~2 ~. n' p
         RowBox[{"y", ",", . E( C! R4 ^% {/ q- z2 b
          RowBox[{"{",
    , {) E/ s/ \3 Y* C       RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",",
    + a- r4 b; d+ M% C1 i    RowBox[{"{",
    % S+ p+ N% [3 D+ d  o* n     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    ( R* x/ D% i4 N( p; E$ y/ m CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {# D# t) u/ E- p3 E) J) _+ Y6 c( N
      3.577924052828125*^9, 3.577924101671875*^9}, {3.5779619669419203`*^9, 9 W& A+ C% k! i& l+ [9 y" C( o% M
      3.5779619706547265`*^9}}],
    8 E  X  {! M: ~5 k- R# o; K% i3 `0 p1 g
    Cell[BoxData[, L# r1 k$ J- m
    RowBox[{"{",
    2 E& H/ K# Y$ R4 G) a: ]; h/ r  RowBox[{
      `6 c; a8 q+ X& D6 `   RowBox[{"{",
    ( u1 S' {0 h2 l, B* q    RowBox[{
    0 P- d) a/ z  E# m/ \) B* d    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",8 V5 n3 X; {2 Z, h2 O7 U
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # M2 E' @9 _# f# {' o     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ J+ |9 c2 V, g" ?$ k
         "}"}], ",",
    $ V' e# o; j9 M" w: g4 o$ p* [5 S   RowBox[{"{",
    ) n( m, `% P5 L4 ^0 U/ {    RowBox[{9 K- i6 f8 j, C. i, p7 a+ m7 ]
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # L, I! Q1 Q# ^4 Y' c% ]      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 s8 ]8 V6 x& [9 |     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    0 a( L4 C; t- F9 G     "}"}], ",", , U" o6 K! E3 S) ~, l* v: X+ l- P
       RowBox[{"{", 0 [: Z2 T( A# `# Z/ @! ~% R/ n/ e. g
        RowBox[{+ _3 H, T; W5 `
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",; v; Q! J' h7 T5 t
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 1 t# X2 u9 h) a& p7 {, a
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) S6 {$ B; V/ c& F3 ?* M$ z
         "}"}], ",",   o- @  @4 K: e5 s4 A/ ?
       RowBox[{"{",
    / G; Z% }$ _% ^3 l3 C& U* x    RowBox[{
    + t. }* d# o( E    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 \! h6 l. }% T& e4 o+ `4 ~
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " G  l. O9 l- H& }+ h; `% Z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],9 {5 E+ _- @  V* r+ z
         "}"}], ",",
      c$ E3 s  p6 F- ]8 V* `! p   RowBox[{"{", + `" C& Y1 }( m% f, m
        RowBox[{6 z2 [/ _* g3 s, D# {7 I+ j
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 v8 G6 q* R& E$ J6 @      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' F/ h/ N; b9 x6 l$ _
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],$ }. d2 z( p( |2 {- _
         "}"}], ",", $ L8 d2 ^" V% o* ~1 n9 }
       RowBox[{"{", " e1 H0 [7 N8 m1 Z8 @! P
        RowBox[{! E9 e, S  V/ g; D
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",  ?' I8 [; e) `
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 v0 s& H% R6 P! f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * ]- q; u8 ~4 d2 r, `     "}"}], ",", $ j/ C/ v$ R" l0 w" Z
       RowBox[{"{", % V# ^0 f: r; A* ~
        RowBox[{
    & F, O3 u6 b9 D5 b    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 E5 B6 u/ M( s. c. i) X      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   L) ^) o. @( [+ \* Z: Q  X
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    3 ^5 I$ i/ `# N     "}"}], ",", ; i8 H3 ~! d5 i' K3 j. k4 w. E
       RowBox[{"{",
    . Z% {3 c0 E# E' J    RowBox[{! k& p3 y. s0 q7 |& |! K
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # y+ C( _) j0 }7 d% I) B1 U6 {2 `      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( A9 u  g, Y4 O9 _( ^, v6 z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],9 ~3 q, }6 q* t7 `1 k- [" i: z' W
         "}"}], ",",
    + \: P$ Z$ h' R3 t! }+ }   RowBox[{"{", / W0 }1 Q/ v! G- h9 I
        RowBox[{
    ! a' T# F8 u! J7 W* M    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! E4 u: \. o) u+ B7 I      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - c$ F0 O1 _5 Z1 \/ L     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ Z- ~  |0 y% o! Z8 ~, b& W) X* R
         "}"}], ",", ; F+ x% N: r) f, [) ]) Z5 t* W9 {( u
       RowBox[{"{", 1 S3 l+ I1 }( W; X6 _! @# c
        RowBox[{
    % H2 i8 A+ B4 A; I( C- l/ M+ K    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ J  C$ s0 ?: w      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 J+ O3 W$ n- r6 f; o
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 l" |8 ]$ ~! U& \5 a     "}"}], ",", % V" E+ i: m' d' p* u) I
       RowBox[{"{",
    4 m, m0 w5 O4 E0 k3 N" D    RowBox[{7 [$ X" L- I, X# H
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ B8 @' _% Y* l      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    9 D) W1 M1 Y' a% T8 Z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! O8 A8 e9 s' C7 m
         "}"}], ",", ) W" n- m; N1 `8 y6 {8 t5 e
       RowBox[{"{", 6 P- k7 ^7 c) q0 B  |
        RowBox[{
    , a) I& _2 q% \: W) m    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % m3 E) Z+ a; B. _0 N      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 4 T% h% B3 U* ^* R! {+ \
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 B' y9 V1 ]8 M" r. G
         "}"}], ",", 2 _5 M2 z( U- A" S- y( ]5 g
       RowBox[{"{", - N3 \, k& L2 U7 ~3 E+ s4 H, C1 D
        RowBox[{7 V' N! N. V( N, _( I
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % ?6 }. a: R$ t      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 S* q% U! `+ @6 T' y# g     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; }9 X3 h% l; [( y/ f2 Z
         "}"}], ",",
    # t9 ?( r. q3 k' {. z+ w" n   RowBox[{"{", / P3 z8 S: \' ]0 [9 v
        RowBox[{, v- D7 D% @. y0 _
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & t- \& u. y$ h3 u9 j      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 o7 L# T  C0 q3 C     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 K" w- ~' V2 O+ I  I0 }     "}"}], ",",
    5 j; o# M' |1 q- @: `5 P8 ^   RowBox[{"{",
    * v" L" F1 A! s6 ^2 j4 K    RowBox[{
    # J( Q8 ~, O3 F, @# Y% B( e    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",; N6 p9 h' V5 R1 t! |
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", $ x. S) `9 P  q: M
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; u7 e6 b! s4 A4 I! {1 o8 N
         "}"}], ",",
    ( ^/ l5 z5 j: k& a$ ]* p+ Z   RowBox[{"{",
    : Q* g/ F9 _3 _- Q1 w! A    RowBox[{6 [( b! U4 o. m4 g* x% |, p
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 T5 h! n# A% Z2 m6 C      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   q( H0 V- {! Y5 \( Y
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. ?/ [  Y/ o: W, F8 `$ L& ?) I
         "}"}], ",",
    3 t0 \* y7 ]; h, x8 P   RowBox[{"{",
    9 d- A8 d& D  f5 g3 [    RowBox[{
    1 E9 ^/ s7 P! W8 _: I( X& `    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # M. U5 R6 y* ?8 v4 V      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; ?) T3 H4 w9 s: R" s4 Q- W     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # P  r# {2 j5 P  D- n* z     "}"}], ",",
    - e3 S4 G+ f8 l4 G1 W/ l# V8 t   RowBox[{"{",
    8 ~- j- z7 w" F' k: M6 c    RowBox[{
    5 ]3 }8 f3 W9 m6 f8 X    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - K* z9 K, I# ]1 F      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * ~4 ~- p9 o' L& n
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : }' o1 a, d$ j8 W     "}"}], ",",
    5 g' i" I  H9 Z/ L4 D   RowBox[{"{", 1 F/ Z7 n: f5 k! ~2 y8 f( ?
        RowBox[{
    * X0 U0 Z' R/ H    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' h9 |# }( D4 Y; W      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # _: |+ y" t) k! |  F     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ ?+ U$ u1 X3 }( ?) J' q7 E9 W
         "}"}], ",", 1 o' [- n* G( f2 _0 I
       RowBox[{"{", 0 I$ z$ x( ]9 ^2 J$ K9 {) [
        RowBox[{1 k  Y% Y4 o' f9 O0 e2 m
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 M/ Y  R" ?( Z  L; |7 _      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : x% v# M! `/ v# Y% t# Y: H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % J3 Y) w* c8 c' h; |     "}"}], ",",
    0 w" q2 k+ L  X   RowBox[{"{", % j. |+ K( S/ p7 r$ B7 i
        RowBox[{
      I8 M1 g# S0 p& f! n3 X    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + u3 n. {! z) ~# Q# J+ ^/ P  `6 b' w      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", & o% M! Q6 k9 h+ q: B7 a- e
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + V+ T6 a9 k5 X+ E) W* m: P     "}"}], ",",
    & o" U7 O! i4 f) d   RowBox[{"{",
    - M+ }0 i2 g# w0 w# q3 k    RowBox[{
    2 s5 j# T+ B& W0 B    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , B- V& Z! g0 H      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # z  `- w, x  L% s) j     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 k( C9 O" Z' ~0 Y2 ]2 F6 L) B     "}"}], ",", ; s1 I) v$ x1 P. _) ]3 X2 Q
       RowBox[{"{", 1 R+ e- |' w8 s6 S! r
        RowBox[{5 d% S' b1 C: c# d/ E3 c3 ^8 v
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    4 K! ?% _7 L2 ~+ Q+ k/ C, a      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 h9 p2 X9 `# }, w% M     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ O3 @- i0 b2 ?/ L+ G- ]
         "}"}], ",",
    & r6 E3 f4 g3 x6 k   RowBox[{"{", 3 Y! t6 e6 n* z2 V  I6 A
        RowBox[{& W2 b" G. ?- P( a# D( H
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , h! f0 u4 g! z! i+ E& U" W      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 ^% K# X  Q  c9 y1 _
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) J7 R4 G, L/ v$ D: H" a$ e% W     "}"}], ",",
    + \( j2 s' P$ r- W2 C) K2 U   RowBox[{"{",
    $ x1 @6 D. ?* h6 [    RowBox[{) E" V! \0 b' Q" w
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 R. x3 z$ z5 L: ]4 i* B7 Z9 t      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; X& t$ p6 ~/ D/ A
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    0 P5 }/ g7 w2 K     "}"}], ",", * w0 Q( ~+ W! d8 `
       RowBox[{"{",
    9 c! f2 P2 g( V/ {4 R# x    RowBox[{
    , _4 X# y( X* E5 K. a0 O' u    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 M' ~7 o9 H0 _
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    4 t1 }0 J5 X. O3 x" w' u9 }0 m. m     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; K2 j; o) U) y  {# U$ m8 F1 Y  @- T
         "}"}], ",", 6 O( C- {) I  d6 J
       RowBox[{"{",
    ! ^+ q  }$ q  e$ M    RowBox[{; J; g( G8 L$ G5 R6 S
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. ]9 X6 w9 E3 O
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 9 f3 n5 z7 f; E8 T5 W/ e, Q8 V$ D2 `
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 j0 j$ Q6 T' s2 C% G' a* f( _     "}"}], ",", 5 n( S6 }( q' l. [, J) e2 ^! s
       RowBox[{"{", 3 e8 {1 l0 k" G. b! T" I6 |2 b+ |% @
        RowBox[{+ w+ H( }; p( r. X
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 x6 z7 x/ R1 e2 S: M- H$ j& y1 E      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - O  K4 g" I, {* o% z  f" n2 a
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],! E) y  F* b# S& x* y* i$ g
         "}"}], ",",
    - B5 I' h0 D: y: o  |+ J3 \   RowBox[{"{",
    * t1 I5 {- u9 e8 `9 j8 J    RowBox[{
    ; W2 W8 ?" `# @. \0 H* n, v    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    * J/ b8 ^& ~( U5 j/ r      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) @7 ]4 D' `9 ~! L' C) f. B     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! J& x  A- N) r- v     "}"}], ",",
    : V) S. ~# M# v9 z+ I: ]  m7 W   RowBox[{"{",
    # N( J; Z2 e6 A+ V# N2 x* {    RowBox[{
    $ Y& {1 Z9 N" y2 o' n    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! e: Y' I+ p  M7 l8 D6 S  g: X/ i$ s
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    0 ^( O6 U: m/ n/ o+ @0 N5 y3 [0 w& U     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * K3 U7 W2 z- ^0 R     "}"}], ",",
    - P' D: x- T1 I7 [6 Y3 ^5 W   RowBox[{"{",
    0 D( \1 l0 f* Z    RowBox[{5 J0 k- c, u9 f0 J
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ; A% k0 l2 S9 V      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! w$ j# J% [8 ~
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 s: ]5 Z$ K6 n$ Q     "}"}], ",",
    # [" h) w) ^0 B6 Z) U" v$ n/ j& s   RowBox[{"{", % a; `$ i9 m( J0 w8 X, Z
        RowBox[{
    5 T' D4 p4 w0 ]5 W    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",' X+ k3 j3 K, R
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! O+ r- B  r9 [; c6 l+ t6 r& f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 n% s8 s. \# f0 Q' v1 D( v     "}"}], ",",
    ( G) C" `, L! U4 S   RowBox[{"{", ) G9 t: ^6 {4 Z* J
        RowBox[{
    2 ]" p4 J) j8 M3 X" H    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 b# p7 _9 J2 w" Q5 O+ J      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , F! G3 Q7 Y- A" @, W5 m6 A     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    6 D4 A- N3 i% \+ |     "}"}], ",",
      c# y0 v. Z8 {# A) Y% n/ n+ H& E   RowBox[{"{", ! t" j& _* i5 \" T8 K  ?9 K
        RowBox[{
    ! s. W, S$ d. ?/ J6 ]; W7 ?: y# y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ g9 ?9 `  w  @4 W
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % A% ~/ g2 H4 o) N( j$ z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],- u) h6 _  o# r6 N
         "}"}], ",", ! t% w; f" F; S0 m
       RowBox[{"{",
    1 o& Q9 i3 y% N6 {1 y    RowBox[{/ U2 V, c/ V6 j. h% @4 [
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) C# B& Q4 |! e$ i, g
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 i2 ]/ Q/ u; S3 O; k1 S$ g
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    " b& F2 ~2 L# X; G3 N! ^     "}"}], ",", ! V' B7 b3 i4 w
       RowBox[{"{", & E9 t+ x" e/ e. C
        RowBox[{+ A  _3 C: a7 ]& X, M
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    6 `$ p7 `% K9 y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 D3 a. K9 w6 \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # u  m3 V: p' P- O     "}"}], ",",
    $ Q1 N: D3 u9 s; P. I2 }% X   RowBox[{"{",
    + d( j) S, v  R' p. ?) A    RowBox[{
    6 f& l. _# E0 E! A. y; Y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! p8 u8 d' u% S- |) O( I: U
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    9 l% E  I' t% x6 Z; C     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    3 M7 ]4 R; F9 E% m, w& ~     "}"}], ",",
    / ?, c: l, n2 O+ F% K/ q. P- |   RowBox[{"{",
    ( ?4 U1 e' Y; a, z: O4 y4 n$ S    RowBox[{0 p3 Q0 W6 H2 H. N
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 V& f( ]/ t' t$ Z3 ]& b: u" p4 ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " ]; J: a& D5 p4 ~( d8 S
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    4 C( a) c4 d1 v1 }0 D# Z8 r; i     "}"}], ",",
    $ s( a" d) \( I4 p' T" \0 A# d- F   RowBox[{"{", : w) I3 r' {6 P$ W, y+ y* Z
        RowBox[{
    7 S" V* h/ z6 l- E. T% u7 H# _    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ \: h# q1 Q: e+ `3 K8 K# I0 C9 s
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " l; v! s0 Y7 ?  n     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ; ?3 z" m% l7 H/ s! h! y     "}"}], ",",
    ( W2 E2 J" _8 s% C9 k5 y" h   RowBox[{"{", % L* }; M: T! p6 X" A
        RowBox[{
    & d; J: B( |2 I; X    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 ?0 ~, ]( L+ i2 B% ~+ X      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . ^4 H2 Q9 @+ v* x/ W
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
      q# N, m& ?  r. ?. \" M% F  K     "}"}], ",",
    2 f: m  z+ D2 G# w5 V8 r   RowBox[{"{", 2 j( w8 e7 e0 E! ~6 F
        RowBox[{
    7 ]- w: w* c- e* Q9 u) w& N6 D; R% P  ]    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 B" Y" O$ S( W9 v  t
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 Y8 t: x: U1 G" a! K
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , Y# H$ _6 M4 m. t! C' `( Y. k: F- g9 D     "}"}], ",", : v* E& |" ?: [3 {5 x1 n2 e
       RowBox[{"{", 8 l8 B2 X3 ?! `# a
        RowBox[{
    $ k2 U' P+ c& T& q0 P" a    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + _: L, r7 Y% U# W      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! M8 ~# ?2 N8 E2 I- N7 J) q- g( N     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; o/ T, A: S" @) W2 ?! y
         "}"}], ",",
    : M: j# U  J' q/ k: p% e. P/ e   RowBox[{"{",
    4 j) R2 a& k6 S3 B    RowBox[{( o% s, Q& @4 I' D1 `6 m
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& H( Y9 I9 C9 @/ h1 c: p
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 @$ d! u# _. z( x     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 h( [! O# \) q& g/ p
         "}"}], ",", 4 b4 k* {5 X( Z! r( J' Z; P
       RowBox[{"{", 8 ]1 ^5 I5 E7 i) Z9 m& }
        RowBox[{0 e5 {" j% C0 }* _
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    * n; [2 i) A" P, h  x) r8 j% e      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 Y. |9 J: f: ~  f" K5 ]7 s+ {     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 D4 e  u7 F. R' B% V     "}"}], ",",
    ) D6 q& M  G- j* I5 j   RowBox[{"{",
    : ?% h* k/ h, K    RowBox[{
    % G/ O3 M# j5 m5 E- u    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' i# W: b4 d: [% E      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    * O' _7 u# e0 Z4 \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],9 c( U+ h% V/ O
         "}"}], ",",
    8 {) W# Z" n0 M  q( v6 d   RowBox[{"{",
    4 ], q# ?. P: G1 m" `    RowBox[{! t7 j7 j3 Q9 ^1 @' J# Q! s! m
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , g, v% ^- S: {- S& R9 l      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 1 J- n& q7 G' K1 |: c6 J: T. z% U! o7 H
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % K/ b8 Z: G+ @' ]2 y     "}"}], ",", + L3 D1 p; X  d! j$ z5 f7 D6 q% Z
       RowBox[{"{", % U% e) h. v* u" E: U
        RowBox[{
    ; ~# E  E5 t3 l* |: N& O: l1 _    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 o7 j' p7 P4 y% r9 U      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & \* g. k" C5 |% D9 A     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    3 L! N5 c7 j8 D3 S7 a     "}"}], ",",
      L6 T/ y* M( b/ N, P   RowBox[{"{", , Y# V6 I7 s3 T- _" s5 M! U
        RowBox[{. \  Q% N+ u: g5 k4 V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ ^4 i" J  v1 Q. \
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : [' I( T( ~6 L8 L" I+ x: B+ g# E/ I     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 y# J; a# W' O
         "}"}], ",",
    & w- I: ^& Y; f1 k; v   RowBox[{"{",
    % B- ?- i" S  n+ F0 B3 _4 J. L! o) j    RowBox[{
    " b: s9 H' O, `1 Q1 O    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 ^* ?0 _% j! X" m" K' R+ r. E      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! H: k& }/ P9 t) o0 E. h5 a     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & N* p# O) |; J3 L8 b% X     "}"}], ",", 8 [5 n6 W* |, X
       RowBox[{"{", ' L. K9 n  K) a1 Z& t3 t: S) }
        RowBox[{
    % ~' \/ I6 _6 X( f    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 r% ^  U  r$ u' @$ \      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 g8 d# h1 i6 w     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 T! g+ ~) T8 P" u     "}"}], ",",
    # W$ M3 I9 s& A' j   RowBox[{"{", ! q7 e* F, i, z
        RowBox[{
    ' \3 q% M/ n  E- d) E    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 Q  v% j5 w- ]1 h$ _' B1 [
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 v2 C+ X, v- }+ }1 I. Y     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! R& b) T, Z. v. A9 N8 M2 l     "}"}], ",", . w; `* Y# F: d& C5 a$ C/ p/ ^, |/ k
       RowBox[{"{",
      b/ y2 T, I6 N, W. k- z! ?2 }, h    RowBox[{
    0 H0 A" J/ C8 S  I9 b    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ }2 J7 K: ^/ n8 A9 u- ?: K
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " B$ _/ t# V/ y8 d6 j     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; h2 I1 u8 d# k& t2 ]+ ~9 V
         "}"}], ",", ) J2 D& }* J! i
       RowBox[{"{",
    8 y/ d! B9 t1 ~0 R6 j    RowBox[{# c' [- ~% ^7 O: u9 k; \
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # ]9 n, ]% }) i, Z4 s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( \* P" S0 B) Z" R( r# F
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    4 Q8 Z% U1 F) O. y     "}"}], ",",
    5 K( ]6 L; w+ G! V  l2 J7 ?   RowBox[{"{",
    , J; ~1 u% X- R9 D: ]    RowBox[{
    ( w$ ~; Y) H* D5 J$ e# C2 \2 q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 I5 W% N: C9 G+ f# J$ w% d
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & m" x4 n. d- D9 l1 {     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 f& z8 i- V1 B+ u$ F. d     "}"}], ",",
    . ~: z" E& N: |) t; C   RowBox[{"{", , h- f3 A/ I- V# ]/ \. N/ z
        RowBox[{
    * r! W  z$ i8 M$ s" N. X" d3 y# ~    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ g1 O) [3 {0 r, {
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , E+ c: }# l) C- n     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ N2 y/ V; Y1 Z1 U! K3 A$ W
         "}"}], ",",
    + Z& A) x5 V) @( n2 i4 Q( q* U   RowBox[{"{",
    ! Y" @4 {7 S: X' {4 N5 L/ O: J# o& @    RowBox[{
    # z" ]6 B" J- P- V- u! c# m    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : ~0 Z* h9 t% j; I, b0 R8 _7 I; I      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' }% l% M1 D1 P& Z/ a" I* j' d     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    3 H$ Q( X1 i. v0 t7 B5 i' K! Y( D     "}"}], ",", 8 ~' P6 V5 k) C
       RowBox[{"{", ! D! ?) x2 ^( E2 _. [' M( Y
        RowBox[{
    0 f- Q% q& W; h) {. A' b1 n# P3 v+ T    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 a6 a3 e" R$ v) f/ t      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( o2 E9 x  F' S, m
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 A0 C' Q( z; Z7 M' x5 P0 |/ y3 l     "}"}], ",", $ q: S( _/ Z6 L
       RowBox[{"{",
    $ {4 O) c/ R8 n2 x# m9 W7 N; @    RowBox[{
    8 N% u  \) c$ M3 X9 V    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) m; {: s7 |- m+ L4 m/ }7 m- U
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - m% w6 r' b$ E" I
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . n1 M' ]( r$ s1 T/ x     "}"}], ",",
    ! X; ]: J5 e- c   RowBox[{"{",
    : J8 a( ]" |8 a7 i1 G( _4 @9 e5 _! Q    RowBox[{
    - a7 I$ l' @: ^4 }! r6 A    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 S- ~6 S1 G1 h2 p( w2 T
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % z1 j# _! d9 [& K     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# l8 d; T1 x. h+ K2 ?
         "}"}], ",",
    , j3 r/ S; Y, h' ^( [/ n' L' c% v   RowBox[{"{", 2 }' m& _# }& i5 g# u2 m
        RowBox[{
    7 `" j# C4 A" ]- r/ T* ~    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # B: r; p( |* W; Z; V1 m* q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", $ [" }; H7 @( a- o3 x4 J& o
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    4 C  p/ ~( \7 q0 s! k     "}"}]}], "}"}]], "Output",
    # ]# v, m! h  Y6 _ CellChangeTimes->{8 H8 W3 N9 A9 W; \( }& w7 n
      3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9},
    - r/ Q( S! H% E3 e   3.577957579987569*^9, 3.577958891536294*^9, {3.5779619459910836`*^9, 7 k2 t( k( K. a( P, [: k, [4 \0 F
       3.5779619748823338`*^9}, 3.578012345453125*^9}]% F( W7 Y1 O( _* @
    }, Open  ]],' p. L1 T: V, j  `6 A/ v

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

    0 F( _5 \, v5 o! a* q* O3 ]1 D5 ZCell[BoxData[
    + L, N$ T% {# B7 O1 q RowBox[{"{",
    8 ~# Y8 y: b0 Z* C9 Y  RowBox[{1 Z6 F- @- n$ b
      "0.43193416525930517`", ",", "0.4501634853493982`", ",",
    . W3 W/ J* w, G   "0.33336034768525247`", ",", "0.4418609896858925`", ",", 2 Y6 m- r1 e+ n; R/ y
       "0.41030378932283024`", ",", "0.516814798191575`", ",",
    # ]) z6 }$ h/ s; T$ {& J# D   "0.4476631213729994`", ",", "0.3016552978696669`", ",", 1 p. }7 D+ G1 ]- \; l0 h3 v
       "0.378122167437847`", ",", "0.020339844919720733`", ",",
    ( t3 M' ^* X- A0 X5 y   "0.018745375782087376`", ",", "0.2919925992695025`", ",",
    7 i$ h8 g, W! E% ]3 X1 l   "0.2649067959681263`", ",", "0.16343444284525593`", ",", 6 n5 |( k$ d& k; S; U. O* t
       "0.4182466778551563`", ",", "0.27347752211364934`", ",",
    6 @& P- H  ^3 a) t   "0.38554057386385654`", ",", "0.35253160453718047`", ",",
    " q" u' B6 ?/ o0 k/ c# L1 m   "0.2054745841100774`", ",", "0.45504377112716676`", ",",
    + a0 W* Y) Z' J% T) S2 e   "0.1598805094678612`", ",", "0.18662509982279485`", ",",
    : W  t: i8 E+ i( j9 t) N  F   "0.10684797493248213`", ",", "0.013349212673286828`", ",",
    8 _1 c7 |: X) C! K/ d   "0.08215836003004297`", ",", "0.2979041599362813`", ",",
    3 t' u# F: R; ?# k   "0.05995976512343641`", ",", "0.3884793499104568`", ",",
    " Q- W0 f3 G# ]- y. E  X( \   "0.5361889337034293`"}], "}"}]], "Output",& i$ g6 H' E) F$ f
    CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9, ( ?( G: z& p/ E4 P8 p0 a. W
      3.577925312375*^9, 3.5779575978808002`*^9, 3.5779589654960227`*^9,
    3 S7 M6 k' q# p4 c2 |& ^  3.5779621416934247`*^9, 3.578012355546875*^9}]
    . ~0 y! A4 y* o, T. t0 L}, Open  ]],
    2 u. |0 `3 O. n$ U+ e* E7 C
      W; X7 _2 x2 M/ y1 eCell[CellGroupData[{
    - @+ B7 q+ p- g: c- c) z+ l  J6 B  v' s
    Cell[BoxData[
      j! T6 t. k  A5 V2 Q2 X+ X' B RowBox[{"y1fit", "=",
    . G9 x1 U% a# A! V  RowBox[{"{",
    5 |$ m9 v$ `$ R  ?- o, q9 F   RowBox[{
    ; K) g7 V2 S# j. Y% \0 K/ W   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ( ], y3 Z3 L5 u$ h; D: p. E
        ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' e: O/ ]$ f7 E6 ~, ~) V8 s6 `    "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ; J) S4 F! I6 [' [+ [- c7 d2 ^
        ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    . ~& ^! v* @1 @( P$ @: ]! ]$ J    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", : m: u8 i6 }6 B3 H$ n
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    ( {0 G. R: Q' j: @, O. s    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", * y) ~. P1 ?; s* l' N: W+ @6 g
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    3 l: ~( A  L& p    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", 4 Y- O5 j' o+ Z" i( W; B& s! b
        "0.4319341652593058", ",", "0.4319341652593058`", ",", ; N- P) x( A! a9 J" R3 ]+ a
        "0.45016348534939865`", ",", "0.3333603476852527`", ",", 5 j$ d& W/ W. s! i/ L9 m( I& X
        "0.44186098968589294`", ",", "0.41030378932283074`", ",",   i$ ^: d9 |! ~  k% I( P
        "0.5168147981915754`", ",", "0.4476631213729997`", ",",
    ) {$ Z8 k9 T* Z    "0.30165529786966755`", ",", "0.3781221674378473`", ",",
    . k4 D9 y/ z0 m& L3 ~) q    "0.020339844919720775`", ",", "0.018745375782087393`", ",", , X8 v8 `8 J( F/ Y
        "0.2919925992695026`", ",", "0.26490679596812655`", ",", 1 P2 x& H. n8 u/ l8 e! h
        "0.16343444284525593`", ",", "0.4182466778551567`", ",", ! v8 o# e% T) K* N$ c, m6 k5 Y
        "0.27347752211364945`", ",", "0.385540573863857`", ",", 9 ?( w) j" w! r! F
        "0.3525316045371807`", ",", "0.20547458411007796`", ",",
    * x3 y7 T  [8 e$ d: C    "0.4550437711271672`", ",", "0.1598805094678611`", ",", , ~. T  _: l) }9 S; u9 m# w/ k" k
        "0.18662509982279502`", ",", "0.10684797493248224`", ",",
    9 C1 X/ ^. G% F1 f3 A    "0.013349212673286806`", ",", "0.08215836003004302`", ",",
    7 t3 |( j$ |: N3 Z    "0.2979041599362817`", ",", "0.05995976512343637`", ",",
    ; F; k+ C' ~9 P    "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]}]], "Input",; o7 R; Z! z8 d9 v
    CellChangeTimes->{{3.577959701349306*^9, 3.5779597161381316`*^9}, {
    ' i: ^0 k" l0 b4 T) n' F; |  3.5779621548286476`*^9, 3.5779621618642597`*^9}}],0 P2 `' B2 v) N
    1 x+ q5 {3 x3 A6 L& ~3 s9 \
    Cell[BoxData[
    ! \# Q- Z. q; G  ~ RowBox[{"{", 4 R1 m& M4 @7 X$ @7 j
      RowBox[{6 v  p0 h3 C& p% E# A$ P+ t
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 N: K# p2 E2 q) a0 M! G   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
      _1 W& |) k7 k- s    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", $ q% |1 p9 O5 _3 Y
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    ! J+ [2 b, O3 N5 Y   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    # n+ ~$ q4 t6 l. a4 K$ D   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", ( k/ R, h7 H) r3 B
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    3 A2 N: t; G& s% q   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    + D$ a9 T( U" \   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", . G7 K7 E* f% I! H, i
       "0.4319341652593058`", ",", "0.4319341652593058`", ",", & h$ X! I6 X5 ^4 V3 q! T& p5 h$ I
       "0.45016348534939865`", ",", "0.3333603476852527`", ",", 5 n+ r$ c2 t! W2 S5 q7 D0 U  T
       "0.44186098968589294`", ",", "0.41030378932283074`", ",",
    ( D3 J# B) B" P* P/ N/ c) F   "0.5168147981915754`", ",", "0.4476631213729997`", ",", 2 V0 G9 }; }8 i5 M% e; H
       "0.30165529786966755`", ",", "0.3781221674378473`", ",",
    0 k" b. h  f& O   "0.020339844919720775`", ",", "0.018745375782087393`", ",",
    ' ?1 @4 F& M% R) l! c   "0.2919925992695026`", ",", "0.26490679596812655`", ",", ) a7 R4 G* J3 R/ F% O( d
       "0.16343444284525593`", ",", "0.4182466778551567`", ",",
    . O! p' m6 ^$ l   "0.27347752211364945`", ",", "0.385540573863857`", ",", 6 n1 E1 l- D  V1 ?$ v9 T' p
       "0.3525316045371807`", ",", "0.20547458411007796`", ",",
    7 i- S6 \5 R- w4 y   "0.4550437711271672`", ",", "0.1598805094678611`", ",",
    & @2 ~$ j/ B. o$ t* \+ ?   "0.18662509982279502`", ",", "0.10684797493248224`", ",", ' W$ A3 m/ v3 g8 B
       "0.013349212673286806`", ",", "0.08215836003004302`", ",",
    8 l" v, E4 d- m! v0 ?   "0.2979041599362817`", ",", "0.05995976512343637`", ",",
      J2 n1 V+ J, R& X   "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]], "Output",
    ! [9 G8 t* E- Z# \* c CellChangeTimes->{3.5779597200381384`*^9, 3.5779621650778656`*^9,
      E3 h8 O  r! |  3.5780123569375*^9}]
    6 ?" X3 ]+ ^1 k" x9 C$ V}, Open  ]],' `2 x! ]/ l% n! M/ ?/ n. P6 H

    8 I0 d  U" {8 [( F9 Y- hCell[CellGroupData[{2 e4 h6 ~& y( J  A4 U
    , ]& o0 b3 l$ r8 |
    Cell[BoxData[
    8 Q& e1 G+ b# g( f7 g6 U RowBox[{"y10", "=",
    * z) B2 T- ]4 a/ y) h  RowBox[{"Table", "[",
    8 ?1 i0 ]3 N2 t. c   RowBox[{"x", ",",   ~% _5 M* d2 ?) Z, l- }: m
        RowBox[{"{",
    4 R, I* T- ?8 R8 V3 S     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",' n# e; ?+ o) q2 j
    CellChangeTimes->{3.5779253628125*^9}],
    + }& ?: x6 |, _3 Q/ ?
    * p% U8 Q; k2 t* Q' M# H( W1 tCell[BoxData[. u% h- h: f, |$ n! v
    RowBox[{"{", 2 ?  H% |, ^8 b$ o3 V
      RowBox[{
    ! y+ m8 @. p/ P! O( Y- B' v, y- J. z  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", , e! M) T$ s3 u/ I3 Q* `
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    + {; Q* I# d# d* \: k1 B. D    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", 2 h; p& }, _6 e9 l3 i
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    ( U7 y% G+ J# }" Z# \   ",", "29"}], "}"}]], "Output",8 ?5 w0 S' y! W; c! l# D+ s
    CellChangeTimes->{3.57792536553125*^9, 3.577957599565603*^9,
    2 q0 @/ V, A* y% _9 i! y: a  3.577958967383626*^9, 3.5779621678858705`*^9, 3.578012358609375*^9}]' U$ d4 L- G! P6 r7 I* g/ U
    }, Open  ]],
    , M4 }6 F  I* \  _% Y, z3 }" Y( j+ W$ t
    Cell[BoxData[% T6 x  F# w! D  u* H
    RowBox[{"For", "[", 7 h+ q  D6 d8 v3 G  w) f0 L, I
      RowBox[{/ C# v# Q+ e4 y
       RowBox[{"i", "=", "61"}], ",",
    + C4 B; A, R, Z- E+ j$ o0 y& z' ^   RowBox[{"i", "\[LessEqual]", "89"}], ",", ' N2 J# X- W+ w3 ?) t( s# H+ j& x
       RowBox[{"i", "++"}], ",", % J1 V; N  c8 J7 Y# B9 n
       RowBox[{' I6 k# y& x. v$ h, P: }
        RowBox[{"y10", "[", 5 }* t( Z8 V& B, c9 i( Z
         RowBox[{"[", 6 r" N4 p; u5 E0 g7 f
          RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", / g. i' x' |- y+ W
        RowBox[{"Data", "[", + P+ a2 }+ @1 Y9 ~2 w: M
         RowBox[{"[", # q0 w7 ?3 ?1 @2 @! A- S/ S  O
          RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",
    7 X, T4 z+ f8 V3 J: A! e  X) D$ [ CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {- z% p' J8 x8 q2 K8 N# r
       3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9, 5 C" p) _" L, h. S! d
       3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, 6 S4 `0 t0 r' v3 k
       3.577958922549148*^9}],. n8 a+ J" Q8 ]; ^) n: v" J8 k
    2 C2 z& B- H/ w# k& y0 B& v+ k
    Cell[CellGroupData[{) q& Q# s% L: U3 d+ x, x# [& Q+ l, k

    8 A  N& J( q# b* r- Y* G& TCell[BoxData["y10"], "Input",
    ' w7 N( ?0 `& v$ u CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {
    9 F0 T4 S8 L- c/ S' z  l   3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9}],
    ) B# I# v5 e! n3 {; i) Q- L* R. }5 d) }" p% \/ K* R& b2 x/ N8 M; x; u
    Cell[BoxData[
    3 G7 Z! N  G2 Q2 L2 s/ E4 _# H RowBox[{"{", & H) V; X( E$ D
      RowBox[{
    : ~1 E6 X, K4 {7 _# A: |  "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`", ",",
    , N$ j0 S5 q2 T& q) }" M   "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`", ",", 5 j: B8 z' j7 p! q- Z/ V4 |- M
       "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",", & u- A: b" W2 g2 X  o. l
       "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",",
      G* \) b' \" Q& T   "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",",
    6 y1 ^4 X4 u, {5 X. d   "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",",
    2 N/ _: R1 n5 `9 I( ~5 k   "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",", . G5 Y% \' m" }+ O
       "0.694935`"}], "}"}]], "Output",
    ( S  ~$ @( I5 J' q! i1 e+ K CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9, 0 u) o5 l2 t" J3 ~( f2 N
      3.577925393046875*^9, 3.5779576032628093`*^9, 3.577958971767234*^9, : C3 k$ p& g) E0 j$ ]; i5 }
      3.5779621736734805`*^9, 3.57801236071875*^9}]4 }) q& _2 G; [+ y0 J( D1 t
    }, Open  ]],4 {, d2 t' q9 M/ S, ?5 t

    ; }7 ?6 A# m% h- b' D$ b$ DCell[CellGroupData[{) j; B( n' f0 L  U

    ; s+ d! r% e) p$ l1 lCell[BoxData[) R1 }" U7 Z8 u+ b' w, l
    RowBox[{"y10", "=", - ]; E; s- e1 r  t  y
      RowBox[{"{",
    ( V& t' {  K2 Z; g0 s/ E   RowBox[{
    1 a- m- o8 ^% ~   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ v% K6 H8 x  o; p    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( n5 q* g# ?& Y& g1 v3 a    "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    ( C7 S" u8 x( A# a& [( K! D    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", ' S( Y  L9 {* z) c! i
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 4 I) _# z7 M' P4 v7 R
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", , g! _/ k9 ?9 w1 `# V3 ?
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", % J' h# T' u# i& y% a7 S! O2 l2 |
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", , O0 c+ Z! h* m/ U* m/ q
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    # ~" y: t& x$ t: H! n' N7 t8 [    "0.380742", ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", 5 T' q2 [2 C; g/ r
        "0.448763`", ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",",
    9 h: F; \/ `& m' o# `# @0 H    "0.057715`", ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", 3 }+ w7 f( R  i+ b5 V
        "0.570966`", ",", "0.468198`", ",", "0.414016`", ",", "0.18669`", ",",
    + f* o6 ~' H/ w/ b; [  i. u    "0.442874`", ",", "0.68669`", ",", "0.244111`", ",", "1.`", ",",
    - ^9 M& e' N; E2 K: x    "0.957892`", ",", "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", ' I" r7 I/ N  l7 ?( L
        "0.412544`", ",", "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", ' _( R; Q0 T8 A' a- X
        "0.390754`", ",", "0.694935`"}], "}"}]}]], "Input",
    2 E2 p4 L2 `! @ CellChangeTimes->{{3.577959733438562*^9, 3.57795974955339*^9}}],
    5 V& `/ E( Q8 `4 f0 |
    8 k' W; v0 E) K' P/ e# M# i+ rCell[BoxData[
      z3 Y# s6 n, V2 r7 | RowBox[{"{", 0 s' a  ?) y8 D
      RowBox[{
    : I# e, c: [8 o) _9 D% j  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 3 q" t8 }3 l. y: M# `/ y# H
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    * a+ s7 _1 A' [  Z  u9 J0 {  E9 i0 V    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", # _5 \. I+ ^5 y8 M; S
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    4 |; |( ^* J' _' Z4 x, \7 T1 Z   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    8 d6 L1 U) O% Q0 h   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", 6 J3 O8 z$ `* q
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", * ^) C! x1 Q/ V- V) h% o
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", 5 M  H2 K- d$ a* w9 n: J
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.380742`", ; w* _" x3 A% a3 @7 E: Q! D" h. W3 ~
       ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`", $ V8 N% h4 W. t
       ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`",
    - H4 O$ u  f( _( u; Q) p" l8 h) e   ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",",
    * q5 w! \# j* A. F. F    "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",",
    ) k- N# Q2 w5 k  A   "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",", - h3 ]) _. Q  p$ I
       "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",",
    # Y! ~' u7 J& _8 a. Y) C   "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",", # F$ M6 S% f4 o7 X
       "0.694935`"}], "}"}]], "Output",4 @- g. e% q% d$ ~
    CellChangeTimes->{3.5779597517529936`*^9, 3.5779621844842997`*^9,
    + ~; e5 [0 V2 b; k' d& t  3.578012361734375*^9}]
    " \( c, x2 @* S) B- u/ G8 N6 c}, Open  ]],9 q4 M/ }( y5 r

    2 V0 J" B6 d+ I0 s& PCell[CellGroupData[{* c. X. ?) q& q
    / Z. u- B+ K% F3 n! w8 X* O7 E/ P5 {
    Cell[BoxData[% D' b3 O# p9 o0 L% n) L6 x
    RowBox[{"p1a", "=",
    $ p! S5 Y2 L( i  RowBox[{"ListPlot", "[", , t2 X) {* j3 f( I
       RowBox[{"y1fit", ",",
    ( g/ D" ]: r6 B) q3 Y    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    4 J0 g; J& M7 {% e  p    RowBox[{"PlotStyle", "\[Rule]", 6 Z% R+ x  C4 T" ]- V0 t9 y
         RowBox[{"{", ! x2 [) X2 r" M0 l
          RowBox[{"RGBColor", "[",
    9 V. j  V5 M) N       RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",", 4 X$ ?" f5 P2 H
        RowBox[{"PlotRange", "\[Rule]", * \' |5 u/ }2 P! S; i4 C
         RowBox[{"{",
    - ~3 r! j8 r8 a$ C3 W+ B  l      RowBox[{
    : d2 C9 b# T( I5 k+ G       RowBox[{"{",
    ! c5 z0 Z2 s$ L/ t, h' V- M        RowBox[{"61", ",", "89"}], "}"}], ",",
    5 R! |" T, w9 W5 K       RowBox[{"{",
    4 H6 s0 |- R: X0 f0 L* Q        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", : ^! A. E# w6 s+ A
        RowBox[{"AxesOrigin", "\[Rule]", 8 h. E8 C4 W) a) F
         RowBox[{"{",
    5 A! `8 k! q; l      RowBox[{"61", ",", "0"}], "}"}]}], ",",
    9 U$ @( `! g3 a" G+ z+ S$ J0 p* e( m, X    RowBox[{"Frame", "\[Rule]", "True"}], ",", + n. y% Q( A, m# S
        RowBox[{"FrameLabel", "\[Rule]",
    , r7 F# T1 L. _( g     RowBox[{"{",
    & i+ K  k# o" h8 l" N. z1 X      RowBox[{4 u$ O& h+ `+ U7 D' _( q
          "\"\<\:7089\:6b21\>\"", ",", ( i- ?1 B; `1 p& i& y  q
           "\"\<\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\
    - t8 E: f, u% f, d& ]1 d\:ff09\>\""}], "}"}]}]}], "]"}]}]], "Input",5 ~  ?  [# W% s& Z: E9 z- S! m: C
    CellChangeTimes->{
    ; N2 m: R# c  E+ |  3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {
    1 K; J9 K/ x0 `% H+ L# W   3.5779576143076286`*^9, 3.5779576277548523`*^9}, 3.577959769006624*^9, 0 f4 v$ j$ K( ?, X. ]- L
       3.577960184458948*^9, {3.5779602338174343`*^9, 3.577960278745513*^9}, {
    # p: |+ B/ f) L7 r& W   3.577960347588433*^9, 3.5779603994429235`*^9}, 3.57801239140625*^9}],
    - _3 v  w% T( A2 Y- Y' c& g/ l. H  V7 }% B9 }4 ^1 j6 k. z+ U& B% t5 c
    Cell[BoxData[: O7 {, B! i9 b& G/ c
    GraphicsBox[{{}, {},
    8 N5 f0 q. p' |+ H7 \   {RGBColor[0, 0, 0], LineBox[CompressedData["
    : _5 w8 X6 j, x) f1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn
    " L: X# R9 D+ D  q$ z8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq5 W! V4 t9 X+ G; W
    D3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B1 X8 M" X# x7 x  ~
    1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX, F2 }+ e: k, f7 i6 \5 \( d, A
    C1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN% b( b% @( l8 |: m1 s& ~
    a2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff
    ( p& R5 a. N- m) N& ZyqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb
    % y% j' J1 v0 M0 [. F' _4 X+ P- ^wrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX59
    ' A( V* T& c6 LY6nGQ3sAieueIw==) u8 x7 V2 ]" k2 d! S
         "]]}},
    ( {: X" P: p5 t3 n8 P  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],, I- X0 d3 k9 S+ c: c, w0 z" R
      Axes->True,& a% u: i7 m2 y  x$ N, W& f( t% u0 C
      AxesOrigin->{61, 0},
    ( e. Z4 G- i* R& x/ w" M  Frame->True,. x1 J2 z8 t! q2 L& M
      FrameLabel->{: I* W8 X3 g! @, I
        FormBox["\"\:7089\:6b21\"", TraditionalForm], 6 L7 s# v1 A) L" z
        FormBox[3 I0 w  p0 k5 D' _3 a6 _$ w
        "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\
    + l9 \% ^- ]. ]5 s% i2 p! J% e\:ff09\"", TraditionalForm]},$ W$ e; l9 c% m7 `
      PlotRange->{{61, 89}, {0, 1}},% m' e6 P  ^2 N
      PlotRangeClipping->True,+ q& t% `! X+ A+ _1 w
      PlotRangePadding->{Automatic, Automatic}]], "Output",' Y) d5 O5 d) }7 s$ Z
    CellChangeTimes->{
    ( ]' J) a5 N' y6 H$ T8 Q  3.577925144625*^9, 3.577925396578125*^9, 3.577957630297656*^9, , n$ k5 m" |2 Y$ Q
       3.5779576933061666`*^9, 3.5779589732960367`*^9, 3.577959771908229*^9,
    5 M+ f/ S; o% m   3.577960281756318*^9, {3.5779603518628407`*^9, 3.577960407664138*^9},
    ( g1 I! k6 x! @' U   3.577962187510705*^9, 3.578012396921875*^9}]
    0 H. _, @+ J/ V4 z5 ~4 ?5 N! d}, Open  ]],
    1 S# T: [8 {; T
    6 `! ]( I  e. Q& wCell[CellGroupData[{
    , q0 n: c& k$ `9 P" F" O, {
    7 ^# t; }8 n# W  O& bCell[BoxData[
    1 E7 l% d9 R  R! _) d9 T& l RowBox[{"p1b", "=",
    ! G, k6 [6 {" v& S6 o  RowBox[{"ListPlot", "[",
    ' C, n2 F& V1 H+ ~. m0 u- C   RowBox[{"y10", ",", : ]3 X. E4 g4 t7 e- s! P1 k
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",", 4 |( g) c$ W5 F# W( _; t' c# [
        RowBox[{"PlotStyle", "\[Rule]", ! P. M8 F2 }( Y1 A1 r/ G2 x
         RowBox[{"{", 7 @7 H% ?( _/ @7 r
          RowBox[{3 u1 h* Q" Y7 F# v# F3 @# l
           RowBox[{"RGBColor", "[", 7 _: C2 j1 N: \: L$ X1 _
            RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}], 0 ~5 z/ V2 N, a/ q' [
        ",",
    ) [4 N+ V+ ^3 Y3 l( m    RowBox[{"PlotRange", "\[Rule]",
    1 `- N6 y9 q* e4 B( N% S& g1 P     RowBox[{"{", % @9 b, J7 I: {" k- }6 j
          RowBox[{
    $ k. K1 Z* l9 w5 |/ I       RowBox[{"{", : f1 {1 l( q- O  c
            RowBox[{"61", ",", "89"}], "}"}], ",",
    ( I5 m& @. F! |7 K: M2 [       RowBox[{"{",
    1 z* I/ A9 P4 b+ H        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", / P$ `5 u, N  U
        RowBox[{"AxesOrigin", "\[Rule]",
    4 K$ F2 Z) b: j: U' u5 R     RowBox[{"{", ( w1 X4 S2 j& w  H2 S
          RowBox[{"61", ",", "0"}], "}"}]}], ",",
    ' A/ p8 A$ P! O* d4 S    RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",6 k4 o8 s/ K& z, `
    CellChangeTimes->{3.5779253991875*^9, 3.5779576384564705`*^9, $ s+ O+ S5 k1 x3 M! z9 V  N
      3.5779597764166365`*^9, 3.578012409265625*^9}],
    . v$ m; ]; d3 v9 y, d: W! O8 B; x6 _" a1 f( J8 K+ ^
    Cell[BoxData[+ O, @6 E$ s: A9 D3 u4 c' w
    GraphicsBox[{{}, {},
    ; q* Q; a  i; _' A" R0 J' S4 g   {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["7 Y' [1 ]- n# w6 S* K+ I( r
    1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ- q2 F: H9 x5 _; P$ p, Z
    /B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy
    8 C. ~6 o6 w  I, R7 O. XGwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy
    8 C3 t9 K$ b: gGFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy7 n  e7 H# B# m4 a, ?
    7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/5 Q% l$ k) ^$ u2 [, ?; v2 W5 Z4 c+ b
    Qu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri
    + b3 W( y2 h7 }6 s$ NH+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV
    5 X) j; y; _& v! k4 FrQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T
    8 m* n) E) L4 F3 B( yvA==
    / k* f% E* P  Y% m" @0 B     "]]}},
    * R( V/ J/ W6 D4 L  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    1 P- e  c; h! b' k2 b$ d  Axes->True,
    4 j1 v8 l) {" c* I& N: Q! A  AxesOrigin->{61, 0},4 v4 m* ?9 D! N5 Y* S4 F# h
      Frame->True,
    1 f% m, [, L0 M7 a9 z$ u  PlotRange->{{61, 89}, {0, 1}},
    3 R7 A3 F  E# S7 r  PlotRangeClipping->True,
    ( z: u4 a' i4 J: G  PlotRangePadding->{Automatic, Automatic}]], "Output",' p! @7 s/ ], |% W
    CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9,
    : J0 K* m8 V) v# K  3.577957640266074*^9, 3.5779576946009684`*^9, 3.5779589749964395`*^9, & R& Z4 H, m/ l3 P
      3.5779597781950397`*^9, 3.577962189476308*^9, 3.578012410328125*^9}]
    ' }$ G* M1 i( D5 X% Q# v}, Open  ]],7 o0 r4 q3 ~8 \) \9 n
    * M) w) j- X" B5 s/ d  S6 ^$ k
    Cell[CellGroupData[{4 y) P; Q3 N% w; {$ w

    3 V3 G( b2 P: jCell[BoxData[
    " y% X0 _3 _8 e. G$ a RowBox[{"Show", "[", + s4 c* k3 u( ?3 ?: R  Q
      RowBox[{"p1a", ",", "p1b"}], "]"}]], "Input"],3 s( [; S! N$ K) n. z8 @9 S+ X* P

    ) s1 W. I% w. V7 LCell[BoxData[
    " y9 H4 ~* K$ _1 f+ P( W6 @" X6 G1 T GraphicsBox[{{{}, {},
    ) A$ |+ E8 R! x' t- x: T    {RGBColor[0, 0, 0], LineBox[CompressedData["
    " A& o& O' Q( z6 n- ]1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn8 J) O8 x+ i# n( s! p$ Z* [! x
    8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq
    5 m# g% I- l0 ^# q+ ?% [& ^7 [; sD3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B  h$ _4 C% O- d8 m. n. n
    1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX  t9 X* H: c4 p7 Z! G
    C1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN5 O1 H" S- {. x) W5 N* n2 _
    a2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff  i2 f$ }& T+ H8 H" Y
    yqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb! A9 \1 r0 [6 C1 @+ I/ u! Z' s
    wrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX594 X6 m, {$ i) ~; B' P9 P# B% y
    Y6nGQ3sAieueIw==
    % I) i. c# Z  L. @+ N* ]/ W      "]]}}, {{}, {},
    9 y7 E3 K' c9 F; H7 S$ U* L    {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["
    . z# s  i1 y6 b. t2 X% X; i, y1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ) i+ ~( L6 ]# Q# ~, u6 ^! ~: p% s+ R# M
    /B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy2 \# [2 Z+ d$ a8 Z5 U% O8 F  `
    GwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy- S8 }+ n0 `4 k, U
    GFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy* |3 W2 [% J: }) H" E9 j
    7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/7 j- _7 M. q) f2 u
    Qu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri; z" l$ p$ u9 J$ q" X0 L8 S  T, V
    H+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV$ J/ ~! z; B3 D4 M; Y: Q) u
    rQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T* \4 S% e, [# _
    vA==+ r, T- D; h, _5 J6 H
          "]]}}},
    & p/ g9 ^: {4 F  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    . Q7 f9 R8 ]2 C4 m& I# Q  Axes->True,
    1 L. y3 h/ ]; O9 O6 B  AxesOrigin->{61, 0},
    % L! D  k& O& n  Frame->True,
    ' B) I/ f/ x1 h$ R8 _  FrameLabel->{4 s* u) r! f7 L. _/ k
        FormBox["\"\:7089\:6b21\"", TraditionalForm], % u% @3 D6 v$ y3 z, ^- g* O* I
        FormBox[
    ! q# d& u& F7 J1 I, B0 j    "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\# T" y$ q. g/ t8 C/ y$ m5 r2 D+ z
    \:ff09\"", TraditionalForm]}," o8 n7 t* N$ R. J) }
      PlotRange->{{61, 89}, {0, 1}},1 E7 H% B- {! b# z. J7 g- Q
      PlotRangeClipping->True,
    $ @6 [% Y+ H1 l- L, B3 d  PlotRangePadding->{Automatic, Automatic}]], "Output",- ~+ x, Q( l8 [7 t
    CellChangeTimes->{3.577962196683521*^9, 3.5780124119375*^9}]
    5 a" C- l3 v# N# b; S  Y! V! a7 c  Z}, Open  ]],# v0 h/ A8 |" Y1 B' ~- c, d

    & C  _7 H# n+ q$ b8 ]. J9 CCell[BoxData["\:62df\:5408wi1"], "Input",
    - k) {& e0 ^; L( @' L% l; ^) Z  {5 G CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}, ( g1 V. o9 M: z$ q% {! P
       3.577959662349238*^9}],
    , }6 W( i* ^- u0 ]* b* r9 h  Z- W- l; v4 b
    Cell[CellGroupData[{
    # e! D. D$ [6 _( {/ T& Q" {6 y4 J+ Q# y- E' {) t5 D
    Cell[BoxData[
    1 V3 K5 |( U8 k8 d) I5 ~+ ?% N RowBox[{"y1b", "=",
    ' |' O" Y- N+ m  RowBox[{"Table", "[", 7 _% x' i0 d3 E/ J
       RowBox[{"x", ",",
    ' D8 ]; K% L) Z" `    RowBox[{"{", 4 A# w8 Q$ q9 V+ ~3 r* Z
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    1 O; [3 I- \4 u0 |- Q5 `' @ CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {+ C- M* u! |2 J  t- z" G
       3.5779226649375*^9, 3.5779226810625*^9}, 3.577958232403945*^9}],/ S  J# n3 d0 o9 D. z3 i4 U
    2 A* ^! K/ G) x$ C& N
    Cell[BoxData[2 `9 \) z( R$ c# i
    RowBox[{"{", 2 G( `3 o' ?9 }  o
      RowBox[{: V4 ?9 w- I8 ]4 x) V" P  A
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
      E: o# x2 w, t$ y& s   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",; f  w9 m- H* m, `) [6 j
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
      X) i$ U' K. s8 T5 e+ e1 A- n   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    3 [& R9 F, s( P, J$ s$ ?   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    ) r( {& W* |3 s2 B! E4 V4 \   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    8 B" M, T! s' ]# C   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", / i- a& F$ L4 H6 c: _+ X" c
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    , B! n# {0 g( [' ?' }4 y   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    * i5 W1 Z4 J. |" {/ E1 G2 b  "}"}]], "Output",
    1 T2 j# e2 \7 |( P; D CellChangeTimes->{  X4 Z" X6 @$ v  o
      3.577922682296875*^9, {3.5779582291435394`*^9, 3.5779582351339493`*^9}, ; [) ?/ l+ I6 Z5 T' c
       3.577958478041973*^9, 3.577959010205701*^9, 3.5779622225483656`*^9, " Q) Y' k  h8 ^- ^5 \0 x9 |% ?
       3.578012438953125*^9}]
    3 Q- u9 e; Q! Y' b}, Open  ]],
    4 q( B+ Q- q, N4 |. ]! X- a' m& X  W9 a, N- r' q5 x4 p
    Cell[CellGroupData[{
    2 e3 z; D# h, r8 m" X6 A. m/ Y+ b& R' q; p
    Cell[BoxData[
    1 k' g- S: `: Z+ O2 |# K4 n6 { RowBox[{"Data", "[", % |% X, }, I0 @$ o3 D3 P4 l' B
      RowBox[{"[",
    $ W4 r/ e( s7 N# |2 @/ S  z   RowBox[{"3", ",", "11"}], "]"}], "]"}]], "Input",
    , i  d' m0 s* }+ M2 o: F CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {7 ]/ U; ?6 p& J0 _
       3.577922912015625*^9, 3.577922912171875*^9}, 3.5779582414831605`*^9, {
    , c9 e1 i* B3 k8 k/ j6 b$ `% l( e   3.577959014090108*^9, 3.577959016040111*^9}}],
    6 D( {7 I4 Q( x
    * N% n$ F) G' F$ S( g; MCell[BoxData["0.492958`"], "Output",
    4 o% ?, l: U( z, k CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9}, 4 T" M% ?5 W8 D& z) y; G8 K
       3.577922913203125*^9, 3.577958242809163*^9, 3.5779584790403748`*^9,
    $ O# ?( F% p( k  w. D  z7 L   3.5779590175689135`*^9, 3.5779622239523687`*^9, 3.578012439828125*^9}]1 h  I' @8 P7 k! U7 j2 m, G& M; Z
    }, Open  ]],% ]" a; m$ h: D+ ^7 C& R
    % \: U$ H' }9 P: D- X
    Cell[BoxData[% a5 K" X0 L2 X! Z
    RowBox[{"For", "[",
    7 k1 O/ X3 f' p# ^7 h) M* N  RowBox[{2 f' H# [. ?0 F+ l
       RowBox[{"i", "=", "1"}], ",", ! B. X5 [  w+ i# f# M+ s
       RowBox[{"i", "\[LessEqual]", "60"}], ",", - C& ~, h1 U0 u$ v1 K- c
       RowBox[{"i", "++"}], ",",
    4 r4 ?5 {+ k, P# C. F* s* g   RowBox[{/ t# v. s2 z* t, x: y) b0 n
        RowBox[{"y1b", "[", 0 t) A9 D2 e+ j: d* Q
         RowBox[{"[", "i", "]"}], "]"}], "=", " e) B9 J9 q  t0 N1 k; d
        RowBox[{"Data", "[",
    ) [4 Q& S- r' Q+ P* K5 ?2 D- D" d     RowBox[{"[", 6 Q! \+ C2 M) @! v! ]6 ^$ X
          RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",
    ( ?: X% m( `1 ~. @ CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    2 X/ C4 k7 S! S7 z6 V   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    # Z  ]( @9 e! j% m; o. E   3.577922923203125*^9}, 3.577958246272369*^9, 3.5779584755771685`*^9, {
    % f+ X) d& E  y. G   3.57795902089172*^9, 3.5779590227793226`*^9}}],
    ' V, X' x- \% O5 P5 y8 ~0 s% w* B2 u2 y4 a* a5 U" ~; N
    Cell[CellGroupData[{5 J# L9 A; [# `& h
    ; j: p' B# g  h) {) ^2 ~
    Cell[BoxData["y1b"], "Input",
      l" m# `6 c2 m$ Z8 B' R+ ]4 c CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}, # j* v6 m; b4 w; g, {; k0 d
       3.577958484172784*^9}],! P; `1 ]3 M4 e. I! x& K2 B6 f

    ) ]$ }  R7 W7 C: B7 F+ dCell[BoxData[
    2 ?+ v+ G# M: d0 }% e, q" V: F% S RowBox[{"{",
    1 o+ E; x& D. a0 i; U6 I  RowBox[{
    4 k9 z( p4 `( R6 _  "0.873239`", ",", "0.464789`", ",", "0.492958`", ",", "0.774648`", ",", / @( v  R% g8 q8 x- Y: W+ y9 |
       "0.380282`", ",", "0.647887`", ",", "0.56338`", ",", "0.295775`", ",",
    # u8 K$ u' l0 {) [( T6 [# i+ z   "0.338028`", ",", "0.211268`", ",", "0.690141`", ",", "0.43662`", ",", 3 v* J, z( d, w- ~; p; g
       "0.`", ",", "0.267606`", ",", "0.211268`", ",", "0.408451`", ",", " o* H$ d- r0 M2 l0 e5 u  A
       "0.478873`", ",", "0.380282`", ",", "0.211268`", ",", "0.43662`", ",",   T& F2 C- s6 W( a
       "0.478873`", ",", "0.295775`", ",", "0.028169`", ",", "0.43662`", ",",
    8 S7 A9 ^0 K4 V. J   "0.394366`", ",", "0.295775`", ",", "0.830986`", ",", "0.169014`", ",",
    + i1 [' u0 J# a   "0.366197`", ",", "0.309859`", ",", "0.352113`", ",", "0.309859`", ",",
    + X4 W, j! k+ J% U* z+ ?   "0.774648`", ",", "0.422535`", ",", "0.887324`", ",", "0.887324`", ",",
    . ^4 r9 O1 j. l1 ~2 \/ v# r   "0.859155`", ",", "0.239437`", ",", "0.295775`", ",", "0.746479`", ",",
    & ^& m$ Z8 \" l' o4 k5 q' v2 R6 q   "1.`", ",", "0.549296`", ",", "0.366197`", ",", "0.549296`", ",", 3 ?& ]- e4 U/ b; c. S* w/ H
       "0.577465`", ",", "0.690141`", ",", "0.71831`", ",", "0.521127`", ",", 5 E. j( R/ `& Q! D5 r1 G0 Y* N, h
       "0.929577`", ",", "0.521127`", ",", "0.338028`", ",", "0.380282`", ",",
    3 Z+ L: s3 f# Z  o5 V, t   "0.676056`", ",", "0.591549`", ",", "0.464789`", ",", "0.295775`", ",", 7 [3 v! i7 x+ K. l6 M! x
       "0.380282`", ",", "0.211268`", ",", "0.253521`", ",", "0.28169`"}], ) \' _8 l2 m$ f* q  ^% }7 A
      "}"}]], "Output",
    * h3 f+ g$ A3 X: p- N3 d CellChangeTimes->{3.57792293246875*^9, 3.5779582549771843`*^9,
    3 E% q8 n6 R* }  3.577958485420786*^9, 3.577959026460929*^9, 3.5779622288195767`*^9,
    8 ^7 b7 T& b' Z" X  3.57801244275*^9}]
    ; b; S$ e" b! n  K  ?: E  S}, Open  ]],
    6 R2 C. z6 V* z( n: \  y
    ' {, n, q$ h2 m+ |* V) ICell[CellGroupData[{3 A  d# A5 ~# h+ s9 [+ K6 G

      I, r% q4 J9 xCell[BoxData[% q. c7 i* ?6 `" t& J
    RowBox[{"m60n21", "=", ( Z9 X+ i0 l2 R; q, j- Z8 q
      RowBox[{"Table", "[", % M- T0 K9 V% b2 k
       RowBox[{6 ?7 O% I+ ~5 E/ {* W: \# k. W& ^
        RowBox[{"Table", "[",
    , k5 ^6 V: S- q, h% u     RowBox[{"y", ",", 7 }0 F2 G/ V+ {! `$ }6 [
          RowBox[{"{",
    # X) f' f3 s; g: y- b  O+ T       RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",",
    % \3 M% B' v" f* ~) ~    RowBox[{"{", / D& K, g9 @0 I" W: v; \6 O
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",- `% g1 C2 Z9 o. M
    CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {+ n, A7 [6 z/ V* b  B8 `
      3.577924052828125*^9, 3.577924101671875*^9}, {3.577962237961193*^9, 9 O3 e3 E. u# g$ k1 _
      3.577962240082796*^9}}]," `0 K3 L" Q; U! l( i4 {& \5 w

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

    : a( T* {( H& `( ^9 V/ D& PCell[CellGroupData[{
    8 t  ^" d4 L/ ]4 o6 @: u3 c+ k& {. `$ y  j1 J; C# i0 T% Y
    Cell[BoxData[
    5 z8 _1 l  Z8 @& O$ q RowBox[{"w1b", "=", ; w$ s( C5 [3 p# h: o
      RowBox[{"LeastSquares", "[", 1 @; ]+ @, T: g$ z! i; ]
       RowBox[{"m60n21", ",", "y1b"}], "]"}]}]], "Input",
    / P8 a* J8 b6 k  U CellChangeTimes->{{3.577924598484375*^9, 3.5779246208125*^9}, {
    & f8 T7 N& ?0 ^2 n5 K2 R; B  3.577924662765625*^9, 3.57792466596875*^9}, {3.5779582865360394`*^9,
    8 l. A( e$ G1 I1 _  3.5779582963172565`*^9}, {3.5779622900808835`*^9, 3.577962290377284*^9}}],
    $ E; _9 s6 Q* m& A
    ) g" U( R+ @6 tCell[BoxData[
    . X! P) B7 W* D* R7 B8 y9 k1 s  P RowBox[{"{", $ |. [* R6 j" ?; K% s
      RowBox[{6 o0 _7 i+ x3 n
      "0.48228184971363947`", ",", "0.16041393254115022`", ",",
    - R+ H3 ]9 e7 s: r   "0.3741982811661129`", ",", ! v( b% G1 P0 y' B
       RowBox[{"-", "0.12620581913715245`"}], ",", "0.28831860112966734`", ",", / w$ X  N0 L- N4 \
       RowBox[{"-", "0.2282993884666894`"}], ",", "0.3207174990295839`", ",",
    . e. I1 \, s% b5 M6 d# X   RowBox[{"-", "0.4666313851213302`"}], ",", "0.27551257162880227`", ",",
    + ^# Q3 ?3 J  {. Y: P3 _) G   RowBox[{"-", "0.025873988843993667`"}], ",", - w( s$ M* e7 a' _9 X# W
       RowBox[{"-", "0.1339854044819916`"}], ",",   U' [( N# V! d  S, u
       RowBox[{"-", "0.15852708848338315`"}], ",", "0.3129687276967983`", ",", 6 i/ c* k6 g# ^% j8 Q) s/ R
       "0.45723850991134063`", ",", "0.2954923840077215`", ",",
    5 p/ x( y2 `8 M. T9 [' O+ V   "0.9125798890455868`", ",", "0.21159052285983104`", ",",
    4 m: o) `7 o# h   "0.5575503376854456`", ",", "0.6019775648968265`", ",",
    8 x7 S; j: C/ w# O9 K   "0.2361524780938108`", ",", "0.12782130225993923`"}], "}"}]], "Output",  C- c! `& B' K; i" R  P: }5 n5 h
    CellChangeTimes->{  d! P: }1 v8 O* v; i) I0 P5 z1 m
      3.577924621953125*^9, 3.5779246688125*^9, {3.5779582894220443`*^9,
    & ~7 f& \2 P' H! g# A  O3 Z   3.5779582992968616`*^9}, 3.5779584995700107`*^9, 3.577959040157753*^9, ' O( ]+ e: ]4 E' B5 C8 C
       3.5779622919996867`*^9, 3.578012447734375*^9}]3 Q8 ]0 R3 I9 @4 Y1 M. `
    }, Open  ]],
    ; w9 x2 y, r6 Z4 X* w5 ^- k' m3 o
    5 [3 L; x1 G" m" [Cell[CellGroupData[{: [) J5 q" _4 d! a5 z3 d# u8 y

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

    1 m  t1 Q0 t3 y# y: N/ r- R" cCell[CellGroupData[{
    + u" b0 e! g8 U1 A+ U+ V8 _: u! n
    + A9 k+ q& X) v& H4 VCell[BoxData[/ y$ s/ ]( I* B: Z8 W# L
    RowBox[{"y2fit", "=",
    ! ~$ P. U1 F( A/ A% Q  |# [  RowBox[{"Table", "[",   a+ G' |6 h6 x8 N) `1 V6 ?# o
       RowBox[{"x", ",",
    9 g9 ^" `$ w( }8 _% Q    RowBox[{"{",
    1 h- ], N0 A( D+ k8 w( C  w# b1 }7 v     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    + d9 f* D; F" R9 S CellChangeTimes->{{3.577924969375*^9, 3.577924979515625*^9}, {
    ( C9 K( S- f6 O$ O: n; C! r   3.5779252768125*^9, 3.577925277484375*^9}, 3.5779583246625056`*^9}],- j' w7 Q, W- R" J& H" u
    4 N4 t5 j9 n, P0 U$ j& d
    Cell[BoxData[+ S$ S/ F/ A2 C3 ~+ `/ ]( W. _4 x3 @
    RowBox[{"{", . M% f4 c9 j7 \5 K  f, K* a' c1 E
      RowBox[{
    : A; ~+ E/ C$ K7 q  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ) w/ G4 C1 A3 b: j   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",' `5 e6 I/ r7 p- r% l
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    * d: ]) r1 m( F' ?   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", " c, R  h: M# v7 O* _% b; v" x! ]
       ",", "29"}], "}"}]], "Output",0 P$ v# W1 U6 v9 u% ?1 f# x4 `
    CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9, . w) g. d  r5 m3 Q
      3.5779583268153095`*^9, 3.577958508118826*^9, 3.5779590470685654`*^9,
    ' c, t/ z: x% S: y; J1 o) z( _* u  3.577962320173336*^9, 3.57801245028125*^9}]6 s. }, ~& X+ g6 h8 _
    }, Open  ]],- y) |$ S' k! y/ }  a* Z

    % v% B4 h6 F& T9 kCell[BoxData[
    ) o* u$ Y: k% e- ~ RowBox[{"For", "[", ) ?6 k) b/ y! i" K5 j! F
      RowBox[{3 J$ o5 r( I2 ]* {
       RowBox[{"i", "=", "61"}], ",", 4 N5 Q+ ?, q' R( i/ i8 ?' K9 g
       RowBox[{"i", "\[LessEqual]", "89"}], ",",
    5 }. Q/ I! K( B0 _4 R9 z   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", ! W& z" X/ a7 w! `$ X1 s$ h
       RowBox[{
    / I* W7 L2 ]$ o/ ~+ `    RowBox[{
    ! H6 d. p( ^2 Z& @' k     RowBox[{"y2fit", "[", : I6 c: K) v" ?
          RowBox[{"[", ( Q8 ?- P1 B" E. R
           RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",
    6 N) X6 W2 _, q5 n  ]/ p. O     RowBox[{"y2", "/.",
    4 \/ t9 p/ {  H, |& Q" Z. D      RowBox[{"{", ; h/ z1 t; ]/ s0 M
           RowBox[{
    - ?' C. u0 ?3 k6 @        RowBox[{"x1", "->", ' U3 Z# j" s6 b2 X3 I3 k- a# W2 }
             RowBox[{"Data", "[",
    , b! z1 Q7 ?4 s; n          RowBox[{"[",
    4 D) s; t& \3 c) g           RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    : E2 s2 {/ k0 @& z6 Z        RowBox[{"x2", "->",
    $ r8 G, Q4 i2 T3 V: C9 ~1 H         RowBox[{"Data", "[", % m9 i3 s$ A* w% Y
              RowBox[{"[",
    6 A# j0 V5 X1 f5 {           RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    - B) t9 X+ n3 F& M        RowBox[{"x3", "->",
    3 m, Y+ Y, S. e% I: E8 P, o# {         RowBox[{"Data", "[",
    $ L" j( v  c; D- R; P          RowBox[{"[",
    / q+ \; ^  x, o( a# t. J/ N           RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", # s) {0 m  j9 U* ?
            RowBox[{"x4", "->", ! E4 F- l; Y, Z" r4 `
             RowBox[{"Data", "[",
    9 L7 W7 N; l0 l9 T; }3 \4 y; \          RowBox[{"[", ; @0 a0 N! w( F* @  S! i7 @
               RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", 5 v7 q. m% s$ ]1 T: V: ?
            RowBox[{"x5", "->",
    ! W' h4 S% c% S# d0 X/ K         RowBox[{"Data", "[",
    3 G5 L+ o# b# _2 W3 C: f          RowBox[{"[", 2 v! J% T4 E" s; P8 b, i' ~
               RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", " g* N) N8 m* [( w8 y
            RowBox[{"x6", "->",
    2 @, m, o( h! Z# X. S, f; e8 a         RowBox[{"Data", "[",
    ! u7 t' I+ i# G6 |( R) X9 t          RowBox[{"[",   Y7 C1 H$ [8 G: x
               RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ) w+ G% W$ S4 a+ q1 D0 I& k3 F( m7 w        RowBox[{"x7", "->", 3 B6 G  B6 a" h$ e9 _2 A$ W
             RowBox[{"Data", "[", . Z( J2 T2 m; X: F# D
              RowBox[{"[", 3 q. J: D$ o+ p5 F4 b7 }
               RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", ' o+ f/ x% s/ q5 `* k: G9 u
            RowBox[{"x8", "->", + `8 Y& ?- H1 Y; g
             RowBox[{"Data", "[",
    # u8 |. Z" g+ U: U! A9 \          RowBox[{"[",
    , m  g) Q& m9 \8 }" V  i; I3 g           RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    ) e* i: n  d; d  p8 B- _$ n5 C        RowBox[{"x9", "->", . X. s3 |' ]3 F- f* K/ x0 x8 b/ H
             RowBox[{"Data", "[",
    ' `. m) k7 k$ |3 I: Z, @          RowBox[{"[",
    2 D* J' {7 w: E4 o3 g4 ^; z           RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}], , K; Y( R, w* A3 R+ N9 i1 [
      "\[IndentingNewLine]", "]"}]], "Input",
    - @' t* U1 _# w CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {
    4 B& D. h3 q: U2 T- H  3.577925286140625*^9, 3.577925306765625*^9}, {3.577958329919715*^9, 8 R; M8 {; L, B2 U8 W0 W
      3.5779583326341195`*^9}, {3.57795892351635*^9, 3.57795892354755*^9}}],% ~% v2 p4 V$ j/ {# @# l. o

    1 b# }2 w0 _1 W* uCell[CellGroupData[{7 @% D) t, \9 ~

    + P4 j' Y4 R) t( {: S/ r6 JCell[BoxData["y2fit"], "Input",: G1 a" ]- T! c% W
    CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {- b* C8 v! ]( B+ L4 t' `
       3.577925040484375*^9, 3.5779250440625*^9}, 3.5779583419785357`*^9}],% z0 s5 A4 r+ |# q" e7 o' b. Z0 w
    ! a. ^6 S" ]% |
    Cell[BoxData[) Z, w! ~, j8 M. }& R" Y5 Z& c: \
    RowBox[{"{", 1 {# W* J4 A1 z! _* y: K
      RowBox[{
    . I$ U6 E! G# P: q- C& s* z  "0.4853171132859182`", ",", "0.4508635216665074`", ",", . {* f0 E8 \- E1 ^0 |8 B' o- A
       "0.3642119241752518`", ",", "0.42852077425595436`", ",", / _; C1 I7 Q4 n8 f9 a
       "0.4712694272667798`", ",", "0.5257533056184774`", ",",
    * m& |# _% E/ X. n9 q- e! j! e   "0.48620658140716133`", ",", "0.41106838915591876`", ",",
    . t  ]+ q0 i; R3 x8 q) k- J   "0.5486894206610674`", ",", "0.007731168540073459`", ",", 7 ^5 U% R6 [9 g1 I0 s$ C! a
       "0.013872406140339109`", ",", "0.3956995051659558`", ",", 4 j0 O$ `% d: Q- |
       "0.3663118256142708`", ",", "0.29094217358055163`", ",",
    9 z! m5 X6 q7 H* P   "0.5453093690736555`", ",", "0.44138898880777927`", ",",
    5 |$ E: e5 q- g/ ~$ @& n   "0.42944922031163496`", ",", "0.43092890556748836`", ",",
    4 ~3 x. |  V7 n! K   "0.5942402821739969`", ",", "0.330046090785457`", ",", , p0 ~' t- U& _( {/ B9 f% Y
       "0.18938658036630585`", ",", "0.4263720292858679`", ",", 4 h! ~9 o+ k$ _1 b
       "0.23377136184738775`", ",", "0.02232858193309988`", ",", ! k' \3 V8 _( J/ B! Z3 b- e& m0 Z* a# H4 q
       "0.244364200084268`", ",", "0.5562383565309971`", ",", # T7 q, q% G6 x  _+ y2 s
       "0.13114103402954333`", ",", "0.5815052048989465`", ",",
    - L7 f- q0 {" @3 ~9 f   "0.4253455966293501`"}], "}"}]], "Output",
      z' f1 c6 Y# b CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9,
    1 M$ `, a; l- r% q' e. T5 f  3.577925312375*^9, 3.577958343257738*^9, 3.577958511784832*^9, " S7 R5 b$ x4 |/ l7 L% h
      3.5779590518421736`*^9, 3.5779623249157443`*^9, 3.578012452421875*^9}]
    , Y& @: f* M0 P4 j/ Y8 v0 h}, Open  ]],
    0 P3 b4 o$ S$ o+ a; W2 {8 v
    6 v7 h$ \! q$ s. N4 TCell[CellGroupData[{% h: Y3 h* d2 a3 p7 Z7 ^5 h) a$ o

    ; B# O; ~& L! m! B  g( NCell[BoxData[
    0 O% N( Q* `9 L. M; ^+ a2 s) ^ RowBox[{"y2fit", "=",
    * C2 w" t+ ]% X# v4 p! J# P: v  RowBox[{"{", 3 b* r& ?" t* q: R& s7 d  c
       RowBox[{
    5 v# ^! `+ z8 P   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ( Y& j1 v7 C9 t( v; M/ t    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   L4 B8 g4 x0 b# b
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    7 S* i( {: {9 o; v+ ]    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    2 ~1 M1 m  K6 Z6 R4 E! W8 U! p    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 5 a1 F  P* y* \9 F/ `& j0 S
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    , A1 U, P: |5 J    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    ( C: o' _# ~8 b3 {5 s( C8 J    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    . C( L( t% [6 A2 Z1 ]0 I    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", . F: z. N; i6 Z+ f6 P6 W& y; @: K# D
        "0.48531711328591953", ",", "0.48531711328591953`", ",",
    2 M' j) \0 }; h6 `2 }    "0.45086352166650845`", ",", "0.36421192417525217`", ",", 8 e' {! ^3 H+ l+ ^; S% A0 }9 Z
        "0.4285207742559556`", ",", "0.4712694272667811`", ",", 3 V4 N/ }+ \0 ^4 L1 B2 `6 U
        "0.5257533056184786`", ",", "0.4862065814071623`", ",", 6 O; ]$ _3 ?# x6 j* H
        "0.41106838915592014`", ",", "0.5486894206610683`", ",",
    4 x4 y) u! z5 x    "0.007731168540073532`", ",", "0.013872406140339166`", ",",
    / Q4 K$ y( L. T8 T' j) a/ C    "0.3956995051659565`", ",", "0.3663118256142717`", ",",
    % Q3 C9 x  h: w7 K0 k6 ?+ L9 v    "0.29094217358055185`", ",", "0.5453093690736568`", ",", ! Y+ S0 P1 S# X$ G7 U8 @$ f
        "0.4413889888077799`", ",", "0.42944922031163585`", ",", , _/ `& ?! r7 P9 L
        "0.4309289055674891`", ",", "0.5942402821739983`", ",", % N, G. ?9 T  N$ Z% u: |  U
        "0.33004609078545805`", ",", "0.18938658036630632`", ",",
    / q7 p0 H& I0 Z# {: {% |4 t    "0.4263720292858688`", ",", "0.23377136184738778`", ",",
    # b. Z" w  m2 B9 p- D" e3 w    "0.022328581933099827`", ",", "0.24436420008426807`", ",", 5 C: p* O1 P' h& O2 r2 G
        "0.5562383565309981`", ",", "0.13114103402954314`", ",",
    ; C3 O: z: }( s: U7 F3 S. B    "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]}]], "Input",
    % O4 h8 X4 k: V' @, d. [ CellChangeTimes->{{3.577959355746303*^9, 3.5779593854019547`*^9}, {
    / B3 W; f# O; A+ Z; T; ~  3.5779594223272195`*^9, 3.577959425104024*^9}, {3.57796233399496*^9, : o# u1 k; v& L% Y+ d# o' _$ X8 j
      3.57796233957977*^9}}],, _0 N, J6 q$ r( }0 Y; c

    * L& X( w. ?& e1 iCell[BoxData[
    7 D# B# W/ Q* ]0 ?  p4 v RowBox[{"{",
    # G+ K4 ?1 @: y# A* J( U# ~8 I  RowBox[{) X+ O. ]- g# [7 z$ w0 d
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", . M! F. R# e. ^3 i# @; F$ B  J( C
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    # t9 C! X  S$ Y; `! W    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", 1 u# F& ?8 Y2 H' [4 z1 @
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 2 ^& D/ C/ H5 _; Z& W4 U
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    ) z' G2 p& `4 n2 Z# F5 ~   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", % s* k. A% ?0 A+ I6 J) c6 q
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", / q+ I# F/ N$ k7 c% |" f
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    9 n  o$ K7 c- x8 u* Q. f6 W9 m& r   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    9 Q/ w0 f  [7 T2 V& t. C   "0.48531711328591953`", ",", "0.48531711328591953`", ",",
    9 U% H  X  d% Q   "0.45086352166650845`", ",", "0.36421192417525217`", ",",
    * H6 z6 N2 f" ?4 ~* Q; ?$ p   "0.4285207742559556`", ",", "0.4712694272667811`", ",",
    - w& e7 C$ z1 K) x   "0.5257533056184786`", ",", "0.4862065814071623`", ",", ; ]( C* [( C8 U$ y; a) z
       "0.41106838915592014`", ",", "0.5486894206610683`", ",",
    $ R3 l; N+ E" l( q4 a& x   "0.007731168540073532`", ",", "0.013872406140339166`", ",",
    . l$ p$ g# F( ~* y   "0.3956995051659565`", ",", "0.3663118256142717`", ",",
    ! C' z- C+ O/ ]+ \% ~$ n   "0.29094217358055185`", ",", "0.5453093690736568`", ",",
    4 z: P: I+ |6 [2 Q7 [) O   "0.4413889888077799`", ",", "0.42944922031163585`", ",",
    ; y) e$ V8 H" ?   "0.4309289055674891`", ",", "0.5942402821739983`", ",",
    9 k( W  R! R& n6 q+ a" s. }( m5 ]   "0.33004609078545805`", ",", "0.18938658036630632`", ",",
    / W# e# \9 p$ I5 B  T6 M   "0.4263720292858688`", ",", "0.23377136184738778`", ",",
    ( s1 b: ~, O. T8 _6 q8 x3 T   "0.022328581933099827`", ",", "0.24436420008426807`", ",", 3 D5 N- o! |2 N4 F4 U
       "0.5562383565309981`", ",", "0.13114103402954314`", ",",
    ! n! p) n7 I0 q/ G   "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]], "Output",$ {, I, r9 \7 d' @% p, t' `0 V+ p
    CellChangeTimes->{3.5779593961191735`*^9, 3.5779594268512273`*^9,
    , p* `4 c) N: L2 B* ~$ p  3.577962342060174*^9, 3.57801245340625*^9}]
    % |. Y3 f$ t) L}, Open  ]],) e; @+ R: D# L4 `- L6 r

    ( y( [+ H  |. q1 ~# U/ oCell[CellGroupData[{
    . [: a- \; B- v1 }5 ~$ g  R4 `7 e% T0 m# b# a! P  F/ g
    Cell[BoxData[8 I" ^" i" b# _, F3 r) c$ |
    RowBox[{"y20", "=",
    : {; w# L  @2 V$ ]  RowBox[{"Table", "[",
    : A7 u# w$ G) n) _   RowBox[{"x", ",",
    8 m# O( s$ \7 L1 R- F' x3 K    RowBox[{"{", 7 }8 N$ Z/ [+ G1 P. q& W5 W
         RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",; x8 s7 H  ~" g. Y% }
    CellChangeTimes->{3.5779253628125*^9, 3.577958351198152*^9}],
    1 ~. {# G5 W6 ^4 A; J
    3 K0 S) a) W$ @1 m6 r" W3 sCell[BoxData[9 @3 a5 t( j1 U& a7 i
    RowBox[{"{", ; }1 e" f' v, \# ]+ ^- X
      RowBox[{' w3 h  p) ?5 }7 W- Z( P$ B$ o4 Q
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ( G4 U" r* I- B# v( ^( |
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",9 V- |) n  y( S9 X6 p
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", 1 t/ q  X; Y  Z
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    # U& k% X: d0 p7 r   ",", "29"}], "}"}]], "Output",& [; W+ A/ k7 o, b; v  p  V
    CellChangeTimes->{3.57792536553125*^9, 3.5779583535225563`*^9,
    : T8 }+ q) k2 y  3.577958515653639*^9, 3.577959053714177*^9, 3.5779623443065777`*^9, ! [* R! L: @; m+ H7 _+ q' f0 t$ r
      3.578012454875*^9}]
    / e- N4 O& x7 t; i1 t- Y8 X$ i7 e}, Open  ]],! q. N6 v: m% H8 q: V* u) T

    / ?! u( N) G- }( Y: M9 ]1 UCell[BoxData[( T: ~# C+ b" B( ?9 }& G* V2 ~
    RowBox[{"For", "[",   V! Z! U& y) n( j: e
      RowBox[{
    1 d# z# [: l; C, k" _8 j   RowBox[{"i", "=", "61"}], ",",
    : a, d4 `: Z% |2 v3 D1 h" C   RowBox[{"i", "\[LessEqual]", "89"}], ",", 7 ^+ y( O: z4 a
       RowBox[{"i", "++"}], ",",
    7 |. Z; l8 Y$ V0 R6 d0 A/ c, ]* M- P   RowBox[{# E) a. v: _, ^  _
        RowBox[{"y20", "[",
    - D% R" i" W) X0 Y# O: A# ~. s7 ]2 }     RowBox[{"[",
    2 X# @$ C  C7 o2 `5 h7 p1 a. E      RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", 7 [0 l3 v" U1 A4 b
        RowBox[{"Data", "[", - z6 S: U, e7 P) e# |3 Z2 A
         RowBox[{"[", 2 O7 t& X' ?  t( M; n  j7 S
          RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",& o3 Q; i: I5 Z% ?
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    6 U$ F" p6 A$ g8 [/ }$ l: {% u  3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    & F4 D! z1 P% E/ G) g7 v  3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, {& \- k! L/ I$ ?, @
      3.5779583574225626`*^9, 3.5779583606673684`*^9}, {3.577959056849782*^9,
    2 l% e5 S& b- C7 T! c& l  3.577959058690585*^9}}],% h, |. L/ N3 W0 ~6 V

    - Z# b; g1 s* @& kCell[CellGroupData[{
    ! e- C1 \$ V, ~/ p) S1 H; V
    $ m7 a- @5 m. V! s6 `Cell[BoxData["y20"], "Input",3 _- S2 m+ O. r+ l! N
    CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {: u) ~$ [  g! w- H
       3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9,
    / x1 \* H# Q% d+ J   3.5779583657841773`*^9}],4 Z' ~" t6 I4 f# o
    : s: }4 n4 q( G% H9 d
    Cell[BoxData[
    8 e' }5 O' u, Z' @: C RowBox[{"{",   X$ ~' U6 L4 V$ g" X% ]
      RowBox[{
    & v$ T% t6 g6 [+ o% y; q0 ]' S' k  "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`", ",", ! E: _/ C- l. g% ~: e7 p, o2 b
       "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",", ( P6 k, t) N5 {3 _$ Z  D
       "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",", $ X0 s) R6 y, W1 F6 M
       "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",", " O5 N4 Y& ?, v, X6 C0 K
       "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",", ! Y$ b/ g8 p( F2 q* ]7 R/ a* y
       "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",", . q  U% V/ t8 ?: }) x
       "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",", # z0 t5 N- n+ p
       "0.323944`"}], "}"}]], "Output",
    ) D& v& `. ]4 a) S# ~ CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9, 5 d0 z3 ?2 P+ K$ M
      3.577925393046875*^9, 3.5779583678277807`*^9, 3.577958517946843*^9,   k) t  F- [6 a1 N6 G; \5 c
      3.5779590634017935`*^9, 3.577962347629384*^9, 3.578012456484375*^9}]
    ) B+ C2 r% A, q! E: U9 z/ i  r}, Open  ]],
    ; p. I' p3 l0 V, T1 ?' p2 @6 s
    / l' w1 B# H6 G& P& hCell[CellGroupData[{( N) {, @+ b$ \8 p7 A/ V6 _

    4 J2 f0 e# j- h1 fCell[BoxData[/ s3 I% M6 ?# E( e8 u7 K+ z. O* O5 j. ?
    RowBox[{"y20", "=", $ K2 ?1 ~- V7 F0 c/ Z
      RowBox[{"{", * k# T! k( M9 ?$ ]2 j3 X
       RowBox[{
    8 g, ]3 h  c/ z! d, m2 |' {; t   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / f# l$ z7 R7 j: @    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - A. _- y$ R  e& Z1 z
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    1 I7 v# T' V% N5 {    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    & W: g0 ?& O3 h1 I6 W9 n    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34",
      L" ~/ ]0 d. e. N    ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", , _1 ^; j! H- A' z! E0 g
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", , m' Z$ R" Q3 Q" j- `
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    ! }7 P$ ]) r, e; r( ], C    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", & p$ {) U- ?; y+ R4 l
        "0.507042", ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",",
    . E$ E8 S* D( C; R; y, f% o    "0.338028`", ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",",
    9 S2 k+ {' h+ m4 }    "0.408451`", ",", "0.295775`", ",", "0.661972`", ",", "0.774648`", ",",
    ( `9 }' S! Y/ F" J, B* F" w    "0.746479`", ",", "0.887324`", ",", "0.84507`", ",", "0.704225`", ",",
    , B3 Z3 j) S- W# p" k/ q    "0.760563`", ",", "0.43662`", ",", "0.633803`", ",", "0.422535`", ",",
    8 r$ h+ a& w: n* H. ~  }/ h- v    "0.295775`", ",", "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", $ b/ Q  H3 m1 W* F& A7 G1 D
        "0.732394`", ",", "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", 2 e  N6 x5 R, l: Z# |' [
        "0.56338`", ",", "0.323944`"}], "}"}]}]], "Input",
    ; c, n2 _9 ~9 D5 K: Y# R9 a( U) n CellChangeTimes->{{3.577959534959416*^9, 3.5779595573142548`*^9}}],
    9 B2 r: N  R& [+ ^! V# C) ?( h6 H5 f, }- m* g8 V4 X! V
    Cell[BoxData[: _; e! h1 Q5 t% N
    RowBox[{"{",
    ' S6 i2 D4 ^$ o( O8 u) r6 [  RowBox[{
    ! g$ r/ r1 s) I% A8 E' C/ R8 J( b" A  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 1 x3 p! q2 s, _" {
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",2 a( J1 r6 ^. p9 _8 _
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    * l  C1 f% h$ s4 j) O- ~   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", * t+ G! h. P+ I
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 7 w, t" P' o6 z( I6 B7 a! B9 V
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    ! z) a0 X' V) H: ~   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    3 r4 k: F( h  Q# G2 D8 Q3 U. I) N   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    1 o! ~" v# V+ c- C" d& ^   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.507042`",
    $ ~* K  V5 I' J. A7 \   ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`", ; u: X$ r: O. f/ w; K* g  G
       ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",",
    . p2 }9 }+ f1 \) h* {    "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",", $ h# f# B% z% g/ E3 q
       "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",",
    + p, M: d: ]: M& b# M, B. H   "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",",   ?. n* {# L: `+ V
       "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",", 4 W! @6 u7 X, ?% H. U% I$ L
       "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",", % T3 G, D- t) ?8 h* b4 Z9 K+ |
       "0.323944`"}], "}"}]], "Output",
    " p' M* Z, j) g5 F2 `! T CellChangeTimes->{3.5779595594514585`*^9, 3.577962351778991*^9,
    # B5 v4 ]" M' V  j/ B  3.578012457234375*^9}]
    ! y: [4 T8 h- c1 N$ i- k; H}, Open  ]],
    / l% n) E+ r6 f( D9 c( r+ p; u  n# f& }& _6 T9 \
    Cell[CellGroupData[{% K* G. s9 a% S: Y3 b

    4 W1 E! w3 ^0 w& TCell[BoxData[
    2 ^: \3 u  I" M5 }! [9 {( W4 ]* x RowBox[{"p2a", "=",
    . y1 l* R5 a6 @- L: f8 C+ @  RowBox[{"ListPlot", "[",
    ' o9 O) V" o. K4 G   RowBox[{"y2fit", ",",
    ( v) @! t# R  T    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    9 c9 K* g4 _6 n% x: n    RowBox[{"PlotStyle", "\[Rule]",
    - s, K5 o9 _7 |' W0 [  u$ Q  [+ b     RowBox[{"{",
    $ \; O" l5 S; [: u9 Q/ g8 w      RowBox[{"RGBColor", "[",
    6 V$ H' |& U1 |: \5 s, N       RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",",
    ) l$ w# {4 v' ?+ I- l5 ]1 F: f: J    RowBox[{"PlotRange", "\[Rule]",
    2 R$ G7 B+ t  d$ L9 b     RowBox[{"{", & m) F; _) G" V7 m2 ~5 M4 D2 p3 f
          RowBox[{
    1 z: |" ^  t/ {9 ^  j       RowBox[{"{",
    : T" i. |6 v- O1 B" e        RowBox[{"61", ",", "89"}], "}"}], ",", 6 N; R% @6 j: S) y1 b+ J. ]( `6 P
           RowBox[{"{",
    , `0 g; J2 l, O) q) t) A9 o        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    1 d8 e. }' V" }# |5 W9 ~    RowBox[{"AxesOrigin", "\[Rule]", % @, C8 |$ W) D! \9 b
         RowBox[{"{", ( u% a0 ^$ g' B4 a" b* o1 e) e3 X, x
          RowBox[{"61", ",", "0"}], "}"}]}], ",",
    8 O8 ]1 K: S" y8 B5 ?* ~  o    RowBox[{"Frame", "\[Rule]", "True"}], ",", - ]& ~4 m8 Z1 M
        RowBox[{"FrameLabel", "\[Rule]", , V0 e6 p8 d# W; c: A( W
         RowBox[{"{",
    % }) ]' b  T. |* c. r      RowBox[{
    2 n+ B$ e4 U2 c4 E      "\"\<\:7089\:6b21\>\"", ",",
      e. S# f  v; R6 S& Z       "\"\<\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\
    / Y9 D' p1 ]3 S/ W. T7 Y% A' k\>\""}], "}"}]}]}], "]"}]}]], "Input",
    5 ^$ X' ~, l* @& u4 d+ Z2 y CellChangeTimes->{+ e0 t" V3 U! Z9 l! q3 Z
      3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {
    6 X2 C  D) t9 {, d   3.5779583712597866`*^9, 3.5779583781393986`*^9}, {3.577958536604475*^9,
    9 ?( V! e- @+ w) J& G   3.5779585491624975`*^9}, {3.5779592802577715`*^9, 2 Q$ ?5 J" i+ O7 @  \/ ?3 [
       3.5779593014270086`*^9}, {3.5779594039971876`*^9, . k3 w0 n% [7 l
       3.5779594059783907`*^9}, {3.57795949706695*^9, 3.5779595174717855`*^9}, {
      o% m& _0 @) t2 p! j   3.5779604302529774`*^9, 3.577960442311798*^9}, 3.57801246978125*^9,
    6 ?" a5 q- T7 ^) K   3.578012920859375*^9}],; h+ }3 ^! a/ w- x/ p
    4 Q! Q5 ?9 w. |
    Cell[BoxData[! M4 ?+ @  K* F. g- \) {7 J* r' a
    GraphicsBox[{{}, {}, ( N# E/ x& e5 W, R8 X+ P. N
       {RGBColor[0, 0, 0], LineBox[CompressedData[", U3 _; p- ]3 b3 P# K4 b" A% h4 J
    1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM" \+ d) b! B  |) N( B3 G8 J- q
    /g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ( f* b: L; \8 g4 g& Q( k8 {! }! _
    9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P
    5 D9 S4 L+ D( H; C# z$ jofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC3 f& N% Q% Y6 ^1 u/ x& B, s5 P
    qPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK
    0 {7 }* u% A5 r2 y7 Y+ Z, J$ m# p1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx
    % g1 ^# E& z/ g/ r3 Q* Z8 f/ O0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p18 P5 M1 ?3 r$ S+ ^, s
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH
    3 s0 z$ s* V$ |  _99yxuG0PAHw7nyU=" X+ @- _7 Z) g: ~7 Y) q$ B3 I  W' x
         "]]}},2 D8 Q' N3 u/ W# R) D7 x& B
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    4 p: r2 t, D0 X/ d6 u  Axes->True,
    6 Z) |* O' A+ K- R2 O5 g  AxesOrigin->{61, 0},. X  V( P$ N$ X; X4 H
      Frame->True,
    $ G7 E8 `2 X3 z3 P9 p  FrameLabel->{
    / \/ ^6 j; |. D! \    FormBox["\"\:7089\:6b21\"", TraditionalForm],
    6 i% Z' V8 c$ B    FormBox[
    # i% G' F2 b, q& L' X/ @0 O% F$ `" J    "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"", 3 U9 b, _1 j1 C. s
         TraditionalForm]},
    # o& G: r# t. j# _/ q, M  PlotRange->{{61, 89}, {0, 1}},! Q' I% ]! y" I  ~5 W
      PlotRangeClipping->True,/ z: W- U- S# P
      PlotRangePadding->{Automatic, Automatic}]], "Output",' R% a- a" }7 Q
    CellChangeTimes->{, J) [; A! C  ^- s: j: a
      3.577925144625*^9, 3.577925396578125*^9, 3.5779583797150016`*^9,
    , }6 o; q% B$ N  W   3.577958519990446*^9, 3.5779585510813007`*^9, 3.5779590670678*^9,
    + W) d8 X% b" R0 x   3.5779593035642123`*^9, {3.5779594075383935`*^9, 3.577959430158433*^9},
    / h1 G8 O  Y" l& N  M6 H   3.5779595184233866`*^9, 3.5779604438874006`*^9, 3.5779623548833966`*^9,
    1 |; u4 m# |3 e* L3 u" k! }- o   3.57801247209375*^9, 3.5780129225625*^9}]
    5 y$ O  F: O! }3 y6 C& ^$ d3 x% X}, Open  ]],0 K4 i, Z6 w% L7 r9 h6 W

    + w" f- H( O9 d/ H4 cCell[CellGroupData[{
    ! _1 I: j7 ~# C  T. i
    $ m! R0 ^+ h6 W: C2 ?7 E" S) ^$ bCell[BoxData[" f* u9 a1 m3 o. ?, F+ j0 E
    RowBox[{"p2b", "=",
    % z3 B; c6 x) u5 f, Q8 }( V* ^2 t& B  RowBox[{"ListPlot", "[",
    ( |6 u% R5 @4 Z# d+ n; t1 r) l   RowBox[{"y20", ",", + o! @' {1 J! p7 P
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",", 6 c: |- k( W( E! e+ n+ R( e
        RowBox[{"PlotStyle", "\[Rule]",
    ( }' `8 \; \2 L- R     RowBox[{"{",
    & Z" g( l# Q7 a4 X7 X( {      RowBox[{
    6 p- J- f9 Z% s, |  j       RowBox[{"RGBColor", "[", % P0 L. H& W# _  h
            RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}],
    % L' h8 ~; G) Q6 H  v) M* F$ d) `    ",",
    8 p  P: F; p& g/ |    RowBox[{"PlotRange", "\[Rule]",
    - n) h0 a! w" g, c* }( c2 N     RowBox[{"{", " L8 @. Y, s6 I. m" ^/ `9 {
          RowBox[{9 ?: d$ k( ~6 e; j/ C
           RowBox[{"{", 9 S/ G- k$ o. F
            RowBox[{"61", ",", "89"}], "}"}], ",", , @  i8 F4 G; P; p
           RowBox[{"{",
    ' F' a6 C* B8 c" q4 J$ M* F        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    ) h$ B$ ^0 Z  \/ j1 j. G/ ]8 `    RowBox[{"AxesOrigin", "\[Rule]", " i1 P8 W9 g( K: G: F
         RowBox[{"{",
    , N6 m- Z' X8 B1 C1 O      RowBox[{"61", ",", "0"}], "}"}]}], ",", 9 e. f/ `% h4 `% b# }- O# \
        RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",# w7 t. s0 I, u8 p2 q
    CellChangeTimes->{
    & Y# K7 Q( H  v! P# t  3.5779253991875*^9, {3.577958382429406*^9, 3.5779583843326097`*^9}, ( Q; m6 ^, V1 [% m' Y: e
       3.57795855655691*^9, 3.5779595724462814`*^9, 3.57801248346875*^9}],. ]$ a4 d7 n1 ]) c# r5 P$ |7 }+ y+ p
    . P' G+ X* o( t) B
    Cell[BoxData[4 w. \3 \! o3 }& p+ K
    GraphicsBox[{{}, {},
    0 r4 t3 w5 e& F( R' z4 u% v   {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["
    5 h: ~( G- t, Q) X+ T8 Y1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn
    8 B7 I. d1 N& x7 f3 o6 Z8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV
    : \/ T) S' w! ]4 m8 Dc/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc( Y7 a' U/ ]0 F- z
    iX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk4% Z  |- o) t3 L( s) ~- P
    TZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO$ v: W- ?; \( k0 o1 s
    fzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB
    ; A, t9 u( \2 i3 j$ CTWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG+ }4 q8 _/ ?  {) p/ A5 v' O
    p0OYg4Fg/tz63VfsAdsCnzU=
    2 `5 v$ ]; {6 t8 w0 E& M     "]]}},' A: i( ^5 b  I0 H
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    ) _% s3 B/ ~6 G# s  Axes->True,
    1 m) J0 l: l) P: }5 ]2 ]; v- C0 |  AxesOrigin->{61, 0},# S8 E8 t( C, C5 N5 l% _
      Frame->True,1 x# \' t, E2 R0 P
      PlotRange->{{61, 89}, {0, 1}},
    % q. h" C3 ?/ L- @4 U  PlotRangeClipping->True,
    0 ]/ ~9 Q. C# I4 O: B  PlotRangePadding->{Automatic, Automatic}]], "Output",
    7 u; ~1 K9 B$ F( ?8 K# H8 z CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9,
    ! D6 [, j: e6 W4 a* @- g+ j  3.5779583861890125`*^9, 3.5779585219092493`*^9, 3.577958558132513*^9, ' X# X  A+ K: V& _6 Y3 A2 e: w9 f
      3.5779590691114035`*^9, 3.577959577906291*^9, 3.5779623569426003`*^9, , t9 Z9 w) m. ?/ q" @
      3.578012484703125*^9, 3.578012925875*^9}]6 i! F- M: W4 l( D
    }, Open  ]],& d& w4 R2 F- z7 N/ p
    / k, Y" ^( t9 O; j6 R2 b
    Cell[CellGroupData[{
    - W# v2 N; c6 \5 u5 I
    : X' O0 b4 c/ yCell[BoxData[
    5 j  o" C" Y( y! S. M RowBox[{"Show", "[",
    ( [' Y  h, B, ^, c: _  RowBox[{"p2a", ",", "p2b"}], "]"}]], "Input"],
    0 }4 Z$ H! v  q) Z4 h+ M: G4 g4 R4 X7 b+ }" F
    Cell[BoxData[
    ; p# C: p- X6 D# ?8 B GraphicsBox[{{{}, {},
    3 k- {0 I$ S+ r! w1 q& @* k) b    {RGBColor[0, 0, 0], LineBox[CompressedData["
    ; [5 ]1 Z4 I: r- B1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM' g) i, q. o, I' M1 @
    /g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ
    - x+ t) r" ?: E9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P+ N, F8 G) a) G' {
    ofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC4 T, V, N& e9 T3 E# ?
    qPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK
    9 \. A) ^2 `4 W2 J4 c* X5 b% L% y1 O1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx7 w9 D# J; |8 \1 g5 v$ b
    0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p1( }( K2 B+ ?4 Y7 U% x7 Y
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH
    " _* G8 X# A1 C+ D99yxuG0PAHw7nyU=
    , K, t2 A8 B3 l3 k# s! o      "]]}}, {{}, {},
    5 p" q* Y4 R7 G  E" `    {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData[". ?' A, {8 H3 ]' C$ N' Q& C" w
    1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn
    / T& r0 K" |* X8 H' E9 ^( S8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV& _$ Q1 D# g9 n3 t2 k. P2 E
    c/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc, w2 l5 N- s7 y: u8 d' V+ c2 }
    iX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk4; F& ?$ V# U! ]" j! P
    TZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO
    0 U3 c5 T. q4 p9 u0 zfzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB
    # {# E; b- f. R8 `6 j- Y/ S- ^( |" U4 QTWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG1 G, c, i( [  U& g$ I# y5 r1 R% J
    p0OYg4Fg/tz63VfsAdsCnzU=2 E% D5 z5 O. [+ A: o' q3 B: S
          "]]}}},
    5 ~3 Y% U! \7 p2 F  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    . a3 F% J- m+ `& _. S4 i. {# T( x% v1 c  Axes->True,
    $ c: P8 {; K. `7 G  AxesOrigin->{61, 0},
    4 C! [- l+ Y8 |  Frame->True,! i2 Z9 e+ g  `( R; F% ?
      FrameLabel->{
    8 d1 B* d0 q: {/ z8 F2 I+ Q    FormBox["\"\:7089\:6b21\"", TraditionalForm],
    ( |4 O) Q8 `- W$ f5 d8 C  l) q    FormBox[
    7 e, h; |$ b: a8 b    "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"",
    4 G6 J5 ?: h! ^* C& M0 R- u     TraditionalForm]},
    6 O( p- @$ W/ U* ?9 D& |  PlotRange->{{61, 89}, {0, 1}},/ [4 z; w. s4 p" C' K
      PlotRangeClipping->True,
    # g& _, |8 L- g2 {+ l  U  PlotRangePadding->{Automatic, Automatic}]], "Output",9 N+ R9 e& g: k; W, C6 b; Q  d
    CellChangeTimes->{3.5779623624182096`*^9, 3.5780124863125*^9,
    ) T1 D3 r. I; l: G* ]0 U7 w! R  I  3.578012927734375*^9}]
    - X8 o4 Y* w2 @/ |; ]}, Open  ]],7 N! q0 k, u# Y

    ' p1 w, M8 ?/ x) z9 S, F. `" l9 i! tCell[BoxData[/ ]$ C. U, y+ P! A& |4 z9 _
    RowBox[{"\:ff08",
    3 u9 t& v. U/ A  RowBox[{
    0 X4 J+ L+ `5 _6 ~5 b& v  "\:5df2\:77e5\:521d\:59cb\:94c1\:6c34\:8d28\:91cf0", ".7406",
    1 H. S$ c  K; L   "\:3001\:5e9f\:94a2\:8d28\:91cf0", ".4621", # Y2 ]- G4 A9 z4 A9 D5 p
       "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea60", ".5208", , K+ v( j+ N" \; j; T* y4 c
       "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:542b\:78b3\:91cf0", 7 Y* p" y. `$ p& G
       ".2221", "\:ff1b\:76ee\:6807\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\$ \0 n# G( l* l5 K$ w
    \:4e3a0", ".6224",
    ; Q4 G5 A5 G8 y2 j   "\:3001\:76ee\:6807\:94a2\:6c34\:7684\:78b3\:542b\:91cf\:4e3a0", ".2521"}],& R7 i6 u3 W& d4 N# [
       "\:ff09"}]], "Input"],& G8 F& _- ~* ~/ e

    . [+ r4 {! k5 D/ Z/ [Cell[BoxData[
    6 Z+ U4 q$ }9 z, ?( W) K  A' n6 p1 N RowBox[{"{", % E2 T# t2 z9 Z2 h2 m5 x) }& W
      RowBox[{
    7 H3 X1 o$ \: h  "\:94c1\:6c34\:8d28\:91cf", ",", "\:5e9f\:94a2\:8d28\:91cf", ",", 3 A" w5 Z( r7 q' s9 T5 |' N
       "\:5439\:6c27\:91cf", ",",
    3 l: W1 r+ @# Y2 H: e! P   "\:4e0b\:526f\:67aa\:65f6\:7684\:542b\:78b3\:91cf", ",",
    . k. M" _* v4 U# ]   "\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea6", ",", 9 ]$ |3 a$ l" I, b, x, f4 G0 M
       "\:5757\:72b6\:77f3\:7070", ",", "\:8f7b\:70e7\:767d\:77f3\:7070", ",",
    / p" u  z9 n( D0 a2 Y1 y   "\:83f1\:9541\:7403", ",", "\:5757\:72b6\:767d\:4e91\:77f3", ",",
    / p, w5 ^2 E5 G7 x( G   "\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf", ",",
    0 i& w- l, Y6 J- Z1 Q8 T- i, q2 R   "\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6"}], "}"}]], "Input"],
    % P: _$ ^) h8 u$ S- M4 w) P9 N" W+ k) g  _3 N( e7 o/ K0 r
    Cell[BoxData[" "], "Input",
    ; S. h+ T# i7 p8 \9 t% i CellChangeTimes->{3.577962834553033*^9}],
    & ?# }, l( i" ^3 ^% |2 i
    # a. _: x8 j3 G7 `Cell[BoxData["\:94a2\:6c34\:7684\:78b3\:542b\:91cf"], "Input"],
    6 l$ D+ v0 r" P8 i: S6 H9 ~3 S# b. V9 h- R% p- B: R  Q
    Cell[CellGroupData[{
    / F9 U3 C* N4 ?6 q/ v2 w
    0 l' `% t( }; R1 v" q+ ^. b5 S7 S+ Y' pCell[BoxData[5 N, f8 `1 q0 Z; }6 h7 V/ m
    RowBox[{"y1", "/.",
    " ]# [: N, {# k  RowBox[{"{", # m7 e$ B# r% U* h- B" _1 m: E0 x2 U
       RowBox[{
    : Q* U5 [/ L7 j    RowBox[{"x1", "->", "0.7406"}], ",",
    8 W, x% |/ V1 ~7 f3 G    RowBox[{"x2", "->", "0.4621"}], ",", ( P6 S% }' q" w: Z+ B
        RowBox[{"x4", "->", "0.2221"}], ",", 1 x# D( m+ R! X) A- C
        RowBox[{"x5", "->", "0.5208"}]}], "}"}]}]], "Input",, Q# s8 E7 d( s
    CellChangeTimes->{{3.57796267209435*^9, 3.5779627224200373`*^9}, {
    & o# m! ^: ?2 f- y4 W  3.5779627663029137`*^9, 3.577962774820529*^9}}],
    : c% ]3 U0 l6 d* q3 P: K
    , H* B6 g" ^$ T! jCell[BoxData[7 s  ~+ S1 e6 M: w1 D7 V9 \
    RowBox[{- c- Q5 t' o( {8 h5 f
      RowBox[{"0.2286149508637297`", " ", + |: n4 r: d' M/ g6 u/ c
       SuperscriptBox["\[ExponentialE]",
    8 @: R( e* f7 \+ _# E+ v- X    RowBox[{"3.1415926535897936`", " ",
    + ?- V) F5 ^9 ^4 g6 [     RowBox[{"(",
    + P8 P( T  c: ~      RowBox[{
    5 V: R: ?6 C8 g- n9 x) p1 ?$ v( K3 E       RowBox[{"-", "0.17911224641499998`"}], "-",
    5 d4 E, a6 B' x: c5 j$ b3 f7 B       SuperscriptBox[/ h1 f# \6 a% y) R9 _
            RowBox[{"(", ) f  o% r+ H: I. w9 u
             RowBox[{
    / _! t6 {! ?8 p( y5 E4 l          RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", % i) x/ ^: ^- N) _% s
           SuperscriptBox[
    ) t% [. L- ?2 B' ~* n        RowBox[{"(", 5 A4 T- f: ]: z7 E- W7 ?* P
             RowBox[{
    . n4 x# g5 m8 L- E          RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", . U, H, K9 P/ X( R1 d7 k
           SuperscriptBox[% x- ~- n5 W  m
            RowBox[{"(",
    ( k" u6 K5 v# [4 M         RowBox[{  l; Q4 [1 a" a- y; l+ N
              RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", ) \8 U3 v: W8 y6 C; L4 T- D
           SuperscriptBox["x8", "2"], "-", * K5 |( }. {- B3 H! `" H
           SuperscriptBox[
    & v8 Z1 L# [# R/ ^/ l; o        RowBox[{"(",
    - P5 Z; F: F% M         RowBox[{
    3 E! i( ]6 X. e          RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+",
    4 I0 @2 Z& o$ {; E* W  RowBox[{"0.020180806675835994`", " ",
    : z9 s* h  A. l( X( x5 J6 x2 N: u   SuperscriptBox["\[ExponentialE]", 1 S6 C6 p( v* G) \' G
        RowBox[{"3.1415926535897936`", " ",
    2 H- |* r" _( A7 o     RowBox[{"(", 0 e6 V5 l. J% C
          RowBox[{( d. a/ @- V  E% H) [
           RowBox[{"-", "0.105619387859`"}], "-", , Y' m7 ~" |" u" H/ i' R  H( |
           SuperscriptBox[
    9 ]8 B+ X! E, t3 \9 X/ `  w& F        RowBox[{"(",
    + ?* [+ i' H3 N1 V' D9 Z+ g         RowBox[{
    6 N. v6 S- X% Q: G( l          RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    $ b  N' j, q( z$ g0 E       SuperscriptBox["x6", "2"], "-", + @) T" e2 D: F$ M3 i3 X
           SuperscriptBox[
    7 B* z6 J/ P: \% T+ s        RowBox[{"(", 9 a1 \2 c8 @" R6 P9 ?# E) J
             RowBox[{% F" ^2 M2 K/ A& z  g
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 2 k; b/ `& M3 U
           SuperscriptBox["x8", "2"], "-", 9 H2 U: s, D$ k  D4 l4 h4 c. T
           SuperscriptBox[/ j6 g7 B; E) |% J) ]6 e
            RowBox[{"(",
      q1 z: p$ b2 a4 O9 s1 n- I* [         RowBox[{( x* ?$ L4 n7 `! D, R
              RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    3 W, d4 \+ _3 j  "+", ) _4 v" g/ i& G5 r6 |2 ^5 C+ Y; k7 h
      RowBox[{"0.13092706311748437`", " ",
      o0 y* R& g& q( I   SuperscriptBox["\[ExponentialE]",
    & \* r7 T- N' F8 a7 P; f    RowBox[{"3.1415926535897936`", " ",
    ; C/ K* i, ^" s$ d6 R     RowBox[{"(",
    3 B' e8 c+ m/ L* U! P& B6 r      RowBox[{
    , ~6 x1 }, `* D% ~       RowBox[{"-", "0.236605670085`"}], "-", 1 O; _. h0 d5 E
           SuperscriptBox[
    4 y  T8 T: a% G+ ^) Y! j1 L% L        RowBox[{"(",
    $ {3 m, G5 `) @' }: m0 u         RowBox[{. w4 G! u3 [1 l
              RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", # @* L/ G: q( Y: M2 e7 Y9 Z
           SuperscriptBox["x6", "2"], "-",
    8 U' f( O& {' f( g; g       SuperscriptBox["x7", "2"], "-", , @' X  R5 C2 }; Q7 p' e/ P+ [
           SuperscriptBox["x8", "2"], "-",
    2 a  ~9 o: e/ V0 }6 k       SuperscriptBox[
    : g( I6 X) P2 m; H        RowBox[{"(",
    $ k/ a  _( D1 l7 U         RowBox[{
    " f% N" T% Z8 o. V7 d& }7 s          RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ) E) q  o: ~) G* K; f, M
      "-",
    5 p/ |8 O3 m3 M$ Y$ |  RowBox[{"0.033459349088924784`", " ", & T8 Z% S4 f# _4 `
       SuperscriptBox["\[ExponentialE]",
    6 O2 G1 W  d9 Y& E- J    RowBox[{"3.1415926535897936`", " ",
    ( c, r# A- B& E" W; j' x     RowBox[{"(",
    5 I( s- L4 |" e1 I, O  |. |      RowBox[{- P& V& q9 l4 d$ q
           RowBox[{"-", "0.46221081830200006`"}], "-",
    , Y' \3 l* u4 d3 p2 p3 G5 g       SuperscriptBox[
    " J- F! F  ^) {. |( N        RowBox[{"(",
    7 f- B& R5 ^9 T" n6 b) L8 G         RowBox[{
    ' U7 w6 q6 |( h$ B          RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    $ V- E. }1 d8 J! b) {       SuperscriptBox[
    ) T+ L: L2 g: t7 n# L( X$ s8 I        RowBox[{"(",
    * v8 t. e* G$ }' g. O         RowBox[{
    ' D% b* k& r3 E$ S2 e2 x% n$ G          RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", ; V% G$ v% M& B& g; c
           SuperscriptBox[* C9 \0 H, d7 P1 m
            RowBox[{"(", 8 s$ O% e) f" A
             RowBox[{" \; C1 D3 a. ^
              RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", " _; \7 R+ y  C
           SuperscriptBox["x8", "2"], "-",
    7 P2 X- v5 e5 H: Z* r: e* b       SuperscriptBox[
    / I, I, W( B1 h- S- B- \        RowBox[{"(",
    2 V9 ^% X) O0 G4 e         RowBox[{
    % S$ E& e/ K) V( K9 o0 \# I          RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 8 L$ r( L# M0 L5 p$ D
      "+", % l' g' ~) T! b5 r' F% D6 g. j
      RowBox[{"0.39611806709006653`", " ", $ d: j- y- E/ s" i! e
       SuperscriptBox["\[ExponentialE]", ( t: a! T1 ^( }
        RowBox[{"3.1415926535897936`", " ", , k) R6 f7 n( {
         RowBox[{"(", 3 U; J' o& q3 J/ k6 W
          RowBox[{
    . r( [7 y3 ^# w- p' L; R3 c4 k% {8 q       RowBox[{"-", "0.5837889295140001`"}], "-", 1 b- C) A0 d  M9 f9 T* i
           SuperscriptBox[
    $ Z6 B: F1 D: ^9 X5 O        RowBox[{"(",
    . f0 b8 B5 Q2 @6 \8 J         RowBox[{
    & M' z0 F7 [0 x/ g2 p          RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", " `; }4 s3 U& _+ T
           SuperscriptBox["x6", "2"], "-", + h. B& L9 D/ w! L! j/ a
           SuperscriptBox[3 J1 i& S, h0 b( Y0 k9 T
            RowBox[{"(", 7 d6 q" X; |1 O0 q+ ?8 @2 n# {2 e
             RowBox[{9 Q! ]7 Y4 d3 ]& m
              RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    5 M6 v$ d, Y- C6 R1 |       SuperscriptBox["x8", "2"], "-",
    4 @* C8 R9 x9 |9 N( ~' k! K- Q       SuperscriptBox[8 @# h# W" ?0 l' _9 J
            RowBox[{"(", / \3 ]6 Z' f% ~" _) e" j: c0 n3 n! x9 z
             RowBox[{
    ; j/ S, I: P* l! c$ P/ m          RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], . Z" u' F9 C: b! s5 P
      "-", 2 T& Q1 [0 c5 Z  P+ O' f
      RowBox[{"0.19996885877792045`", " ",
    2 Z% R2 z& Q, Z   SuperscriptBox["\[ExponentialE]",
    4 B. _" @4 V; L% k( E8 a) }    RowBox[{"3.1415926535897936`", " ",
    9 ?! C* S1 m1 p8 V- N6 x     RowBox[{"(", % s  R* X8 {! i; P" z
          RowBox[{
    / S: D# }, Z4 w8 F! ]* g  R       RowBox[{"-", "0.19030188470200005`"}], "-",
    9 s! }: z& O8 t0 E       SuperscriptBox[: k$ K, h! [6 Z9 ^" O# v9 E
            RowBox[{"(", 2 k- M& v0 P" G, E6 f! q
             RowBox[{, ]! y% _$ @1 e; L
              RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
    1 ~0 P! B" f4 E& c       SuperscriptBox[" I% @# t& Q7 D5 \# S6 @
            RowBox[{"(", 5 x! q2 X5 z* g& N' Y
             RowBox[{' |* [2 Z" S. Q) e
              RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", * |) m. |8 r% a" A* k
           SuperscriptBox["x7", "2"], "-", - o7 u* n6 W" q  L8 L. c( ~1 T  q
           SuperscriptBox["x8", "2"], "-", " F7 k. t8 N# p- v; Y
           SuperscriptBox[7 C+ M: X1 ~7 Y3 I
            RowBox[{"(",
    ' X( v" \1 X+ F# v% a         RowBox[{
    ( J7 T" e7 U4 k& p2 w. M          RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], & c0 D% y+ J$ x# ]5 j
      "+", . o8 Q3 B. C' o" j! c) o, U
      RowBox[{"0.23580523388620744`", " ", 7 g1 u  j9 [0 _6 e1 _
       SuperscriptBox["\[ExponentialE]",
    4 U2 K, g) B& }    RowBox[{"3.1415926535897936`", " ",
    ; V% z% ^8 \8 M0 @3 S/ e. O. u1 P' n6 k& A     RowBox[{"(",
    4 a& U+ [1 [$ b9 s' f5 H      RowBox[{! R$ X8 M$ d( e4 m. e8 }& r
           RowBox[{"-", "0.28518780882`"}], "-", % T# |8 I9 g6 C0 z* p! c6 [$ g  v
           SuperscriptBox[: p4 d6 a8 y" F! b: [
            RowBox[{"(",
    5 @4 u' V& v7 }6 h$ {# t* l8 R         RowBox[{
    : v! Y' \( B! u8 M  S; d          RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", ! z& \. |; X# f4 V  [) E
           SuperscriptBox[
    8 w7 ?" X# t8 j) S3 z        RowBox[{"(", . m5 z* z) h8 X1 u
             RowBox[{
    2 u0 I/ m; W/ Q! e: }; s, I6 N# M          RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    3 ], ]! f% H+ d4 l7 N       SuperscriptBox[
    2 g4 @- g$ a7 L3 q        RowBox[{"(",
    ; Q9 i- A: O' n" |' k& y         RowBox[{
    - o& |( \6 V% a          RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", ) Q0 C, D4 v6 J3 g. n* o; ~
           SuperscriptBox["x8", "2"], "-",
    " D; y2 ]5 o1 ~4 S       SuperscriptBox[
    : {! k) S6 p/ `* k) t7 ~        RowBox[{"(",
    / x  ]% p7 V3 C2 m% }1 l9 P# }         RowBox[{& n3 e5 n% p! e0 s/ M1 l
              RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    ) b$ g( F( f& j  "+", # |0 [+ E0 h6 u5 v: T
      RowBox[{"0.667027259367853`", " ", $ B5 s7 @$ P& G/ x! Y
       SuperscriptBox["\[ExponentialE]", # @" R3 q. g8 w' N
        RowBox[{"3.1415926535897936`", " ", ) c; \7 ]" V# j& q7 c( A! y; K' I
         RowBox[{"(", . Y. s+ D7 w. O# u; H
          RowBox[{
    3 _3 ^& s7 e, p( O% `' v       RowBox[{"-", "0.11387365200400001`"}], "-", 3 b4 w9 T( n0 Q+ |% \! ~9 M
           SuperscriptBox[
    3 f1 @) j( I; R4 y2 S* N5 K; q        RowBox[{"(",
    - t- W5 E2 w. i; `$ j2 R         RowBox[{! _* c, _) j% v% @5 z8 z2 S0 ~2 k) L
              RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", . }" a( R7 F+ t5 Z1 f. Q8 |
           SuperscriptBox[% Z/ V- o/ ?* @- H, L) ^+ c
            RowBox[{"(", 7 ?+ t5 X3 e0 b9 A6 x
             RowBox[{
    2 F" Z) ]6 N$ A( l8 B; R6 Q3 ^: @          RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", ; c1 p4 Q( w) o" p6 @- X
           SuperscriptBox["x7", "2"], "-",
    ' {; f) k* p0 u! x& U) v       SuperscriptBox["x8", "2"], "-", 8 \4 s3 a( H& e5 [' M) ]
           SuperscriptBox[
    % n* k, K% i7 X        RowBox[{"(", 3 |# |/ K: G5 z6 X. k" Q
             RowBox[{) L1 {6 F2 p9 a! H- m
              RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], : [1 M* E8 b# v) {
      "+",
    - B$ c  ^# b5 Q4 K  RowBox[{"0.25282438852646905`", " ",
    ; S( S( ^  s1 R! f# y* {  K   SuperscriptBox["\[ExponentialE]",
    / W2 y  u8 c: ^& l    RowBox[{"3.1415926535897936`", " ",
    & l4 q6 o, b$ X' B" B     RowBox[{"(", 7 K, v- X) R2 @
          RowBox[{2 R. I6 z8 I! u, f* Q9 `% U* G
           RowBox[{"-", "0.11442644782500001`"}], "-",
    7 K" I0 K- i) P( X% r" R, x3 `) w8 A       SuperscriptBox[
    : O" S: _9 b3 D# r        RowBox[{"(",
    ! Z) u: \: ?/ @) |/ X         RowBox[{
    9 E" a* l  I& g  i/ A' Q" L. S3 @          RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    . _4 T0 r+ I; H) x1 j0 b4 ]4 w0 v       SuperscriptBox["x6", "2"], "-",
    8 _- O3 C4 \, H1 _* B$ d       SuperscriptBox[
    4 p& O3 G, S+ U7 k        RowBox[{"(", 8 W# E5 i) p2 z: J/ V4 t
             RowBox[{
    3 _, r+ _8 `; V" B. g4 j5 T( Y          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    1 ?! O, u0 n3 t* H! {6 {       SuperscriptBox[6 ?3 e5 B7 W2 }  i8 U6 _1 K2 {
            RowBox[{"(",
    ! e2 ^+ R8 _4 d- e4 ]; ?         RowBox[{
    : @" p4 V- ?8 Y+ z  v          RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    6 S8 @1 m  ~  Z, }0 r' V2 c! w8 R6 S! L       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    % U7 \  c! _! m+ k. q  RowBox[{"0.07581214474544536`", " ",
    3 ?) v0 C. {. d3 X5 N& W' E: [   SuperscriptBox["\[ExponentialE]", 4 ^& a. E( w3 _
        RowBox[{"3.1415926535897936`", " ", . h  L5 a& z  F3 y+ s- |$ V, Y
         RowBox[{"(",
    # f/ L9 u- e4 j/ m      RowBox[{
    2 x3 [  e+ \# |' I7 V       RowBox[{"-", "0.21008576609800003`"}], "-",
    # O& S' Y8 n  l6 |       SuperscriptBox["x3", "2"], "-", ! B8 c& @) [: a/ B
           SuperscriptBox["x6", "2"], "-",
    1 [4 {& W# d( X# D- ?; i& I       SuperscriptBox["x7", "2"], "-", , S) I* d% C* X* |
           SuperscriptBox[( M& Q* T. Z& e
            RowBox[{"(", * f0 m) Z' i( g3 x) B0 _  {2 `
             RowBox[{
    % B, x- n) d% w/ L$ h4 R9 M' d- P0 U          RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", 7 U) p% Z) G+ J0 ^" X
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 2 A1 ]$ i" T, z  g
      RowBox[{"0.10599338351843121`", " ",
    ; `$ k& {& J6 ]* E# J   SuperscriptBox["\[ExponentialE]",
    # q/ ?! q+ A0 T& A& b    RowBox[{"3.1415926535897936`", " ", , ?3 K1 j- \& K) ]1 h+ _7 K7 B
         RowBox[{"(", " u( \7 ~! Z1 f2 T& e, B0 {' q
          RowBox[{3 E5 g2 g% L, z7 O- v, j
           RowBox[{"-", "0.4481471925460001`"}], "-",
    + s% R, N$ I; N; I1 N7 R+ o2 W       SuperscriptBox[0 i% u6 J# z! ]/ x" S" k4 E2 s
            RowBox[{"(", 0 Z( G% m% F- t# a( B/ f0 f
             RowBox[{$ m  E, e% U1 T) ^. p0 {: h! ^) U
              RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", 7 ~# l% o& B  Y
           SuperscriptBox[6 Q, C* _2 {- q8 @
            RowBox[{"(",
    / C$ c7 O9 Y$ O' k% y4 Y         RowBox[{2 L) p% j7 U/ l* s
              RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", 4 X! h4 o9 g& w; e8 R) g
           SuperscriptBox["x7", "2"], "-",
    4 z- ?( X( ?9 \: z8 t2 K2 E       SuperscriptBox[
    4 D5 T; M+ K- X8 ?' a        RowBox[{"(",
    1 A/ y! c; H9 c! b, K5 P8 q, b1 b6 f         RowBox[{
    9 [' F/ T: u/ u7 x6 T          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    3 O5 _$ k; u4 a       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    ) F8 C0 I% L: F' H+ Z& J  RowBox[{"0.5008208386064421`", " ",   p- R0 b* y3 i# T
       SuperscriptBox["\[ExponentialE]",
    7 b$ A" ~& L9 Q* U/ h. @* E, k    RowBox[{"3.1415926535897936`", " ", 9 W1 E, L- c3 i8 x3 h
         RowBox[{"(",
    ' ]$ e/ X0 \% |) r      RowBox[{
    ' p) r: z  \% G( [       RowBox[{"-", "0.08722659614000003`"}], "-", 2 ?! R! h' |+ c3 ^: x
           SuperscriptBox[
    0 q' f4 Y' B2 @" u0 @0 D        RowBox[{"(", / q6 }/ E9 v. \4 l" p! v, e# s
             RowBox[{6 Q3 u2 E# t, r! E: V6 V' o
              RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-",
    : q& o% H3 ?5 A* i' u+ A       SuperscriptBox[+ V$ M) U5 w& N/ i: V( c
            RowBox[{"(", 8 c- I4 c( L9 P. f* R7 D% w
             RowBox[{' D: n7 g# ?6 c1 G; p
              RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    - ^) p' X" i! j- X5 f- b       SuperscriptBox["x7", "2"], "-",
    9 d( d3 P  @8 M       SuperscriptBox[
    5 g# K2 G: r' l# l6 y5 s        RowBox[{"(",
    5 Q4 G& j0 i3 b4 H2 ^         RowBox[{4 _6 Z/ I3 s8 X$ p! c
              RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", ' A- q+ k' b  @( K8 Q
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    + j& n9 T  A- C8 y6 R  RowBox[{"0.32564305572552343`", " ",   i, N/ C' s& q1 g+ K
       SuperscriptBox["\[ExponentialE]",
    7 D8 A& f& D4 i5 V/ e( Q- ]. K    RowBox[{"3.1415926535897936`", " ",
    5 L! [* K3 E4 i% O' R& ]1 O& b     RowBox[{"(", 8 G7 U& A. v5 P
          RowBox[{6 C! X" G$ U  C6 R; y3 n) N
           RowBox[{"-", "0.23738217000100004`"}], "-", , Y2 u  P  b+ Q
           SuperscriptBox[  _' ?$ F- X" v( [, J( s
            RowBox[{"(",
    + E2 `' i& s. i) ~         RowBox[{
    ' `3 Z% T7 x1 e6 _$ j* {          RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-", % m4 J: C: y5 t2 J. x
           SuperscriptBox[
    . O2 s% \5 c- A% w        RowBox[{"(",
    : [  j6 F  Q7 a9 }         RowBox[{
    % S& X, z" [3 @2 S2 B; J+ T' p          RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    3 N4 e5 D0 ?6 Q* m, ?& S1 n" V       SuperscriptBox[
    , {) e5 L- H; Z$ h5 \5 v8 A        RowBox[{"(",
    : n- b1 c' n: u         RowBox[{
    7 ]' }. Y$ A' g/ m3 i          RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", % b  x7 l' `4 [
           SuperscriptBox[, E& {. l' ?& f* ~' U8 l) h
            RowBox[{"(",
    9 \' V; `; ]7 [/ l         RowBox[{
    0 U8 S: l8 c+ ^. u          RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-", , ]3 B/ n% g% w. v% f" Y
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", / ~) X! F: E& F8 f
      RowBox[{"0.6665374509702793`", " ", ; Y: N4 q% _: ^5 S
       SuperscriptBox["\[ExponentialE]",
    ) r2 y( v! b$ w1 l    RowBox[{"3.1415926535897936`", " ",
    " q+ b- @1 M/ v; v$ h, `     RowBox[{"(",
    & M5 e- B" S/ h- ]6 L" N7 A      RowBox[{
      n, E. b& r" }( H. z% G       RowBox[{"-", "0.19162171876400003`"}], "-", 5 o' ?2 P* y3 U7 M3 h
           SuperscriptBox[
    & U! K4 A7 f& v; s        RowBox[{"(", 8 w; j' f% U! p; V, b5 q; |
             RowBox[{. |8 {/ j" `. u  J4 ^  _1 ]" s
              RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    3 c# E: s0 e; r       SuperscriptBox[
    / s4 i2 W( G+ n: ?! {        RowBox[{"(",
    , O# b: X6 J. p/ Y: \7 l         RowBox[{) o  g4 T# p' O: P5 R- g
              RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", - z$ f8 {* K% e$ @. C& |  @8 Y3 R
           SuperscriptBox[- J5 n" u2 B1 W) W* u) S) \
            RowBox[{"(", % |$ |; l  X% j# @! W1 A9 V
             RowBox[{
    0 ]( _% l: n7 O* k1 }          RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", 8 ^2 W0 i4 j$ @: ~5 [
           SuperscriptBox["x8", "2"], "-",
    # `4 G8 Q  a" [' o- Q% [" K8 \       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", : ]! G1 D) m; w! n& R
      RowBox[{"0.4812237524557293`", " ", / S* ~- G4 H# ^' I$ ]! x" ^
       SuperscriptBox["\[ExponentialE]", ! F* d5 r8 x5 L/ ~! O7 J
        RowBox[{"3.1415926535897936`", " ",
    - ?. ?2 c. Q$ b9 p; g     RowBox[{"(",
    + ]" d6 j& {4 N5 D1 @1 v1 H      RowBox[{( \9 K" G5 `) s" R% \$ `1 |) j( v
           RowBox[{"-", "0.109748954594`"}], "-", ! z' }% S- R9 W; L- q) h  B
           SuperscriptBox[* T7 q  q7 L( F1 r4 e# [. f  a- H
            RowBox[{"(", & Q! @; |0 w8 I5 S: y# k
             RowBox[{# w  C/ {8 {: ]; r
              RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-",
    " j" i( w  Z( `: S0 A       SuperscriptBox["x6", "2"], "-",
    * e2 h3 \% ^' L       SuperscriptBox[
    8 X( l% C( h/ N7 }5 F        RowBox[{"(", $ L" m7 D6 x8 q1 s; @" T# E2 g2 C
             RowBox[{
    5 q! b% P+ Q4 Q; L1 D          RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", 9 n5 M, d" {( P8 H/ ?8 Z: r( z2 K
           SuperscriptBox["x8", "2"], "-", ) B7 S) o0 L9 W* M4 [1 Q; r% W
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", , h$ l; G- m# }% n3 b( f/ g
      RowBox[{"0.176024676254045`", " ", . _8 e! s* M' Y+ q* c- g  x; r
       SuperscriptBox["\[ExponentialE]",
    * h3 H9 `0 o5 u: i5 G- [+ q    RowBox[{"3.1415926535897936`", " ",
    $ s3 Y; R( H0 P8 j. S- W$ O     RowBox[{"(",
    ; E( F! @8 B) j0 R: H1 L. H      RowBox[{7 Q0 M& t- }# c3 s, t) @1 n1 }6 ^
           RowBox[{"-", "0.14616677062500003`"}], "-", / p* P8 ]2 }5 P
           SuperscriptBox[9 I3 f/ m% m5 d
            RowBox[{"(",
    & `  E' c9 R' n: Q8 \         RowBox[{/ S5 k' B" [5 u/ [0 g
              RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
    ( D# v' y: q8 s( z       SuperscriptBox["x6", "2"], "-",
    " g- o1 O: X1 W6 k/ B       SuperscriptBox[% T7 s& q. W4 R+ Q( z) }) j! u: p
            RowBox[{"(",
    % U, K% t9 U) C* d2 t         RowBox[{0 c3 p+ ~' h' p( t+ w5 D
              RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    + i2 {3 @" _3 }+ ^2 Q& |" J" v0 u1 H       SuperscriptBox["x8", "2"], "-",
    ) ~: n! w. X+ c. F0 J       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    6 O$ Z" {. z% E$ e7 n, `" Z  RowBox[{"0.5945873894818965`", " ",
    & ~2 t% _# e! F5 \- W6 W- P   SuperscriptBox["\[ExponentialE]", 8 J. Y: X8 p! A4 o/ r
        RowBox[{"3.1415926535897936`", " ",
    / [" _2 N4 P$ D2 [: g) @: q6 z     RowBox[{"(", 0 Z  U, W0 J9 O
          RowBox[{
    * ~. L  }4 D. r6 j, x       RowBox[{"-", "0.10407011464100005`"}], "-",
    $ J: _! Z1 Q, _8 M: k       SuperscriptBox[
    8 X( t* a# `, K, G2 b        RowBox[{"(",
    ' p7 ?0 s+ _3 H% P) u7 H2 Z         RowBox[{
    3 b. |9 S2 ~  l7 t$ U( Q6 Z          RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", 0 }$ Q" O) L; x( _( J8 N) r
           SuperscriptBox[' x5 ^% d. y' d9 X" Z) o& D
            RowBox[{"(",
    9 \& I* G3 c8 l# |- y         RowBox[{* x$ Q7 {& E5 |2 G$ g7 J& h
              RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    ( z4 r$ ^" f5 a( p       SuperscriptBox[" e- Y5 \$ _7 y$ ~
            RowBox[{"(", % f/ p* E* o* \( j
             RowBox[{! Q7 O5 g. }2 p( Q# V
              RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-", # x& Z; N7 H% _. s
           SuperscriptBox["x8", "2"], "-", . m5 ~' U0 d: P1 j! z) P% V$ X3 ^
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    % l8 p1 M& k. H' ?+ M, ~4 K/ E  RowBox[{"0.027591936509660075`", " ",
    1 B9 p9 |5 U% p' p   SuperscriptBox["\[ExponentialE]", , |8 j& P, @; d
        RowBox[{"3.1415926535897936`", " ",
    + ?$ |  v, {- Y$ I. [6 h     RowBox[{"(",
    2 o# j4 k' l" A2 |) z! Q      RowBox[{; s( o7 R  H4 w1 b& R8 O. ?5 @. n
           RowBox[{"-", "0.31770463544200006`"}], "-",
    3 Q5 V( U3 x$ p$ K  \& k       SuperscriptBox[% u6 T5 S1 O9 {
            RowBox[{"(",
    / w  }3 v' y' L& T! }         RowBox[{
    - G! \% J7 i% i- ~: e" M. ]# t          RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", 9 `. `5 j  ]" l. J4 C
           SuperscriptBox["x6", "2"], "-", 3 y& Q* S, F' R2 x1 i1 j' c3 |
           SuperscriptBox["x7", "2"], "-",
    3 j, r, R- F+ K6 H! i       SuperscriptBox["x8", "2"], "-",
    " }' t+ r% X2 k       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", 1 a% P6 j% Q7 i2 k/ f# g% m8 N" x3 Y
      RowBox[{"0.5252475961933536`", " ", 8 t' G5 z' Z; P
       SuperscriptBox["\[ExponentialE]",
    3 Y/ _" _7 w' c# u* `) h    RowBox[{"3.1415926535897936`", " ",
    / q2 H$ K3 Y$ r( R" g/ A7 @& {  n     RowBox[{"(",
    ! Z+ k. c) B$ U: N+ w      RowBox[{6 H) z$ X3 c0 a! y4 x8 Q9 n
           RowBox[{"-", "0.6410867660730001`"}], "-", ; J# V0 p+ B1 z
           SuperscriptBox[0 n/ K: r+ k& M& ^7 [$ m
            RowBox[{"(",
    3 g* F  Y( r  f+ ?% H         RowBox[{0 q8 J+ s/ W8 m& y) j; P6 {
              RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", - C6 r4 D* T  A) R4 L
           SuperscriptBox["x6", "2"], "-", 7 P0 R8 H" o0 q: Y  C. T; L7 L
           SuperscriptBox["x7", "2"], "-", 2 }0 A/ K, i, E8 D3 [
           SuperscriptBox["x8", "2"], "-",   W4 Z+ h1 j) O& K! G! ~
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    , g4 j8 F! T, _6 m! T  RowBox[{"0.32047284779644936`", " ",
    0 _8 w1 [" N" p# K7 p, X; s5 I   SuperscriptBox["\[ExponentialE]",
    ' T0 l9 p9 l- |$ e" C    RowBox[{"3.1415926535897936`", " ", - r( J0 D; F8 X. R
         RowBox[{"(",
    6 j- I2 X. Y# U. ]9 u! s      RowBox[{
    + H9 q2 `1 O% j* m0 U       RowBox[{"-", "0.155663887074`"}], "-",
    % `( [3 U% q. R       SuperscriptBox[/ t6 B# `+ b+ Q1 N' u! R
            RowBox[{"(", " U, u! ^( @1 E
             RowBox[{
    # `# g3 j' K, z9 E! \8 h# w  e: m  P          RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    : ^" h$ n9 w' S% m2 v! a7 U       SuperscriptBox["x6", "2"], "-",
    0 w; L; G( `* Z+ v5 T       SuperscriptBox["x7", "2"], "-", * J0 O9 O4 i- o" u
           SuperscriptBox["x8", "2"], "-", " h& J7 \; D# v8 }. d4 j
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", 7 F2 o: C8 f" ?2 _# o& `* p
      RowBox[{"0.7528674241482847`", " ", ) @9 Z1 ^6 g1 `; N6 w( `: w) x1 P' E
       SuperscriptBox["\[ExponentialE]",
    & i! p; s9 h' V) A& N# }9 t" l    RowBox[{"3.1415926535897936`", " ",
    1 m, \# u$ J1 V/ `4 I: c1 d0 t     RowBox[{"(",
    5 x. A6 u- J( D# i# f' Z      RowBox[{
    ' \' \/ H, [# C; Q- M       RowBox[{"-", "0.14151232428600002`"}], "-", $ G% a0 d  ]7 {/ B. W; i
           SuperscriptBox[
    ( F8 g) E7 o6 p: Z        RowBox[{"(",
    & E  k' D* d* C3 T6 g- _( t         RowBox[{6 F7 _5 n/ N" A) y  R: T, X8 {# {
              RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", ) H6 B8 Z9 v9 ]5 T. u# ~
           SuperscriptBox["x6", "2"], "-",
    ' M" E3 X( Q  |2 r' q8 c; B       SuperscriptBox["x7", "2"], "-",
    / s% F6 d$ s/ Q       SuperscriptBox["x8", "2"], "-",
    - m, {% O, i3 P7 M! @       SuperscriptBox["x9", "2"]}], ")"}]}]]}]}]], "Output",
    # E, a  l0 }% B) C/ I CellChangeTimes->{3.5779628386090403`*^9}]
    * k* x' \+ J# L/ Y}, Open  ]],
    ; n- S% k; b- R+ a
    / z4 G  i1 g' hCell[BoxData[" "], "Input",( L# t) H, l4 p. B# A  u6 q
    CellChangeTimes->{3.577962835879035*^9}],+ |, b1 @7 S; j
    8 x' @0 x5 I* H2 N$ i
    Cell[BoxData["\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\:4e3a"], "Input"],- I( `* o/ }, v/ B. |

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

    1 H  J6 O, f8 A7 ~( A(* End of internal cache information *）8 I0 m8 f# G* p' @3 v

    9 ?7 e1 J9 K( K" i这个是用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-4-14 16:18 , Processed in 1.792832 second(s), 106 queries .

    回顶部