快捷通道

QQ登录

只需要一步，快速开始

  注册地址  找回密码

数学建模社区-数学中国

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

[问题求助] 怎么在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
    问题完善一下！或者把代码贴上！7 `" x' K7 w) Q( a' E, E; Y
    回复

    使用道具 举报

    琳123        

    1

    主题

    10

    听众

    296

    积分

    升级  98%

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

    • 签到天数: 75 天

    [LV.6]常住居民II

    自我介绍
    无

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

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

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

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

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

    * q- ^' w5 R" D: Z4 c( SCell[BoxData[6 ]3 r; h1 [& `$ Y' A" Y
    RowBox[{"Array", "[",
    ) ?( A  n: ?; u, D  RowBox[{"CM", ",",
    8 h9 |* ^. f& W4 g9 a2 E   RowBox[{"{", ! s  I; y( z! b* ?9 T4 C5 y7 n
        RowBox[{"80", ",", "9"}], "}"}]}], "]"}]], "Input",
    / I8 h$ c( F! f) @0 ]" w CellChangeTimes->{{3.577844235859375*^9, 3.577844291953125*^9}}],9 G& I4 E' C' l# y' H

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

    ; s6 p8 V: b( l3 ~$ ]& P4 MCell[BoxData[
    % w4 ^3 m  W: v5 Y" C RowBox[{"For", "[",
      b3 V9 \6 J: w7 z4 Q2 n  RowBox[{4 \7 |% N# r6 m3 z; G
       RowBox[{"i", "=", "1"}], ",",
    9 a. q) O; C/ w. W. [8 H0 k% a$ D   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    ( q" g" l% P/ l$ g   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
      |1 R( R; n9 j% l8 K$ e/ r   RowBox[{"For", "[",
    , ^- H0 M$ U& R1 q    RowBox[{5 F( W/ a$ R0 e+ `3 }. {3 I
         RowBox[{"j", "=", "1"}], ",", + i# k) n( H9 l4 W7 u" c& h) f+ T7 Y
         RowBox[{"j", "\[LessEqual]", "80"}], ",",   c9 r5 f4 S8 e" o) E9 q
         RowBox[{"j", "++"}], ",", "\[IndentingNewLine]",
    ; {6 Y6 \" v) W# ~     RowBox[{9 M5 s1 T7 R  n0 ]* R+ c" _" G7 j
          RowBox[{; F. n) s' f4 \8 A4 z- I
           RowBox[{"CM", "[", $ K2 U5 j* e9 q+ t! q/ p1 k
            RowBox[{"j", ",", "i"}], "]"}], "=", "0.0"}], ";"}]}],   |; Q0 w+ p6 }8 y
        "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]], "Input",
    8 r3 q: F. R" Y$ F& V8 G8 a CellChangeTimes->{{3.5779132504375*^9, 3.577913285203125*^9}}],7 K4 a9 h+ s8 |9 x- h

    , J7 b1 ^( K$ n3 I' B: fCell[BoxData[
    + O% b4 o' i4 B; r2 g  _$ O" W RowBox[{"For", "[", 1 ^# r9 j. N1 e+ I
      RowBox[{0 V$ V& D  M8 |0 ^* C
       RowBox[{"i", "=", "1"}], ",",   @) l: \+ ~; N) ^3 b
       RowBox[{"i", "\[LessEqual]", "9"}], ",",
    ( V" j1 A% T# u3 }7 i2 O   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    ) @( \9 N& Q- k  T: O( A& n   RowBox[{
    + t4 h2 T$ U! z# u2 D$ z    RowBox[{& D  k9 t2 O+ O( ^
         RowBox[{"CM", "[",
    7 m& p! J7 Q- v: c+ ~      RowBox[{"1", ",", "i"}], "]"}], "=", 0 m. x* G/ I: h) z' m
         RowBox[{"Data", "[", 7 C; `; t% r. v' V' T
          RowBox[{"[",
    6 g6 }2 [* F; m9 D4 _       RowBox[{"1", ",", "i"}], "]"}], "]"}]}], ";"}]}],
    6 v' E6 F, v* R" B! Y' k  "\[IndentingNewLine]", "]"}]], "Input",
    - B. M# D, ~8 k+ b& i0 k CellChangeTimes->{{3.577844179875*^9, 3.577844181703125*^9}, {
    9 H% B  F7 ?# |# e% ^   3.577844217765625*^9, 3.5778442320625*^9}, {3.57784429953125*^9, + {$ P( ?1 j5 q" p  h
       3.577844347875*^9}, 3.57791328640625*^9, 3.57791338828125*^9,
    & b& K1 M. C/ x   3.57791344209375*^9, 3.5779588070933466`*^9}],5 F: p: q. U, e, S1 g
    ) y( O  g  d! z) Y6 c# j
    Cell[CellGroupData[{# K5 l$ v- S9 \& \

    3 x7 u& b" `; y, c8 w6 B% sCell[BoxData[{4 f. V  H2 i0 H7 `8 B+ q. u
    RowBox[{"r0", "=", "0.2"}], "\[IndentingNewLine]",
    . @% p! a- G" I) O% t6 o) e RowBox[{"M1", "=", "1"}]}], "Input",
    0 r" o/ j' K# n. Y0 q CellChangeTimes->{{3.577844361578125*^9, 3.57784436678125*^9}, {# K* h1 [7 Y+ d: B6 M( ]
       3.5778457908125*^9, 3.57784580253125*^9}, {3.57784602534375*^9, 1 j4 p, ?# l7 N, _
       3.577846109453125*^9}, {3.57784617128125*^9, 3.57784619321875*^9}, {: n) k, d( ]! K, B, H6 d
       3.577846583984375*^9, 3.577846620984375*^9}, {3.577846653203125*^9, 6 W: A& T8 g9 {, l
       3.577846691984375*^9}, {3.577846779953125*^9, 3.577846794921875*^9}, {" C) X. l; c9 [  q1 @2 C7 w
       3.5778470791875*^9, 3.577847088921875*^9}, 3.577847409671875*^9, {, ?: D7 ]- l6 i
       3.577847477203125*^9, 3.577847523203125*^9}, {3.577847586484375*^9,
    3 h& K) X0 D6 d( G5 n- C   3.577847600640625*^9}, {3.577847649140625*^9, 3.57784770196875*^9}, {1 Y. S- Y) u2 Q2 L
       3.57784774896875*^9, 3.57784776490625*^9}, 3.577847981546875*^9, {
    . G7 @. s( Y- p3 g+ d+ }   3.577913312890625*^9, 3.577913360109375*^9}, {3.577919262828125*^9, - h& d% j6 b, r7 G0 J( j
       3.5779193133125*^9}, 3.577919388484375*^9, 3.5779605095479155`*^9}],
    ( }: G" _2 E% L
    # c/ o# a# w5 ~" U3 a9 v* QCell[BoxData["0.2`"], "Output",/ S7 F( i- |; a& Y
    CellChangeTimes->{0 E+ l: S7 |- K4 m
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, . Y- }  w% \. V2 A
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    * r% e% F/ Z' L8 `0 d+ M   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    5 Z7 p. Z/ s: N2 i  Y6 f   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {
    8 K) W$ [: S8 C9 _! C, a  \6 u6 y, s- H   3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    6 T: {+ w: F* A3 n3 u  c   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {: c9 w) e/ L0 G2 T% P+ `
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    6 J1 m3 u# h9 t/ g   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    ( g. |1 q; y( Y  [2 x   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9, " f; o  R" Y! w# `+ b
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9, ) X) o9 `9 k/ }6 E9 n5 {/ m" h  f( t
       3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9,
    ; A$ p5 x3 P, V5 C. H( r% ?' B/ H   3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, ( R- z. C) Q" z* G' }8 q3 U) i! P
       3.577960510686717*^9, 3.578012149296875*^9}],
    6 F- z" `- i0 r& Z6 r& T3 R" G) J; V" B+ M) c2 g# N1 D+ B
    Cell[BoxData["1"], "Output",% }, E! F% Q( H- L& {3 q
    CellChangeTimes->{
    + U" q# ~8 M* q+ ~( a1 a' q9 v  3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9,
    # j: C6 N- R6 R   3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {- s; ]1 g+ {" B- U
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    + _' N; h: _( I6 B- M   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {
    0 r/ v0 \/ k+ M1 d! F$ d# |" [$ e   3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    ' u) D9 ^& D8 q3 L2 Q   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    2 v* u' d+ U5 y9 p) c5 M   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9, 2 t1 E7 d! A5 K) P* g
       3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {  j$ D' M+ O7 ?+ V! D. X6 _' Q
       3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9, 5 k( B7 C. [: q
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9, 8 Z  v3 E% u$ \0 A5 }
       3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9,
    - H+ H5 u$ {7 ?4 Z: E$ b& D   3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, & _! Y0 H; g+ r& U' N# f& @1 A( `+ M
       3.577960510686717*^9, 3.578012149296875*^9}], B; }& C( l3 t( S) L: _+ A+ e
    }, Open  ]],# N/ @3 E3 V# Z0 ?' I+ d+ {) ?
    5 }' v: T  {  J# D$ h5 @2 R& p) n
    Cell[BoxData[1 r: h! J- f6 y( l$ }$ u
    RowBox[{"For", "[",
    7 K6 l2 ~+ C) `) d& X0 @  RowBox[{% j" n% u% A0 Z" _' J/ \4 j6 A
       RowBox[{"k", "=", "2"}], ",",
    + p0 [! |6 O, U5 B5 C+ S) B   RowBox[{"k", "\[LessEqual]", "60"}], ",",
      z  A- c) J' k1 x9 j! ^   RowBox[{"k", "++"}], ",",
    3 D3 R  w; z4 F) \   RowBox[{"{", "\[IndentingNewLine]", 8 D: j* m! \7 \2 B
        RowBox[{
    % o  D1 z; r- d" @* T% g     RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]", $ [) v* F/ Y' F
         RowBox[{"For", "[", % f, {! o) R! A, G
          RowBox[{8 Q! E! X; Y, [; n5 f
           RowBox[{"j", "=", "1"}], ",",   P9 f' @- [, C% o' @$ ?
           RowBox[{"j", "\[LessEqual]", % [$ _* o* N9 Q& h
            RowBox[{"k", "-", "1"}]}], ",", 5 U( ^; a3 m1 [8 [
           RowBox[{"j", "++"}], ",", + p# U3 F6 p2 p+ A1 O, Z. i" f
           RowBox[{"{", "\[IndentingNewLine]",
    . y0 A. J; K9 ]3 P3 o' u        RowBox[{- Z" s: p) |' [! W
             RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]", 5 @* F+ r5 _: r1 H  E
             RowBox[{"For", "[", 3 U3 t5 x$ j4 R- p8 _; p4 B4 F* c* w
              RowBox[{
    1 R/ N  J+ Q- A' w& W2 k) G2 M           RowBox[{"i", "=", "1"}], ",",
    8 V, j& }0 w! _) C           RowBox[{"i", "\[LessEqual]", "9"}], ",",
    2 ?" n2 p6 i, g2 b$ ]; [) [           RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    ; {3 \' Y$ ^3 F! a           RowBox[{
    ' C  `3 K& u1 L1 W# D            RowBox[{"r1", "+=", # K3 g$ Z1 s" F" m8 \
                 RowBox[{& d/ }4 S/ Y) v( j# h% I5 X
                  RowBox[{"(",
    # x; {& D; I" X. ~4 i& p/ ^- W               RowBox[{6 a+ d; R0 S7 s& [" M
                    RowBox[{"CM", "[", % H6 e7 d# l; Y" ~6 c& e  y$ L
                     RowBox[{"j", ",", "i"}], "]"}], "-",
    + n* }7 y+ I$ J% U" b                RowBox[{"Data", "[",
    ( {7 n8 [. i) e: O$ P                 RowBox[{"[", 6 B# `6 C4 N" _+ S8 a$ j! i
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*", . [0 `" S: x1 D8 f. C. i
                  RowBox[{"(",   E* ~) L5 ]- L7 V0 c" W. G
                   RowBox[{5 Y4 `2 Y- |3 M0 ?  I
                    RowBox[{"CM", "[", $ {: j; P+ _1 ^" g- F& b; G1 S. Z/ ~
                     RowBox[{"j", ",", "i"}], "]"}], "-", * |; J1 Z1 c( [, F2 I" G) x
                    RowBox[{"Data", "[", 5 w) }) d0 N) [
                     RowBox[{"[", 1 N8 F; I( s' @( O6 A- |2 v( ^( b
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],
    ; j0 c6 c" `; m) V& ~  }           "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]",
    ; m1 e4 Z. C& W& k- D         RowBox[{"r1", "=", ! {5 ?* C* _; |9 G4 h
              RowBox[{"Sqrt", "[", - Q2 Y) ]9 B* g5 l
               RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]", $ ]; ?1 q* B1 s, h/ m! X1 d" @* u( _1 Z
             RowBox[{"If", "[", " ",
    & T* e: Z5 C8 a. R" V% f          RowBox[{# v1 B+ p2 w! c1 D- d
               RowBox[{"j", "\[Equal]", "1"}], ",", - \: I1 a& M$ F; W6 W* K  V7 _: h
               RowBox[{"rmin", "=", "r1"}], ",",
    : x2 k2 @5 P/ y" i           RowBox[{"If", "[",
    " j. N4 p( p1 Q, l            RowBox[{
    - A0 h) w% A5 K/ {  ^             RowBox[{"r1", "<", "rmin"}], ",",
    % c- Y" F; |! s& h# s. Y4 U             RowBox[{"rmin", "=", "r1"}], ",",
    $ t) R1 ]2 Y, W             RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}], * W! `4 h" z" [& o
            "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";",
    3 V( s1 r; r$ v     "\[IndentingNewLine]", 4 [% H" P" r$ s% j2 Q. w
         RowBox[{"If", "[", * \& }, `: D, A- v% _; _! ]
          RowBox[{: w0 z; J% T5 @' ~' G& v# d  a! W, U  I
           RowBox[{"rmin", ">", "r0"}], ",", # B  l6 W2 _, ~
           RowBox[{"{", "\[IndentingNewLine]", 3 D8 q4 _) L+ Q" ^' l& `" Q9 M# h( t
            RowBox[{
    " C0 q& Q7 f  \  d5 y         RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]",
    ; m) ^. D3 ^2 {" O4 ?2 F         RowBox[{"For", "[",
    & y" y2 Z9 U+ c7 v          RowBox[{  U2 |$ O. K2 g# _$ p* F: P0 V
               RowBox[{"i1", "=", "1"}], ",",
      k2 }7 u/ }! v0 o4 j           RowBox[{"i1", "\[LessEqual]", "9"}], ",",
    4 Y9 t7 ]% S' N. Z: B           RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]",
    / k& v* \" c( d% |# }7 D' z& i' Z% P           RowBox[{
    7 ]6 `( F, X0 v8 [- \            RowBox[{
    7 \# M( K- N+ L9 |! d             RowBox[{"CM", "[", 1 O, V& S) H( \, V  o1 m
                  RowBox[{"M1", ",", "i1"}], "]"}], "=",
    0 g( _! O/ V/ l/ C) C4 @             RowBox[{"Data", "[",
    / d6 Y6 i$ w. g2 T# d% s3 x) r              RowBox[{"[", * \, |% I6 I- f* z
                   RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}], 1 L0 z7 a2 o4 a; _! C' W
              "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",", 6 {  i* @0 M# F  Z2 B: c; Y
           RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}],
    ( |' o! |/ P7 a  }. y; h0 Q    "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",: q- H1 T! }. g1 L# S) L8 G
    CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {. H# A' D7 B( B" q/ c3 @
       3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9,
    # P7 B, p# Q& S+ ~- W2 y4 i5 E   3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {
    1 F: F/ E$ p% t4 Q+ m3 Y# G1 ?! P3 B% S   3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9,   w3 q% o& `6 G0 N( D4 N
       3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {
    # _( Y1 g# |  u) ^   3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9, 7 P: V3 d5 Q9 J5 v
       3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {! p: k, ?; o  v+ C, X& \
       3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9,
    % G6 U7 v" y' e/ _8 S   3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {/ M1 C, Z+ a# B* |; D  Z$ O
       3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9, 5 s% x" t* F0 E% s
       3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {
    0 G0 O6 {3 [9 x# e, [  g3 O% m% A* E0 B   3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9,
    " q3 Y1 a: v. `   3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {
    / @* v) g6 ?/ V1 @' j5 Q   3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9,
    4 T7 b* N2 A3 y" E4 s; L   3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {7 L/ @2 z- I) g& l! K2 V0 Z8 d
       3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9,
    $ H1 m1 \( l. C; s4 X  K0 a0 V6 S( ^! D   3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9,
    - t: D4 Z5 k; B8 `   3.577958821991373*^9}}],! T; f3 g  o/ f. |  z2 l
    7 v; z7 u9 o# h7 {9 l/ q, `* p
    Cell[CellGroupData[{* _0 }% H" g3 U9 Q$ I
    $ n. V: @: m4 o  T6 H
    Cell[BoxData["M1"], "Input",
    0 p/ f7 O" b9 y( d1 F CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],! X3 c+ A5 c- l5 t2 S% L

    ( n+ \2 ^1 X- {7 K+ t0 S4 E9 qCell[BoxData["21"], "Output",. i* ~6 L; u5 I' F* Y' R; j, z' }) `. ^
    CellChangeTimes->{  I5 w) \* E. d# E" v+ `
      3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {" E1 V& B* G) w% @( b# g8 e0 Y, r1 ?
       3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9, 4 N$ p  n' o/ C$ |) O8 \
       3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {
    ! R; L2 f7 l% y. |& v. b6 Z; ]2 q   3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9,
    " s5 ?2 D8 t2 o& t   3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {8 I# o" b0 w$ g6 _1 v" H9 K
       3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9,
    0 L1 E5 `" G" h0 k- v, C   3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {
    ' {& j' ~- p& y( y) i$ A! s. E; m   3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9, 7 }; H7 |! _$ o! m# s7 O
       3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9,
    / W: r: }9 F$ S- K1 m9 S: K   3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9,
    ' Z" t. n5 y- B9 E: d   3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9,
    4 U0 s# {2 r$ U   3.577960515600726*^9, 3.5780121541875*^9}]+ m8 n! C- s' y2 d1 @8 X0 W# i
    }, Open  ]],3 t. [) o4 h% Z5 c. h( O3 D3 u

    + C3 w# t! E7 M  e, G6 r! K! V& DCell[BoxData[
    3 y0 |3 I+ ]) z( {/ [ RowBox[{& U: `! H3 X) B
      RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[", 7 D3 w3 F, `; M
       RowBox[{"1", ",", "i"}], "]"}], , q4 u9 u( U; X2 S- H/ A9 p
      RowBox[{"\:5230CM", "[", & H' s0 w, v4 k  V
       RowBox[{"21", ",", "i"}], "]"}],
    % j; Q% R! H. w3 T' |  "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\
    6 C6 g# |9 u2 z6 ~: X! G\:51fd\:6570u1\:5230u21"}]], "Input",( Z1 ~. h) L2 N" H: O
    CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {
    4 y! X. ?9 D8 e5 u) k# H4 S  3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9, , }8 a: b* p  Z7 P
      3.577960526583145*^9}}],( b( x6 \5 {' ~0 @1 y5 x
    % ], j- [$ O% [. N- d9 |" r
    Cell[BoxData[
    ' p! l* Y5 @/ s5 T* |( v  A RowBox[{"Clear", "[", "Delta", "]"}]], "Input",: o5 q" r# @$ c. m/ c* M- {$ J
    CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],
    3 H1 m" X! H5 U* K5 B) P; b
    $ u. o& B+ g  c1 B  iCell[CellGroupData[{  k; U, T0 \: u6 y1 `0 J, }. e

    + m- f9 V1 @' e% i$ TCell[BoxData[
    ( A  j; ]7 L" i9 X RowBox[{"Xa", "=", 9 h' O9 J* c2 W
      RowBox[{"{",
    + Z2 V" e/ \8 `; m   RowBox[{
    & ?: i9 C7 M4 P' U   "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7",
    + h) q- ^) I: {( T. V1 j  y    ",", "x8", ",", "x9"}], "}"}]}]], "Input",
    : l1 {, S. \3 y* f* B) C6 K- t6 c CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],( m; a* R' U2 p, d7 }6 W4 ^& u7 t. h

    6 a) e! ]' b1 x" t/ L4 m5 W% j% bCell[BoxData[
    & t( g0 e/ J! N1 q RowBox[{"{", ' P. J1 @9 l% \" U+ f8 U! ?3 d
      RowBox[{
    & l- j$ ~' Q1 p7 D. n/ ~  "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",2 B, d5 N5 U1 J+ R: b7 Z
        "x8", ",", "x9"}], "}"}]], "Output",% P* X+ h: U( S" X  Y7 |+ M
    CellChangeTimes->{6 M& W, [7 H& Z( ~0 i2 Z; v+ w0 v
      3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9, ! H. X& @- z7 E, s, @0 b4 ]" Q$ _
       3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9,
    6 @4 P" M: @9 Y5 d# S2 M' x   3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9, . K: e1 Z7 |3 N5 x8 x
       3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, . g5 F4 K$ ~% C
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {
    7 p3 Z4 D$ k9 o   3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9,
    : K0 U3 L7 I' M! u9 n4 m+ A   3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    . i- b  o1 x8 h3 L   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {5 D0 q- n7 D  {/ }9 k  _, T: n  ]
       3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {$ _* p) o! z, \2 K8 A
       3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9, 0 Y2 d! ^6 `4 V, M8 \* C
       3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9},
    / f6 K1 c: N+ B& b; B  S: T   3.57801215725*^9}]
    / c6 Q: r6 ?8 [4 z' @1 p}, Open  ]],
    8 D# J% V8 M1 m5 ^1 \. U, T
    1 V* u* @* j" K! G2 b" R- _% BCell[CellGroupData[{
    6 f, {4 G  P- Q: K# v& X9 ^# Z" J! q/ W( p0 J
    Cell[BoxData[: E0 w/ H/ w& y& Y
    RowBox[{"Ca", "=", 7 S: k1 `$ ?2 }" R3 t, Y+ t7 j( P4 l. c
      RowBox[{"{", - b: w8 u$ d$ F4 f4 l1 @
       RowBox[{5 N* n* @  D3 g6 M" d. S
       "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", 7 f/ M6 _+ ~2 |, [2 B
        ",", "c8", ",", "c9"}], "}"}]}]], "Input",
      ]: Y0 z: S3 S" m* s, @! x8 @ CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],  Q* I; C- t7 u* t4 q7 K
    7 U5 ^$ G% x# b$ L+ C
    Cell[BoxData[  H6 K3 L8 ^0 P/ A, }) a/ x
    RowBox[{"{",
    0 m4 c& K/ n; o1 X. Q: T9 f& b, u  RowBox[{
    , ?1 Z8 T7 c( R3 `  "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",
    ' k# V% R6 g" o    "c8", ",", "c9"}], "}"}]], "Output",' q$ K; N" B3 U- q& E& _
    CellChangeTimes->{
    / S8 y4 Z* q8 j: x/ W9 }+ G* H  E, u  3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9,
    + v! m. i3 L8 C. L9 f4 {% ]   3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9, 2 Z% G: e0 ^/ K# J8 x. Y. v& |
       3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9,
    6 }8 Q& E5 R8 _   3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {
    3 S7 S# |) d- t+ L   3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9, 8 K1 K; q4 M4 U  @
       3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9},
    5 q  x5 N, ~7 d+ R! U2 a   3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9, ! y: |( t' m$ f' G5 h
       3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9, & H7 E* v" x! `; O8 k* W8 y
       3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9},
    8 {$ v$ n6 ?2 m8 d0 O/ h4 O! S   3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {! p$ A4 l: H+ F1 `  v) I
       3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9, " K- S. j. G3 A6 s. z
       3.577961904604212*^9}, 3.578012158671875*^9}]: k, q) T  P; c: {2 k) c: [
    }, Open  ]],
    0 R. c# g6 Z! b$ X: T& g% s, @# P' ?$ }; P3 O4 j: N% @1 B! G4 G# M
    Cell[BoxData[
    + P# {: v% e0 O RowBox[{"For", "[",
    $ `3 f. Z# O6 c+ K+ ]8 \5 V: a  RowBox[{$ s& n4 H! ~/ Y7 x3 @; s" \
       RowBox[{"i", "=", "1"}], ",",
      i/ ]% z8 ]& a4 ]0 M. g   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    + P0 x6 m' B8 s+ `   RowBox[{"i", "++"}], ",", : ^& |3 T9 g( N  U3 v, I% ^; Y# v* a% O
       RowBox[{( a, _* O( G+ `* w% t- z9 P# l
        RowBox[{"Ca", "[",
    % E& g; s; n, x" ~8 w+ I     RowBox[{"[", "i", "]"}], "]"}], "=",
    8 J( r1 e% E; O8 u7 y' I% R5 ]    RowBox[{"CM", "[", % K! Z' G% G+ b" O3 F
         RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",
    + T" t. U8 `" A; \) G& b CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9},
    7 {0 w: d$ d6 Q   3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9,
    / h/ E. p/ q. P# j   3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9, 9 I6 }" l. C3 l7 t
       3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9, ) K. s0 s, T7 X# `' J
       3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9, - o, U3 k9 I, R
       3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9, , Q: q& z2 a6 z$ C
       3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9,
    9 ^8 w/ f$ m$ _* i   3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9, # y, m% F2 W) _  a, X1 E  j
       3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9, 7 R3 L" P" Z2 p- l
       3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9},
    - }" a& W5 n/ r# T   3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {
    $ E( v* ^5 S! B. [/ P' V   3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9,
    9 F/ R7 w9 A+ q, z: I   3.577961906897415*^9}, 3.578012176296875*^9}],! q, D+ u- c9 Z- L  A
    ; Y0 k* D; v4 e" J
    Cell[CellGroupData[{
    5 c9 k1 h" P4 y4 ?& m  w
    : y5 K* i4 K6 R; PCell[BoxData[1 @! Q6 W0 E. U8 l% ]4 _7 b* G
    RowBox[{
    4 m! T4 i8 e/ U( x2 u  RowBox[{"(", 8 v) n8 }. v! W3 \! H
       RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ) G- Z" y, e; H6 q! ]$ f  RowBox[{"(", 8 }+ L) q5 `. E  K/ g
       RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],
    + @* t! Z1 Z4 o* o6 ?" h5 p
      `) n, C9 N; P' `! w* V/ GCell[BoxData[
      I! C6 v/ @6 ^8 y RowBox[{+ `4 R: |) m2 |: N, v% J, g( e# `
      SuperscriptBox[' _2 G( V, w3 r4 Q
       RowBox[{"(", ; a& g+ R! K3 o6 x. M
        RowBox[{5 E- P4 n$ X5 C/ g3 ], G
         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+",
    / W5 n; ^  e: f+ v- J2 M  SuperscriptBox[! D* w9 m7 ?/ k' v6 c- ?/ i2 o' Z
       RowBox[{"(", 3 S  Y8 w  j2 h. D! X8 Z
        RowBox[{5 s+ H' }2 Q/ [" q# x) @
         RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+",
    ) v3 |6 L0 \  ?  SuperscriptBox[
      i: c7 k0 f3 A' T( [: \  @! i   RowBox[{"(", ! f) C' R4 F, w  @4 I7 w
        RowBox[{* a$ z9 O8 z  w, @
         RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+", 7 n% b9 r; s, F1 t1 ~
      SuperscriptBox[
    ! u1 x7 {5 Z9 G7 S: G   RowBox[{"(", # S0 i1 Z+ C2 H# E) z9 R+ M
        RowBox[{8 C* W  y) H2 P7 b2 b* I
         RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+",
    - |' @  e1 |: c! E# K" i  SuperscriptBox[1 _" {0 r  k6 _* y% k2 \2 |
       RowBox[{"(", : ^& k& b9 n/ S9 `# j$ k" E
        RowBox[{% R6 m# z5 H* {3 E! v
         RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+", - C3 ~% m, u% o, ]7 `
      SuperscriptBox[6 f& |9 F% |1 Z
       RowBox[{"(", ! D$ I6 `. c9 `2 G: v; p
        RowBox[{
    & T8 U$ |0 ^, Y0 l     RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+",
      B. D& Q" F& N- R/ S" X" s  SuperscriptBox[' J8 j; v# z1 i$ p( Y* D( \
       RowBox[{"(",
    * e8 ~1 ]4 e, ^& R    RowBox[{! s4 p+ W2 v# J* q* e% ?2 [
         RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+",
    - U, s/ I1 V* H& @2 D( N5 t* Q  SuperscriptBox[- @+ `- ]9 o; @0 G# k
       RowBox[{"(",
    ; P/ B2 _; J5 ?, a( w    RowBox[{
    ( a$ K* A8 A6 S9 Y! n# Y! z     RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+",
    $ W7 C# W( J0 M0 e  SuperscriptBox[
    " Z% D5 r7 e- C9 s& k   RowBox[{"(",
    6 M& J+ K) N( S6 V* D4 K    RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",3 i, j/ E: [8 H6 i" h
    CellChangeTimes->{7 }. t1 d/ U8 P6 j# C! |, j# Q, u' K
      3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9}, 0 k5 X. T9 y* E
       3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9,
    " P7 l1 @- F/ r  d; J* x   3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9, ) C" e5 m, Z9 n: H& p
       3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9, 9 t& r8 X7 D; Z% A$ u/ z
       3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9},
    4 a. Q* C+ p  l/ C   3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9, # r! H4 k& G- w: J  k
       3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {; b7 ^( e6 R" s2 m  [
       3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9, % ]. |6 Z+ s' D
       3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {# z2 O  A; Q! n- A2 w. l! v' d+ w
       3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {1 x0 F& [5 G  l) z$ I
       3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9,
    ; @* k5 a) P9 U( O, }5 s   3.5779618537169228`*^9}, {3.5779618846049767`*^9,
    4 @4 {  E: ?1 v! g! i; P+ l& S   3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]! ~, n' _. I- |1 p( s- t' }0 F9 g
    }, Open  ]],
    3 A) K. |" F5 M( \7 R. u9 U- G  C# T+ j5 O4 V, l1 G
    Cell[CellGroupData[{; ?+ u1 R9 X) I$ B& e) l+ G
    6 p: f) i( E) r: S
    Cell[BoxData[8 f7 ]% I, m" C1 |! e4 q
    RowBox[{# R. Q. r( B& A/ d& s2 d- T
      RowBox[{"Ca", "[",
      ^% ~( m) u: j/ ^- e$ p   RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",$ f; r& l9 m) \  H3 e
    CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9, / N, n+ B2 f' n; u  X9 f
      3.5779616465173616`*^9}],
    3 Y  s1 @6 v3 B
    / f6 @0 _; D; A, w" z/ E+ oCell[BoxData["0"], "Output",$ {/ q  e" Z: F' ~& {7 p# F+ K# m3 t- ^
    CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9, ; m! v- V# `( [. j6 t0 @( m, }
      3.5779616484049644`*^9}]
    # w: L) S/ K0 j8 K}, Open  ]],
    8 s+ C& a0 w4 t( d& i( a% Z3 j2 }, _
    Cell[CellGroupData[{
    2 j8 ^2 w& d* B# R
    3 a5 U: h( n0 v9 DCell[BoxData[
    / r4 f! f8 R: u% v+ d0 y1 i RowBox[{6 v$ g- w: ]) n2 ?1 f4 x7 R
      RowBox[{"Ca", "[",
    3 u0 Z4 A& Y; X+ X   RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",3 K" D; [9 L/ x1 ?
    CellChangeTimes->{3.577957376235614*^9}],4 m; ?; @$ F' Z* D3 `! f
    9 [% b* V, V* O5 J5 @0 k
    Cell[BoxData["0"], "Output",  q% {9 u0 }2 t* k" U0 X) o
    CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]
    " t& g- C8 v8 B0 _; N+ z5 W}, Open  ]],
    * \1 I; q( [3 c6 d, q% n5 \3 s! g6 p/ ~7 P) }
    Cell[CellGroupData[{
    # M( Z$ ~4 }* {. x4 A. i, Z4 q: [+ T5 v; E, l9 S' s
    Cell[BoxData[3 \& A% Q  H( L$ W" L! R" m* U
    RowBox[{7 \1 j0 [, G5 D
      RowBox[{"Ca", "[",
    4 Y+ X& @. t4 v   RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",+ i3 ?( n0 J" q: C8 T( T1 Z
    CellChangeTimes->{3.5779573112927003`*^9}],/ t# C  P5 q% `/ q& C! W6 m! N7 N
    ; ]- ^/ J2 ?; Q! D% l! Y/ _, I
    Cell[BoxData["0"], "Output",
    ' C3 G6 i' f5 i" z' e2 p CellChangeTimes->{3 s1 j" ~8 @1 p* k# S) Q# S3 f! j
      3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9, . J/ J$ G+ o, ]# T, X
       3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9, 8 J& Y" x. G: q( f3 f9 b6 S( `; V; Q3 {
       3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9}, , c; W- a6 A$ C& _- J2 N
       3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9,
    / J. V# a0 E# A3 Y+ I   3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9}, 0 _4 e* G. Z  e& y* g
       3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]* Z3 S! v- ]! p5 ]" d; t
    }, Open  ]],
    : M8 F+ s, w4 w9 V: u
    4 t6 l4 k- @( s1 p" TCell[CellGroupData[{  ~" H, F4 x$ o9 J5 Y3 z2 X

    ( M* h/ V% h& F, d$ {1 LCell[BoxData[* r! b) u+ B8 }" s7 Q
    RowBox[{% Q- f, Y) }6 {* s/ n
      RowBox[{"Ca", "[",
    ) {) V4 C+ Z2 `3 E( V8 ]9 N   RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",
    7 I, O$ k8 P, O/ {' x CellChangeTimes->{3.577921461734375*^9}],3 n6 c6 _7 Z- c& W

    ! V. E# h) k$ ?+ i* @Cell[BoxData["0"], "Output",3 m+ M3 e# t1 T/ L1 ~
    CellChangeTimes->{
      _2 h" M. L0 Q. A! }# P; K  3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9, 6 ]# E1 C4 H* K3 w7 l  q8 n9 g
       3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9},
    & q) M0 h. D) m9 B  [   3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9,
    5 L2 u- J4 z: |   3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9,
    / H9 q5 ^- q. U6 P6 X9 J7 }: u) w   3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]
    ! g1 L# G2 I) A1 l}, Open  ]],! k% S' w; P* k; h& z+ v

    % K" P" w7 T. z- gCell[CellGroupData[{
    5 y. D  H: \) r0 Q6 O; w1 o, _; n* n% p% a
    Cell[BoxData[
    - F: }6 \2 v) j' x RowBox[{# G; w: u- ?! H, z
      RowBox[{"Ca", "[", & c) L1 \$ z- O3 q( e$ O
       RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",# x- E) V6 a& s; I0 a* S" X
    CellChangeTimes->{3.577957303118286*^9}],
    1 `6 h( f" S6 Q3 a; ?: x1 b5 m  U2 E2 ^* M% |' K( j% ^0 b. z7 `# S
    Cell[BoxData["0"], "Output",) l& u* F+ n. r6 C5 T. E% K5 t4 a
    CellChangeTimes->{, `& m% E5 K7 k
      3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {3 P1 S3 g% h" n0 @9 w& J9 J
       3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9,
    * W4 @& f8 `1 H( T# O; n6 X/ ?7 S   3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9,
    8 `6 u4 ]. L6 h) j4 [# {8 o- x   3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9,
    3 q; X9 ?% r9 v! N  }4 b   3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9,
    : ~" P0 r) n) j/ A, X$ t   3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {
    9 k. J6 P( U) p1 H+ j   3.577961889378585*^9, 3.577961912965826*^9}}]8 }" h+ T; l+ Z+ T; |8 E
    }, Open  ]],9 C( ^" ~. i9 Y: S- m

    ! @; R/ Y) M- M7 xCell[CellGroupData[{
    4 {4 W' \' V/ w" S
    + |3 K" u! ~$ ^# PCell[BoxData[
    # f: t: a' J6 t, |- P0 ?' w RowBox[{
    5 z' p$ H  P5 _* R0 u4 @/ l$ C# L" K  RowBox[{"Ca", "[",
    & ?* S% W, u3 H   RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",( b. v& g/ f* N" b
    CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {4 g/ O, p# t1 x
      3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9,
    ' k' t+ p# j) g1 @  M2 Y5 q1 H  3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {
    # x# u$ A( j" o  3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9, / T! x" M- L! t4 L+ `
      3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {* I) `" W1 }- R! R) k' }
      3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9,
    # P* U7 _7 e& w6 t; ~' w+ Y8 R) k  3.577921435703125*^9}}],* o; s, J$ H3 x, X7 A

    & o* R) x* r; YCell[BoxData["0"], "Output",
    $ m' A8 F& m4 x! o# K CellChangeTimes->{
    ) v6 h, T5 q5 M% ^* S" Z3 B  3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {
    - i# A* R, E# L( @; p' P   3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9,   h* b  V& m) }* ?$ S( W. v5 s  F
       3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {/ ?% c# b! S# v! i/ O$ b. j# q
       3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9,
    & T! ^' c, |4 V3 |7 @6 L% `   3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {0 L0 d% G. D: R% |: j4 u6 |
       3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9,
    $ w0 g+ B4 G9 Z6 J) Z+ n6 ]   3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9,
    8 ]6 P3 h  M& \$ Z, q0 m9 ]: k6 _   3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9, & @& i' Y2 d1 ]( k2 r3 u1 Q
       3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {
      D" ]. F/ E% c+ h% S   3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9, 1 M; B% w8 @0 x: V& N4 s
       3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {
    ; N) y" g' v$ J3 C( s2 W8 {/ H   3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9,
    ! B) {: H0 d2 s  v/ F* `' I   3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]8 P  [2 O5 k6 e
    }, Open  ]],
    5 h1 @! e7 D7 \  k, r6 |# z- ~9 |0 I( C2 }
    Cell[CellGroupData[{
    / s& N/ c$ @; L) `% K8 |0 z
    . l7 z' [; w4 R( q  p# BCell[BoxData[
      N* x4 q5 o" N7 D RowBox[{"Delta1", "=",
    ! Y/ U8 x. x1 M3 E# }* w  RowBox[{
    / P9 ~  j# u  i   SubsuperscriptBox["\[Integral]", ! Q* ^: z& j$ V# t8 s$ N: m; O1 \
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    , s1 F" g( O5 W9 j' X2 k0 p  M   RowBox[{8 H: f) a. r" F8 Q4 U& R% S4 R
        SubsuperscriptBox["\[Integral]",
    . \7 G7 V: I# g/ o' c8 U# x$ e# y     RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ( Y6 y0 @9 g7 R
        RowBox[{( J" B0 {: z! F" F: K9 \- P
         SubsuperscriptBox["\[Integral]",
    6 F, s& {- X8 I* M      RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    0 o5 D. Q( O* R( w+ G# [" R& h     RowBox[{* u& W' t; Q" N) p  y
          SubsuperscriptBox["\[Integral]",
    % h, v1 e) \4 Z# S1 b& W       RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], : j0 F' A! C' e/ c( M
          RowBox[{
    ' F: a0 l% @6 d5 Z" p9 t3 ~       SubsuperscriptBox["\[Integral]",
      L' J; B/ x% I* I0 L, P) v        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 1 y2 g+ {/ r$ z9 o
           RowBox[{
    : m3 x- v! `6 G7 \        SubsuperscriptBox["\[Integral]",
    0 U7 }! T' R4 T         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ' l/ B  R$ ~. p9 r; J6 G: W
            RowBox[{
    3 b9 Q6 ^) U) R5 l) W( Y* B+ U# ^         SubsuperscriptBox["\[Integral]", 4 m, G* E  S, c# J9 A! P
              RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], . R8 C& @% J( u4 a1 V
             RowBox[{
    1 U2 s- D7 R- a$ m) e; i  c          SubsuperscriptBox["\[Integral]",
    , ?1 {) E4 U2 X2 u           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 4 D# A( `: M3 }+ A+ C
              RowBox[{4 D. k+ v+ Z9 W& v+ b
               SubsuperscriptBox["\[Integral]",
    + _) Z( o7 `( k( X3 L& S  l            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    * i/ C+ j( ~) l; |           RowBox[{* G8 \+ j4 W, a% N5 k2 Y4 }
                RowBox[{"Exp", "[", 1 O3 W( z: G2 J/ Q
                 RowBox[{8 w  I2 @" K- o( `
                  RowBox[{
    ! e1 O' s" E; N  j' G               RowBox[{"-",
    ) {- ~/ z; k! ~. ^4 U                RowBox[{+ X4 {" v/ M+ I5 i; Z  \
                     RowBox[{"(",
    6 s# f5 K* k$ z                  RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    9 e6 ^2 o) R. a$ y1 ^$ E                 RowBox[{"(", 4 k& ~' a* L1 \, a! C
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", / _, z% B$ E* ~( T9 j6 n* u# k
                  "Delta"}], "]"}],
    , h$ H6 D6 l0 ]            RowBox[{"\[DifferentialD]", "x1"}], 6 m5 w, U6 P, M
                RowBox[{"\[DifferentialD]", "x2"}], $ C, w; ]' k  g! ]  R
                RowBox[{"\[DifferentialD]", "x3"}], + f( C3 T  y% l$ M2 r
                RowBox[{"\[DifferentialD]", "x4"}],
    . H# @: V, U! O# d1 q, q            RowBox[{"\[DifferentialD]", "x5"}],   w7 Z# K7 Y9 V0 w& q$ o
                RowBox[{"\[DifferentialD]", "x6"}], 9 v* p" ]7 P1 `6 z6 P+ Y% P
                RowBox[{"\[DifferentialD]", "x7"}], 9 X0 h, B, ^1 c8 ]+ ?) o
                RowBox[{"\[DifferentialD]", "x8"}], " A( v! |* l& A6 |/ @
                RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input",% m2 ~6 _3 E8 `
    CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {  v* p+ F- i% p$ n
       3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9, 3 O1 f# u5 Z, R5 k
       3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {
    8 k2 v9 s. f0 X  q   3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9,
    ; r6 |, H- f% \2 {& d4 ^   3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {0 P' F0 H5 x% z; Q& R" D
       3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9,
    ; B7 b+ e! Q7 @) {$ P) C   3.577918964453125*^9}}],
    2 j, L) a. g5 J9 ^) }/ U# u' W" U7 y: `8 }
    Cell[BoxData[
    ; t' E  ?6 _7 q+ R" R( o RowBox[{"97.40909103400237`", " ",
    ; Q& a7 L- F7 S- t$ ]3 }  SuperscriptBox["Delta", "8"], " ", * N, }- x6 B# D* F2 q6 b6 ~% O
      RowBox[{"If", "[",
      C. U5 D# U$ h6 R6 j$ E( f   RowBox[{( |" M4 x7 k: J, c% i1 P( e
        RowBox[{& R# U* s7 O& }2 F- K! k. f
         RowBox[{"Re", "[",
    7 e1 v) Y4 A( K      SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",", ! T( ~. {2 G1 L7 |" C
        FractionBox[
    ' b2 o0 a- U0 T7 g' G3 \) X     RowBox[{"1.7724538509055159`", " ",
    1 O7 n0 O. g$ s, e, O% G4 D      SuperscriptBox["\[ExponentialE]",
    ! D1 A3 m/ l, K1 _, r9 j       FractionBox["1.1102230246251565`*^-16",
    # x: J. ?! X1 v% C& b        SuperscriptBox["Delta", "2"]]]}],
    - ]  \4 c# O9 B3 s6 y8 L     SqrtBox[
    ( k; W) d. m8 H' r1 a) I8 F4 G      FractionBox["1", * w9 O) L* i% ~5 x- u
           SuperscriptBox["Delta", "2"]]]], ",", 9 R& |, u) X* h4 ~  `
        RowBox[{"Integrate", "[", 1 S) T+ X- w3 T, G
         RowBox[{
    , f& U* p3 x7 P$ U      SuperscriptBox["\[ExponentialE]", 1 U* [  m2 f1 x( x! ]5 U3 c! }7 @
           FractionBox[
    0 _% |; p$ {+ }: w' \, X        RowBox[{"1.1102230246251565`*^-16", "-",
    7 R0 N1 O* G! h1 ~         RowBox[{"1.`", " ",
    ; x& P, {/ ^, A0 d' Z( Y2 p. \; C/ t          SuperscriptBox["x9", "2"]}]}], , g; H; ~' s$ O" w8 D$ ]# k& y
            SuperscriptBox["Delta", "2"]]], ",",
    2 K4 I# @( q! ^* D4 Y& n      RowBox[{"{",
    ! j# k, k: y% u" N" O) q1 I       RowBox[{"x9", ",", : [0 e# T" _4 a  W' x) A
            RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",",
    * ?( u# _# e- Z) F' J      RowBox[{"Assumptions", "\[Rule]", # |9 p& T$ S6 W
           RowBox[{
    & _* {1 B1 o9 L5 V; b, v. D        RowBox[{"Re", "[",
    . |4 R8 W1 Z5 Q% F, W* J         SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}], 9 c7 d# g, V0 i9 B) w5 Q* f! j' a! ]: B
         "]"}]}], "]"}]}]], "Output",
    $ g* ~0 v9 F6 O6 J CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9, ' n8 b! n& s& o. m
      3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9,
    8 `- V! @$ Y; b5 F  3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9, 5 F, {2 \7 O0 X- S5 u
      3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9, $ K: P! v% J) W2 |* U, q
      3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9,
    % F8 N0 B3 {& V$ s  3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9,
    ; M; a* k  k7 `, z: A; `, c* s  3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]
    8 L7 j; O9 B# G, i2 }}, Open  ]],
    % M* Z; ^/ y  O. {0 v7 P+ s
    . A; x! m9 c, Q/ Y/ n# \Cell[CellGroupData[{
    ! G. N* g% R5 m4 n
    * u1 q' C* a0 m/ \! I' pCell[BoxData[6 H2 K$ c" Y* @# m& |5 `
    RowBox[{"Delta1", "=",
    ' m; r1 ~6 v$ P5 p5 ]9 }  StyleBox[
    - u, F2 Y$ j; ?) q2 e2 Y   RowBox[{"97.40909103400237`", " ",
    0 o0 J6 V5 i# t+ y: P4 R. p    SuperscriptBox["Delta", "8"], "  ", # L- X" z8 F& n& M/ j* ]: C% X
        FractionBox[4 e8 y3 x6 r! B  x  O6 y% K1 f0 Z
         RowBox[{"1.7724538509055159`", " ",
    # t) }# t2 E& C- _      SuperscriptBox["\[ExponentialE]",
    0 f) ~9 o3 x- f, h1 |       FractionBox["1.1102230246251565`*^-16",
    , ^1 k# v3 P, {; U# H) v        SuperscriptBox["Delta", "2"]]]}], / x' e: l1 ]& z( f2 p/ P
         SqrtBox[: m3 i! `3 e6 o- ?; b
          FractionBox["1",
    + ]6 g# R6 S+ y8 u. A       SuperscriptBox["Delta", "2"]]]]}],  Q# w0 j, A! G3 I
       FontWeight->"Plain"]}]], "Input",
    / p7 O* a4 z/ f CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {4 c. W2 d. m, ^( \5 C  e& b5 ]
       3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9, : U2 `$ f( ~$ G
       3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {
    $ i3 O8 C5 r- Y' o1 F' O   3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9,
    ; x0 {* ^) G& A   3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9}, 6 P( z9 t+ n4 k# \' c& {' `
       3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],
    5 }. D1 X$ \. j* a8 _" r; L5 ~6 r' \  a- ^5 b' G: z+ c+ r
    Cell[BoxData[$ `, y& ?, Z4 S
    FractionBox[
    4 l4 a! j' V. R+ \+ b4 x  RowBox[{"172.65311851642346`", " ", * O/ l: |) Q  P6 H2 F
       SuperscriptBox["Delta", "8"], " ", + ^) |( ~' ~8 [+ Q0 h+ l
       SuperscriptBox["\[ExponentialE]", 8 e1 i) d$ P: G* ~8 ^% J
        FractionBox["1.1102230246251565`*^-16",
    . t$ O6 P5 v( a% P0 r' ^     SuperscriptBox["Delta", "2"]]]}], " k, }! L! H" m/ h0 A- T
      SqrtBox[- e+ q$ @5 ~- R" n
       FractionBox["1",
    ) a' l7 D% H3 M3 q    SuperscriptBox["Delta", "2"]]]]], "Output",% f; @% ?* ~: X5 E
    CellChangeTimes->{
      n  u% O; V- L* T9 ~8 A5 n% z  `2 O  3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9,
    + M9 N; ?8 E4 l( @6 p0 m   3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9, . w9 Y; N" a, U
       3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9, 5 ~. b7 D: n. b' V3 z
       3.578012166234375*^9}]
    0 G0 ~7 c& A7 L# p# w$ _}, Open  ]],
    , e2 Z$ x. N% E$ _  Z* o0 q' T6 J: `# _% ?* Q" E' L$ \
    Cell[CellGroupData[{
    # y" [* y/ ^# Y* v. N3 Z. }7 _- G7 r. z
    Cell[BoxData[
    ! c" K0 K: O* r( @$ v/ L RowBox[{"DeltaX", "=",
    ( u! _8 E! E3 Y  RowBox[{"FindRoot", "[",
    - B4 R4 N5 X3 z, @/ v6 B   RowBox[{5 h' D  R; l3 d0 i: H6 Y
        RowBox[{"Delta1", "\[Equal]", "1"}], ",", 6 ^) z: D7 u& S- t
        RowBox[{"{", : V9 m/ D+ h8 x7 F  O, m
         RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",
    " g5 m' [4 K5 S/ @* o CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {
    8 K2 L3 C" n1 H6 U5 P; C2 \   3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9,
    . q3 V7 a1 Q$ _7 I" V* `% X   3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9,
    * W4 ^2 I% x# n9 S/ K   3.57791921584375*^9}}],
    ) l0 o  z" R. E0 f. }. p
    6 p; |) P. M: j' y/ B# {9 r- PCell[BoxData[
    / b( m- P) Q8 T" O RowBox[{"{", , a; a2 W9 _: m( I4 S* g
      RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",% A  ~2 X( b4 e& |  y* F
    CellChangeTimes->{
    ' z$ W2 Y6 M7 P  3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9},
    $ w( _; q8 t2 b9 ^   3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9, 5 N# r' `% Z( `" O
       3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9,
    4 P9 Z! L5 o! Y3 D8 {. o) {/ s   3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9,
    * [( R0 x$ g! X3 B0 `) p, G6 ?   3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {: {& U( `9 U% E  i3 X- v
       3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9,
    6 w0 w) R2 {* \: \   3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9, . a* U$ |' i6 i, ]% b* \  F9 O0 t
       3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9,
    % k' C& u+ v% R5 Y( G   3.57796070150625*^9, 3.578012167703125*^9}]/ j2 i# l. h8 A8 r) ?8 |1 c* y
    }, Open  ]],2 r  l) u2 p9 E8 P; G

    5 e8 ~  `0 N/ @6 t% X/ [9 ^( M7 i% H0 oCell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\
    + Z( ^  M% r2 b* C! q  ]\:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",* y3 j1 f1 z* g! y+ a4 h
    CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {  D; f/ Q) J  W# l
      3.577960705312657*^9, 3.577960707621461*^9}}],( }$ s4 \4 B* v" {. J3 o5 T3 m
    0 L. K, }8 a* m* b. h" @
    Cell[CellGroupData[{
    ; j4 y9 m' ]9 ^7 e0 i9 [
    9 I( B, F6 I1 ]( q4 y+ J& nCell[BoxData[
    & V! z0 M' }7 X  Q. Z6 ^  S  ? RowBox[{"C1", "=", "Ca"}]], "Input",
    ' c" K+ k. c( ^3 H6 m CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],
    9 o6 o2 ]9 R# f# W0 H$ D& e' I7 j; |- j8 k. P9 [8 Y( t5 z, o! @' d  m
    Cell[BoxData[" L( D( {$ E- k% t% a
    RowBox[{"{", ! c& H! M% X4 O
      RowBox[{
    : j" s, p, K' d6 z* Y+ D  "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",", + x, j' U  T+ ^6 l& N0 U) c
       "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", 3 e' w0 p# S8 N( Q- Q
       "0.`"}], "}"}]], "Output",
    $ u2 h' f6 P. N. Q* x CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9, % Y$ S' s( R9 z3 R% t
      3.577960710273465*^9, 3.5780121855*^9}]/ r4 C  }. J! @
    }, Open  ]],
    . T- d1 l$ ?( U8 ^7 P- L
    0 ~7 t% O2 _" }$ n7 \1 s7 DCell[CellGroupData[{# D' p- d4 t2 g  j

    8 C' `. k% l9 d; hCell[BoxData[, ]( p' A4 q  d+ j; `0 B  b. l
    RowBox[{"u1", "=", 6 a$ a7 q. x3 W
      RowBox[{9 w' T- X( N/ D4 e4 j6 e  i
       RowBox[{"Exp", "[", 8 _5 B1 z8 ]4 K
        RowBox[{
    0 ]. U) U/ x6 w! Y- u$ n% T     RowBox[{0 B( u1 p; R# O: z5 z& t
          RowBox[{"-",
    * R, R5 h# r! P+ W# b8 \       RowBox[{2 e- G+ e5 C' F2 ^! S1 A7 @, |0 B
            RowBox[{"(",
    7 G4 w8 k) C2 m+ V$ Y9 _         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ) q/ `- J) |" T1 A. n5 |# n        RowBox[{"(", ( n0 m+ {' W; r' w
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ' l# q% t3 n# r+ u3 ]+ f6 X4 r+ o     "]"}], "/.", "DeltaX"}]}]], "Input",/ e6 c- i+ |9 g4 ?
    CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {: T+ L2 J9 l# m  |
       3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {& {% ^, d; \2 a8 Q4 K  @
       3.577919193484375*^9, 3.5779192326875*^9}}],( A/ ~8 |& I( k

      t8 b2 F1 d, L( j% r; zCell[BoxData[
    7 b# G; }0 @4 T- @ SuperscriptBox["\[ExponentialE]",
    + A4 j4 ~$ x; x+ t1 w  Q" L  RowBox[{"3.141592653589793`", " ",
      ?' T7 O3 S" Z9 v   RowBox[{"(", 6 N2 i7 G( P" u8 @+ ?- C, V
        RowBox[{( O8 l2 m- z% T# C, I5 [5 o
         RowBox[{"-", * @) G/ H# B/ t' h
          SuperscriptBox[. q7 |$ K2 L7 i# Y" V. y) h( p
           RowBox[{"(",
    + m7 F4 b" K  @4 e  |: T        RowBox[{
    , p; Z. f5 ?. i) D/ H3 Q( n% t         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", & K+ }+ a: Z9 |! b
         SuperscriptBox[
      m9 b5 e  [5 w, \  @6 u      RowBox[{"(",
    4 }; Y8 t6 t" }; P, o# Y! s       RowBox[{  r5 Q# ?' S% e. }/ y) [
            RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", " ?/ m5 i; N4 V1 g. _
         SuperscriptBox[& v8 c) `& m  D4 W) [! ]. k2 U7 A5 n
          RowBox[{"(",
    3 q4 d* m. ?9 _: X/ M: p6 U       RowBox[{4 x5 k. \. ~) O  k! _
            RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-", / \& T: W! w0 [( J
         SuperscriptBox[
    : q; f$ {% ~' z5 k8 S# t      RowBox[{"(",
    , {$ b. U7 j2 F  x, ~7 m       RowBox[{* i" C+ j" J- d0 ~$ p2 P5 @
            RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-",
    # v: A* x" Q+ V, \% t! t+ }     SuperscriptBox[) i$ {* f' m$ g; |- c
          RowBox[{"(", 0 c; P! v4 C5 {
           RowBox[{" Y& J4 H1 [. f) v9 v. I
            RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-",
    + ~- r( J0 I# y$ [( I     SuperscriptBox[, N! r# d! M# R7 s! j8 M
          RowBox[{"(", 7 Q1 _* A1 g, F  ?2 M* c6 ]
           RowBox[{0 o6 [8 k% V2 D2 w2 Y, l& c
            RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-", % w1 B( f% a. E3 K, e7 U8 S
         SuperscriptBox[
    / g! W9 n0 y+ ~6 i- d      RowBox[{"(", 1 V3 O% U) N9 h2 [
           RowBox[{: e* a; P$ s% ~( C+ n, v
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", 1 _! p0 s4 F% a
         SuperscriptBox[
    , ]9 U/ N& \0 h; l! z- r( \( I      RowBox[{"(", 6 {. R- B+ x4 X4 a+ ~/ B
           RowBox[{
      L/ ]2 e7 m2 B' {- R        RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-", : O) h! E3 t+ \, T
         SuperscriptBox[5 ?: Y+ n* C. R6 ^5 c
          RowBox[{"(", ( S1 H5 q  `" X0 j! {) |& i  ]
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    & q, G5 T& W9 N7 e5 E$ I    ")"}]}]]], "Output",
    " u3 i" \. P% g0 { CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9, " |0 R! S$ j9 Q- F9 X  H
      3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9,
    ) \3 f7 I: J% j: }0 N; Z) ^) r6 f  3.578012187078125*^9}]# S! H6 V! F, I1 ]5 f
    }, Open  ]],, V, [% F. t* t6 x( `) o/ c

    / r" n( ~# ]( n/ `8 Q: m- o. t5 J9 xCell[CellGroupData[{
      S' Y5 @9 D2 y4 L. N8 m0 U' X& b# U2 K' b* {& U* y
    Cell[BoxData[" n0 e+ W6 r* m/ t  S! u' i
    RowBox[{"C2", "=", "Ca"}]], "Input",- N( x6 k- E6 M0 P$ I% F% A
    CellChangeTimes->{3.57792047321875*^9}],4 |1 J0 e- w; [* M2 U/ b$ e

    : Q. Y' ]0 M- e# k( eCell[BoxData[  x, H) N3 b( I" e+ y; O
    RowBox[{"{",
    ) ]: o5 J' h- w# o. Y8 {  RowBox[{$ [1 Q  n% Q* v* W$ {- f' `2 V
      "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    6 a4 h* ]- G- u$ V- e7 y   "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}],
    . O! @, @3 K3 G: t  "}"}]], "Output",
    . j0 q6 G3 i/ Q/ @ CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9, & j6 h0 o" @. n
      3.5779607401163173`*^9, 3.578012204671875*^9}]
    ! n, @3 c) x1 Z# b% @7 i1 M9 m}, Open  ]],
    & F2 X( M% R9 ]) |) b5 u
    0 }7 ^7 Q* F$ j; o' cCell[CellGroupData[{( j) g8 g3 i& \% \* k9 n
    + i. c) Q/ J1 v/ H- {1 K2 K4 s
    Cell[BoxData[7 {1 Z: Z- `# \. s* w2 k
    RowBox[{"u2", "=",
    5 }- w& ?/ E* Q1 f2 C  RowBox[{! i- k4 _; N1 s! o* J( K) M% |2 g
       RowBox[{"Exp", "[",
    7 {3 q) s$ ?2 B0 q    RowBox[{: b) Z! x! Z% }" {  [* K% V) b
         RowBox[{
    * }5 L. d8 W7 t5 D! Z      RowBox[{"-", - o0 i( h4 J- W  z2 s# V  s
           RowBox[{9 Y9 ~" q9 l& h% w2 @5 l* g; e
            RowBox[{"(",
    : A" d+ a' ~5 T: n% T/ u# `" C, a         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    * Y( H+ M1 V  O/ X$ A8 q1 E9 e        RowBox[{"(", $ q* U. l  S) s7 C' z5 b
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    + G2 L) r  O1 [" i/ p" Q  e! ~3 o( n     "]"}], "/.", "DeltaX"}]}]], "Input",
    4 k9 p& [9 B* o+ n CellChangeTimes->{3.577920484109375*^9}],
    + p1 V9 [1 Y) [7 x0 ^# w
    ( b, i! X7 W4 E+ z- R3 KCell[BoxData[
    9 w( ]# W( ~' |! s# \ SuperscriptBox["\[ExponentialE]",
    ! u- e% i) k+ D7 Q  RowBox[{"3.141592653589793`", " ",
    " v* |; z1 S3 i' x+ z   RowBox[{"(", 0 I5 Z6 E  W% `& A, m
        RowBox[{
    ( U3 L0 ?1 b% q     RowBox[{"-", ' f" {/ G: m8 n2 x* d' i, w
          SuperscriptBox[
    8 m. x7 F3 a: I! c" ~2 B       RowBox[{"(", 4 C# B* J! G* e. y' Y; ?- z
            RowBox[{
    & ?/ a# p$ u3 e' l         RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-", 6 q# ]' y/ u; h9 `  }6 [
         SuperscriptBox[
    ; b$ L2 D4 B! ?) `2 n3 G9 K3 A5 K      RowBox[{"(",
    - P* r/ U. @+ h       RowBox[{( ]& d9 V% L" W3 f; }
            RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-",
    . x' R  u0 a; f$ t1 u% E% X     SuperscriptBox[. i$ z6 C  t8 V; d6 X
          RowBox[{"(", 9 t/ v1 y* Q& V' |7 u8 g
           RowBox[{$ a0 P: Y* @0 k# V
            RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-",
    3 F3 p2 i9 U1 \% E! _6 y     SuperscriptBox[1 d4 u' w% Q' o- r% `
          RowBox[{"(", # \( x4 D, H4 }5 v2 U5 J" e& |
           RowBox[{
    ; ]3 e, E- ?# j8 p. V        RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-", & y1 x1 Z" L% O& z! S- T
         SuperscriptBox[4 B+ W5 z: o# g- }) z0 V1 f  d
          RowBox[{"(",
    9 S2 U' C! {/ d( V* a) r) |! @% I6 ]       RowBox[{
    4 {4 z5 g5 Z4 u! l: n1 q: C. d* X        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", 7 M& [; @  ^& T" F& n2 X; p& _
         SuperscriptBox[' q, g" m7 O/ ]7 w( |  [
          RowBox[{"(", $ ^/ [# R' b' T6 K
           RowBox[{- b! ^1 Z3 y1 L2 h7 I8 |0 C% J3 C
            RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    + j- a. i7 g3 C/ |     SuperscriptBox[  \0 y7 o' v1 M
          RowBox[{"(",
    " Q; e; D5 k- ^# n       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    " ~& n7 R( C4 ]# M' m8 f     SuperscriptBox[
    : ]4 \% x5 i5 |+ B$ b5 Z      RowBox[{"(",
      O9 c* X0 V$ x& I       RowBox[{, h0 w1 D, O8 w) g$ L- {" s2 ]- o2 t! o
            RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", , r& \$ t* o+ @# \, Q8 r
         SuperscriptBox[
    * R: j/ \: |) D; y" i      RowBox[{"(",
    $ U! y' k. V/ b6 Z8 u; J9 v' |       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    3 p2 o- d4 H% q1 T  i, }. A1 p    ")"}]}]]], "Output",- s- ^# T+ ]$ I1 p: y/ G0 |5 H9 l
    CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9, 2 N0 f! D2 ]$ T, {
      3.5779607413955193`*^9, 3.578012205484375*^9}]
    / q# i/ F8 A: d}, Open  ]],1 e- x. c: a( l8 `- U. X* z

    7 \& _' K7 @4 _; y' h' SCell[CellGroupData[{
    1 M2 C$ p& Y# z3 p0 ?4 g1 u7 d# s( i5 Z2 S2 G. h- E
    Cell[BoxData[
    ) ~2 K0 o- @& \) n0 s RowBox[{"C3", "=", "Ca"}]], "Input",6 O  [+ J5 H" C
    CellChangeTimes->{3.57792064125*^9}],
    9 c) C. D* p8 a* S
    : _! r! V6 N4 ~3 OCell[BoxData[- i9 b' b% i7 ]. Q7 h
    RowBox[{"{", , r" H+ i! \. {9 |1 K
      RowBox[{
    . w& L( X9 h1 P0 M/ Y' N  "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",", ( t3 _- I* o9 t+ U/ d2 o8 C' J0 z
       "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}], 4 V7 ]2 z& L% j9 ]$ l* N
      "}"}]], "Output",' [: A4 P7 d& Q# t5 H
    CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9,
    . d* q# H5 j' {1 b( q; ~- G- K% Z% w  3.5779607642027593`*^9, 3.5780122103125*^9}]& J4 h6 H; p7 D# K
    }, Open  ]],$ g9 f( w6 o% \; r/ C7 N1 X

    ; z' _# S5 T) _; ]Cell[CellGroupData[{; n4 w! j4 z+ Y# s3 a" K; V# j8 _
    5 Q$ k2 Y0 M% y% k% n
    Cell[BoxData[  [; F5 M) i4 ?0 t
    RowBox[{"u3", "=",
    4 A6 y/ P' B) W6 B4 x1 l2 M  RowBox[{
    * ~, k8 k! ~) Z% z2 e% P- N   RowBox[{"Exp", "[",
    4 n. ^1 A$ v* r' @    RowBox[{
    ) V" i7 }7 I& E; `     RowBox[{4 u7 K! V( q9 @/ |% a
          RowBox[{"-", / A1 |7 }2 g9 |( G+ I6 m) @: ]
           RowBox[{
    / a5 c7 G+ L3 l: Q* r        RowBox[{"(", 2 i6 Q( x; A; N4 ]- x+ n
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 9 l8 V& \( z& f3 q8 d- R
            RowBox[{"(", " I- s& l9 b- v5 q
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],7 u- u5 o7 `0 |- n
         "]"}], "/.", "DeltaX"}]}]], "Input",
    - @/ V' p7 o( m4 C! W. m: ? CellChangeTimes->{3.57792064921875*^9}],
    % ^) ^7 M0 B! ?, p. c
    " p1 r$ T, r) |0 T+ y3 p; fCell[BoxData[
    $ M0 k; y' D/ T' I- ~8 K SuperscriptBox["\[ExponentialE]",
    8 A' ]1 i5 j9 W0 K  RowBox[{"3.141592653589793`", " ", / l# W) x" Q) r' Q1 C3 E5 e
       RowBox[{"(",
    7 X  X" k3 q7 d6 t& I! X    RowBox[{; W' H- M) y2 ?1 O+ o$ i% T5 E; y5 {
         RowBox[{"-",
    3 |1 a7 g- C$ |- A. N2 G      SuperscriptBox[$ n0 G6 F$ f& [4 \+ S
           RowBox[{"(",
    3 E2 A! J9 f' z7 C3 |/ X) C: @        RowBox[{
      L* I; O* V) C         RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-", 4 _4 g% T' O: y0 p' g
         SuperscriptBox[* e: i1 ?5 j/ _$ {; {. x2 I
          RowBox[{"(", * S3 z# {5 r3 B) ^  Y9 A
           RowBox[{
    / [& s! g$ f( C& w+ u( f        RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-",
    5 }6 N, t; j( u5 g7 _; E, [     SuperscriptBox[! ^4 X1 `2 c$ C8 L: v5 y5 C
          RowBox[{"(", 8 w- P& d+ G# z. ]9 q
           RowBox[{! L- E; w& l4 k- T
            RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", ; z# B$ b7 _5 v, f
         SuperscriptBox[% G: J: |# Z6 w) B1 g' U
          RowBox[{"(", 1 N, H, w. S. w( P! n
           RowBox[{! D$ D" t: t; B  y4 `* M- |
            RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", 1 {) `% s$ y2 N% W  l6 V) C+ S+ n
         SuperscriptBox[) ^3 g( O; I" V4 i4 E$ |
          RowBox[{"(",
    : m. u2 _# _0 d2 p       RowBox[{
      F. G( C) v6 b; W' }" E        RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-",
    5 g6 Z4 M. A  A: L0 F- O     SuperscriptBox[
    $ L9 p6 `( B% |4 I      RowBox[{"(", % m. _# R: r$ h* b
           RowBox[{
    0 I: c& Z- a/ \3 @/ A8 K) A        RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-", 6 s0 a2 R0 i$ o; w4 K/ S
         SuperscriptBox[
    . x; d6 E# S, Q      RowBox[{"(",
    3 s$ l; p  D0 J5 R9 P       RowBox[{, f4 a2 v' f; ?1 {1 c  |
            RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-", 1 d1 V; Z' Q. ?- E% X
         SuperscriptBox[
    8 v! F8 a. r0 h" p: a9 }      RowBox[{"(", # a( ?; \+ `% w. t( C
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ; _/ o4 b8 ]* v6 o7 x+ d0 w) Z, [0 W
         SuperscriptBox[
    & i1 g* h# @' V1 I4 X8 {/ i; a      RowBox[{"(", # ~6 P  W9 A3 W, |. \7 c: [, z- V
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    + a2 g1 m% |& N1 A    ")"}]}]]], "Output",& ~; C" _% z2 ]3 o6 c5 ~' i' J
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9,
    ) K# w& m2 ?; t; _" w- f  3.5779607654819613`*^9, 3.578012211515625*^9}]' ?/ b/ c0 d/ O4 G' i
    }, Open  ]],, m+ Q# o6 T- [/ Z* W. C* K& b
    ( L4 M$ O, d9 a8 s  ^6 x8 L! {( [
    Cell[CellGroupData[{1 ~9 }' l4 O) w9 V% _8 d2 p
    / `, n5 G% g0 A8 F0 {; Y3 y2 [
    Cell[BoxData[+ [& T3 E% u/ D0 }9 d1 C9 T3 M2 V9 E
    RowBox[{"C4", "=", "Ca"}]], "Input",5 \& q9 m* X( H
    CellChangeTimes->{3.5779207559375*^9}],
    4 |" n. {0 \3 c9 _( p
    : {- k, k2 n' S: A/ y- A$ UCell[BoxData[
    9 _: n0 a9 h. h  L4 L$ _ RowBox[{"{", # Y5 v+ Z& r- D
      RowBox[{# t" }+ O: P) s* M1 `1 A! @
      "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",",
    ) W: \: v# m7 U; R( z   "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}], & F% }) x8 [. P- Y7 @* u8 [
      "}"}]], "Output",
    * f9 z1 R$ B6 f/ v5 o. ^0 P+ ?. t% u CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9,
    % N' I; l% J  S* x$ j. ~  3.5779607861363974`*^9, 3.578012216171875*^9}]
    ; X; p$ ^" H- C: z& _}, Open  ]],* m- X% x( U9 c5 I" q; O6 G* h  A
    6 s5 r3 m3 |# H% R4 G, Y2 }8 m
    Cell[CellGroupData[{! I6 m. i6 K$ Z+ f7 }3 h( B
    ( d" D4 s0 V1 i: @7 F: \" C& T
    Cell[BoxData[
    - }# |$ ]& O7 z/ s9 X8 E RowBox[{"u4", "=",
    0 _4 z1 d) C3 e7 `* E1 Q0 }3 U/ c  RowBox[{) ~) ]" u' u* c- I7 x5 `
       RowBox[{"Exp", "[", 9 [* f& x# C: r4 T
        RowBox[{$ D+ l% x" J5 W7 @6 s
         RowBox[{7 X) k. N3 }: h" f, u' g4 t3 R
          RowBox[{"-", 6 n. i7 W; y6 \
           RowBox[{2 T7 b8 D& D+ q' m3 A2 e$ H) ]
            RowBox[{"(",
    3 Y4 j4 L* U- D6 r         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 Y: C" Q1 L% D2 q        RowBox[{"(", ; ^1 d) Z. C$ B
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    6 }( E) X, q; e/ \, k     "]"}], "/.", "DeltaX"}]}]], "Input",- v5 V8 R$ l2 Y+ Y. [5 O  d  D
    CellChangeTimes->{3.57792076325*^9}],! m$ Y% L6 J5 j% z- w6 P
    ' X4 t7 P. g1 r; K# e
    Cell[BoxData[: C! Z; @3 u( p: l
    SuperscriptBox["\[ExponentialE]", " }2 T% L; J6 N8 ~2 k) r3 i( W) v
      RowBox[{"3.141592653589793`", " ",
    7 V/ g- o8 f9 a  o- q  ?* `6 V   RowBox[{"(", ( p/ H; B& y9 z* P# p
        RowBox[{# ^6 n9 p# ^) h+ x  u8 O' L: h
         RowBox[{"-", " u" g& ~  j  A- Q; s$ Y3 K# h9 @  e
          SuperscriptBox[
    3 A8 K5 i' u+ t3 {% z       RowBox[{"(",
    # z3 C9 J/ G9 F& n. N3 h        RowBox[{
    $ Y$ k: ]7 F% z& j         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", : U' ?9 @0 B5 q9 m  P
         SuperscriptBox[% ]# x% c' ]. E9 E  Y( `
          RowBox[{"(",
    ( ^: m( S9 g+ V       RowBox[{( S; ?) Q9 f0 R/ Y/ T- X* Q
            RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-",
    * f" l0 Z7 X+ Y: J( w     SuperscriptBox[
    4 {9 C- _- {1 H$ V7 L9 B: {      RowBox[{"(",
    ; @: Q! \; q6 h/ ]% V  R: _1 _       RowBox[{
    # v; U/ b4 b* p. y        RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", ; T( \. L; x0 _2 T4 x
         SuperscriptBox[& m! z- H# R( a- h: `
          RowBox[{"(", 0 z" {  U; p6 _5 N
           RowBox[{
    : k  W6 c& @% O% r) ]" r  |        RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-",
    5 S- T2 {1 O4 o) k; T     SuperscriptBox[# o* g) j# v2 a2 [: S* g; B4 {1 _2 A7 h
          RowBox[{"(",
    6 ~0 g7 R$ b& m: l4 n- C/ d       RowBox[{  S4 {, u: a! o( w) v* w
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", 7 @* \( \" ?% X0 q8 J
         SuperscriptBox[' U# N0 M( g* }( t; d
          RowBox[{"(", + b, L  c* q' E$ F7 p
           RowBox[{
    - {* ~9 w% ]5 m2 c0 U        RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    ) ~' g! R6 z1 c8 \3 L+ n3 q     SuperscriptBox[% q: U4 Q4 _5 o& ^; U( r% `
          RowBox[{"(", 4 D" o& f6 n7 X# i. I5 p1 [9 Z5 b
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    * d. b* k) G; u! l2 l* h( O     SuperscriptBox[8 p% ^( R3 G9 o
          RowBox[{"(",
    ! p+ P! `4 Z2 D1 C3 W       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
      h. Y( j$ Y! h5 [5 C+ D     SuperscriptBox[2 V, A) M; Z. k$ E
          RowBox[{"(", 2 C5 k8 O; B1 y& R) ~
           RowBox[{
    6 \; I+ ]) U- @! k* ?" g9 f        RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], $ m; {: \/ H) h' c. y
        ")"}]}]]], "Output",
    8 v( H: z/ \3 G% `" [2 N* R; o CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9, + t  }( X& p% v
      3.5779607873531995`*^9, 3.5780122169375*^9}]
    . I1 k: g1 z& g  l# c; T}, Open  ]],3 h" r  b; z- v( D* c: A& l

    4 r/ k7 @+ K% b2 Y1 ^  P& l/ eCell[CellGroupData[{
    : P3 [7 B' O8 N+ m0 w# ?
    9 _! L' y$ M- q, ECell[BoxData[
    4 t* H/ a8 g$ E# D4 I: e RowBox[{"C5", "=", "Ca"}]], "Input",
    0 C- @' s% M% @/ R3 J9 u CellChangeTimes->{3.577920860671875*^9}],
    ; Z$ ^0 |2 T' [4 D- D4 b* E
    , p; |6 |9 T/ H7 O8 SCell[BoxData[6 N6 v/ z1 B& H& z- F# Q2 j* ?; v
    RowBox[{"{",
    ) G$ R  d. v- w) G2 B+ P  RowBox[{, }+ |- ]4 S4 d7 X" }$ H
      "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",",
    : d9 J& L- p7 _+ F2 X   "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}], % c& |( e, H. E1 _+ T
      "}"}]], "Output",
    4 j! c& D1 E+ O CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9, : B$ D- L- }% H5 Z
      3.5779608137328453`*^9, 3.5780122209375*^9}]  d3 W1 Y) J$ k
    }, Open  ]],
    6 W! \7 z' n4 L
    0 `; h4 b+ Q$ r0 ^8 yCell[CellGroupData[{
    ( C3 x# d4 l- H4 y. z: ^' F, J% M: J$ L( O; U
    Cell[BoxData[$ O+ W5 b* u! _" O
    RowBox[{"u5", "=",
    8 A/ S- [& w# n9 l+ u6 }3 }, X# F. P  RowBox[{& A4 K# g6 s1 ?& x  _' N
       RowBox[{"Exp", "[",
    9 c. C! w( X: S9 S" }- U3 y    RowBox[{
    5 Q3 Y6 N! W& |     RowBox[{
    6 N4 ~3 g5 ~; A3 o      RowBox[{"-",
    4 v* K9 z6 u/ |) r  C+ F4 X: X5 M, N       RowBox[{
    1 b) q5 |" q  ?2 P( ]7 X        RowBox[{"(",
    6 o9 q6 E7 O! K+ B         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ) W5 I. Z4 v% H        RowBox[{"(", 5 a& a9 u  |: y' l( [8 W1 G/ u! r
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],5 Y! u, ^( ]. f0 n! a: n% U
         "]"}], "/.", "DeltaX"}]}]], "Input",
    * w2 }  g) G8 b+ |/ ^ CellChangeTimes->{3.577920869375*^9}],
    3 G5 w, w& d/ ]& w8 q# q5 F( @/ b( s' R8 V
    Cell[BoxData[& ]5 `& q& A% E. o. T$ t
    SuperscriptBox["\[ExponentialE]",
    & b: K: J, P3 `' R- m4 f7 Y( F  RowBox[{"3.141592653589793`", " ",
    : V2 u* t- d% c1 @! \6 i   RowBox[{"(", + T# o" ^4 M' @1 s
        RowBox[{
    0 [8 V4 p& ?2 ~& m$ u     RowBox[{"-",
    + E8 R0 H% M5 D8 Y+ N      SuperscriptBox[
    3 |2 s5 Y: P* c8 o2 T       RowBox[{"(", 3 a6 M) |* P+ T$ `; G+ k! K: C" K
            RowBox[{6 e6 I1 u! H+ o. w: ^7 x) R
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    $ h2 l$ A/ u" e2 F4 G3 e     SuperscriptBox[% C' g- m6 Y& F- b
          RowBox[{"(",
    / k0 [& s2 k+ H) o       RowBox[{
    3 E8 E, A+ B: \4 s        RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    " K6 H( R, v; |) e; M. b# o* U     SuperscriptBox[1 j" K+ h) m8 q
          RowBox[{"(",
    ' s: D8 [8 p8 v& [8 q+ `       RowBox[{
    8 ]% q, D1 W* `  o; m5 f# w        RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-", " h9 W2 b5 h5 {; Z, z5 e1 J
         SuperscriptBox[4 a4 j* I) i5 F4 ~7 Y" L% m1 M5 Z5 G
          RowBox[{"(", & x  ]; |0 I2 |. q
           RowBox[{9 b( V6 G  n9 R0 A
            RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-", 4 y- E* x. v2 \
         SuperscriptBox[
    7 A3 N2 w7 F! r4 q* m: ]/ n      RowBox[{"(", 5 w( S  H' d5 _! `1 f
           RowBox[{
    0 M  x$ q# f. W% r; |2 u( [& ^) E. W        RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-",   B+ c9 a! d  P) t4 U
         SuperscriptBox[" _% M" W3 J6 a- ~9 \
          RowBox[{"(", ! a( o$ o! B" y0 h( E
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", * ^' p+ U$ H% L5 f
         SuperscriptBox[
    + p+ t5 I, h1 O" Q9 b; b9 e& J  C! l      RowBox[{"(",
      {- d! a2 a1 h$ Q, L       RowBox[{
    ; y) E" \3 Q( B# h        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", % S- H) }# O+ d, k% R/ h, @2 r. L% _
         SuperscriptBox[
    ; C' _8 B# U+ |: {2 {      RowBox[{"(", + |& j, n! K( x% I6 A
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 0 N- `+ ~. K+ K6 k: X* Y; Y
         SuperscriptBox[
    % g  |2 ]1 |! U8 a; b) u8 M6 k      RowBox[{"(",
    & i) Q8 L2 L1 Y7 Z9 y. @       RowBox[{/ \0 Y% F9 X' C5 d
            RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}],
    + Z8 v8 O8 k( M    ")"}]}]]], "Output",1 i' v& _& k0 u" r
    CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9,   ^8 ]$ S5 Y6 E9 B! `# Y' Z
      3.577960815043248*^9, 3.578012221953125*^9}]
    7 u, ^% V) i; x$ ~}, Open  ]],
    " x* k, G2 G2 B. H3 P  i4 v, @0 O4 V- m
    Cell[CellGroupData[{
    / ]7 F# L7 I+ \( ^+ I/ g
    4 t; x- `; }; q5 L  c/ G3 yCell[BoxData[
    : w: T% [+ d/ t* t/ r6 T: k; T RowBox[{"C6", "=", "Ca"}]], "Input",% q" p4 O) U! ~0 n: J* v
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],+ t$ d7 M' Z+ V; o; d# }  p9 i) ~
    # B+ X* N; K' R; ?% B& M
    Cell[BoxData[+ G% y3 j' v4 k& C# y7 r8 d+ Z
    RowBox[{"{",
    3 M7 u9 F) {- ]5 G6 Y- O3 X  RowBox[{
    0 w* q: p. N" t, S% F, x  "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",", # e: f# Z$ d0 C1 |1 \! [$ w: q; ?
       "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",", 4 @. p( b- v5 M+ d5 h
       "0.494866`"}], "}"}]], "Output",
    , `7 j' a  Q  a1 P" f7 R  a# _# J CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,
    5 d4 V% ?) u. o2 s   3.5779608373044868`*^9, 3.578012227359375*^9}]
    : R% h7 A. P) z}, Open  ]],
    , ~! Y. I, B3 `9 m
    % J& ?1 `' ^+ ]' C0 q4 QCell[CellGroupData[{
    " V  i5 y# j5 D) _6 M* O9 x, Y1 E) N
    Cell[BoxData[7 k$ ^; I& R  O& |4 W! ?
    RowBox[{"u6", "=",
    9 z0 B0 |; K) L2 l' F  RowBox[{9 T- v: v9 _% r" W' G
       RowBox[{"Exp", "[", & H$ K' S$ K* K2 x  X  K; J6 s
        RowBox[{
    $ t, [0 o- o& ^8 J  M* w     RowBox[{4 p' l$ R: g2 h7 |
          RowBox[{"-", ! b% t- z% D2 F
           RowBox[{/ ]3 b/ U6 b7 C( d
            RowBox[{"(", 4 W" S( J0 p. ~2 T* O; X
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 6 L% G- F- G3 R6 q9 {  S
            RowBox[{"(", ' H- {7 i4 n/ y9 L- C! r
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    4 Y* [6 V4 p5 l/ Y" {& N     "]"}], "/.", "DeltaX"}]}]], "Input",
    ! m  O2 t8 |5 L+ h CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],0 u( p3 a+ v3 b- F$ `
    - s% }  f: h" f* ^3 }
    Cell[BoxData[6 I/ @! X- d, A
    SuperscriptBox["\[ExponentialE]", 5 `" B7 G) p' z$ Y
      RowBox[{"3.141592653589793`", " ", % a2 O- N# k1 R2 M7 P& E( V+ W* `
       RowBox[{"(",
    - _) E8 c& Q/ k6 I    RowBox[{, y8 W. H$ \" \/ D9 |) k
         RowBox[{"-",
    - d" T& P" N0 G8 u' f* V      SuperscriptBox[
    8 v" c6 Y! s4 \. ~9 i       RowBox[{"(",
    . a" ^. n& L7 G$ l        RowBox[{
    ' ^' t  T/ q: E9 F         RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ) c% c% l$ X5 X5 _3 j) e* A7 o2 w     SuperscriptBox[
    4 \5 a# J2 g1 ?  }0 O! k      RowBox[{"(",
    : h8 X8 v0 N. X2 i! ^) z       RowBox[{
    / H7 ]+ x& g% c& s        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-",
    - i9 M% S2 v* K% ?     SuperscriptBox[
    ; T( l. X( l0 Q& e2 b      RowBox[{"(",
    ; h; q4 P2 x3 a7 y3 E6 @' ]9 ~       RowBox[{
    ' j1 d& z% ~& ^8 |+ d- V, @! E        RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    ; o# u, w1 T& e1 q     SuperscriptBox[
    $ l4 b$ T+ C8 t3 W/ l8 s5 s      RowBox[{"(",
    2 K) S; {' J7 ]" @9 K" @       RowBox[{0 f8 c) ^% ^% r* {
            RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-", # m. z+ ]  d* |2 x- ^
         SuperscriptBox[
    # ]% J/ D2 h% I4 ?      RowBox[{"(", + f5 V8 E7 K. X. o, q' G
           RowBox[{/ G2 j& Q  x7 o5 ]1 ]0 v) a
            RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-",
    & {3 N& j1 U8 e; Z5 l7 h* C     SuperscriptBox[' R8 S* b) H! b$ _1 j  N; Z
          RowBox[{"(",
    2 J2 M5 Y: Y6 D       RowBox[{
    + \% ^2 K- K, F        RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    8 m6 y: I+ H  @8 I' X+ I3 @     SuperscriptBox[
    " \: e4 T' D4 k' g  x      RowBox[{"(", , u4 i1 K; ^1 y, I
           RowBox[{
      D3 J# L% F* a8 E        RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",
    8 Q6 [* J# P1 s3 H) h* Y     SuperscriptBox[$ w* ]% X  }, b2 u% i) \
          RowBox[{"(",
    + v( S* @* {3 @       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 6 Y- @8 F- ]3 c9 \( \, [! c, Z
         SuperscriptBox[
    . Y. c! K( a2 [4 `      RowBox[{"(",
    * o) ^4 e, [4 o6 r9 ]) L1 J1 Q       RowBox[{
    4 y; G: ]6 a7 {& ?        RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], 1 p) Y, Z% D# l3 v, e5 W
        ")"}]}]]], "Output",* q3 m4 z* a. d8 t2 L5 c7 \
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, + y8 c3 c1 l! t) I3 |* v5 y
      3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]; ?' ^/ w3 h2 d2 S% J3 o4 F7 m
    }, Open  ]],0 H! {2 ]. |9 ~4 W2 r
    / c, u$ }% A/ o1 w
    Cell[CellGroupData[{
    1 k9 f; ]3 U8 V5 k) S/ e4 ^* l9 M
    Cell[BoxData[- Y- R9 @, A: [! V2 F1 u! I- y* N1 p
    RowBox[{"C7", "=", "Ca"}]], "Input",2 m. J2 J9 l0 N+ ^
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, 3 A  D1 v$ z8 Y# k% o
      3.577921316125*^9}],
    3 x/ ^3 S: p8 s, D4 L3 V( s
    # f: {1 E0 f& `9 c/ {0 BCell[BoxData[; p" E! T* k; _) U, \
    RowBox[{"{", 1 q1 t' O7 |, W- [1 d  t8 U' n
      RowBox[{) v- x7 H- g$ c: N6 G( J+ E2 F
      "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",", 7 f$ b. T: g9 H: p0 D
       "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}],
    / m; a- T6 r: Q  "}"}]], "Output",; I; E( T3 D7 f1 m( t% p7 V! m  k
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, 3 w9 [- J6 S6 C! V& [, V9 X
      3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]4 S; R9 C& `6 l# E9 A+ e
    }, Open  ]],
    6 a, |7 a- @3 o! r" I
      q- y# x/ n" L5 r+ E+ eCell[CellGroupData[{
    1 R* B3 S- R3 ~- a4 ?! F6 B: H9 b
    Cell[BoxData[
      R# {8 r7 A- K3 s$ d RowBox[{"u7", "=",
    , B# G+ N; ^8 ?: w8 N* G  RowBox[{% A; C# p% Z. S# I9 j; X
       RowBox[{"Exp", "[",
    9 \) _* V' K  ^+ p' o    RowBox[{# I7 a: t/ F1 m% j# v
         RowBox[{' I( H7 Q) O1 ^
          RowBox[{"-",
    . ?& F) ]. D) `       RowBox[{
    8 P8 C  [9 A- n: G8 X' {6 C        RowBox[{"(", ( n  H( b! z' ], `/ `0 e' F
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ! Y* d3 }6 {2 d& E2 G; W8 O" {( x        RowBox[{"(",
    + M/ Q8 i7 T- H! _4 i$ ~2 T1 Z         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],- G, m/ q; @9 n+ v$ O$ V' ?
         "]"}], "/.", "DeltaX"}]}]], "Input",
    : c+ b  y: |5 s$ t9 j5 E6 D# h6 F CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, & w" B- f* m' P" W, s) o. y) o
      3.57792132028125*^9}],
    ( B# C7 ^3 Z2 J" m% w
    ( ]( K+ V' X7 B' G* l+ gCell[BoxData[9 V# p% R2 F5 D% o
    SuperscriptBox["\[ExponentialE]", 6 V( O. ?6 O  S% u# S
      RowBox[{"3.141592653589793`", " ", 7 h* ^2 a4 w( l4 P6 x
       RowBox[{"(",
    + ?1 G2 o; g; d    RowBox[{
    + Q" I, P! t6 K: a     RowBox[{"-", # L7 A' A  q+ C
          SuperscriptBox[/ E6 o; m! O( O" A  k
           RowBox[{"(",
      t6 v% _' t. a  p! }% _        RowBox[{
    6 r! _& ^; x3 X- I* w' K         RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-",
    0 ^, g* N) Q* Y  K6 ^     SuperscriptBox[
    9 [9 o+ C2 A; Z      RowBox[{"(",
    0 E# Z1 v- |- z+ w/ `! I       RowBox[{  V- x) ]6 c- e7 U1 \
            RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-", 1 z& n0 p, m8 h# Z( n$ Y" T: z; x
         SuperscriptBox[2 g  D4 c( d3 B' c
          RowBox[{"(",
    " ?% `2 R3 n# r) |       RowBox[{
    6 d8 S; M# B" e# i6 k* W        RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    - O; k* h! j  o! X# T0 l     SuperscriptBox[
    ) I" o; s: I2 M7 K      RowBox[{"(", 4 q6 q" L" |. m, z. e+ g6 e; _) v
           RowBox[{
    $ Q! s, r9 m8 `* I# f        RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-", + Y  B5 ^! `9 e5 V; X) Q  ~
         SuperscriptBox[
    ( o  W! G% A) b      RowBox[{"(",
    ; Z& [+ W: d2 W  M- j2 E- P       RowBox[{
    ; G  t+ M; o7 t6 `2 B. Z        RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-", . H  l6 V% r- ~  D& q% A  {
         SuperscriptBox[
    ) K0 C" [# O" h      RowBox[{"(", ( d+ e' J0 R; x* o6 B: W% d
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    : D+ Q5 v# J: i' O' J& b4 w1 |- g     SuperscriptBox[# O8 r+ P4 v" B. e4 N) V, V; U
          RowBox[{"(",
    : R) v1 V6 E! V' [. y, ]       RowBox[{
    ( ?$ X% B+ B9 f5 V4 X        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    0 D/ S& L2 m8 U/ ~     SuperscriptBox[4 o/ L0 u8 g2 m5 {7 P+ O, b% o
          RowBox[{"(", + d; H! t5 o% n
           RowBox[{
    ! b5 @5 o8 h  n6 j, x        RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    - f. B( Q0 F& M4 q- D     SuperscriptBox[+ a: N8 j0 d4 _& ~
          RowBox[{"(", % r# ~. B: `) x/ b
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ' _0 |% x! q, m! n1 t7 {
        ")"}]}]]], "Output",; h7 ^1 h4 w: \& s4 R9 ]
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    / R  x2 v3 x7 I" h8 g, o  3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9, " j% q0 P: U* Z$ x# R' Z8 q
      3.578012251359375*^9}]6 M# c, l, S: ~, g* h
    }, Open  ]],
    - n2 X5 [/ a7 X# k6 D7 p. a5 a8 C2 X% m! p% l
    Cell[CellGroupData[{" o4 Q1 t: u3 s( _1 B
    ( {- L, H' W: ^. k2 W
    Cell[BoxData[3 q/ ]2 {. y5 B( a! \9 y
    RowBox[{"C8", "=", "Ca"}]], "Input",  G: ^0 u& _2 K
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, ( H2 Q1 d+ w3 P' m# a
      3.577921316125*^9, 3.57792141421875*^9}]," w4 f( B% W! q) r

    0 \0 r* B7 A% P3 `$ g8 f, t# ICell[BoxData[; f4 s$ [4 v' k) N5 l+ `* |) c
    RowBox[{"{", 2 [! }9 a. B2 G
      RowBox[{. a* j' \( l; _+ T. {" I# s
      "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",", : i, M: K3 r5 B, H/ e3 S
       "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}],
      q+ F9 C8 W" A; S% b- v  "}"}]], "Output",) P( ~- Q2 t7 Y
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, $ W9 q0 h* [! X
      3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9,   z6 Z9 W' J. }4 V: O
      3.578012260515625*^9}]4 c  @5 n) i6 y/ k4 Z
    }, Open  ]],. ?+ s+ Z% F5 p& f" D
    2 A4 m' [6 X0 h
    Cell[CellGroupData[{' d7 h& Y: q$ w
    / V/ g# X9 P8 X. P( p: o) _, n) C
    Cell[BoxData[1 v) _6 Z. v$ [! M( R$ o
    RowBox[{"u8", "=",
    ! ?+ y" ?: m' d- R) T, ~; i) P+ h  RowBox[{2 t2 Z1 k% d( L+ _5 \1 h6 B" |
       RowBox[{"Exp", "[",
    ; Z8 T! i' r! t- S/ ~    RowBox[{8 W8 u5 I# N$ J1 `( C3 _
         RowBox[{
    & ]. n6 ?) z5 ^/ Z5 e" T      RowBox[{"-",
    , h) g$ E% U9 s9 _0 Y5 ^       RowBox[{. I1 R4 ?5 e% D: x. `, T3 N, v( k
            RowBox[{"(",
    ) ?3 m6 V, f7 L  t. k         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    0 K( _+ `$ C: i9 J( G" g+ @( x        RowBox[{"(",
    : V  H, h% G' {0 l. G         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    , ~4 t- a% y1 N     "]"}], "/.", "DeltaX"}]}]], "Input",1 o- L8 p9 |+ }+ T2 x$ f$ A& t
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, . n9 l3 r: J% C2 _, V& F
      3.57792132028125*^9, 3.577921416921875*^9}],
    . Q8 U- O% K4 M/ ~) j$ g- G) D/ a
    9 F6 T2 }! C) c( ICell[BoxData[3 Y# X# T! S/ r/ E) q
    SuperscriptBox["\[ExponentialE]", ) w+ C' ^: S; D: A1 P2 f
      RowBox[{"3.141592653589793`", " ",
    0 l5 h2 n7 g5 v" u0 K   RowBox[{"(",
    8 z) f/ h8 _0 c1 x6 B- ]1 S: e+ S    RowBox[{7 V! w2 B: T) v0 e
         RowBox[{"-",
    ! }( n% S: E8 c7 _+ ^# A0 ~1 s      SuperscriptBox[
    % n- D4 ^- K: C5 h% t       RowBox[{"(",   H+ g9 ]0 U0 `( s9 t- G7 y4 i
            RowBox[{  R: B) H5 O- k
             RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ' r) P8 N. D, o' q% {     SuperscriptBox[
      x7 i; V; h+ b' _! A      RowBox[{"(", $ K' H" N# I+ u8 @
           RowBox[{
    & F/ `3 R7 f9 c) W        RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-",
    , I% a0 o$ h1 K' b' Z9 d3 _4 b, u     SuperscriptBox[- c1 {  M3 ~. B5 M
          RowBox[{"(",
    2 K4 F4 W- e/ u! B( A0 E3 Y       RowBox[{
    / x1 m5 a% L" |        RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
    0 N2 Q$ E% C# H, N9 A/ n5 `     SuperscriptBox[
    ! Y# n# Q& e$ t; h0 ]      RowBox[{"(",
    3 V* K: ]. F: f2 ~- O       RowBox[{! r( X2 Y: B( U" o( ]
            RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-", & N* N) D5 H$ ^6 M
         SuperscriptBox[
    . S* ~# @* [0 w/ i: E8 M3 i      RowBox[{"(", ; N# J) E$ B/ n" `1 R& ^+ r" ?
           RowBox[{
    2 a7 L! Y3 W" w8 P        RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-",
    % ^& z  }  e2 j, A+ Y1 G) t4 V     SuperscriptBox[, }9 G+ Y$ c& X: h& A
          RowBox[{"(", ) C1 X. P5 `2 c. q4 H
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", + I$ O6 H% h# M' A
         SuperscriptBox[
    0 F: o& K" H' v1 }      RowBox[{"(", % }% G) K* P+ K* ~
           RowBox[{5 m% J$ J$ ^/ N4 }" g: O
            RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    ! Z" v$ w2 u6 X0 u. g     SuperscriptBox[) M) j- m7 y7 ~" E$ @1 @
          RowBox[{"(", 7 T2 H$ W; s( E' @
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    7 a9 Q4 |' r# K% G* Y8 K1 ~     SuperscriptBox[
    % l; ]( U, ~1 A1 a8 |      RowBox[{"(",
    5 k1 p3 |+ Y2 [3 A  |       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ) j& j5 a  E% @# `6 v% R% I
        ")"}]}]]], "Output",
    ' Y; T0 ], N- B, h# } CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    - I# n3 M% h# O9 ]% f7 R0 O% b  [  3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9, & g( \1 i8 R! W! W" B
      3.5779608945565863`*^9, 3.57801226165625*^9}]
      s6 H- n  U/ S3 S$ g$ j0 j}, Open  ]],3 ~$ U  U+ B2 X6 u  y
    3 b/ ^2 L" V7 P+ t" L
    Cell[CellGroupData[{
    5 T* S( [& `$ B) x  I+ R  k# r
    4 d% a4 D# A. q/ B5 l# [Cell[BoxData[
    : I3 F8 s! S0 P, Y4 Z9 h RowBox[{"C9", "=", "Ca"}]], "Input",
    + ~5 `" c2 o$ Y2 J CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    : H3 G5 P+ ~1 C: s# N- r  b; S  3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],
    : f# ]) E! F! V& C
    9 r; e# f, d6 sCell[BoxData[' K6 A/ H7 x4 A" p- l4 ?
    RowBox[{"{",
    0 M2 X( U' z2 \, M" y7 k5 N  RowBox[{
    5 @* A+ R3 s7 B: i$ v  W2 x# A7 r  "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", $ o6 P) P, V% e
       "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}],
    0 Z$ M9 q* @( u. b6 a  "}"}]], "Output",
    6 n$ s# _* E% ~ CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, 1 n2 G4 v" t' d0 E$ h% @# E
      3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9,
    ) `- @4 o9 `% f/ Y4 a: m* B+ z  3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9, 6 b6 V8 C1 [+ p/ _' l& o
      3.578012268234375*^9}]
    " y( G% e( s5 c( U}, Open  ]],. {2 O, J8 f+ ~6 M" w+ j- w

    . J& j6 {: s; T& d' q" sCell[CellGroupData[{' v8 t& q# H% r2 v

    0 k. u* s: K, k7 S& y: zCell[BoxData[; V1 V; n9 g1 J  r6 D
    RowBox[{"u9", "=",
    * I, h, j5 W, h7 n% I. E  RowBox[{0 v* f; [% E( L7 a
       RowBox[{"Exp", "[", 8 v* w3 |: ]3 }. r+ v! e" W
        RowBox[{
    8 Z# N, n  v& s" ~3 K6 j     RowBox[{
    - L' A5 `& p5 M+ [      RowBox[{"-", 9 q( V5 D+ P* f$ Z/ }' w  ?7 i9 B* W0 k
           RowBox[{: F- [" l2 W* ?
            RowBox[{"(",
    3 O. K! K* ^7 _5 Y         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 2 @9 ]( O" a, B$ K( r) z
            RowBox[{"(",
    + E8 V- a/ f. @. L: ?, a! j8 o         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    : A+ p* f. v7 g! V7 C4 z6 b5 G     "]"}], "/.", "DeltaX"}]}]], "Input",
    % G* Y& F8 w6 u( @ CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    " N/ p/ w3 z- T0 m$ E  3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],
    # ]; }* v" X- A7 ~# M! @( m, Z1 u$ k1 _) Y! e+ k) L
    Cell[BoxData[3 f2 }) J4 z8 j( L* _6 v! m; Q
    SuperscriptBox["\[ExponentialE]", 2 T. h1 ?! R. q
      RowBox[{"3.141592653589793`", " ", % S( Z1 {! \! j3 R2 C4 b0 @& |
       RowBox[{"(",
    4 z: a/ L' t5 d: I" v6 N0 d& J    RowBox[{
    2 ]& M* o* n; n3 f9 P6 O5 n; h5 ^     RowBox[{"-",
    7 t* J7 J+ x0 F& B& J& X      SuperscriptBox[; l2 l* f! X' Z) n' H
           RowBox[{"(", 7 ~1 D/ R* A; q+ U
            RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-", : v, o9 b- p2 J9 Q4 C4 h' g
         SuperscriptBox[9 ]1 c# h, c/ a5 A8 a/ |  Q
          RowBox[{"(", 4 r6 Z; z- q. m3 o# n% T; G8 ~
           RowBox[{: a; M) r% W0 w
            RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-", , l; Y/ w) p' e8 p4 P2 M
         SuperscriptBox[
    4 R; F- C! Z& T$ D2 V/ B      RowBox[{"(", + r& G& k" Z$ w  D
           RowBox[{+ ^3 {8 r0 G2 {
            RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", 4 R3 }& ^* f9 y( R. S: x: s  g* w
         SuperscriptBox[
    3 d% Q$ y2 d2 m( P& u7 Z- k      RowBox[{"(",
    ' ?3 u( M% B; B- q& ~       RowBox[{
    % w1 d( G: p# m( E3 r/ z/ }$ ]        RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-",
      m. R9 r% ~* I) k1 p     SuperscriptBox[: U* o& ~/ A) K+ ]! R7 y5 r2 O3 \
          RowBox[{"(",
    & d2 y* E: t$ L; m       RowBox[{
    $ ]" W8 `% k$ T: }' ^) R& C        RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    / Q$ ^- B, Z/ F/ g) r  W" \     SuperscriptBox[! `/ G! W7 W9 e3 O% p7 `( ^
          RowBox[{"(", 9 H8 Z8 r& e4 q3 x+ v
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    9 Z, K9 Q# Q. m3 X/ a7 g     SuperscriptBox[
    " p! D! O3 x; B& T      RowBox[{"(",
    + R( q$ S- o( `( d- q       RowBox[{0 j7 F* R( x: y
            RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    $ n4 `$ Q) A' ]! R  q     SuperscriptBox[3 q, l" N! g2 Q* Q! ?0 f
          RowBox[{"(", - c  w# n: l2 c/ R$ `; s- r3 v
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 8 i& v& Q8 h4 o- }
         SuperscriptBox[
    ) ]8 _2 U) Y' |5 _6 g3 A      RowBox[{"(", - {) i9 q5 M6 u* b# u9 E
           RowBox[{
    & |' T' M1 R) B9 [' k  r( ^        RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ! ~/ l* ^$ k6 e2 D$ K: c
        ")"}]}]]], "Output",
    % m, {% @( M) |2 S CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    9 V1 n: u4 m$ a/ b3 `7 _1 j  3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9,
    9 u/ G, j! o- ?7 x- h  3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9,
    7 ]" B. }% B+ P0 Y% }+ s; S  3.577961530421959*^9, 3.578012269125*^9}]
    # O4 W. C& Z" z4 m. t9 X}, Open  ]],
    , g; S/ v. v; b- I/ z. O% ?% x: ]/ Z  C) t/ @3 ?' B) d
    Cell[CellGroupData[{& ~4 C) w2 _) H+ |( H8 u7 _0 b

    / t) G, t0 y; {Cell[BoxData[{2 z  ]2 \' b2 t5 ~3 J
    RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]", / }: j' U1 n9 t" `- i( N( j0 k
    RowBox[{"u10", "=", ( A7 ~5 {  H) l% Z0 g- F# S& N
      RowBox[{
    " n* s' `# y4 }+ \' F   RowBox[{"Exp", "[", 0 [( O; y' u, w, ?4 [
        RowBox[{$ B# D0 X, ?0 o8 H
         RowBox[{
    + g( B3 Y- z9 m8 a) d. d$ S7 D, l      RowBox[{"-",
    9 ]5 c9 |, J/ D- E' |. E       RowBox[{/ z( x" ~- P' [$ i0 q3 x
            RowBox[{"(",
    # j# ]0 r2 l- m" r2 g6 x) m         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    2 [! B# [. u4 t# \! [        RowBox[{"(",
    ! ^4 R3 ^/ Q% y9 i: x# \3 ~/ ^2 C         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    3 P, `( G; h/ A     "]"}], "/.", "DeltaX"}]}]}], "Input",  }# i. m9 M" r  \
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],
      E$ N) j2 r0 @4 ^+ ~( x* d4 h% j
    2 m! s! n, w! W9 j6 g- _# r" RCell[BoxData[7 c8 ^6 H! n$ j+ o+ n
    RowBox[{"{", 4 S4 H# t3 p. n
      RowBox[{
    1 Y  e0 o' l$ t: q/ w% Q  "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",",
    ! m% w6 E8 _, t, ?6 \+ `/ O' m* B   "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",
    ; D/ C0 t  H9 F% ~  k2 h, x/ a1 s CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],
    ! k7 f+ l. ~. h  T# I* ?/ A$ n& `; U/ Z. W+ e
    Cell[BoxData[& K* ^9 G4 G% S* m+ E2 P# @
    SuperscriptBox["\[ExponentialE]", / p9 ~, s! z2 g+ G( m& _
      RowBox[{"3.141592653589793`", " ",
    7 Y1 F, O* T( l$ B   RowBox[{"(",
    ) f3 F- ]& _# N+ W) `1 M1 D    RowBox[{
    8 L1 d' D7 m5 F* [6 v6 z0 W5 b     RowBox[{"-",
    , t. v  ?7 {, J$ L  G      SuperscriptBox[) W$ D9 v/ V) p% A& z3 G( a% d
           RowBox[{"(",
    . k4 Z6 D# K, X1 u        RowBox[{
    1 l$ M4 M5 t' R! U- y         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    7 J1 k0 u) r' _/ K: U' L* W     SuperscriptBox[
    3 J* c5 w  w6 t. U      RowBox[{"(", ) a* B5 P: s: s/ _# @- m
           RowBox[{
    $ A% U5 `1 v2 R1 v        RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-", & g% `( V( \4 W
         SuperscriptBox[7 D8 w8 J/ x# }8 m( b; |
          RowBox[{"(",
    $ }0 a; v: H& q! d) X& }+ ?% o, W       RowBox[{
    1 U+ U  \4 j' Z        RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    4 \( ^/ e4 K4 |' }' d     SuperscriptBox[- b  c: f  ?- ^( a# v
          RowBox[{"(", 3 z  n6 z4 P" G" f9 ]
           RowBox[{; o, |: v$ q# X" ?8 ?( R) r
            RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-",
    # f. t) T9 T6 u+ i6 l8 [; e* B1 f     SuperscriptBox[5 _, g8 y; p6 J( n5 J
          RowBox[{"(", $ N9 t( H/ q  @- }
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", 9 w, W. g1 S) ?) d5 P
         SuperscriptBox[
    / M+ E; D" ~( W8 ~, y      RowBox[{"(", 6 i  }1 A( m( y5 Z( F
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 8 w+ ~: ]- u+ S2 V: \
         SuperscriptBox[$ }# m' q& f! M$ [: ]$ E8 \" ^
          RowBox[{"(", ! Y4 a7 K" @' A- p7 V* F9 i
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", / X. T% r6 ?4 J" B
         SuperscriptBox[4 N2 z, T+ Z( d# S
          RowBox[{"(",
    : K) T: @5 D! |4 N, c8 I# i       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ' l' x9 t8 b( H# ?" ~" |( n- D     SuperscriptBox[
    # h- e5 X, R- @+ X6 t3 B      RowBox[{"(", : K0 Q0 Y  T+ E; S4 _
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 9 Z  R. S! Z7 M9 u
        ")"}]}]]], "Output",# q' I4 l+ J2 O' o
    CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]
    ) n' I2 ?, R4 z' l3 i) K* ]! D}, Open  ]],
    : C2 s( f2 G, ]2 b2 ?. ^9 y. k) |$ |" K& s
    Cell[CellGroupData[{
    2 b- m9 T3 B' e. ^6 s5 |1 F/ U
    ( T4 X1 {. I0 q* r" ^Cell[BoxData[{* j( c# ?6 E  ~0 W8 C) g3 N
    RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]", 8 `" V8 O: h0 _/ s$ x
    RowBox[{"u11", "=",
    : T8 O8 m9 _$ v  RowBox[{- X) n  Q/ c3 i& I- Z9 k  b; [
       RowBox[{"Exp", "[", ) A% r1 Y4 H9 R+ h+ _5 W1 S4 x
        RowBox[{6 Q  [9 D  }8 \8 o
         RowBox[{
      `3 s# W/ V) G) W, N$ G      RowBox[{"-",
    6 M$ o) I% q# P+ z7 M  K. K" `       RowBox[{% M5 s# b/ ~9 I! i- L. m* H
            RowBox[{"(", + {# m; i2 w! A5 K  V
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", + B3 l3 `' z& X
            RowBox[{"(", ' u9 L, @. Y! w7 z3 s" ?' B
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}]," z; Z( Q* R; W5 q/ }8 b
         "]"}], "/.", "DeltaX"}]}]}], "Input",& M6 a% T1 b3 h8 U
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    0 x2 t8 V1 v% v- v* u  3.57796154237158*^9, 3.5779615434011817`*^9}}],9 n5 V" Z" a& k' w

    6 ~6 G1 [; q% V% T. _' ^5 X& c, q9 @Cell[BoxData[
    & R4 z. t. ]# X RowBox[{"{",
      g2 Y& `' b" U! X9 V  RowBox[{' P3 R! u# U. E1 i8 k
      "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",",
    4 P8 ], ]: I& Q% l. s  X   "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    8 b2 j( m1 W( a  "}"}]], "Output",
    7 X6 f; n& ^& C$ a CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    ' E* ?& G  M- x2 |) J  3.57801228203125*^9}],$ p/ o! _+ h3 [, Q  ?

    ; L! H8 i6 Z4 Z2 t) H' LCell[BoxData[  C* U: }5 x: x& y" D/ R
    SuperscriptBox["\[ExponentialE]",
    , B4 l. X' G2 }$ q) U6 |  RowBox[{"3.141592653589793`", " ",
    9 p; }) o+ A. R2 k9 R3 ~   RowBox[{"(", + `  j0 v$ |: m/ I
        RowBox[{  H; w+ k! {  O4 Y! O! n1 ~5 E0 m
         RowBox[{"-",
    - I+ w. S' \0 Y' M      SuperscriptBox[
    + p4 r" [9 N" z5 ~( y       RowBox[{"(", ! \9 N# _% U  V, }
            RowBox[{7 |% k, Y6 ~& M7 Q: a0 Q% m0 S
             RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ' h0 ^: X; N, t" z' v1 C: E     SuperscriptBox[6 c9 [8 o$ R+ Y7 l) z5 c2 A
          RowBox[{"(", 4 F/ U% b3 O3 _' y0 Y
           RowBox[{7 a' o/ Q, Q; i  I" {7 \, a) t
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-", ! c  `) J5 L/ {
         SuperscriptBox[9 {9 u1 C% n4 V+ N/ C* [" y
          RowBox[{"(", ; d+ U( A' Y; X2 F# K0 g
           RowBox[{7 a$ B& p6 d" a0 D: l
            RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-", 4 l- r: E- Z2 |+ r
         SuperscriptBox[
    , R; n1 B' Z$ K) R      RowBox[{"(",
    6 o! [7 h  J# e0 X4 ?) \" q       RowBox[{% z5 y9 c2 P: t, @9 {
            RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-", 7 C3 L1 S  t' k+ h) w
         SuperscriptBox[
    9 e$ g! T% i5 K- ^      RowBox[{"(", 0 W$ m; ?- E# C6 s9 D  L
           RowBox[{0 j6 Z/ t' e, x9 H  V2 h
            RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    ) Q4 W1 S( n! D# }9 U% J* V' w     SuperscriptBox[" I6 ^0 |5 O: g0 {' Z  u3 {; V
          RowBox[{"(", # \  ~; e# A- O/ J, @0 p
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 1 V0 y4 ]; w& v; v0 Z3 N5 ~
         SuperscriptBox[# ^7 m+ A! A3 B$ L1 E* S( Z
          RowBox[{"(",
    ' I& G- y) L& M' j" V       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    " ?! Z! h* P2 D     SuperscriptBox[
    0 h  F7 {  r1 u$ ^, p      RowBox[{"(",
    6 D, n' J8 k7 T* U6 V3 J5 O2 J4 ~/ M! ]6 G! {       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", , H# h6 N6 B/ b$ Q
         SuperscriptBox[
    * v3 i- g/ X0 c0 |5 u% Q      RowBox[{"(",
    ! A7 d8 K; r! A$ c% p2 m       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ) d* T0 H; n3 {/ G
        ")"}]}]]], "Output",) l, }  H! i3 `2 y  X' ]  u- d
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    / p9 J% J" [3 E  3.57801228203125*^9}]( h1 I$ z8 ^; }* k( Y
    }, Open  ]],
    9 P8 e2 l8 g& \+ m% z' O  G4 G- `, U+ _1 {+ G1 G" r
    Cell[CellGroupData[{3 e+ C5 y$ ~. l- R5 C; h
    7 R6 t# K5 p. S) U. K  p6 ?
    Cell[BoxData[{
    7 @9 e5 w# U6 W RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]",
    0 h9 u5 N# G# o! {1 K RowBox[{"u12", "=", ! p% \4 y9 O! `+ [$ Q
      RowBox[{" x% H3 r& \  p4 U  @" L
       RowBox[{"Exp", "[",
    ; F  s8 ]& [2 U- t# e7 p" ?    RowBox[{! y+ v; J( w: S" c: G5 O
         RowBox[{3 N' _* ?2 w, x( V
          RowBox[{"-",
    7 E; @9 s4 ~1 C$ \  P7 i       RowBox[{5 v2 o9 R7 T- J  B" a
            RowBox[{"(",
    0 i/ ?6 L9 `8 G& K         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 1 d% `4 t# l& M! f/ E# u
            RowBox[{"(",
    ( h% Y* H2 v+ K) g         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    6 ]& i/ a; A0 E1 N1 u; a. _     "]"}], "/.", "DeltaX"}]}]}], "Input",
    ( N& v6 l" R5 [. A4 U CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    ! q" r/ X- E3 q6 X# x" q/ p; ~  3.57796154237158*^9, 3.5779615576284065`*^9}}],0 P4 t; S8 ~# @$ `
    8 t4 X/ g" z$ s% j' z! [/ o" \
    Cell[BoxData[
    % e+ m) M) n, C4 z- a# C RowBox[{"{", 3 C6 b) f$ b: n' N4 S
      RowBox[{( d" _+ n& M% H2 e9 X
      "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",",
    + A# V5 |; j% R8 {0 k6 v   "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}],
    2 T1 k' @" ?" a1 I/ T0 x  "}"}]], "Output",
    , V$ m0 B1 ]2 n, s# n  G2 D CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}],
    " p  m  M1 B' m: H" s
    ( m; J$ o# ^* w; Q$ B* eCell[BoxData[( [- o! I9 q1 k% M$ m3 z
    SuperscriptBox["\[ExponentialE]",
    + L+ H; {+ v* S. R) _7 D" m3 g  RowBox[{"3.141592653589793`", " ",
    7 m2 y; I5 n" i. \1 q: ^! f0 u   RowBox[{"(", * s. [5 O% I' Z5 t
        RowBox[{
    0 D: ?9 @7 j2 S  \! a1 E' x     RowBox[{"-",
    , r7 W6 L3 p5 v% d$ @1 D6 x      SuperscriptBox[
    * o1 H; b. C6 P       RowBox[{"(",
    ( Q0 ~2 N) W: \- e# z        RowBox[{
    % `+ P7 m. ?1 C% X0 u& q! u7 u         RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-", ' L5 Y% w$ ^' [# O" U+ R
         SuperscriptBox[- _+ A. M, Y- ]$ Z
          RowBox[{"(", : O: `- r. @$ S8 l" N+ f
           RowBox[{
    $ a  }3 e) V3 y7 j8 i" Y        RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-", ) {8 E: `5 L. {
         SuperscriptBox[
    * C, ?. ]0 q8 s  A      RowBox[{"(", 9 s0 S3 y4 e, ]; R: x; e
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-", - J6 e0 ?* u5 N$ E  P
         SuperscriptBox[4 h: L  L. a! O2 J) G
          RowBox[{"(",
    8 X* q2 G  f+ U' n       RowBox[{
    : }7 x3 l5 a! U6 Q1 L" E0 P        RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-", ! {# G# ~( D1 A' [+ T# ^" ?
         SuperscriptBox[$ I3 }, Z" u* W
          RowBox[{"(", $ W* Y  I& N: y
           RowBox[{
    , u4 j5 s/ d% r        RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-",   V# a2 G( m: I; F$ G2 {6 s% h' `
         SuperscriptBox[& U$ H8 \( V% i3 s6 e* `
          RowBox[{"(",
    8 X4 b# |+ H' ]2 w# s       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    " B. m/ J2 v( x+ C$ m2 ^5 g     SuperscriptBox[
    6 o" v4 z/ K& L8 [; E: I& Z; z1 d4 M      RowBox[{"(",
    % t% k  C6 h$ B       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    4 _9 h7 B) K8 u& W) f7 Y     SuperscriptBox[
    ! ]# o/ l* F3 n3 ^" r' p- M      RowBox[{"(",
    8 V$ V% j( I/ B9 S# l       RowBox[{0 G6 e0 [. `( z
            RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", 1 O7 a, g0 o* D4 e/ {3 M4 _
         SuperscriptBox[( F6 p5 W0 J* {
          RowBox[{"(",
    * b3 A' @, Z- L3 q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 7 o9 v9 G$ B8 A0 i2 ]2 p/ D& y% O
        ")"}]}]]], "Output",- I; U3 A: K6 J% i
    CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]5 Y$ Y! }" ?  L5 H! H+ J7 S
    }, Open  ]],
      i+ ?7 Z8 n2 R, o# J& _# ~- I5 U2 r6 Q6 K* z0 t
    Cell[CellGroupData[{, _& a* S7 @3 P, T
    : v$ {0 `2 }2 _# M% C9 D
    Cell[BoxData[{% \: M" e) f8 _  d  w
    RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]", 1 p% n! v+ r& C8 ]; i/ H' c& p
    RowBox[{"u13", "=",
    # n6 B- {3 c! f2 M% a! g! J0 o  RowBox[{
    " P8 x" W; l5 L   RowBox[{"Exp", "[", ) l% H) B/ G3 a) P; I
        RowBox[{
    " J8 {2 h1 H& \+ O3 t     RowBox[{
    + ]; c& R9 g1 W3 o1 |! E! B! Y8 t' L1 Y# {      RowBox[{"-",
    & n7 `, _, G" V0 n6 e       RowBox[{
    - C; q' g' Y" ?* V8 @' m( s        RowBox[{"(",
    ) ?7 g9 `2 M2 I; J) |7 N. W         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", $ p. d) Q1 r% R% n
            RowBox[{"(",
    : C& H& \* Z& H" N; T1 S         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    , g6 U- g) y7 ^0 z     "]"}], "/.", "DeltaX"}]}]}], "Input",, h6 p. _! }; b  q, b
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    ! \9 S6 B. Y! m: T  3.57796154237158*^9, 3.5779615599684105`*^9}}],* X, c) M( \4 V: s  V& \  |6 o

    * Y! Z3 x8 a! a* E2 e$ NCell[BoxData[, C$ v5 `! s/ a8 ^" A3 d
    RowBox[{"{", 2 L% C- y5 G+ i4 y  ?( D" `1 k
      RowBox[{# P5 D7 X# A+ _4 c$ _, b( T2 L- O+ r
      "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",", * c4 J% c  J/ I2 k0 T7 e
       "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}],
    : P( N* R! K9 `0 r* ]  "}"}]], "Output",
    . O8 D5 b9 m& r) f0 b* e1 D CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],
    * w4 u& M6 d, h# M, Y' L: ~8 \+ o: B" ?9 G6 l% g
    Cell[BoxData[  P6 y6 C. z: q9 f' j4 P3 l
    SuperscriptBox["\[ExponentialE]", 3 ~8 }: P! i( d
      RowBox[{"3.141592653589793`", " ", 6 r& q7 k, F4 F4 U) |. ]. h: v
       RowBox[{"(", % _- E4 k. Y; S; l+ M/ Z
        RowBox[{
    0 w+ F2 I0 {9 `5 Z- Y     RowBox[{"-",
    ) t. }; ?+ [3 ~# b. Z# ]      SuperscriptBox[
    9 a- t, U  D; q" w% I       RowBox[{"(", ' z  m9 L4 S' k& D
            RowBox[{
    . p8 I' Z+ s3 J, U/ O  o, U         RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-", 0 Y& b, |- s  k3 Y  L
         SuperscriptBox[
    " P* ~2 I7 I& W6 L      RowBox[{"(",
    0 K. ?& ]. @. A  ~       RowBox[{
    ! m9 @/ Q2 J/ o' X        RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-",
    - x" [( Y! X9 S+ s2 X     SuperscriptBox[
    / k; C6 \: f* @; ^/ T- s) N& ~      RowBox[{"(",
    1 Q$ a9 {% i0 A9 p: s% i       RowBox[{" _6 T# x* C* T: a5 a9 ]
            RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", . X5 E4 r+ w9 o# J$ v/ S
         SuperscriptBox[
    , E# b2 m2 r- }! U      RowBox[{"(",
    1 \2 x( z2 G5 I2 Y% L7 e       RowBox[{( T" F: n+ t; v, ~  t6 u- A
            RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-", 0 s# s8 K4 w8 T) U( W
         SuperscriptBox[
    4 _4 m) |0 D: S9 z      RowBox[{"(", ) `7 X8 |7 t1 Q3 Q- f  P
           RowBox[{
    4 @4 S8 [9 [1 K; R; A) ~        RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-",
    . ]/ Q+ k. ^( K1 C* K     SuperscriptBox[+ H: n0 ^0 ?! `" h/ V% J" M
          RowBox[{"(",
    2 e  Q% A( v7 b; ]& p       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", $ _: t  }% n& D8 r* c$ r
         SuperscriptBox[1 W# S8 z8 @: D7 J  v; P
          RowBox[{"(", / j5 ^6 K# q7 G$ q! R; a& i: G+ i
           RowBox[{: n! ?! T+ T( A" @! Q, b- i
            RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", 9 G0 _- n  s3 P: |% L' w
         SuperscriptBox[
    ; f7 P/ z- Y: W; ?7 o" u- a      RowBox[{"(", 4 L- l: }5 u8 e8 r
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    $ a9 y% j- X4 s- \; V     SuperscriptBox[' P4 z  w6 A& l% i' c3 }" O+ a% ?
          RowBox[{"(", 3 T  W7 B& q* T8 \# D; B
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], & L  k4 q+ n4 @9 i, V
        ")"}]}]]], "Output",- `( a( N* V# t' c. ]+ {
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]7 g+ T$ e1 h5 `) [! R5 K
    }, Open  ]],2 h4 S0 n6 ?: q9 P

    + t9 u2 S# i0 g% RCell[CellGroupData[{  ^$ Q& D" [( h+ I; i
      t+ v/ \2 Q; n: V
    Cell[BoxData[{- E7 V9 p3 `6 O0 L0 ^
    RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]",
    1 \$ F2 Q: R1 e" G RowBox[{"u14", "=",
    : E8 T! M" S! Z( G. A, z0 Q  RowBox[{
    0 V- \1 F* |* T. _) D+ G   RowBox[{"Exp", "[", 5 R9 ?+ Q$ v; X+ q& C4 e0 {; |
        RowBox[{6 K( H- C; L* g8 @
         RowBox[{
    ' A7 k$ D8 C" s# e0 `9 m      RowBox[{"-", 2 [4 o: i# s" b1 ^* F8 M( [
           RowBox[{
    5 q' j# C8 `1 _: _0 ^2 {8 v& w8 M        RowBox[{"(",
    2 N9 a3 K/ j% O! B         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", : {7 \9 X3 P, v4 @6 {. ~
            RowBox[{"(", , e6 }$ I5 E6 ], b; j& e8 U; V
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ F! a/ W6 P6 ^3 N
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    $ t7 t0 R' `1 v3 g# T CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {8 L2 L# H) B* h* }! n# M8 j: x
      3.57796154237158*^9, 3.5779615663176217`*^9}}],
    * x6 o8 T. w  P4 h' m$ @' b1 T$ s/ p
    Cell[BoxData[2 P* u. n6 w1 k
    RowBox[{"{",
    ( L! `7 w4 M% `) F9 G5 a, K" ?* i  RowBox[{' O! i& n) j" u
      "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",", 9 C/ n* u, q. S9 k0 H, \% P8 d7 m& v5 [
       "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 8 ?$ ^8 ~1 l. l& s
      "}"}]], "Output",
      R( g7 t% M7 B6 J2 j) I! w& q; e( C6 r CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],
    2 W+ Q* Z2 @9 c3 `$ P& A% {
    0 t4 |  d: S9 d5 m$ a) x9 k/ WCell[BoxData[
    8 Y' p8 y: x8 B0 l! E0 d& m SuperscriptBox["\[ExponentialE]",
    1 S: y! L6 n. n# t. O  RowBox[{"3.141592653589793`", " ",
    4 M( H- P* @# G& i2 N' M- W1 v   RowBox[{"(",
    4 b/ J  Z9 O( R. c- W2 R6 d# ?    RowBox[{
    ) K* J( Z  |$ i$ e( q& G     RowBox[{"-",
    : M& k8 Z  s+ v7 D5 h      SuperscriptBox[
    1 Z+ Z& C) S8 s7 n/ ]$ `  l       RowBox[{"(", ; S$ `4 N- h2 Q" a4 Z4 \+ R
            RowBox[{
    5 e5 ~2 q# H' E' I6 {; N8 u% A3 y         RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-", + [5 N1 H, A8 G
         SuperscriptBox[' E  K/ `5 g+ \! G, ?
          RowBox[{"(", 2 c/ y0 r; w: N+ R
           RowBox[{
    0 B  \1 Q0 K* S1 B        RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-", 7 C/ M7 a* W: D' y0 S7 \
         SuperscriptBox[
    9 A; `! P, {  b3 G7 i- I' x% I      RowBox[{"(",
    ' O5 a2 p2 c$ G4 |7 A% ?       RowBox[{, X+ _3 c) h7 B
            RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", $ E0 f7 R9 D( F. D* r
         SuperscriptBox[
    + I' f7 R: o( G3 v5 P( X      RowBox[{"(", " O5 O/ X% o. c; J1 y
           RowBox[{
    2 H( z. K) a( _- b! F+ a        RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-", " i8 s8 p' o# G& D# s/ o' I( ?
         SuperscriptBox[! B2 V- \  k" P- ], j( X3 ]5 Z2 j& c
          RowBox[{"(",
    7 G4 X8 B7 N5 V) S1 E       RowBox[{! }) ]& F- y  v3 }! Q" E
            RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-", ) R$ \4 E% {# G% e# J. @
         SuperscriptBox[; s3 b7 }- q$ f, p( Y% w% X9 n
          RowBox[{"(", 7 \& f: i1 V! x
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 6 p# n: l; u" U  ?
         SuperscriptBox[
    6 r% ^7 ?  H% m      RowBox[{"(", * b% K  C. u9 W# ~5 F
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 6 r! {. i1 ]# Z: x% I! {' \
         SuperscriptBox[8 O( |' I. K2 t0 w- m
          RowBox[{"(", ; R& z  r6 W8 H( P  u% K8 q
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ' O; a  q/ s* }$ c- s7 G
         SuperscriptBox[* g* a$ y5 i0 y4 ]. r
          RowBox[{"(",   p0 E/ S# E8 O+ }  A# O) t  G
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 4 i) E  P# m* L# B- V
        ")"}]}]]], "Output",9 y3 V5 H, r9 k4 }# }: F1 y
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]* f) z- E* k6 M6 x6 y8 E
    }, Open  ]],
    " K/ {. A4 k4 f0 V/ `! P7 ~. q& u- N- A
    : p5 w, u/ v! O- B# g" b) E2 B& xCell[CellGroupData[{
    , z+ Y3 r1 R0 y+ ]
    - Z, u) `7 y' T4 P  gCell[BoxData[{' [4 R1 W6 a7 c2 S5 e, \+ a( g
    RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]",
    5 K% b: ~7 e  w% K RowBox[{"u15", "=",
    ; n! p# h/ |2 n( d9 e  RowBox[{, w( p( c# U; ^4 _2 Y5 F! M
       RowBox[{"Exp", "[",
    , R/ v4 Y8 R0 y; F* O& L, g5 P; t    RowBox[{
    . c0 ~) P; U8 n$ U! \     RowBox[{7 E- b! x& s- M# H7 f
          RowBox[{"-",
    1 @6 U1 D' i$ U1 n# a& _. S       RowBox[{0 ~! T, \- c3 _
            RowBox[{"(", 6 e$ K; x- J- k2 p2 z  d4 q2 ?
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 5 i7 l2 K6 ~% a$ b6 x  k
            RowBox[{"(",
    ! R6 Q) R+ R7 x; ^: [1 S% g7 _         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    & @3 T% x8 [, J; Y) o. Z     "]"}], "/.", "DeltaX"}]}]}], "Input"," W7 [' \- T. C" j7 y3 E
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    0 g2 {! p. r: I. |0 S! r( D  3.57796154237158*^9, 3.57796157098203*^9}}],  T! q- U& r8 e" U

    # ?" A. S. a, t- RCell[BoxData[0 E( \0 x% {( l; Q( M
    RowBox[{"{",
    6 S. T# o1 l( K! [& u4 L  S  RowBox[{& A' T0 T, J2 K7 {& J( N; u
      "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
    6 m/ k5 m: c& V! ~. S   "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],
    + S. u% A5 P1 k$ t2 b5 h  "}"}]], "Output",
    ; B/ N6 ?) y" K& F( u! P CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],
    3 s7 x& @$ b( k2 V
    2 k5 {, L9 l; D) N. fCell[BoxData[
    % b' L! s  s- I9 h3 L" T! r6 u SuperscriptBox["\[ExponentialE]", * r' h( L/ `# G5 @" J
      RowBox[{"3.141592653589793`", " ", 4 d& K! P) s0 Z; J. e
       RowBox[{"(",
    # r5 ~' f# _: ?- a" h, l    RowBox[{4 C# J1 c) n4 T" V2 Q
         RowBox[{"-", 6 T% i2 \; v0 O3 @/ x5 ?7 z. J- b% x, p# x
          SuperscriptBox[0 m. x$ z  J: Y% u: s0 Q5 y3 `- c
           RowBox[{"(", 7 A+ l* p) n8 l3 z9 P8 s
            RowBox[{
    6 _* ^2 M& U# Y! V6 w2 x2 `         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    - t* d& q& ^: u! _3 I# c( z7 {; o     SuperscriptBox[
    4 U/ U; @* a4 N( \      RowBox[{"(",
    9 R! A( x* e% Q9 u+ p6 q9 K       RowBox[{2 n3 B6 k$ d- c: H
            RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-",
    0 R! _- o, j9 D; \     SuperscriptBox[
    1 I+ g& o8 w: R      RowBox[{"(",
    - l. {" }3 u* r) C: G+ n       RowBox[{
    & H0 m" E, |; r7 F; U6 h0 A        RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    1 f0 t" x( L3 D8 i9 }: n8 s, M     SuperscriptBox[
    0 L: G4 Q1 x! ~+ y      RowBox[{"(",
    * [0 b: C' E, }" X9 E       RowBox[{
    3 M  S8 B$ S  l, \: O- X9 \- p, ]0 ]* \        RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-",
    . Y: G" H6 ^' R: t' Y     SuperscriptBox[( v7 Q, [' b6 J! U
          RowBox[{"(",
    + U" T$ T! J8 O       RowBox[{7 }: P& S! Z6 F( a; M9 ^1 W3 Z: E
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", % {2 d& N* K; H! G& t
         SuperscriptBox[
    5 ^1 C5 m3 u6 q      RowBox[{"(",
    4 P. O' k3 h, [+ q  Q       RowBox[{$ f# e; F4 M' k2 ]! P+ E
            RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
    9 n1 L6 f7 n2 ^) p" u* Z4 I     SuperscriptBox[$ H' {* ~. m5 L$ m% y3 V
          RowBox[{"(",
    % n0 V+ `# C5 H2 x       RowBox[{. R% b0 V0 k0 X2 V- |$ W% x4 G5 A
            RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
    9 j% ?; w" c5 r& M+ I- w; V     SuperscriptBox[& q* d# q1 O) m/ a! H
          RowBox[{"(", 7 N. D( V, w  b7 A' {( \7 L
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", $ V& k2 e( S4 {/ N. ~6 v0 \  Q4 q" O
         SuperscriptBox[
    " X; Q' U% E) H/ J# c% g* ~( K9 d# M      RowBox[{"(",
    0 E9 E$ _  C( M) J       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    - h0 S) k! n4 V7 i! k5 Y* ^2 h' |    ")"}]}]]], "Output",
    # i9 q; {' P2 A- I CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]
    4 O3 e: r" C$ Z0 i8 i! o}, Open  ]],2 C, i7 @) `9 S+ f" W0 i$ u* z

    % W" d( X0 T/ ~1 z$ X% g; lCell[BoxData[4 `) H; P: f) v5 K
    RowBox[{"For", "[",
    " b8 x! M, x# E  RowBox[{; }4 F" L! V% Z* m$ k+ D# ?3 Y) n6 q
       RowBox[{"i", "=", "1"}], ",", . z2 s" _! a; e6 e& V
       RowBox[{"i", "\[LessEqual]", "9"}], ",", ' t- k7 \/ W* |( w1 F" O' E' P0 e
       RowBox[{"i", "++"}], ",",
    1 A9 {/ I1 B9 W' \& w% i, l   RowBox[{
    ! a7 V9 ]. i9 C- R* q    RowBox[{"Ca", "[", 0 b- @$ O1 s8 W0 c* ~& v( {: E
         RowBox[{"[", "i", "]"}], "]"}], "=",   G/ v2 s8 |2 m0 u7 }
        RowBox[{"CM", "[",
    % E: c# X  ]/ E% K     RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",
    6 e& z' Q( Y( p9 Z% w CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],
    1 B9 J6 Z6 S) o) }
    ! O5 I; M# \# [  X+ ?Cell[CellGroupData[{
    - l" s9 S0 J' ~! x2 Z) c+ ~9 L* ?- E$ y. y  ^
    Cell[BoxData[{
    " V, ~; @+ j7 o% n RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]",
      I- R  `$ Q$ r+ M( W( j( w RowBox[{"u16", "=", " }- |) R: `$ d9 }
      RowBox[{
    1 i" z* L9 q2 ?4 V   RowBox[{"Exp", "[",
    ) \# A, J! D7 ^9 n' K, M+ H    RowBox[{, y! O- J  k: z" X4 b* `" o
         RowBox[{; e  O4 u& V! f: {  A8 ]
          RowBox[{"-",
    " N9 J7 [6 t* a6 h1 X2 |* A0 `       RowBox[{
    # @7 T) H" ]( [$ M& \4 I7 I        RowBox[{"(", 5 G! B1 X' U6 M! C1 ]5 s2 H
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    : [4 E) P; a0 b        RowBox[{"(",
    # D7 C. E4 ^* t) X5 i' \         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    / ^* L; a' }' z* F' C     "]"}], "/.", "DeltaX"}]}]}], "Input",- C- I7 Q7 E' |4 I0 C1 H# }$ \
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {& @# D* j1 c# e( G
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9, ' s3 H9 [2 V' S- Q
      3.5779615751004367`*^9}}],
    2 l0 D( M) n4 N; x. I) K$ b' c6 X
    7 f( y6 R: C( x0 d1 TCell[BoxData[
    ; g" ~" K- o4 P' i6 t& W RowBox[{"{", , H) ~8 M' ?, v1 L  A# a' B
      RowBox[{
    3 s) ?6 @9 C2 ~/ M: X8 L! y  "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",",
    - I( I" |8 G: T- W" ^4 t   "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], " Y) U! j1 i( n/ G) Y2 ~
      "}"}]], "Output",
    + a. V  w; t$ w: J. @ CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],
    $ T2 `( m$ }6 |6 N( z8 h5 i( P( ~4 ~: }) P) e  I% ^1 D
    Cell[BoxData[0 u/ J0 ?  L: f1 e" d) V, i
    SuperscriptBox["\[ExponentialE]",
      J  S9 |- Y4 U9 }  RowBox[{"3.141592653589793`", " ",
    9 O- |- C- n1 w( H3 X' D7 H& u; G9 y   RowBox[{"(", 3 w: k/ h7 v' b2 o
        RowBox[{
    ' u5 i, t' v; \, G1 V# L( ~     RowBox[{"-",
    : c8 ?/ `6 ?* r# f1 b/ t- ^      SuperscriptBox[. V7 N' `4 T& _9 I2 Q" q
           RowBox[{"(",
    ( I" F3 t; G5 y1 @0 v* Y- \        RowBox[{; J! ~8 u" f. L6 j' [! d* j( R
             RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-", - `' a8 V2 O+ V+ ?, f7 c
         SuperscriptBox[8 ^2 P- E$ K- _! f
          RowBox[{"(",
    , G) p. z: u; q! R5 r       RowBox[{* `+ Y6 t& t8 _1 P
            RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-",
    4 s; @0 K4 C9 x( E: F( a     SuperscriptBox[
    # Y  s5 ?; m6 ?      RowBox[{"(",
    ! H# v2 R  O* m( N+ [; i" k( [       RowBox[{
    9 f4 a3 Z5 G6 I( h        RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", ( Q, E- a4 r" X% J( m" ^: T
         SuperscriptBox[
    " G. x% Q# Q5 I/ J0 w' O- Q      RowBox[{"(",
    * s* p# N8 ^* f1 z. [       RowBox[{
    9 [# V  p' K; T/ S        RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-", . o5 q* Z9 N" U% z9 c1 S% Y
         SuperscriptBox[
    6 X$ Z9 d; f0 P: b      RowBox[{"(", & b9 i; B: L5 ^! E8 G# n% K) M
           RowBox[{# E3 t. f9 e0 b& J3 J- o# U
            RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-", 9 T( C1 v+ {. Q8 h6 q6 j
         SuperscriptBox[- ~- F( |; X7 x( E: l$ a* e
          RowBox[{"(",
    ' l' A5 _4 ]1 G) n       RowBox[{0 o$ N" L$ W0 K
            RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", * w# _4 a; t, }# V6 H
         SuperscriptBox[
    3 Y9 r. |8 W: T6 T! D      RowBox[{"(",
    6 L/ V/ v) [1 ]1 N* X       RowBox[{- i, U( H/ ^2 h0 f
            RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", 6 x  W) Q+ M# W* }7 B
         SuperscriptBox[1 R" i* u3 [( C' J: ^
          RowBox[{"(",
    + D( N* O7 Z  X* T' c  r       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ' N% x3 s; b! L4 N9 @
         SuperscriptBox[4 `$ k; @, e7 _8 F5 q1 F7 V7 Q
          RowBox[{"(",
    : Q) K" M# d- K       RowBox[{, i8 q: @- Q. y( X" T1 ]: @: `
            RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",
    . }3 E2 I/ g; F2 F& h3 g CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    % r* ]4 ~. T% L. W  X6 G) l}, Open  ]],. c( Q4 _8 _! Q, c& b* k' u1 `2 b, w

    4 k4 S) z% [. g6 Y* a3 r5 XCell[CellGroupData[{, u. \, Q& R8 I: u2 x
    9 t: \6 q1 c& P5 B/ \  G
    Cell[BoxData[{
    + K- P, |$ F: B! ^ RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]", + s; t7 n8 }/ Q0 x/ v
    RowBox[{"u17", "=", / a& }% H3 M- W: O8 g& k
      RowBox[{' W$ L4 M/ @! ^( [
       RowBox[{"Exp", "[",
    # F5 i' `# A% T/ Q- K" d    RowBox[{
    7 c% H4 V$ n5 I     RowBox[{/ b5 Q9 @# R5 L2 ~8 |
          RowBox[{"-",
    % o. [) \8 }6 A9 H! H7 ^       RowBox[{) @: T% x. M* I% K6 h$ L: S
            RowBox[{"(",
    : m4 g1 U5 ]" u5 i         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    6 o( L! _5 X8 ?" u7 h' C8 J" m        RowBox[{"(",
    & u1 L, C& Y6 t         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    8 E9 m; T) O' V- ^! S     "]"}], "/.", "DeltaX"}]}]}], "Input",0 {& Y* T. P9 i. w
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    " x" r- h' L, g! m+ C' I  e  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9,
    ; X4 h" l, r$ b0 ]: j/ {1 `  3.577961578953644*^9}}],
    + A. W4 H' B8 {- r% N% i9 l/ T" U0 K  |6 e! j6 j
    Cell[BoxData[
    ! W. e. y0 b0 V3 f# M: Z: _" t RowBox[{"{", : k$ K4 X/ n6 x& p* J- V) c2 c7 D) j
      RowBox[{
    + W7 N5 Y6 M" `! B  "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", % o/ I5 G& \1 e" _7 u$ h, \. q+ S% f
       "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}], + O) u5 l+ r; z- I: q: y' f
      "}"}]], "Output",
    . q) w& e/ m! H  E% w CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],
    * L8 g& a9 w) }3 ^0 p, f$ i8 q! d
    - x* t; q! ^; f) T/ N' p7 X1 ICell[BoxData[
    ) I/ t6 B. K$ X: z5 s. _7 k SuperscriptBox["\[ExponentialE]",
      N/ F2 Q: W1 E# q! Z: g/ X  RowBox[{"3.141592653589793`", " ",
    5 {$ f+ K, }' ?% z  ^   RowBox[{"(", ) Y! Z1 g0 \6 Z' g
        RowBox[{0 l4 B- f' m! S0 f% F
         RowBox[{"-",
    / L) E' A3 `% N. z" }      SuperscriptBox[
    ' J5 Z% R6 E4 c5 H( j' p       RowBox[{"(", , P4 a" E. i( Q* U* w! `
            RowBox[{% Z- _0 z, T2 {
             RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-", 1 |& ^0 L, q) J+ x" g, `3 O
         SuperscriptBox[0 ]( |, C* T# H3 m
          RowBox[{"(",
    * l4 d3 b1 e# p& T* ]' `7 x2 \6 g       RowBox[{2 u0 m0 u2 y" i8 }
            RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-",
    . S/ j' I' }2 n% r- f( S! m' g     SuperscriptBox[: w- |+ f, y. o
          RowBox[{"(", 5 \/ L8 A' D, Z( H
           RowBox[{( q% |# s1 h/ e5 z
            RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", # k/ W* c) {6 Y3 _( Z
         SuperscriptBox[! K7 O& ?9 K' u( n2 A
          RowBox[{"(",
    " V* q" B* U- G; V; M, f       RowBox[{
    ! w* T" [/ [/ T* K9 |" P        RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-",
    , O8 x6 ^" q. s" B. W# S     SuperscriptBox[
    6 ]* z% W: Q( [. V7 }4 r8 N9 u0 O      RowBox[{"(",
    ( `/ v0 b6 o1 h! G7 p! `       RowBox[{
    0 M5 s* I# ?- r9 C/ n        RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", . I" i0 i" b8 o
         SuperscriptBox[" U2 E1 B* R' f5 W0 O
          RowBox[{"(", 7 P6 C  K) j' z3 q& o0 Y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    & O3 |- [% k8 n     SuperscriptBox[
    - d4 F) q& j1 V2 \$ i% e      RowBox[{"(", : c, n- R0 s  Z
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", * w. U/ Y6 }4 v# P( ?" F, z0 u4 S( T
         SuperscriptBox[
    - T; A% I; j, p      RowBox[{"(", $ X8 v; D% u/ V& j! I- s5 L
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 7 u+ J6 N2 O' R  Y
         SuperscriptBox[3 |: E+ w  r" g% r" H) M6 n+ E
          RowBox[{"(",   f6 K& y* g' r0 t; N: k# [9 d
           RowBox[{
    3 F& Q4 K+ d$ z: d        RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ( D, Q$ N7 x; r  h; v; D8 T: @9 h0 f
        ")"}]}]]], "Output",
    1 D( P6 x+ `. U9 r: e4 y+ R( O CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]
    # U6 `1 \2 _  O$ D) I% ~% K% M$ B}, Open  ]],/ D5 ^) x: w3 H. n/ Y/ [# Q
    ) u' S- P4 G3 @+ G& Y& {1 O& L
    Cell[CellGroupData[{
    0 Z0 f# Z" A2 v. J& \% N: V% [" o! R7 n
    Cell[BoxData[{# c. d8 @! @) j# a
    RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]", * S& V4 J2 _  I( c8 ]
    RowBox[{"u18", "=", : p$ }9 U. H2 p( `
      RowBox[{
    4 l- D  `& {7 [4 ~' p   RowBox[{"Exp", "[", 5 g6 R$ U$ d* f
        RowBox[{  n  p' X# J6 Q7 A1 h
         RowBox[{: T6 G; a& O8 i4 v
          RowBox[{"-",
    * a7 [" _1 W+ v, W  V" w       RowBox[{
    % Y3 Q/ `5 O2 \+ [+ s6 B9 _        RowBox[{"(", ) ~) _% J6 Q9 \) e% f
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ; W/ l/ K& \" U! [        RowBox[{"(",
    ( E! P1 c4 ]* F+ J5 i         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    2 _$ J- e" R* Y/ s9 ^     "]"}], "/.", "DeltaX"}]}]}], "Input",
    % a0 X9 m1 i8 p6 V, I CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {" J' i! _  E! _( A3 t
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9, ; d6 ~9 |& F, e' c' k6 I2 ?8 M" I
      3.5779615828848505`*^9}}],
    * p, f: B  }7 u* V. [: G
    $ e5 A( f! E+ _2 H5 h6 ACell[BoxData[
    9 C  r9 [" ]% y: ~! a5 H  s RowBox[{"{",
    2 |  V+ b- q, ^! z+ I. X  RowBox[{
    1 B) ~, Q9 t# f4 c  "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",",
    ' h! Z# T0 t) l5 K5 h& y$ s   "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 1 v3 B( z, R9 x0 o- e8 ~: c
      "}"}]], "Output",
    + @5 O" N# o( T7 {7 s' Y CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],
    ) n: {3 p3 k3 A! D7 _
    + [; }: K2 I  q9 H, y3 P  lCell[BoxData[
    & q' e0 }# S$ f" j' C& y. ^ SuperscriptBox["\[ExponentialE]",
    3 J! J/ a, z% `, q  E8 L, m- L# v  RowBox[{"3.141592653589793`", " ", " y5 K7 i. s$ O% q
       RowBox[{"(",   q& u# R. i, l3 l( v* a
        RowBox[{) x! p& R- Y9 x6 b9 }& ]& e) J5 y
         RowBox[{"-",
    8 _2 B) e/ w) G0 o      SuperscriptBox[
    . ~; S# e( x5 J+ V9 M; R       RowBox[{"(", , }& D8 @2 Y+ u0 o% Z
            RowBox[{8 ?; _4 o. V, P3 q; G5 h5 l
             RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-", ) x' q( t6 y6 x
         SuperscriptBox[- y# b" f' ~" x" u" b
          RowBox[{"(", 3 ?! H4 ~, ^  B; C6 y9 ^1 Z
           RowBox[{
    & P( r2 C( A. @, H& X, u        RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-",
    # ]' }; b- a5 x8 `: ]1 G; R     SuperscriptBox[' B7 K/ j* V  C3 \
          RowBox[{"(",
    , E# e6 D, L5 o+ R       RowBox[{
    " c5 w; a8 e6 @        RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-",
    8 L' m9 Y( t6 O$ |- \0 j     SuperscriptBox[
    ; l7 p% I+ V( G& T: z      RowBox[{"(", 2 q% v+ k) O' n  A" k- u+ _& m. \
           RowBox[{
    % Q: s( W. K# E( x3 D! G( j        RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-",   u4 A; L$ P) b+ Q
         SuperscriptBox[
    ! ?0 Q7 x% t) U  B. K! {7 u9 k      RowBox[{"(",
    ! R2 w: |  ^' j$ K       RowBox[{
    * M; g. E' p  ~        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", 0 f5 C  i$ `2 i0 J5 @  L9 M* s! S5 |7 {
         SuperscriptBox[
    ) A9 `" Y3 L4 J9 F      RowBox[{"(",
    " E7 x: l3 K/ b: M! e# o" i       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", , `2 F- p+ T4 `$ Y$ G+ i
         SuperscriptBox[
    ( \" {+ N! I0 \: g      RowBox[{"(", ; r) c% Z0 C  O" v# _
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    & k: e+ a6 H; t. [; r     SuperscriptBox[4 [2 i, [  L  U
          RowBox[{"(",
    2 H8 u! b% Q5 f( t% n( G7 A; m/ a8 j! Y: D       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", : h# m' S. S% t" Z5 e
         SuperscriptBox[9 u8 [4 {+ ?8 N" F
          RowBox[{"(",
    + K5 t. z# {' f0 r! E       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    7 y! U, `/ u+ Z% x5 s    ")"}]}]]], "Output",- c! Z' p; N* y5 d) W+ l; J
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]5 [+ d9 Q9 q) Z1 N
    }, Open  ]],
    0 s" _* K& `. g! X6 [( Y" j5 \) Y0 K6 G3 z: H1 }: ~7 D5 T2 Z/ U
    Cell[CellGroupData[{4 d+ L9 _0 l! m' R& ^( W

    , d. h8 _* p2 _- A/ wCell[BoxData[{1 n' i/ N: l" V8 ~
    RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]",
    ( U. u( e5 i: R; S8 o& k) p% _( i6 F RowBox[{"u19", "=", 0 D" h* m: f# N
      RowBox[{
    , g4 D1 G4 i2 m" t* ?2 s- Y  R' x+ M   RowBox[{"Exp", "[", / B) H$ Q5 o5 f
        RowBox[{
    * m: z8 S& [$ T+ O& `1 E     RowBox[{2 W. P" f8 ]& ?/ M3 E/ O
          RowBox[{"-", # q5 Y# O0 i/ S/ M" W; ^7 \  \2 c+ e
           RowBox[{
    3 V& G$ Q" p% R$ H        RowBox[{"(", 4 g+ c" ~% J. E- t( N1 E* @
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", # \; C* ?8 x4 R5 w1 D  w
            RowBox[{"(", * h8 ]* L; Q1 t  w
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],& Z3 h1 q# M- a
         "]"}], "/.", "DeltaX"}]}]}], "Input",/ A+ }; v6 N3 C5 S# d8 W, f
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    6 y9 E3 K: y9 I/ L/ c  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9, 8 N" k8 D9 |  d( c2 U) V+ K8 s( N
      3.577961588890861*^9}}],
    ; Q$ A2 |3 X3 ?0 B% d! @, f+ K5 d# w! Y& B
    Cell[BoxData[
    6 i: z+ D- g9 p RowBox[{"{", 7 o* g7 N" W5 x
      RowBox[{6 c6 ?9 _6 G+ ^
      "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",", ' x! w( W6 I& j# J' a$ k  `
       "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}],
    % l7 U: a2 E: p3 `: ~  "}"}]], "Output",8 s5 T$ v7 q2 P  R' M" r
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],
    5 B) m0 z1 m. q3 E$ C. M6 y/ J# {9 ]* R" |/ t
    Cell[BoxData[2 R& K. N; e& W+ K' ~
    SuperscriptBox["\[ExponentialE]",
    1 L5 d8 R/ k( h) E  RowBox[{"3.141592653589793`", " ",
    6 k* K: `% i/ A" @1 q% ~! q, V   RowBox[{"(", % D, _+ i( t7 L4 T; T; p  i
        RowBox[{- e7 C5 y- w5 t4 X- o" q2 b% D& {
         RowBox[{"-",
    ; j, Q% C; q0 y* ^      SuperscriptBox[
    ' Y: G0 K* U  ?+ e       RowBox[{"(", ) X. }" Q- L0 H: r$ J
            RowBox[{% ]5 G  b) |& g, X* e) L+ z: o
             RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-", / @& Y& r, D+ D9 m  d/ [9 }
         SuperscriptBox[5 \2 W3 e! R2 z
          RowBox[{"(", 7 G! G) k. \1 D
           RowBox[{
    9 u3 k# \- {, Q6 E% x( W        RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-", - t) z- }; i* O* z  m
         SuperscriptBox[$ D8 b! S2 j0 h0 f
          RowBox[{"(",
    5 I# V$ D/ f. x& J       RowBox[{
    0 W: P3 a& p/ j0 G& A# x$ V1 V        RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", ( \% B( M$ O( x
         SuperscriptBox[! H: P; L/ I# W; J7 X3 N* s
          RowBox[{"(",
    " O# V, R( Y3 E6 W5 x3 L) O0 S7 b/ S       RowBox[{
    % [! A( q3 x" @1 K        RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-",
    & t1 k! }9 `; f' o4 W3 E     SuperscriptBox[3 X, a- i$ V6 X
          RowBox[{"(",
    + Q' k2 V# }, m       RowBox[{
    9 w' ^* O" V' F, m- K. l        RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-",
    ; T& r5 T) w, v9 u+ m% T' p- V     SuperscriptBox[: \; J) L3 Y' r2 W% v* Q
          RowBox[{"(",
    5 J6 K, m/ J% a  _) r3 F       RowBox[{8 n4 Y; P: f$ {
            RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", ! ]2 c* v; d0 T& V
         SuperscriptBox[
    ) {/ G- ?9 G* v( C8 W1 t9 k. u      RowBox[{"(",
    , D: ^" S+ T8 V       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    : D  E/ e2 ]2 m; }6 E. w3 c     SuperscriptBox[* \/ ]. {3 `# [3 p7 I/ Q+ o
          RowBox[{"(",
    0 J3 c4 c6 L3 V/ ^& W' f       RowBox[{0 L8 T. Y3 n# ^) C: J5 i! x/ r' I
            RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    7 ]& u. x# X1 Y( Y     SuperscriptBox[3 q+ |  v) d3 P) Y* u
          RowBox[{"(",
    ! o! t& y% m' N( W, {  q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    " T* i, G5 ^8 Z0 v0 b& s    ")"}]}]]], "Output",1 k4 j: |( X( b, i
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]
    0 E. `! o1 f+ q; m1 j) A( I}, Open  ]],- `% ^0 _5 E/ J( x* @8 E& \* r1 h0 i
    % W7 ~3 c; U% y( c  ~! g
    Cell[CellGroupData[{1 I0 H8 j: |' a: Z+ S8 f

    . o% e: N; m% u5 f6 Y/ OCell[BoxData[{( H9 U  y" z* e
    RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]",
    * d/ K" \, ^% r% T: c- W. n RowBox[{"u20", "=",
    ! v' a* K' B" X, P  RowBox[{
    & {# F3 ^. I. e! e9 q- S' O+ _6 C" u   RowBox[{"Exp", "[", # c% [! k5 G6 j; u  t  o* @
        RowBox[{
      C+ c4 W5 [. N2 s/ R; \     RowBox[{1 R% K& e3 o" \+ y1 n/ s3 |
          RowBox[{"-", * p. j( h+ i2 D, }" u
           RowBox[{
    # Z6 r+ J7 T' Q8 u        RowBox[{"(",
    ' w- g, c5 r1 X& g, g         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", , b/ ~5 t' n- W2 B! j
            RowBox[{"(",
    : }, \/ o! o  s! c3 S$ A/ |         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ b8 M2 L- M2 Q! v
         "]"}], "/.", "DeltaX"}]}]}], "Input",! l, z: b) R* X9 T
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {" _+ |' O" |6 }7 H
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9, 2 D/ }# f4 @6 O1 ?3 x, T
      3.57796159382047*^9}}],0 }5 ~: x- y+ |9 t& y/ `9 l. u
    / i- c4 ^/ X: E) x0 F- o0 P
    Cell[BoxData[5 _" S  K: `; i! G1 A$ _; H/ |4 K
    RowBox[{"{",
    9 m) N9 q( T% B) s, N8 V: }- J  RowBox[{+ P' p" Q% a/ a4 R# U
      "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",", & W. _. r/ {$ a7 j) x- S6 N
       "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}],
    6 L1 A5 m+ h# A. {  "}"}]], "Output",
    % u2 v1 U2 t/ N0 F; T5 O! D8 d3 E- B CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],& A2 l6 Q% u: t. X" q  w' w

    - J, d0 Y$ O( ^" N( ?) bCell[BoxData[3 r+ E* R7 ?7 V2 w
    SuperscriptBox["\[ExponentialE]", ' ]* ?' n; j8 D% L6 T3 B" B
      RowBox[{"3.141592653589793`", " ",
    , H" a1 ~; C/ ~* d. C6 u   RowBox[{"(", ( p7 k: e/ G+ ?- F
        RowBox[{2 z2 ?- r8 h$ X; @$ B6 `& C
         RowBox[{"-",
    2 ?3 {( n# d6 i& @' {      SuperscriptBox[
    ! g; X) @% I5 Q9 m       RowBox[{"(", 7 }2 Y7 d$ Q1 H7 ~( _* C
            RowBox[{) D* n4 P7 Z; \! L8 |' c& ^
             RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-",
    8 l- j7 ]" J+ x, ^     SuperscriptBox[) H, H% Z( u8 N8 q; p
          RowBox[{"(",
    : C( I3 A! N2 y) i. e       RowBox[{
    $ Y0 W+ B/ ^) _" h: @5 r6 y3 G# S        RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-", 8 O; a3 u( H8 G; I7 i: @5 i
         SuperscriptBox[1 x* J. I% `- r, @& |3 r
          RowBox[{"(",
    + \) T- k( F; w# Q: {$ Y! ^       RowBox[{7 k9 ]6 a- r# h! I  h
            RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",
    * s" z( o6 y& B' M     SuperscriptBox[9 d" }& @. l' A3 |( ]
          RowBox[{"(", ! V3 N* {/ K# \0 p
           RowBox[{
    4 @0 J* l7 J' }9 @  [        RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-",
    # w" Z( O% h6 |- y" ]5 w1 \( f; o" {     SuperscriptBox[
    # _4 i" {# h. M& }5 j" A      RowBox[{"(", 9 _5 o: e6 ~* k& v
           RowBox[{
    7 C3 B+ H. E% V        RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-", 7 C2 a2 Q+ L2 R5 M
         SuperscriptBox[
    ; r3 s: ~: L1 r; p; b, t( L9 R! H      RowBox[{"(", 3 p' t1 x5 m3 M& [) S
           RowBox[{) G4 K& |5 Z# e3 l3 X& x
            RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", % C6 z5 s: Y& @/ q* T( E8 l
         SuperscriptBox[$ w/ C# Y$ C9 A4 o- O# r" z6 Y3 u
          RowBox[{"(", & m- M, B# r  p/ e- V) B
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", * A1 w% w  v, _4 Z/ K! A. v* r
         SuperscriptBox[
    , d. ?. A, t  [      RowBox[{"(",
    1 y) C; _! m% _5 L1 m& \       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",   D! B- H8 H5 X8 Y( v+ U
         SuperscriptBox[. I* i( R2 z9 `
          RowBox[{"(", $ t' Z" ]; |" g; Q. V% E, |
           RowBox[{4 {- I2 j+ e( M7 N5 X0 k9 V- J
            RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ' a! B/ ^  L; ?) @8 _  B
        ")"}]}]]], "Output",( l# }6 ?( i: \  L
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]
    , E0 G5 V8 X+ L}, Open  ]],
    . a2 l6 `. a4 K# E- J, u9 D
    5 W- b5 p! D3 |+ y  T: \Cell[CellGroupData[{+ a0 t, X' x6 o' g+ B

    9 s7 M7 y+ |7 `  B( FCell[BoxData[{7 W/ q  ^$ v0 I1 T' o. f
    RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]",
    0 Q$ y6 O6 r- x1 e: L" W8 q+ } RowBox[{"u21", "=", # Z" o5 Z' F& y
      RowBox[{  X7 Y1 X4 b! N; e1 f; e
       RowBox[{"Exp", "[", 7 ?  D+ E' q* P/ g
        RowBox[{
    / ]6 `  A3 ?3 `     RowBox[{
    / T9 j/ _3 U* Q$ Y      RowBox[{"-", : U8 i% t# s) Y$ {+ Q
           RowBox[{
    1 k9 N* C) w' a' G+ q5 x        RowBox[{"(", 1 A9 K( v0 m9 h1 d# R% b( l
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    , V- V& x  |: O        RowBox[{"(",
    ( f$ B4 ]( d7 N) w3 y/ s  S         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],% F7 _- B: `& S* B
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    : j3 Q- F6 K2 S. V2 C CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    6 n* A- u0 I9 m2 @  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9, 5 B' v" w: `( Q$ d: ^) S* @; h
      3.5779615991556787`*^9}}],
    / P. w" B0 z/ @2 c+ e
    8 Q0 T- P! d% l# X2 E- I1 ^* SCell[BoxData[
    , A) }6 r# P; e0 ~' u/ H$ V RowBox[{"{",
    $ ?* U9 Z* G& \9 j8 ^. r* P  RowBox[{
    3 X" h3 L. r- M2 u4 `0 h  J" W# ~6 a  "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",", 1 n2 m2 s9 k4 s
       "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}],   U+ k  ]* j* O% n
      "}"}]], "Output",, T4 d6 Y; {- c, m0 A9 t/ o! t
    CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],. I: M; p& j3 g4 h9 ~6 A2 m# z, ?
    . y. r( z' y3 J9 u' z
    Cell[BoxData[+ t+ v& R! E$ }% v3 K  f
    SuperscriptBox["\[ExponentialE]", , P; |+ y7 S: {( U( t
      RowBox[{"3.141592653589793`", " ",
    ' M1 X( |6 X: w/ b' i   RowBox[{"(",
    0 \; s' G2 Q7 r6 d1 [+ ?* d- l* d    RowBox[{
    2 }  N" i4 F' o1 f; Y' x: c. g+ Z     RowBox[{"-",
    6 j! T' w4 m- j6 E# w# ^      SuperscriptBox[
    1 S0 f4 X5 a' n- k# W/ w8 p% k3 _/ u* c       RowBox[{"(", . y5 e0 M) q1 o0 C' |5 |
            RowBox[{
    9 N# W8 L. f+ u/ Z7 i9 @1 S         RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-", - P0 _% _" t) R6 w8 B2 l
         SuperscriptBox[
    ! x; c( b/ l2 {2 q8 [& r& V  n+ J  z      RowBox[{"(", - H4 E; c( }# \" |5 i% q; D) a
           RowBox[{
    ! C% s# E  h7 j' ?3 ]        RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-", . N; b# b/ ]- s
         SuperscriptBox[# C9 d& @/ D9 w
          RowBox[{"(", ) N* i7 @0 H) C& }6 o
           RowBox[{( S. t& W. f4 A  H! m# c* w2 e8 i& c
            RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", 1 x5 K* ~8 M' m2 w5 f
         SuperscriptBox[
    8 T. q# \' X/ a3 i' v      RowBox[{"(",
    & P' d6 a3 e* Q! d6 D       RowBox[{
    - ^9 t# i8 i0 {) \% c! U        RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-", + o7 V% p2 ~8 R
         SuperscriptBox[
    * S* W/ t$ l4 ?/ c      RowBox[{"(",
    " q2 \* k/ n$ {* z0 O6 w       RowBox[{( Y5 A5 _$ l) x6 I8 J1 Z2 a  v  _
            RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-", 6 U5 ?' _* D% b$ n- r
         SuperscriptBox[# G/ D% v0 y: D- y) e: d9 d0 B
          RowBox[{"(",
    & Y" O0 r5 S7 ~* Z% m, |- u0 T9 k       RowBox[{
    ! Q, x# Z/ ~$ g% y2 }        RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    & \- O* k1 }, e( i! k% w! K9 r9 s2 F     SuperscriptBox[& H5 N5 ]0 D) E* K6 P0 S# r' m6 M: A
          RowBox[{"(", 6 {) F# s1 |) j" M+ J. s# ^
           RowBox[{
    6 N. h7 v8 ^) S  @  X9 I, M3 {+ f' Q        RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", 2 U5 j  j, t' J, J5 x
         SuperscriptBox[% x; L# R# c. ?0 m
          RowBox[{"(",
    $ t+ e* J7 C, F9 p! f9 D       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    / M- o$ G  q& A: o     SuperscriptBox[
    # H/ w! C, x7 X, p2 G      RowBox[{"(",
    ! \3 f4 p4 u* \. r- _8 |' a" P9 j7 T       RowBox[{
    : h3 e" m; n: f; ?7 U' X( W; U7 i        RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}],
    % F" \6 V; s+ o: n# B    ")"}]}]]], "Output",
    7 ]8 Q( q. a& e1 r CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]1 I4 Y; ?" ]- T
    }, Open  ]],
    " [0 S$ n, [/ ^
    % w: X- m3 _4 J! p4 W  E& kCell[BoxData["\:62df\:5408wi"], "Input",; A% M2 u/ P) D6 Z& Y
    CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}]," {4 v, D) W4 P* L
    ( e0 L+ n* C9 ~5 h
    Cell[CellGroupData[{7 ~2 X) K: V# r) z. t
    6 z7 E  n* b1 |3 m7 O0 A+ C
    Cell[BoxData[
    * Y$ [1 ?4 j; K RowBox[{"y1a", "=",
    6 L5 g5 t# v3 n% v8 ?! E% v  RowBox[{"Table", "[", $ `; I& @% E/ J, P+ R7 M* _
       RowBox[{"x", ",",
    ; D4 v9 g% o& Q; U1 f& A! [* s' K    RowBox[{"{",
    ! W3 o9 ~& M! f) w! y6 R( x2 u     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",) A3 O/ d2 N; ]7 D6 W  |
    CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {
    : }5 @/ N7 r; |+ P  3.5779226649375*^9, 3.5779226810625*^9}}],
    , v" [* B% H* _8 [: \  j
    1 m/ o& V% ~! e5 Q' v6 lCell[BoxData[) s8 c, i  B2 [. w+ t
    RowBox[{"{",
    " j% f' u1 b, Y1 r  RowBox[{
    , g/ {& ?7 ^! p1 I& q7 y  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", : f& I  `" r; Q& N% L
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",! k, _1 `% V$ }/ j
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", ( |$ `3 S1 X$ P
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
      b: g0 ?2 k; A; h: J   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    / [& k" F0 X4 \2 Y8 `( q* A2 v8 p- ^   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    ) `" n; `1 ]/ v# g   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", + ], f* Y0 t7 G8 S/ L- M1 ^
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", ( J/ a5 l! W3 a' J
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    ( Q  e. N% [; _1 g1 I! k  "}"}]], "Output",+ C* H1 e. n* h+ Q9 ^) l3 }$ @4 B
    CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9,
    ( \0 ^3 _# a" t8 p; y! }7 Y  3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]
    ' N/ G' w& w, V7 M, ^}, Open  ]],& w+ x5 F6 M9 x% i
    ; u  k( D" ~7 J% a1 z4 M, n4 X
    Cell[CellGroupData[{
    & x; G$ z( Q0 d- A. o! s1 ]0 M- ?. R. F9 B5 P3 U
    Cell[BoxData[
    / n: {" H' I9 C1 @& P RowBox[{"Data", "[", * K. J- X$ b1 ]/ C1 v; [* H2 Z% S9 k: [
      RowBox[{"[",
    . P1 ^8 L- t& y0 W, t   RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",
    & e* \* d7 h5 M+ ^ CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {( l, c) J" h0 A$ e4 k, `. |: @
       3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],
    2 Z; f  \- b9 e) E' a
    & d2 E0 w) ]' M3 a. o2 MCell[BoxData["0.899882`"], "Output",$ H2 ~: M5 h: t5 U
    CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9}, : x$ ?4 u: A6 S0 K
       3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9,
    + `/ ~. c0 a  O4 M& C8 i8 S   3.577961929080654*^9, 3.5780123419375*^9}]
    & B5 N* g: g$ [}, Open  ]],' x2 _6 }( v9 x: U0 s6 Y& C

    " Z5 e1 P5 E, W+ m$ ?Cell[BoxData[) [: {4 d( E' y) R" {) @- u
    RowBox[{"For", "[", , a  o* U9 z6 t$ Q% S. k0 n) ^
      RowBox[{
    : {* C5 i5 q2 r  e8 w   RowBox[{"i", "=", "1"}], ",",
    6 z( n5 ?) q+ W; Y1 A4 x2 A   RowBox[{"i", "\[LessEqual]", "60"}], ",",
    * X+ k2 c" t, S' |/ R5 L9 v  B   RowBox[{"i", "++"}], ",", % F1 I4 E# N8 [% X- v( W$ L
       RowBox[{3 d% J! R7 m5 r* w$ B
        RowBox[{"y1a", "[", + Z0 S$ N0 k6 B+ Z* U
         RowBox[{"[", "i", "]"}], "]"}], "=", * W( `  f7 t* u8 {# W. K
        RowBox[{"Data", "[",
    , i- L7 l( J+ }6 H+ ]1 T     RowBox[{"[",
    + T4 z# y1 i+ H7 f0 V  `8 b      RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",
    $ P  d: H# u- F7 V CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    * u4 ?2 a/ h2 }! F0 I   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    1 }- J& L( E* \; {   3.577922923203125*^9}, 3.5779588839702806`*^9}],& f6 [$ \$ S5 \6 r
    . j% j. N  Y; P2 j8 T
    Cell[CellGroupData[{9 J* r9 k6 w+ U6 Y

    3 V5 {) o: A' |" e0 ]5 WCell[BoxData["y1a"], "Input",
    0 l$ m+ o$ [- L0 E) x* ^- `' D# C CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],
    0 c* |  u: ?) K1 P% G/ U
    # p7 S2 B9 Q5 @/ u4 u# x+ |1 p5 nCell[BoxData[: p7 o) M* q+ H- w* e
    RowBox[{"{",
      W: `  h  ]7 |: M6 v  RowBox[{' F5 Z; o; n* s% p+ J
      "0.277091`", ",", "0.220259`", ",", "0.899882`", ",", "0.265607`", ",",
    7 T! g) V( c) z+ l   "0.642226`", ",", "0.306243`", ",", "0.186985`", ",", "0.175501`", ",", * B9 b& A3 X& H( q
       "0.147821`", ",", "0.352768`", ",", "0.23881`", ",", "0.095701`", ",", " F$ f: W% F( B& ~
       "0.162839`", ",", "0.335395`", ",", "0.160483`", ",", "0.398115`", ",", ! V0 B: Y# N) z& N
       "0.157833`", ",", "0.315665`", ",", "0.492344`", ",", "0.638398`", ",", / ?* Z, t7 @: N) S, [6 |
       "0.392521`", ",", "0.362191`", ",", "0.114252`", ",", "0.401355`", ",", 1 ?, [; {, r+ W( \: ~' V
       "0.827444`", ",", "0.676973`", ",", "0.331272`", ",", "0.845701`", ",",
    # ~% w" }/ H! M, B* r   "0.287102`", ",", "0.`", ",", "0.050059`", ",", "0.254122`", ",",
      g& y. x3 O3 G" a9 E   "0.086867`", ",", "0.659894`", ",", "0.317138`", ",", "0.605124`", ",",
    2 A, x, S1 ^1 _   "0.32126`", ",", "0.595406`", ",", "0.555359`", ",", "0.333333`", ",",
    8 V( H7 X4 W2 l* I" _) l   "0.149588`", ",", "0.493522`", ",", "0.224676`", ",", "0.410188`", ",", ! N5 o# f5 S+ p. r& K( f5 N
       "0.668139`", ",", "0.102179`", ",", "0.380742`", ",", "0.319494`", ",", 9 }" P+ J; B) L
       "0.031508`", ",", "0.292108`", ",", "0.329505`", ",", "0.337456`", ",", 3 V! Q7 C2 O$ `9 O/ h1 M* @
       "0.766784`", ",", "0.676678`", ",", "0.541519`", ",", "0.064488`", ",", . e0 e& M- C1 `$ N+ f" J3 }
       "0.463192`", ",", "0.388398`", ",", "0.262367`", ",", "0.290931`"}],
    " Z) W" {2 _9 Y0 @- R) q  "}"}]], "Output",# f7 ?7 d$ g: I$ E9 _. _
    CellChangeTimes->{3.57792293246875*^9, 3.577957577756765*^9,
    : @( J* ?) [  N; u3 {: f7 A/ E2 X  3.577958888806289*^9, 3.5779619425902777`*^9, 3.5780123438125*^9}]
    % V; J* ~' M8 N6 t9 \  q( i}, Open  ]],
    1 V6 A% p3 H0 ~) U- ?' B9 M. B3 ~+ i- c- v7 T2 X* E4 I. X5 T
    Cell[CellGroupData[{; w, O/ ^; }$ L0 u- Q3 [7 m& G8 g
    , Y' \$ B* ^' P* L: `( e
    Cell[BoxData[5 z1 u) \* L& a7 ~! q1 X+ B$ r
    RowBox[{"m60n21", "=",
    ! s. R* u3 O  `' ]. D7 [" \3 Q  RowBox[{"Table", "[", 3 G- @9 G9 N$ P! ?7 h# _' v. D$ n
       RowBox[{
    - J7 u& i! \3 k* d) @, J7 \    RowBox[{"Table", "[",
    1 j2 k: I& V" a$ M     RowBox[{"y", ",",
    1 H( O9 I( t! @, [# S      RowBox[{"{", $ v& }# h2 s1 r3 A* R* [
           RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",",
    : i, i5 a, V& q9 T    RowBox[{"{",
    4 I( u; S8 P' s; E     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",+ ?4 D4 f( f: h: z* B
    CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {/ t; I8 C3 R+ r- `- T
      3.577924052828125*^9, 3.577924101671875*^9}, {3.5779619669419203`*^9,
    * }# y- ~, m8 g3 K# O# j2 C  3.5779619706547265`*^9}}],2 b& Z* y# z5 q

    2 r; z3 N- ^; j$ sCell[BoxData[3 p! C  F: t! \# c/ x- e6 f" O7 S
    RowBox[{"{", 8 T* R. Y) \4 i
      RowBox[{. x$ H+ Y* G( U: l# z. E
       RowBox[{"{", 2 S- P9 s& c/ y. a8 i7 j" E6 i4 q
        RowBox[{
    / R% I9 E  z7 `% u2 M0 M    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ I2 V( t: ]/ V  z  \2 Q) ~
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 S7 F/ F* c/ Q3 g* b2 [" D     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 J" [6 D( {; M/ |
         "}"}], ",",
    3 S2 v4 h7 L% g! F0 V   RowBox[{"{",
    $ G4 V8 M! x# w$ I/ B& y    RowBox[{
    5 ]5 m) _- ]: g    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 q( c9 x* U3 f% c- A) Q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " L  v* ?+ n0 K- F
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 @7 ^9 ~$ t: w( H7 I! p0 ?$ h  K! |5 G6 Q     "}"}], ",",
    ' R$ M: {1 M% z; {) v( n   RowBox[{"{",
    3 ^7 ?8 f* z; n- @    RowBox[{3 G4 I5 q( E2 T/ w5 Q
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) ]$ |$ f' D5 D: J0 k
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",   _8 s. L: P8 S& P6 o
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; Q4 A6 y9 z. U5 T) s, Z
         "}"}], ",",   K3 q# i  i2 k& |
       RowBox[{"{", , U' f& J# D. w1 B  _( l
        RowBox[{
    # D! J) b% T+ W7 K+ Z( O7 F    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& i9 L2 Q; w! W3 P- f1 v8 B4 F. q+ p  i
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : u$ m" Y- a' d) x* j' R* o     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],  I4 y6 ~9 W/ Y+ s" {
         "}"}], ",",
    8 x& _7 l( E+ ?1 r4 d! c) _   RowBox[{"{",
    . h% h1 v; Z4 F. a    RowBox[{  N: d, a3 t, }% h* |* c
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) Z7 J) Z7 c& n
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ' d8 l7 B2 O. I  J4 F7 I     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ t/ T8 S! O1 R
         "}"}], ",", ' y' h6 x& w& Q0 n& F
       RowBox[{"{",
    6 c$ U- Z- F  d, D# q    RowBox[{
    9 \  ]. u6 n& V* |$ K    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ y; n7 B& |+ H5 `
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 J/ Z: @: {  v: m
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % @" e- n- p0 I     "}"}], ",",
    1 k7 j) L9 W8 k3 y$ c   RowBox[{"{",
    1 w: O1 p' P% G' @/ U: y# D* d    RowBox[{8 Z, H: U; q9 {. P. i  n1 I% u
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",  g  \% L& }7 i7 G6 p/ ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / w2 P& w! D1 B& S1 o     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 p  K) {. b& r* P8 k$ l4 t  F) P     "}"}], ",",
    $ h4 U& v3 D0 X  q5 }6 }8 Y/ f) F8 W   RowBox[{"{",
    0 x1 G# @) `. `( X    RowBox[{4 [5 [, |/ i$ {# ^* ~3 u
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",, Q: }) n) q9 d5 z  {
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    4 s) A7 ?  s% W1 U     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],& F/ ]& s. c  w5 [7 Q$ u
         "}"}], ",", ' \% a$ h- F+ H6 i9 R( S- \
       RowBox[{"{",
    2 G/ ^9 [5 f  g0 h4 `3 B) X    RowBox[{3 R8 K( y7 p; C* ]+ b7 w
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ t1 v. L  P$ q, [, B3 o      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 d% `0 x0 d- p+ D9 A" g3 k     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],2 Z, S% g- Z3 J- V- A' v5 i
         "}"}], ",", : H+ `9 F7 _9 g( ?) `
       RowBox[{"{",
    9 |8 @1 V) P, \4 {    RowBox[{
    / `% J3 l" k. Z, ~    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    1 `2 o# S3 I( s9 L2 E0 {      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", & e- l) K, ?' ?2 A5 L+ }
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],$ T; k# u0 v/ h- T, n1 ^
         "}"}], ",", 9 Y3 t$ ]8 E: C" g8 X
       RowBox[{"{", ; Y/ N. p* S; d  |0 \. W: r
        RowBox[{
    - Q$ S% N: v* m$ [& R7 W    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",7 `( x6 n3 I. D6 A+ Z5 W
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) J9 T; p- Z- ?: x4 I$ O
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # x( r/ u* O" g5 U5 o# }     "}"}], ",", ; {% m" z9 H7 P$ ]# W! c
       RowBox[{"{",
    1 Z+ h7 Z% ]' D6 S! A    RowBox[{# }7 ~! ?6 A  K. g+ x8 M, o
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",% [4 ~% f7 i6 U3 d
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 W$ p, j1 D! Y3 }
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + L: }1 V3 r, @& |     "}"}], ",",
    3 n4 L+ T5 O) |1 f! ^# o   RowBox[{"{",
    ) Q4 y* C" L# @8 b4 i# M0 e$ L    RowBox[{$ d* \7 C/ Y  j9 S- H
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! ]" m8 \: [- o) ]      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # K' z# d; A/ n0 q, Z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    $ l/ E4 H5 G, x( Q. C     "}"}], ",",
    / ~0 H4 d. Q( F% J   RowBox[{"{",
    1 ~; g, J2 l! h; w! ?- o    RowBox[{6 k( s0 s% B% n. l0 j4 h
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. D7 G6 j( a2 e; s- Z% `# e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 m+ L" i9 ^( `" W0 I2 B9 J, K* f     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],& M  S% _' U1 g/ K' [
         "}"}], ",",
    , o( A  y* s6 O& q( h& W$ Q5 k- _, H   RowBox[{"{",
    ! @8 J5 S. x3 [2 W! U* z( I    RowBox[{
    $ @; j5 i( U0 \8 C- i    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 s4 v' W9 O2 h4 O9 |" D
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 N: g1 A- N7 ^- T
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, K; N$ |& n# X& h0 p- ~
         "}"}], ",", * O# v5 X4 }% f# L( I+ f. H" Z
       RowBox[{"{", . q( t6 y8 _$ A6 A5 d, q; a, X
        RowBox[{
    ; \& p) b% g2 ?5 E4 P* |' y    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . r4 B! I& v  [, d4 u      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " F6 V, \, U2 N. i) i; G     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( X- \& D3 f1 m3 o     "}"}], ",",
    4 t1 c, p) o2 b' i& P5 A  V/ A   RowBox[{"{", # A, Z( k; e# r& ?) I; g
        RowBox[{3 {8 n6 C1 }+ G# S' x+ Q$ S$ w* ?
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 h* _& }8 E$ C3 \4 b5 A
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    3 m1 i; Z$ Z4 |8 D: p/ X     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    - V  r4 u1 d% V) Q5 J9 U: f4 k$ o     "}"}], ",",
    2 i+ Q" ~* A5 U' c& ], i3 N   RowBox[{"{", - h& g2 i  \1 {
        RowBox[{
    9 w7 F) n) O7 z% t& {& M    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* L- U; x5 Z7 a+ |0 v
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    $ \5 K2 c% y& j* _     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) f0 A9 K4 Y' u$ D5 O2 S, r     "}"}], ",",
    ; a, A( B' _5 J/ U: k7 J8 P, ~   RowBox[{"{", , ]6 m1 j8 p) T* I2 y& a
        RowBox[{
    6 I3 B$ p4 c; ~4 F' I: b: I    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 _# D  L( s: |# W, W& B5 R
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 }! x) w5 S! `( ]* U
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 [3 f& I' I; [7 s
         "}"}], ",", 2 X. P! |% o2 |1 b
       RowBox[{"{",
      k( V, A! k3 B9 {3 H6 H/ Z    RowBox[{6 Q- s( W5 [( {; t1 Y0 U) g
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) l: @, E5 ]7 M$ o) m/ |& g5 _3 R
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 ?6 ~8 I0 \& Z* B
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) v% i' n9 J- h  g4 d+ O
         "}"}], ",", / ]3 K8 g# \5 W% F& n* E, H9 @
       RowBox[{"{", 2 ]# C5 W$ ]" J, c1 ?
        RowBox[{
    " D. O% ^$ u8 Y% B0 h; w" X    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 G& F) y! k: y  G5 l; S4 F! t4 V
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 V' W! n2 L3 F7 l2 h
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , C$ x" N( {1 y! g3 y0 ^' k     "}"}], ",",
    8 C6 o& Y  a1 |4 L" Z# E: |   RowBox[{"{", ) n( O) U! t) n* Q
        RowBox[{, r1 C1 P! W$ s+ b/ E  s
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 y, ]7 u9 Z  a0 m; ]6 K      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 9 @6 b2 Q" q* Z8 z. F9 ]
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; r+ f8 S9 g5 M# m; h; _
         "}"}], ",",
    " |2 A- H, Z" Q' J, T1 h) Y   RowBox[{"{", 5 j  v( t9 e' X6 l' J8 B
        RowBox[{. T7 o2 d- ~0 m* t+ p; F
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 D5 B1 z) i0 G1 ~. M# k+ s
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
      L  e# \: F3 ?' R3 e( ~1 c     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) v' f1 Y$ h: C/ `
         "}"}], ",",
    4 A9 X6 i  N0 x$ i+ N   RowBox[{"{", 5 @  W. M' a; Y9 y2 s
        RowBox[{% i; V  i9 s: [. B, c. m: W- F4 B
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % M8 x5 c2 M/ i$ M6 W* w( Y3 N$ G      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; k* S4 _: a8 P: W; W9 p6 k% h2 P* V3 [     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % o- Y! B4 p" B9 O  D  ]     "}"}], ",",
    " [6 N7 d0 t/ Z   RowBox[{"{",
    - z7 Z7 z2 R, }$ J8 x    RowBox[{
    % {) m1 s; E  O+ m- T6 E" R* [7 b    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ d  W4 e" s* z7 D# r
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 @  }' z# t  O$ i$ L     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 U8 G0 q5 C$ B% W' }
         "}"}], ",",
      R) m* z. l8 q: B' Y   RowBox[{"{",
    9 z: q; u4 Q* @: |/ I    RowBox[{
    + W* u! t6 K! Q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. k1 X% f! D( u0 E/ A
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # J; J) n1 W2 K. g2 Y- a     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + q6 P% c7 u2 f! y     "}"}], ",",
    1 `& b3 l. s4 i. c; p   RowBox[{"{",
    & w' d4 O# s/ L$ N- g. z    RowBox[{# M) C0 l$ U/ ]3 d& p0 ^
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 C: M) H; T* I3 Y8 I7 `1 g
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 J% T# d, W; B     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
      Z! g7 d% d% n     "}"}], ",",
    1 }6 W6 r. n3 v$ i   RowBox[{"{", & O2 x& v  P$ v- B
        RowBox[{
    7 z. p8 U2 t; C! L( v: v    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ e# C4 u0 c# i5 K2 o4 K
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * t; ~8 P) ~* k2 V* h1 H
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 x& l0 a5 z5 ]$ V( _6 k% X% G     "}"}], ",",
    9 n7 ~( l$ [& ?" t   RowBox[{"{",
    ( o4 R8 u* b. @. g9 `; t    RowBox[{* z8 x2 @% @+ j
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + N' G/ ~0 S$ Q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 9 c* n7 D4 _$ g, b
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & K7 K- ~  W4 ]1 Y! i- F8 W     "}"}], ",", # A# W6 _3 `( r$ |* T1 D
       RowBox[{"{",
    % s7 c! {% M: G    RowBox[{. A3 W* C' y- K7 T7 T1 l, d
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 ^$ q: X, b0 u* k      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & R; N( z+ {5 G     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],/ ^+ l2 ?0 R( N1 o1 Q, v+ W
         "}"}], ",", 1 X+ y$ v9 `' K7 |7 w
       RowBox[{"{",
    ( ?; p) X, c, k" Q& |: ~. n    RowBox[{1 N, }# d! D( {& ]6 f5 b" Q
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    7 Y" U/ D  S  K2 q, j9 H3 q, ~, _+ A! d      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " k) I4 x! P( ?& S     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 K8 g$ |; L( [" v0 J" N+ n7 t& b     "}"}], ",",
    2 _+ l9 b' Q/ h+ U' f   RowBox[{"{",
    4 Q0 U/ f4 U) a# t4 m: E    RowBox[{# ?- F- h' u2 B% |+ R4 @2 ]
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",9 N; r( l/ U9 |0 C8 `1 C
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 4 }9 V3 P) c! N& \# a. M" f# @
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    $ X. z# @. b0 \9 }     "}"}], ",", ' X( J( \+ _! F2 q( S
       RowBox[{"{", 1 d0 [  t8 s6 b# g0 z8 F* _
        RowBox[{
    5 V8 B$ P) ^4 T* n; h/ z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + w* i  }( j4 C$ C3 V      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", * Z, V7 g, ?1 ?5 p. s+ M
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ( R$ T) N1 t' L  m: M     "}"}], ",",
    7 @4 A8 t3 c4 A! s( Z   RowBox[{"{", " N" b5 i* B/ v# l7 j8 B6 N: T
        RowBox[{  Z5 X/ e! y4 I! S: `5 t  b
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + H1 w8 v' `# l" P; Y3 a      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ! V% h! c$ l3 t; }. s) q) I     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 O- q8 ?) G1 J& I% m/ @
         "}"}], ",",
    % S0 }* A# y8 `8 b2 V( u8 h   RowBox[{"{", / H& x9 ~# P5 T4 |1 y
        RowBox[{8 |7 G$ {* _6 l- n3 z; P) A& L
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",: N. h( c7 L4 G) y7 Y( V
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 6 g& I; N+ |6 O. O3 T( R6 X9 r
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 S4 S5 _' W- F  N+ y2 q9 P     "}"}], ",",
    . Q1 [! B! f# n3 Q( c( h   RowBox[{"{",
    0 r1 _+ P! I( W% H' t$ ]    RowBox[{
    ( [( G9 ?0 ~2 ~8 k& u    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ' d8 s; {/ h/ }& i! h      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 ]+ t8 h) _' B* ^- f5 m1 ?
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & A" Z3 r+ n+ I- J4 R     "}"}], ",", 5 C7 [7 o: o1 A$ G3 Z. R
       RowBox[{"{",
    1 v. ^) t( o! [7 O% E6 }5 j    RowBox[{; L2 Y1 F% i2 `" l* i1 J
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 a6 ?# N1 k& G- `3 F      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    9 S2 o& R# s! i( k4 {     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],. I2 y5 c9 b4 f$ ]! Y/ ~
         "}"}], ",",
    4 m" r+ |- x. A2 F9 B   RowBox[{"{",
    # Q8 u' C  j6 T    RowBox[{
    ( R+ Q9 i. }9 O) E" a    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & h% z+ N& Q6 D3 m* t- r      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    1 _/ q1 l, E; j$ ?0 g4 U: U     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 E( x9 Y$ |  B- o     "}"}], ",", $ s* I, ^" K2 t; h. h* p
       RowBox[{"{",
    ' B+ ~0 F) u9 p1 G. M0 E3 n    RowBox[{8 L4 N- C& O4 k
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : j, u! ]8 H  [' N5 }' z      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . v6 P/ }" E* p9 f* e( g, Z7 I
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
      y4 p' `( T$ J     "}"}], ",", 9 z+ j8 L* @( S8 A3 [! T
       RowBox[{"{", 4 p& [' r3 Q, u2 _, i; f
        RowBox[{" m( V3 W! u# S4 _7 R& c* C
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",) ?3 ~8 F4 }& \' n3 ]! i) Y
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    4 l6 {0 L1 l7 r$ a! F6 J     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 M0 [/ t5 K+ E( n: z* I2 M3 B     "}"}], ",", 1 p; I1 Z/ k( K- r* W
       RowBox[{"{",
    5 i4 Y5 d7 l, J* Y, Q- W    RowBox[{
    * A: s0 d8 j! y: r( H" r    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* T5 S+ C+ z4 Y: s" S3 b
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : \2 z3 u0 x( T* m+ z( `( Q$ D     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 A* Z7 T1 j8 d* s
         "}"}], ",",   ]( |) b" V& R  o" ~! q
       RowBox[{"{",   D" [7 a) M0 y6 q& V& V, y1 y
        RowBox[{
    - C9 q- o# N8 ~( V    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ( G! `: f8 g/ q3 T9 S8 V. y3 @      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 i/ O  t+ j/ w+ ~( z$ v- r2 ~
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," w" j9 n6 m3 A+ v4 j* |
         "}"}], ",",
    0 L' h( d/ }) m  Y6 t   RowBox[{"{", 4 R# G* t# K* }0 i: d3 V
        RowBox[{
    6 p2 G3 l9 G: X  L    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ( o! Z* f: [! T% v  q' }      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " \4 w0 F5 n$ o0 L8 S3 d) M( H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ; q! x$ ?# o- O     "}"}], ",",
    1 T% |' N5 g( z# s   RowBox[{"{",
    " c- a+ {/ q$ h7 W$ c7 M* p) u$ ~    RowBox[{
    : ?/ r* o0 c6 z# O    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , m2 E) A! d/ T      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " \" q: G3 U4 q( j) m# N/ S
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],8 q5 }1 C$ e, ]$ D; a; Z7 b
         "}"}], ",",
    + o1 F5 i/ H: f( a  Q- K1 g8 X   RowBox[{"{",
    - m* m9 J! ~7 O, C" d" p0 ~& \% b    RowBox[{: M. i- C+ q& V4 w& u  g9 S6 b
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," V) K4 R4 u$ B4 J( |
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    4 F- A. x4 k4 x2 D$ Q2 d& r     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    8 h) A6 ?7 ~, ~7 U     "}"}], ",",
    4 A' F+ _% t* }   RowBox[{"{", % w# @9 [+ j8 a
        RowBox[{4 {/ i3 j8 e/ c# M" j
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* K+ f+ a* }% o1 ~# e; i
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
      V* x5 I$ o6 z% B/ Q; q" w     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    3 A6 z! J4 p# K     "}"}], ",", 0 k* C; ~9 Z7 g3 @$ G" A
       RowBox[{"{", ( G1 p+ [2 ~8 q2 X$ {
        RowBox[{
    1 J- [& ]& e/ Z, P, g2 n( i    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 J, G6 L. W2 [$ y# j6 Y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 r) V3 x$ z' j4 K
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# |: n6 ^& [, L; L8 O" J/ K
         "}"}], ",", 1 c+ S3 [/ D; o9 ?& Y3 _2 p* m, B7 _. S
       RowBox[{"{",
    * _; p+ [' I" }3 g    RowBox[{) ?% _2 @' o  y+ e, N6 J
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    * L: z, t/ t% |' y      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) D" L; i6 D8 j3 A2 f( t     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * M' M2 t8 r. H     "}"}], ",",
    : U3 U" s5 f. H- o9 U- B3 I: }   RowBox[{"{", 9 A4 H! _- h2 S7 P0 x4 u4 n* h2 h+ z
        RowBox[{8 _' {- b/ ?2 C4 Q' B6 R8 }
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 M% J0 Q2 X; y+ _4 {  G6 t) `; F      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ; {3 y$ ^3 f" R, h$ x0 m# O: \1 z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # a) W& ?- ^& b6 a' r/ i* {" ~     "}"}], ",", 5 X8 e, P" x7 o' h5 e# S, O1 p
       RowBox[{"{",
    & [" }! c6 t, ~4 c0 v- Y    RowBox[{4 h* Y/ p* `$ M! V
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , [: ^, P: J6 A$ ^; U: M      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # ?" y8 Q* N2 `9 r5 i     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],' N! R6 j2 ~  ^! X
         "}"}], ",", 6 B# V, A) Y3 V2 E+ V
       RowBox[{"{",
    . O5 m, b! X, R# G8 A" i    RowBox[{4 {* R4 |* [- ?
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    4 R. M. Q1 }$ C3 P" k( r      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 1 Z5 g# d  `& `! q* h; U
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],: Y# C- }/ ~( Y% h$ F  B, m
         "}"}], ",",
    : y; O8 w, q# F2 T. D   RowBox[{"{",
    : w% \7 v  V) D3 M  N! U! }    RowBox[{) u9 K- A) U6 _0 J$ @% E
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & b4 T# p: H- _& E* [      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; v' G" J" L5 }5 T$ T
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# L+ |1 t2 r+ \7 A! G
         "}"}], ",",   e, @; L1 }9 |. T: E. _& f0 f
       RowBox[{"{", $ r0 g4 I/ ?2 `8 p  K
        RowBox[{
    * \1 g  A7 r8 @0 S    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ R$ y3 ]) ]( O! S. a" j
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % c& @( u& U2 k0 {9 d% v. ]     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * g; L5 e: ]" _1 t9 P5 R     "}"}], ",", , k8 }% `; d5 z% x9 E: S+ ?2 a
       RowBox[{"{", + |1 `: q7 y; h/ @, y
        RowBox[{
    ; p% G$ X: l7 o    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ S9 y) _7 T! J1 v* ]
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( J" J4 Z4 L3 K, l0 y
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],& S, ~, c  v7 e  I/ q
         "}"}], ",", 8 i. ^% i/ s2 W7 ?. F
       RowBox[{"{",
    2 H% V6 L: ]  i2 |; T( `: k    RowBox[{- W* M1 H9 |9 G) t
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! ]  H% p. {0 }$ l. f      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    8 v. O# B" ?4 U# o' j     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    6 d, N$ B, b% l: x. o* W  x, Y- \     "}"}], ",", 8 D7 _: X& U! p7 O. X; S1 B) k7 o
       RowBox[{"{", * s1 W7 s2 f. f. T; {* ^: D
        RowBox[{# [# ~3 j) C+ M7 H  X2 W' e9 M
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , r% R, y3 V- H6 v      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( l6 ?8 X; H; t$ C
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    3 s% I( y& L% p3 @- C. o     "}"}], ",", & d8 W. ^+ L9 _; v" U' U' B( g# V
       RowBox[{"{",
    ' y. c9 p- d& s3 u8 ?    RowBox[{
    $ Q! o4 ?- Y: V+ ~' H    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 k/ z7 `" A3 |; m/ W' q/ j      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", # C4 C2 |$ @  z- C% M! S6 x
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % B& m" Y) e$ b) M0 T+ u2 o     "}"}], ",", - v( d# I$ j, u1 a; T- M
       RowBox[{"{",
    1 K) k# Y; H. N9 \9 q    RowBox[{4 ?* e2 o% _9 ^4 x6 T, y9 A
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 G1 O; L- j! @3 ]) o+ i4 B3 H
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    . p4 j5 g; I* V  @; B( I, [4 |& p" c     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],$ O- K. _5 D& e& ^# z, ?
         "}"}], ",",
    * C# a% E! g0 M/ [- m/ \; g" o2 g8 y" j   RowBox[{"{", & C7 [, U# G* y5 h/ h
        RowBox[{6 F; y& O, [! u9 n' Z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. X/ V3 R& L/ G9 w
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " a2 p$ J  \# v) Z, ^5 A4 |5 h     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + c& |: l- y' h1 j9 d, ^3 n     "}"}], ",", 6 |3 O, x# z7 ~2 C! g
       RowBox[{"{",
    ; V% r# T$ R! ~8 H9 G+ o    RowBox[{
    6 v$ r& [1 A; x1 ~% A    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ r. N# ?; X9 @+ ]6 y' m3 V
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    5 }! [" V  ^. k* N. K     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . k% e2 t. V# {     "}"}]}], "}"}]], "Output",9 A/ u6 w; m! E3 W$ L6 ]! }% v5 B% s
    CellChangeTimes->{2 s) f3 P+ }6 m9 k  g
      3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9},
    ( J( K! r2 M; t9 N! ?: D8 e4 v   3.577957579987569*^9, 3.577958891536294*^9, {3.5779619459910836`*^9,
    3 C  q: L/ `5 R% Z3 s8 H% i1 T   3.5779619748823338`*^9}, 3.578012345453125*^9}]$ T+ _* R! Q$ `6 g6 ?
    }, Open  ]],# B# k( g1 _7 P- Q/ g( Y- n1 o: v

    2 n+ I* T) I8 ?* p1 h% ECell[BoxData[+ ^) G' G3 k, W" A  c$ K! Q
    RowBox[{"For", "[",
    ) o, P" b* p: K& `  RowBox[{
    + M; F# b8 D, i" |  z   RowBox[{"i", "=", "1"}], ",",
    : c6 E! D$ ]8 _: U) N; Y   RowBox[{"i", "\[LessEqual]", "60"}], ",", ( V, u, R( f, Z7 d% k; m& U
       RowBox[{"i", "++"}], ",",
    ! v5 p4 y. l% ^' Q9 w' E& x+ x5 D. c   RowBox[{"{", "\[IndentingNewLine]", 7 z* c  I2 b: A& y  R& u" i
        RowBox[{# f) J( [! m/ Q' D7 u
         RowBox[{( S& ~% e1 o# ?2 h
          RowBox[{"m60n21", "[",
    ; Z2 }% V5 @* w* j" Y- W! a       RowBox[{"[",
    % l$ \1 s8 e7 F& v+ z2 t+ f        RowBox[{"i", ",", "1"}], "]"}], "]"}], "=", . H' m( @# Q) Z* p
          RowBox[{"u1", "/.",
    3 u4 Y% c9 e- b% J       RowBox[{"{", 1 b# t1 M# Z1 |- c- r1 U" M- M. l
            RowBox[{3 H. C3 F: a9 s/ L4 Y; X' l
             RowBox[{"x1", "->",
    1 J2 o$ j7 P* z  g) M          RowBox[{"Data", "[", $ r# k2 E2 L3 n6 H2 J
               RowBox[{"[", # f- c( Y/ d) y: j. L/ G( O
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    ! g7 [$ x% \" p! ]; y9 p$ R% C         RowBox[{"x2", "->",
      a) A. u4 h: Q( h          RowBox[{"Data", "[",
    5 C1 ~" k( @/ `4 H           RowBox[{"[", # j" h- D2 d! s
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    / p# F, m7 }; `% y- v- Z         RowBox[{"x3", "->",
    , x( X5 B: o) y( n          RowBox[{"Data", "[",
    ; P0 N6 u) k* |/ N: n* T5 o1 W0 v           RowBox[{"[",
    " X* i! w9 b% H( g2 H( F            RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", . Z9 o+ \) A, n* K. q! ~% P% R6 T
             RowBox[{"x4", "->", 0 g$ r) A6 r8 Q$ k- F
              RowBox[{"Data", "[",
    : Z4 R" w/ j. d2 e, k/ q) y! L           RowBox[{"[", * Q: ~; M* c6 s+ ~% A0 _
                RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", ( ^3 O9 Q/ P3 v  x3 e8 P
             RowBox[{"x5", "->",
    2 `! Q. ^( f, T/ w2 l4 N( t; y; N7 q          RowBox[{"Data", "[",
    3 Z$ Y4 j9 m: G# ?2 P           RowBox[{"[", * X$ d5 w: _/ E/ w) C+ `& a
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    4 |0 b6 U; e( r# U. ?9 |         RowBox[{"x6", "->",
    . e4 q- D: O  m4 E          RowBox[{"Data", "[", 8 n7 _" a; k0 {
               RowBox[{"[", , C# r3 z! B# A) O/ V
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    * N3 V% V+ t) Y  D* X% Z0 Z- @         RowBox[{"x7", "->", " z) _# B; p3 n. {4 [6 x
              RowBox[{"Data", "[", : x6 U, z$ N4 r! j4 Y
               RowBox[{"[", 3 a2 Q3 {& [$ E6 J* h2 _
                RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", . x+ t7 [2 J) \3 E4 ~3 z3 C
             RowBox[{"x8", "->", 0 ?8 R3 R5 {2 b4 ^
              RowBox[{"Data", "[",
    1 y* Z  S7 u  r( O. c, J/ g           RowBox[{"[",
    4 f" `6 Y( S( |. y            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    * K, X/ j+ @7 _9 {4 d         RowBox[{"x9", "->", / ]/ F3 M% q. J/ a* x, p
              RowBox[{"Data", "[", " R2 L. F1 o1 _7 P
               RowBox[{"[", / f" g' {( i! j: x
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";", # U& r+ @0 x: }; ?- w) S
         "\[IndentingNewLine]", 4 p* A8 r( ]; e
         RowBox[{1 a! V3 l% u3 I; J4 ]
          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 : J5 P3 E$ L! X
    神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗
    / {  Q- p4 X/ X- ~9 P
    (* Content-type: application/mathematica *)
    ; v8 ]9 s* `+ H# k* S( U3 B% q6 i# T- S- a- D
    (*** Wolfram Notebook File ***)/ N8 ^# f2 s3 a/ \: _2 l# Z
    (* http://www.wolfram.com/nb *)/ ~% a) b$ q0 A

    7 R: o* O0 k  s# J(* CreatedBy='Mathematica 7.0' *)
    # k6 a0 v5 M( z5 M4 p, f5 L) h" b; p
    (*CacheID: 234*)! \5 B- P! _0 [8 k) V/ @: M
    (* Internal cache information:
      _# {# d0 O% w' SNotebookFileLineBreakTest
    ) v: [4 [( d$ W0 K  N8 C3 qNotebookFileLineBreakTest
    % h8 U* L4 I  M/ S6 f8 P9 dNotebookDataPosition[       145,          7]
    4 F: N& X) O- @8 q: ZNotebookDataLength[    423629,      11534]
    5 q, |. V# Z: n& N. FNotebookOptionsPosition[    412607,      11173]& ?& `, ?. O1 U# ^1 _" H
    NotebookOutlinePosition[    412953,      11188]
    2 y4 y) d) b+ E8 j" n8 tCellTagsIndexPosition[    412910,      11185]
    0 o6 v. e- |$ qWindowFrame->Normal*). c! E+ Q8 t& R

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

    & {5 t8 F4 x# PCell[CellGroupData[{9 W& i+ F4 I( s
    ' \. n& [- A. ]- S! K4 p0 h
    Cell[BoxData["M1"], "Input",# W) V+ e$ M( I* S; A+ m( ?
    CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],
    - ?: p/ F( w8 f9 |
    2 A, S# |+ o. s7 dCell[BoxData["21"], "Output",
    * C- L' [$ B; }# Z% q# @% D6 p CellChangeTimes->{# o' N* [0 z+ X- H* P# p, x
      3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {
    3 h* L& O+ N# h6 F6 L   3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9, 3 I% ]- H, M7 Z6 N0 B! k
       3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {
    8 g" o( ^! L9 q" ^9 T, m- L' a; f   3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9, : `- C  |' E) I7 E6 ]6 z+ q
       3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {
    ) n, [3 J, z' M! [   3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9,
    $ R0 r6 U/ l  b1 ]7 G( w   3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {
    & d$ p' j3 ~! X0 n   3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9, 0 T- a/ ^( S- n# w! }  g$ A2 r
       3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9,
    5 P! u1 }: O/ L" G1 U) g- `% ~   3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9,
    ; v7 I$ Y/ B+ y2 V   3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9,
    . X- B. d8 {; \4 i* \, b   3.577960515600726*^9, 3.5780121541875*^9}]. c3 m4 X( A: Q( A: Y
    }, Open  ]],; p, o0 U7 Z/ ]6 Q# f
    6 \4 K# o, n- |: b
    Cell[BoxData[# v! ^# ~/ [* Y6 W: ?0 |1 ^
    RowBox[{) O) e1 t7 y& J+ ^5 l5 H- n+ h  B* I
      RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[",
    0 i7 D# X7 u1 j% X2 a% y   RowBox[{"1", ",", "i"}], "]"}], # h/ ]* J, _; D4 N/ ?" X
      RowBox[{"\:5230CM", "[",
    5 }9 _; d; _  \  g   RowBox[{"21", ",", "i"}], "]"}], & ^2 {1 }. ]# t7 `7 z# |
      "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\
    4 v& h/ L- j  {% F- E$ Y\:51fd\:6570u1\:5230u21"}]], "Input",- ~2 k- A' |: D) e/ \# c! C( h
    CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {
    3 \' g- R6 D, P) @9 `) t  3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9, . x) S( u/ Z/ ?0 G
      3.577960526583145*^9}}],9 d: O. [8 V* Y3 c6 i

      w3 x: ?' B  l2 ^1 }Cell[BoxData[" O+ R: R6 ~) m2 q9 f2 u
    RowBox[{"Clear", "[", "Delta", "]"}]], "Input",) d' d2 H3 e/ P3 f. t; A
    CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],! }# B" \  p; E; p

    - Z; B4 N5 B* R: x" ]- h% j9 r& o5 Y* HCell[CellGroupData[{
    , Y4 ]1 }. S2 m. J) S4 ]0 z
    ; n: G) d0 R# ?Cell[BoxData[& M# z4 y5 J2 k% z, v/ F0 x# W
    RowBox[{"Xa", "=",
    1 z% n5 R' r8 R+ R8 q  RowBox[{"{",
    ; ~6 T- {, C# ]) ]   RowBox[{2 h; y& b9 X0 D& L
       "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7",
    & |) c$ H' z9 l  H, i! W    ",", "x8", ",", "x9"}], "}"}]}]], "Input",
    : i7 \  F" Q0 B% F CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],7 v6 Y# k* W/ G: j4 H( c+ B- _" O
    # y1 f5 D1 B3 ~" d' E
    Cell[BoxData[2 e# \8 ^# K: b# w5 k% e( U2 I2 k
    RowBox[{"{", - o8 R+ D. h* l3 M9 s( y
      RowBox[{
    / A8 ~8 g3 D) i- r  "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",' l% l* ^" n; @& n2 Z) F
        "x8", ",", "x9"}], "}"}]], "Output",
    " O! _3 `' B, k# |) x CellChangeTimes->{7 f8 k; }5 R- q/ v( u% c( \2 h' w
      3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9,
    % T9 r' i! Z. \, s   3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9,
    , X1 ~: }" X) y   3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9, / u7 @% ?0 Z4 w! Z" m; X7 U- k
       3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, 2 U% w* W+ B% A
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {8 J5 B, s/ m7 l  x, z# }
       3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9, + A9 q" @- _  O3 [0 ?. S, Z- C
       3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    / {' E7 _0 B/ b   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {- Q  R2 ?: ^7 G$ ]" `8 @- r
       3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {4 d" `7 |6 C$ i
       3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9, 4 t% d: {( K& y" P1 a( G3 Q# F4 k
       3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9}, * k. B- j# G- l" ?
       3.57801215725*^9}]% \/ g$ _" u" Q3 J! b; ~8 d! B
    }, Open  ]],
    5 m0 C: R3 F# Y8 Q% j! H2 v' n
    & |# g5 R- R; {  mCell[CellGroupData[{+ Y$ r; O7 L/ B5 |# |! W

    4 L! z- x. u0 A; U# N% q% DCell[BoxData[3 x2 W. t+ R4 ?' {
    RowBox[{"Ca", "=",
    6 R" u- S7 s9 x# h# h  Z  RowBox[{"{",
    5 N( z7 b- z. Z1 A! E  x' O   RowBox[{; I" C  k) D. p/ q0 o; o. X
       "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", 2 v  z! [3 G, {$ |* S" H
        ",", "c8", ",", "c9"}], "}"}]}]], "Input",
    * N# Z% l+ H' y0 s; n* R CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],
    * U, ^% l" j5 M1 d' X
    ! z! x$ K& D8 ?6 k# ~& I3 R2 ]Cell[BoxData[- C5 ?7 {; Z! J+ w8 q
    RowBox[{"{", - [1 J! s- T+ n8 E  ~( I
      RowBox[{# S& e5 Q% ]3 ^
      "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",
    ! |) X: ^. u/ F$ _- J3 i( c    "c8", ",", "c9"}], "}"}]], "Output",
    4 A) {" J+ L+ B& n$ M CellChangeTimes->{
    ! F0 U, f9 w8 z. v$ ?  3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9,
    ' I* z1 S+ H/ k   3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9,
    + \9 p1 ?6 b# z, s# ~% G8 ~   3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9,
    8 ^, p" Q  k1 {  h. c   3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {
    9 v; y( R5 H' o, }8 L3 A# r; M; S9 J   3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9,
    $ l  g5 W- s" O1 Y" D   3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9}, 7 l' u  \5 \6 n/ z/ E
       3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9,
    2 @& D; P+ E2 R" O  O" B6 l   3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9, - j: U- f$ K; A4 f
       3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9}, 9 w3 C3 N* S' y% l
       3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {( T( Q5 ~- g5 r& s1 E. J# J
       3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9,
    / I' [8 K: p3 a   3.577961904604212*^9}, 3.578012158671875*^9}]7 L: A. W, G& x. ?  [
    }, Open  ]],
    . X) E7 z' n+ _3 Z  D9 e" s/ ~+ j3 N, `; S9 B3 }
    Cell[BoxData[" {$ @1 a! n* B) d/ t
    RowBox[{"For", "[", 3 B' O/ d9 X0 v3 m4 Q- `
      RowBox[{( I# W. h+ k; h) \. v3 p# C" x$ P7 j5 |
       RowBox[{"i", "=", "1"}], ",",
    ) {6 L. t. J( F8 x1 t+ J6 r7 T2 S% H   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    ( _1 @8 ^9 A8 }3 P7 ]0 ^" Z9 L   RowBox[{"i", "++"}], ",", ; ^. k8 X" Q! x3 g  `
       RowBox[{
    4 L) X, o% e, D/ b' W1 n- f8 x    RowBox[{"Ca", "[", + W2 `9 q5 {2 {& b+ }0 k/ y
         RowBox[{"[", "i", "]"}], "]"}], "=",
    - v. B$ i7 _% i6 |    RowBox[{"CM", "[", 1 X# p2 J$ D8 v$ h( C8 u
         RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",
    : M. F. D$ Q+ d! n7 Y0 F CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9},
    7 @* H& n. X  z7 A8 V7 R+ T. R   3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9, ) }$ c& A) m3 o" }, i
       3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9, * h5 b( a$ Z* ?
       3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9,
    - T) s2 f, Q9 w" y( J0 A* H   3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9, 4 n  R2 c9 L, m
       3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9, 1 W, w8 q! I! }$ \8 r9 \
       3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9, 4 n5 P. {1 p3 Q$ H; T7 p1 Z
       3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9, 6 j$ M8 E5 F6 ~; u' u
       3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9, ; I9 ]: j( o6 T9 L; G" i& r
       3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9}, ) I6 b# N- f2 w
       3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {
    . k9 V2 u( u7 }9 S* _! j   3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9,
    . Q) N: y% D# D5 B) f3 y   3.577961906897415*^9}, 3.578012176296875*^9}],
    4 `7 A" ?7 [5 u9 t+ d! o6 R4 e
    8 p3 U8 E8 ~) B- c4 SCell[CellGroupData[{/ b9 I% f- N" u* z/ ^& n; R

    - O: o, ~1 }! p% N* Q/ eCell[BoxData[
    2 n, S, q8 W2 b' A# ?4 O+ h RowBox[{
    1 n+ K- d  P$ F, J. T  RowBox[{"(", + ^' [( p( j0 }' d' D
       RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 b5 E7 d* o% O8 h4 f  RowBox[{"(",
    * \5 z* s% j+ p8 v. \5 S   RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],
    5 I8 B5 C6 L8 ^- C! O
    % |# s7 X5 h, iCell[BoxData[
    # Q( q6 b2 c, E# }0 V5 Q RowBox[{
    ) v# Q& C- {( F  SuperscriptBox[, W! u7 H+ L! l) |
       RowBox[{"(",
    0 A0 h8 J) P) C9 G, r/ g    RowBox[{
    ( A! \" E% p' e2 {2 Q& |4 Z4 e     RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+", % |: G& p; P0 c- V& `# I! ~
      SuperscriptBox[
    $ d- R( l9 G- }$ n% M! k5 q- F* N. t   RowBox[{"(", & l5 Y1 x: ~4 G# g, s5 @
        RowBox[{
    ( U3 x( G6 Y+ w( n( ?+ E     RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+", : i' I: T+ C0 K' W4 _, H8 |0 D2 i( O
      SuperscriptBox[7 K8 y, p2 }4 K3 X: {! d- d' s  ?
       RowBox[{"(",
    , }( g4 U4 T* l) }1 @8 t* |# W    RowBox[{8 S1 z+ h- t* ~% z8 H$ O
         RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+", # C. S( F5 f4 x* ]# o
      SuperscriptBox[
    ' E2 C( A; @* I6 _* x3 v   RowBox[{"(",
    ; C& N% G: O7 G' e0 s    RowBox[{
    9 U4 u; R- b! n     RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+",
    * k8 r8 _, M8 B+ [  SuperscriptBox[+ q& j1 d) h$ R1 ~
       RowBox[{"(", 0 ]# L& R7 q' K: X
        RowBox[{7 M7 C8 o* L9 I9 K# L" x7 d
         RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+",
    4 L2 E# y$ e# @( g- k5 M  SuperscriptBox[9 w- \8 h; a% F
       RowBox[{"(", 0 A: B0 a2 a8 f1 ]8 [
        RowBox[{
    , }. t& \; p7 l     RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+",
    1 V* l5 f# y, O" U: S  h) U  SuperscriptBox[
    2 c, {+ m' b: W  H8 p9 a- m/ ~   RowBox[{"(",
    ! h) I! B- g- T* w3 \; _    RowBox[{/ _/ H* z0 ~! N5 d& J3 Y* E
         RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+", / |6 Y8 i! h8 r7 K
      SuperscriptBox[
    6 m/ n0 d1 A; Q   RowBox[{"(",
    , Z9 j1 L3 T* _' }* e    RowBox[{0 N8 E" n6 Z$ ^) J# T; k1 |  ?4 `; T. S
         RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+", ; ~* t2 }2 |' M) m
      SuperscriptBox[1 u% x% G$ n: d' C) w5 {6 _9 F
       RowBox[{"(",
    + {- w* i* U: S# v* g$ e! L    RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",
    . u$ s' a" B# I/ g; [2 Q! | CellChangeTimes->{) o. ~$ \0 t, `$ k  w2 ?4 u3 @1 ]
      3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9}, % D0 c2 Y( F( _9 A/ r
       3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9, * I; n' _- V3 i
       3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9,   K8 t8 I0 ?- a0 r1 X9 z
       3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9,
    7 Z) B/ x- u7 ^2 P; V7 ]   3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9},
    & L6 b* C# W& x, g7 |   3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9,
    ' v: n1 P8 P) {% a# R  ^   3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {
    9 L& n* {, C% f' s   3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9, $ `* y: [$ Q2 {) _, U
       3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {
    + n9 P3 w" m5 s2 {: [1 B/ Q# C; p   3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {* f/ J/ V0 a! z& W7 S
       3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9,
    9 u7 `8 O/ d! [6 t+ O   3.5779618537169228`*^9}, {3.5779618846049767`*^9,
    - H6 X7 d' j( d' I9 d5 s  c   3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]
    + e6 s1 [, P# r/ r}, Open  ]],: A1 Y, F8 Q: l. Z% ?9 z/ V1 T% _
      C0 E. ?) G# {, g2 e8 u
    Cell[CellGroupData[{
    ) C0 o/ }# e7 \0 ^/ M  c% R" c0 e- f- p( J
    Cell[BoxData[6 w+ c- W' u# p
    RowBox[{& B! m$ @! @. t3 a
      RowBox[{"Ca", "[",
    - M$ S$ ?/ `7 P   RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",
    ; P9 i' F- G) B; l( X- G CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9,
    8 l5 `" ]# {# v1 [% Y& ~  3.5779616465173616`*^9}],- w5 H" h$ u# G& G/ |, C. E
    : D; A1 j: _% n( j( B
    Cell[BoxData["0"], "Output",
    ) H, N, K# C8 r: I1 q# d3 l, B CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9,
    % M4 K, S& C6 C9 U3 L  B/ H  3.5779616484049644`*^9}]
    % L1 Z2 A; F# x% [4 I! D) o}, Open  ]],
    3 G& r2 |+ Q9 y* X; R) X
    $ w7 t: n+ ?! ]1 i( F9 z# ^, LCell[CellGroupData[{
    , \3 e. Y# o2 x& d' ?% W6 b6 A9 v. h  E" t0 Y& w5 Z) [8 G7 ?
    Cell[BoxData[
    * T& _; C" \  z! b RowBox[{
    $ t" [! n7 `9 X9 y  RowBox[{"Ca", "[",
      }; u* ^$ M( K. a& s2 U   RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",
    2 F8 D9 O/ E, ]( E9 l0 j CellChangeTimes->{3.577957376235614*^9}],1 B/ u; T: [+ ^2 N" \& I% `- j

    8 [+ O2 d) Z1 r$ zCell[BoxData["0"], "Output",
    + G& d, T9 ~7 M CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]4 r* C/ K. v8 J7 \6 L2 U2 p8 b! R" `
    }, Open  ]],9 m0 t5 v( H" m' ]

    , A3 [; t: z+ O- A3 d" QCell[CellGroupData[{
    5 v2 Q/ a4 \5 T" R' ]% D
    - z8 ^5 {; Z9 C9 {Cell[BoxData[" _8 ?$ R- W7 H* G8 U
    RowBox[{: \9 y) c7 P: ]) w+ G# j/ M
      RowBox[{"Ca", "[",
    8 T' A$ ~! [  I8 X* b9 _" m! y5 q# W   RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",, A$ d2 q0 j4 J( {- G  ^
    CellChangeTimes->{3.5779573112927003`*^9}],2 f% e5 z5 i5 \

    8 q! m/ Z2 o+ l; _Cell[BoxData["0"], "Output",) I1 G7 S3 S) ~5 L2 y* Z
    CellChangeTimes->{
    4 z  p! J+ e8 p) a  3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9, 4 n8 S! P6 K* U( `3 Q) ]
       3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9, 3 }/ }+ [, E. F: G  w7 B7 a/ ~
       3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9}, 4 j( L) q7 w! C4 P1 r+ Y  O
       3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9, 4 z2 v6 V9 z5 m) \0 g0 J& N
       3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9}, . w3 w* X5 T0 T: P) I
       3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]8 w6 D$ D( U7 D% A4 ]
    }, Open  ]],
    % r- K& {! h) k0 t: c( @
    : J, w) [% _8 t3 Q2 JCell[CellGroupData[{! Y8 t4 J( |% ?) m4 S+ r$ f! c
    ! P0 ^+ g. i% @- k
    Cell[BoxData[
    $ O! `3 k: D3 Z RowBox[{
    ' L1 I: ^8 E! `1 F& Y5 v' d/ T  RowBox[{"Ca", "[", 4 m1 g7 E; l0 F( L2 I6 o# W
       RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",; n; {1 [3 S( i( p8 A
    CellChangeTimes->{3.577921461734375*^9}],
    . ]" D9 R# J& ?& p+ v  U% o' C1 U8 a, H2 O; m
    Cell[BoxData["0"], "Output",
    ; o8 B2 {+ Z: g, b7 v CellChangeTimes->{
    $ {  p$ V1 w) b: g1 h  3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9,
    % x; s6 [5 V. g: E   3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9}, $ m% c0 R5 S, N. ^: g+ y3 f" k" d
       3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9,
    6 ^4 U- a/ S5 x( r( T) e   3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9, . k7 K, `# u0 l, \1 z" t* |0 [0 W
       3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]
    5 m! E) i9 R' Q  ^$ H" L( ]4 P) v}, Open  ]],% R2 J5 a, o/ v

    # @* g/ K( n. X+ p3 A/ g2 yCell[CellGroupData[{4 G- o9 K: l) k: F/ i& u8 W8 k# n

    ) ]) G) {. C. d! x9 z& g! QCell[BoxData[+ e  ~  D7 b$ g, A0 H, a
    RowBox[{
    4 ]+ f8 ?/ r$ ?5 u  RowBox[{"Ca", "[",
    3 N" M/ e+ n' H" Y/ Q2 z- A0 ]) k   RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",
    : i3 ~( V7 L3 t: a CellChangeTimes->{3.577957303118286*^9}],
    % F; I2 U3 z# S4 [! r8 M8 k( w4 ]) P+ x5 z6 ]% l7 [2 P
    Cell[BoxData["0"], "Output",, N' W; f8 ~/ P" p
    CellChangeTimes->{0 f, x8 P9 I4 p
      3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {
    3 U% S* [/ [' C' o- p   3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9, 8 }# O% Q1 W3 {# m, d
       3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9, # p) l! U, @6 {, E# t% I" g
       3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9,
    + j$ x+ T2 R1 f$ |5 V8 z   3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9,
    / O" Q6 H. M3 [0 ?) U   3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {+ }$ m3 x$ j1 s  d, O% Z
       3.577961889378585*^9, 3.577961912965826*^9}}], K# z) u& v: G" B* j4 p
    }, Open  ]],7 n; j* W( c+ V$ P

    & F; {% S# t( i+ d8 hCell[CellGroupData[{
    - f, i# H( s. Z) f* x3 [. u5 x; v+ M- r1 |
    Cell[BoxData[) g  Z6 P1 ^5 V" a; d2 Z
    RowBox[{
    1 y4 d2 ^- @9 S3 p3 b  RowBox[{"Ca", "[", $ l- B2 j# P3 \; |
       RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",+ f; _6 I5 A' h
    CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {2 w3 ?6 d. E% Z/ Z' L
      3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9, 9 t' j- o% S  _( A4 d. O
      3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {
    : i) z& k8 U' W" `+ U$ D2 @  3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9,
    ! {0 D# i1 X' b3 U5 K" p8 _! z$ s" r  3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {0 b9 \! m# Q  @- m" b
      3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9,
    + @9 ?( {# I% ^" O0 D  3.577921435703125*^9}}],
    0 w- H9 [0 _' U) o" L
    $ ?0 [7 E2 {& ^4 K5 q, q1 iCell[BoxData["0"], "Output",
    6 }. R( M% \' p- G8 O1 Y( A CellChangeTimes->{9 f. G" w" H4 @7 @4 q5 G
      3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {
    - J, z3 ?) @9 k! g+ {$ Q   3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9, . |# s8 }1 \% o/ B$ n
       3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {% Z/ ?" Y/ h% p( ^5 Q& {
       3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9,
    $ y2 \( }! N! Z* l   3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {0 n- o5 o5 O! b6 W( M4 F* Q4 |/ r
       3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9,
    : I# a$ F7 y* F8 R   3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9,
    ( }) j/ g; N: Q   3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9,
    1 t0 t& k( T/ p   3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {
    % W% @! y. v: b   3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9,
    $ ~5 N$ o7 ^* E" m5 U   3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {
    1 {9 z. J, }& }: Q2 ~/ E   3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9, ( }' j: m0 ?. i8 B. Z3 L+ x
       3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]6 d9 @# A3 D5 c2 @7 U+ y
    }, Open  ]],1 b1 c2 \: E; \/ {9 H6 X

    & H* G' }7 W) u  `& S9 jCell[CellGroupData[{
    ; U; [' D" }- n9 m7 b: I! n$ A# w- k! m! {% h3 W2 s
    Cell[BoxData[0 v* ?/ A: q* s( x+ r+ D0 U, E9 U
    RowBox[{"Delta1", "=", , t. W' q& y. Q6 s2 g$ i  e
      RowBox[{+ n& j5 i, ?- c; O
       SubsuperscriptBox["\[Integral]", , C+ d$ N; O6 o" ]
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], . ^. Z( P4 \- m% Z1 j
       RowBox[{* K2 ]# c3 U: j  p' X1 G
        SubsuperscriptBox["\[Integral]",
    $ q) B1 d& B* V9 k) }     RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], % x9 ?& y! N1 l5 ^6 f+ T
        RowBox[{
    0 n4 n1 l9 H3 `     SubsuperscriptBox["\[Integral]",
    1 J! V/ r9 F2 N. f6 _& F0 z' ~      RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    6 l& g  A5 ~$ S( ?     RowBox[{+ S' s$ s3 j6 p& R1 g
          SubsuperscriptBox["\[Integral]",
    7 J2 _, T, o3 x! K* G       RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],   P* i: Z' O4 y0 J% y/ B# Z
          RowBox[{
    : R! V4 `* l9 i1 z* t3 [. i       SubsuperscriptBox["\[Integral]",
    2 r* E- K" k* f* B3 |2 q# Y5 G        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    5 |  X. \' }, o# N       RowBox[{
    0 m, D$ E3 a4 [* ?# c- }2 ~        SubsuperscriptBox["\[Integral]",
    ' _' ?+ d5 K4 g- N         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], $ f5 G& a9 g- o0 Z
            RowBox[{  t, c* l" I( s( B* Y0 v9 r
             SubsuperscriptBox["\[Integral]",
    . I  l& {6 Y0 O  v/ a          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 6 ?- ?1 L  Q( @6 R. M- g
             RowBox[{4 x; F- S) C; [: D! b
              SubsuperscriptBox["\[Integral]", : B- C7 R4 F& Y" D
               RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    / ~* s5 T# B5 b! Y  W0 O          RowBox[{- P$ F3 F6 A. e; w( D3 s! ?& d
               SubsuperscriptBox["\[Integral]", 0 |! E& }7 Y9 M4 o$ F1 V
                RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], " x# B" i9 @0 m  H1 D& {
               RowBox[{
      b: V# B" C1 a9 C$ p. O; H( D            RowBox[{"Exp", "[", ! X- ~/ D$ B4 h9 [! o; W
                 RowBox[{* H' N2 m/ X$ F4 b
                  RowBox[{
      l# \6 p* M9 \* l6 q( E               RowBox[{"-",   T: P1 _  t% n) j- ]6 X2 Y# k
                    RowBox[{
    / P3 Z' W/ o, u) P$ e6 F                 RowBox[{"(",
    ' i) V( q" i/ Y" V. l* N! j2 p                  RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 3 s6 M% Z5 Z' [9 E
                     RowBox[{"(", 8 o. [; U) O. J4 l
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/",
    6 v/ a1 ~6 s; o# T              "Delta"}], "]"}],
    ) d6 P6 M. ]* b  [            RowBox[{"\[DifferentialD]", "x1"}],
    ! ^+ i' n# [( n$ @            RowBox[{"\[DifferentialD]", "x2"}],
    2 |. f, d) S7 B- b1 z/ }            RowBox[{"\[DifferentialD]", "x3"}],
    6 H# d: f* m. c4 j            RowBox[{"\[DifferentialD]", "x4"}],
    $ u% P! j% s5 i" @# N, m            RowBox[{"\[DifferentialD]", "x5"}], * G3 p7 H3 [5 o
                RowBox[{"\[DifferentialD]", "x6"}],
    ( b. \- {! I+ n# ]% C( b            RowBox[{"\[DifferentialD]", "x7"}], + H* P* o* c% H. l
                RowBox[{"\[DifferentialD]", "x8"}],
    6 ?3 u) z+ k  l" K            RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input"," [+ T% j+ E& z
    CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {" r9 z/ e6 g; v" B9 D
       3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9,
    , }, p0 J5 H9 {8 l/ p% O: n3 j   3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {+ J" o( D& {) S. V! g  ~3 ^5 \
       3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9, % f/ j/ B3 P3 Y
       3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {
    - j! R% e0 j- {9 U   3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9, & y* g  l4 ]) D: x- A( P( d! k; }
       3.577918964453125*^9}}],% q: n  j( [* m8 K; I7 N$ |
    4 g2 [4 D8 U7 e+ @7 C6 M5 U$ a5 K- g; `
    Cell[BoxData[
    : z* n2 T6 g* N RowBox[{"97.40909103400237`", " ", 9 ~: A. e2 k# O$ U4 O! n# b
      SuperscriptBox["Delta", "8"], " ", 1 x1 X3 r: V0 F/ l8 s) `$ C# k7 q
      RowBox[{"If", "[",
    0 a2 K; J, a3 ?- e0 N( F$ m. e; D' L$ c   RowBox[{
    - k4 F; c$ k. H3 A    RowBox[{2 n. e1 {% U* T. H, C6 [2 f
         RowBox[{"Re", "[", 2 l- G# Q1 a- \4 Z
          SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",",
    , s. w% s! H; `4 g    FractionBox[
    9 b, Z4 r; R8 \* Y     RowBox[{"1.7724538509055159`", " ", " N. B; T& o* S  u
          SuperscriptBox["\[ExponentialE]",   {3 I4 R3 D' f# W! }! d
           FractionBox["1.1102230246251565`*^-16",
    0 i2 k- I' _; [5 w2 @$ [        SuperscriptBox["Delta", "2"]]]}], ! z7 E; }" h% \7 o
         SqrtBox[1 F9 C$ K/ K3 k% }
          FractionBox["1",
    + R8 C0 m- W" S# Y3 J# F8 k; Z       SuperscriptBox["Delta", "2"]]]], ",",
    4 O1 T! h8 B% d  ?' U/ _    RowBox[{"Integrate", "[", , ^/ Q3 Y7 S# v
         RowBox[{
    1 @' d6 V' w, m2 e      SuperscriptBox["\[ExponentialE]",
    9 J$ o# t; M* Y( |9 U       FractionBox[) |3 F; K, e1 X! p/ W9 h% [
            RowBox[{"1.1102230246251565`*^-16", "-",
    8 z1 X$ x3 y/ f+ S) Y, H2 d$ w         RowBox[{"1.`", " ", / e7 G2 C$ K4 h
              SuperscriptBox["x9", "2"]}]}], 4 f- H( s  w( ?/ u  p+ f0 L
            SuperscriptBox["Delta", "2"]]], ",", $ P1 c5 p6 W" Z! H
          RowBox[{"{",
      g# Y& s* Z2 V8 v/ C       RowBox[{"x9", ",",
    5 N6 b- c) r. `: N0 _        RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", , |, n5 N( X6 @
          RowBox[{"Assumptions", "\[Rule]",
    9 c$ b* }% r9 a/ d1 F% W+ y) u       RowBox[{
    ; O; K4 F; Q$ _3 t% \) w" O        RowBox[{"Re", "[",
    * V+ ^: t" N- R1 [, N# E3 `         SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}], 4 H2 v9 `) B( \5 R1 o6 ~- r
         "]"}]}], "]"}]}]], "Output",3 W4 B6 \9 x  q4 ^( G; w' [8 ?. |2 ~
    CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9, 1 X2 B+ ?3 N( ^: C8 Q
      3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9, : I& R- X' D  M  e! e0 D  L
      3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9, 0 L0 o. ]6 D( [2 i6 H* @+ O" L% T
      3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9, 1 E& |6 _* Q9 a9 j& A# N  o
      3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9, 7 l- R/ e4 b0 l! E1 e+ d6 x& a
      3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9,
    " `$ \5 h) Z8 w  3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]
    1 U4 y0 @  ~) q/ f/ [+ }% k5 F* f}, Open  ]],
    : V5 t) `1 h  y2 V5 m4 f% k& l/ f/ o; {  m, T# G) {- i
    Cell[CellGroupData[{
    2 Z! f$ p: m, Y; j7 f6 e9 m: Z& B1 x# x3 I7 U
    Cell[BoxData[
      p$ ?% K5 ^" @  S- P" m, o. \ RowBox[{"Delta1", "=",
    # E7 g& O; q# N: T- N( f  StyleBox[
    : R2 G7 ^% E) Z, W$ T3 M, V   RowBox[{"97.40909103400237`", " ",
    3 s% v; ~, ]% L9 j    SuperscriptBox["Delta", "8"], "  ", ( t8 b) j7 W7 u: V4 A) T* \4 H: v7 r
        FractionBox[
    ( G4 V- j2 U; U+ Q     RowBox[{"1.7724538509055159`", " ",
    5 R  N+ B* L/ o+ z6 A      SuperscriptBox["\[ExponentialE]", & u3 W1 ]; x; l6 d' ^  e
           FractionBox["1.1102230246251565`*^-16", . M1 W3 N" s# i2 H1 L  u# ~+ [6 k
            SuperscriptBox["Delta", "2"]]]}],
    ! q, H5 b& ?* H" F  P; P+ X     SqrtBox[( ?" F7 t& o* U4 Q- ~
          FractionBox["1",
    7 U4 N! c6 n- g  C       SuperscriptBox["Delta", "2"]]]]}]," {% `! ]* `4 U5 t$ ]
       FontWeight->"Plain"]}]], "Input",, d' ?5 S! U3 R4 v
    CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {
    1 t. g& i" O/ r   3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9, . p4 p2 f( S& Z% [; j
       3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {
    ' n. l3 u$ b4 m7 o3 _# A   3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9,
    5 @" l2 l; f( s, W4 o   3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9},
    % c, z( z' Y9 M7 x0 _5 f   3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],0 Y0 n0 @+ F) ]# l+ i

    3 L3 G4 g; e$ h" \9 I+ ~Cell[BoxData[3 x# Z: n7 {7 J; C! ^* V) N0 Q
    FractionBox[/ W, ^. x) A% ^- q7 R  U  i* n
      RowBox[{"172.65311851642346`", " ", 4 a% ~; L# ]2 L. l7 X
       SuperscriptBox["Delta", "8"], " ", " l/ L: P' K* H, G" Q" @
       SuperscriptBox["\[ExponentialE]", ) B  p* m7 N) K  r! h
        FractionBox["1.1102230246251565`*^-16", : a7 X8 \( p( r# P9 W
         SuperscriptBox["Delta", "2"]]]}], 8 V/ A. w5 M6 |' q6 K, |
      SqrtBox[' B. @, \, O- k9 ~
       FractionBox["1", $ K7 q# m* |( u: J/ R
        SuperscriptBox["Delta", "2"]]]]], "Output",
    # Z7 p; p9 U  g4 d9 t' F: y CellChangeTimes->{
    - w" J# C8 l( F5 ~! |- k  3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9,
    6 i% \# I' v2 n* y  u( ]8 k6 B  g   3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9,
    ; B* G3 }+ D) m( f8 r6 B/ Q   3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9,
    , I" P+ C' t; l  M8 F: ?" \   3.578012166234375*^9}]
    2 Y% u  E3 t; s1 E: X" p- Z}, Open  ]],
    ( G4 d" b5 z6 l) b
    2 j* t! ]: F5 R6 `/ n) a' _" WCell[CellGroupData[{
    4 |9 I, s. X2 Z) t$ b4 J- @
    ( J' N& S8 O1 ?7 `Cell[BoxData[2 @+ Y' q1 m4 U# _' M' R
    RowBox[{"DeltaX", "=", ! b  r  z2 ?* l# v6 b4 n( v
      RowBox[{"FindRoot", "[", 0 F" T2 d/ k' ~4 v8 l0 j
       RowBox[{3 {3 }# z6 L5 K7 x* B( t
        RowBox[{"Delta1", "\[Equal]", "1"}], ",", & p+ ]9 d% ?1 d
        RowBox[{"{", 5 _  ]6 E( F: j9 O& I) H
         RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",
    ) r! o# H4 s, u4 |" @ CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {7 D$ c. P# l% A
       3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9,
    / `# _5 R0 F5 q   3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9, 5 t- r: C/ u% p
       3.57791921584375*^9}}],
    2 A3 Z% w/ _  W: \( I4 C( S  ^8 i! K6 ?
    Cell[BoxData[
    ! s2 \, ^1 f) K) `4 y RowBox[{"{", , l4 R; d( l9 x2 O$ I0 ?
      RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",
    9 J* l- x. |; B! R1 s  p CellChangeTimes->{
    : f5 S# _. i4 S; _  3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9},
    , |- }9 l7 t2 x' b* l7 V( c   3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9,
    0 {; @2 v- D" k   3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9, * e/ u; Q& G( s; S  D, N% r% ^
       3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9,
    / [4 ^% j1 ^4 n, E% \   3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {
    ) n9 z: l" l' y8 ^2 \   3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9,
    ! Z7 J5 C6 y9 x2 u0 E3 c0 Y. W   3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9, 6 ]! |- r* R5 W- y
       3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9, - v2 p% G, }# Y' T/ }. c
       3.57796070150625*^9, 3.578012167703125*^9}]
    9 D/ T, I& {8 x$ i+ Z3 J- a}, Open  ]],8 J5 q. A" n& u3 |7 W& A8 i

    $ j3 g, ^1 Z2 a* w+ C+ V; XCell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\
    ; M9 v$ D0 w0 K. S! c! Y\:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",( _0 v" i; ~1 R" A7 E; i5 [
    CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {& }. K1 C& M2 D% c
      3.577960705312657*^9, 3.577960707621461*^9}}],# o) Y1 ~* L, t& Y4 {4 [3 U4 d

    * b) C8 ]/ V- U4 m% e- PCell[CellGroupData[{
    * P5 I$ H# X/ i/ F) g/ z* I
    0 [, O7 s. p: G& JCell[BoxData[8 h- g1 r4 ~+ ~6 [6 [- P/ a
    RowBox[{"C1", "=", "Ca"}]], "Input",
    ' e0 g4 T  p+ p/ c  p1 v CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],: q; J9 z( T: [, l) q" T' ~
    ' K1 Q2 I) E3 i1 U: y7 l7 i, b
    Cell[BoxData[& F. `- S: _) G$ B- {0 E
    RowBox[{"{",
    : w: V# _. T6 D  RowBox[{
    7 E& R" Q  f/ q* B  "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",", . z* J! o6 |; h. \$ T1 Q5 W! W
       "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", * m# K+ `! p& e; l
       "0.`"}], "}"}]], "Output",: q& [: x" ?, j& r6 N! ^+ j
    CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9, * p" P! y7 n! o# i, l
      3.577960710273465*^9, 3.5780121855*^9}]
    ) d- c' Z3 I7 j8 B6 a6 [}, Open  ]],
    3 U; q# t1 c# w1 x6 D4 X8 V3 K6 @8 \4 F5 L4 f1 }/ H0 n. q' z
    Cell[CellGroupData[{
    . ~. Y# d4 U* A7 |: p" \, _2 L
    # a! s( T  a5 zCell[BoxData[) B8 c) L* P, i, ?
    RowBox[{"u1", "=",
    ( V. i! c$ |3 [0 M, ]  M; H" G: ]3 Y  RowBox[{
    , I4 P0 K' y3 @) i: E& \) {9 a   RowBox[{"Exp", "[",
    & y! f5 S2 \+ s$ ~' J4 m    RowBox[{
    2 E8 V1 i7 f  }1 V; j( h* O. @     RowBox[{
    & n- n5 p5 L" x* W0 X0 E      RowBox[{"-", - R% M5 }! W0 J+ J5 n: l! ?
           RowBox[{& h4 G+ y1 q( F' j0 n: v
            RowBox[{"(",
    / b( O& z3 ?/ w' ^) G2 u. X         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    3 \( w1 {7 Z: X+ }        RowBox[{"(", % V1 D, p4 X% S
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],4 ~, N" y$ I( s3 ?& k2 N. \
         "]"}], "/.", "DeltaX"}]}]], "Input",
    2 ?( W5 U. m6 h' p3 V: W CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {0 [# z$ \5 Z6 R0 r. X
       3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {
    : b+ a. u: D& X7 R# E   3.577919193484375*^9, 3.5779192326875*^9}}],1 H2 q8 l& b5 |- l! @

    + d5 ]+ {( {0 Y1 E, p9 d7 `Cell[BoxData[
    3 ~5 S4 T& b; M SuperscriptBox["\[ExponentialE]",
    : o4 i# u$ i- e$ w# q. y; T6 {  RowBox[{"3.141592653589793`", " ",
    % b4 T- i* `1 b3 T  G! {0 d) f   RowBox[{"(", & ], g, @7 k  ^0 k
        RowBox[{* G3 e2 {! o$ W4 w  A
         RowBox[{"-", : [1 K/ e2 p' }) c
          SuperscriptBox[, c" `0 D5 Z+ i1 ^$ W
           RowBox[{"(",
    ! j% w$ u( r/ g; Q) O        RowBox[{
    - T% E; N6 B8 ^6 }         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", " _. r" \' G& {0 i( M. f
         SuperscriptBox[8 o6 y6 \( C! u' p; K! q5 S
          RowBox[{"(",
    7 b- W7 M' {# C6 v       RowBox[{
    4 D0 A) k6 D, h+ F. B        RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", 4 n2 p$ L8 n, v' U: I' H
         SuperscriptBox[5 e+ E1 ^" v' j( z' |. m- i8 U7 X% ^
          RowBox[{"(",
    ' M- z  |) C+ Q0 `- {( W       RowBox[{
    $ W1 Y* P% n1 T4 d6 G        RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-", ; w3 [7 I. v# T7 h+ l$ |, v! ?
         SuperscriptBox[
      I" \2 T8 q9 Q# d$ p8 I! ^      RowBox[{"(", + R: D! Y8 y6 K$ e
           RowBox[{
    ) k  j- N0 s; W: r: G        RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-", , L1 `$ r) ]* {8 j3 e% i
         SuperscriptBox[
    ( K3 `# e9 x( _  O      RowBox[{"(",
    % c  I/ l& W9 q# U* w       RowBox[{
    ) _- w0 R& W+ H9 N6 l# o        RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-",
    % m! [) C" T! B5 T  E$ u# v+ n$ g     SuperscriptBox[
    ' j& f; S3 ^5 B: U2 j      RowBox[{"(", & b$ o+ x, {, s: F  ^( M- R
           RowBox[{; `: q& n4 [3 C1 z0 S1 T
            RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    + K& D5 _0 x7 p) G* h     SuperscriptBox[5 R/ r# S6 }/ d8 ?
          RowBox[{"(",
    0 y4 K& q3 k6 Q$ f# f4 l" R: K  e       RowBox[{0 p& O1 ^* [' p, O; x# Y% j
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-",
    * b5 o% S! t, ^1 o4 `5 ]6 p$ k( M     SuperscriptBox[
    & ?$ w9 J3 l, i* l2 Q6 a7 X: e5 e      RowBox[{"(",
    ' V' K' Y3 S3 k/ F' W       RowBox[{
    % g$ S% q7 C! [- ^- M3 V, Q        RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-", 6 o7 o2 b* T/ j! ?8 \2 c9 ~  A
         SuperscriptBox[
    % d& V) u# d' |( r  n: n      RowBox[{"(",
    ; M3 a7 Q- d* E       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ) t/ J9 S) ]& R! P6 Z$ j& s' S0 z    ")"}]}]]], "Output",
    9 M) P# N% Q4 g- u' M, U CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9, ) O' R" O6 S: E2 N6 J
      3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9, + Y: q0 Q( U5 O; A' x# r
      3.578012187078125*^9}]
    6 q4 G" L$ S( a}, Open  ]],# D  y" Z& t2 A2 T

    $ Y0 }! L# o3 v8 [: mCell[CellGroupData[{
    7 H; W( x% J2 k7 f" }4 ~
    ; _8 Z) y* [  i+ M6 x# L+ c5 gCell[BoxData[5 q5 _/ F( z; l0 P% _) F
    RowBox[{"C2", "=", "Ca"}]], "Input",
    9 k/ O" k- B7 b CellChangeTimes->{3.57792047321875*^9}],
    5 X7 |1 X( z- v, ?/ q- r1 H7 o
    $ C% n8 R: n) o  @2 g+ g8 z% V( ?' f8 gCell[BoxData[
    ) v# ]6 Q$ s1 v3 _% g RowBox[{"{", $ H6 }' a$ O" g; `/ A& C) P+ F1 I; l
      RowBox[{
    ; o, o" z& j7 g& J& i3 w+ V# j  "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",", 8 U) E7 d  ~1 \) G6 _; t' h
       "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}], 2 U7 {$ G4 S. o/ q9 e+ X6 e3 F
      "}"}]], "Output",! I1 b/ a; r) `; l) B4 f
    CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9, : X  e/ q6 N7 @' x# }; c) f- h
      3.5779607401163173`*^9, 3.578012204671875*^9}]9 \$ C+ \  f2 I0 `4 `* K: w
    }, Open  ]],) C/ w" ~& v) A3 f
    6 y, ?" e, ^! O  D, I; \. L0 `
    Cell[CellGroupData[{
    & \3 c: [: u7 s) J% B6 E8 _3 h) D+ s& m& a  N; j* N. S
    Cell[BoxData[
    / B8 h' ~$ i4 N4 C& P7 n. B RowBox[{"u2", "=", 1 j) p: z# P! H" i
      RowBox[{- @3 S- Z3 x3 r1 ]4 J( _/ _( _
       RowBox[{"Exp", "[", 2 P8 K  [* T- h4 j
        RowBox[{
    9 l# e" X. K6 X1 ?8 X, d     RowBox[{& U& f0 n' Y8 s9 o
          RowBox[{"-",
    9 a- \' L/ e1 Y: }0 @5 J4 Q       RowBox[{
    2 k( {9 Q* N8 f& a! B( I* N        RowBox[{"(",
    / j7 U/ k- P: c% s3 T         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    # }; l1 F/ q1 Z- n8 T! Z) M        RowBox[{"(",
    ) d3 ]2 B3 r3 }, a1 P- @         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ' q; L# P3 f' p* Y$ D5 E/ F0 R1 _2 W; q     "]"}], "/.", "DeltaX"}]}]], "Input",; Y' _6 A* [* m1 r2 c2 [0 `
    CellChangeTimes->{3.577920484109375*^9}],& M2 B* s2 Q+ J3 u% E) L# Z
    3 u4 F& {- e5 B" x) g0 V
    Cell[BoxData[
    0 W5 H0 p& A! E! Q1 \ SuperscriptBox["\[ExponentialE]", - ~; ~/ m6 W' r% s7 x( t
      RowBox[{"3.141592653589793`", " ", * ]# L: j* k5 }+ v; V
       RowBox[{"(", 4 r, \7 V- _2 v8 H# m4 M$ b
        RowBox[{
    ( h  }- H7 W& |' R/ v5 ^     RowBox[{"-", * P; j3 F7 E4 X5 w
          SuperscriptBox[
    5 g" n* w9 f2 ?/ D5 V' l       RowBox[{"(",
    ! C$ ^. Z* W% i8 y3 h        RowBox[{) W- [; T! s0 K  E3 @' E
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    8 u  E' k8 G* ?$ q     SuperscriptBox[
    / j5 S/ B- r4 w. a: r      RowBox[{"(",
    % W* m. L; X) b- \       RowBox[{+ K7 ~. x! z; n
            RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-", + S3 U$ A9 D, r/ `" z
         SuperscriptBox[
    ) u/ C: Q1 W7 S  X6 |( ]8 d4 b      RowBox[{"(", - s0 j. t, x& W, ]
           RowBox[{
    5 K, d# ]0 x; R# l! h        RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-",
    6 V/ K: |& h* g' F# F% I     SuperscriptBox[
    7 G4 L4 ~* z* B: k9 H& s0 f2 c, V      RowBox[{"(",
    4 N; a3 Q  \# m$ Z       RowBox[{
    $ I; n7 S$ L" H7 ?0 G; G- d        RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-",
    - [, c( K. J8 }. c     SuperscriptBox[$ p6 I7 n: f. f9 s% O
          RowBox[{"(",
    ) {$ k3 ~* v* S. d7 a" `- r       RowBox[{- P& ]8 {" h% d4 J9 v5 U) P' T2 A
            RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    7 X" ~7 f! T( E1 G, P! P     SuperscriptBox[4 e, {8 H* _* N' @. p
          RowBox[{"(", + T. c$ r" d: P, P) [+ ~/ z5 K
           RowBox[{3 r$ @+ B0 ?- n" [& `
            RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", 1 q$ ~6 k3 |+ b+ B  M
         SuperscriptBox[
    , b& F! u' c! S0 }, d0 C0 S      RowBox[{"(", 1 E1 D8 z1 [& L3 r/ C2 a- _
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", - p( v' @% F; ~: U  [4 X
         SuperscriptBox[! T1 n/ @/ S( G! i
          RowBox[{"(", 9 r$ a9 D# G8 O) U# R6 J* ]* g7 E
           RowBox[{+ l2 t7 _8 D7 f( Y3 t! o% B5 x
            RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", # ^. R+ |5 n  m" r, D. O' B% O- f
         SuperscriptBox[
    ; y/ a5 [, v- u# }/ z# p; m      RowBox[{"(", : Y; \+ R8 Z" ?5 T7 Z
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ; i; B3 X6 t2 K7 [4 U! I    ")"}]}]]], "Output",
    . u  T. M: v8 c7 R9 K CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9,
    ; }4 q5 s# b% b* c' S0 H5 n  3.5779607413955193`*^9, 3.578012205484375*^9}]% D, W: v' L2 N
    }, Open  ]],% k7 c4 ]+ @# j; s" Z+ G( c$ ]
    6 j) W3 N# I" ~0 Z6 l, F: H
    Cell[CellGroupData[{2 r; Y- a3 Q9 b9 f$ `
    ; d, U3 _4 \/ z3 a+ g9 W: g
    Cell[BoxData[
    8 {" h& k4 U3 R; r RowBox[{"C3", "=", "Ca"}]], "Input",8 K4 W% `9 N( s/ h9 R
    CellChangeTimes->{3.57792064125*^9}],
    4 [) @! X" l. W$ s# v6 u; n' ?' W: n0 C# z3 N1 |7 K' R
    Cell[BoxData[
    & _2 L) @$ V! t$ S$ }' @ RowBox[{"{", 3 }( [, N/ Q9 H" O9 ]
      RowBox[{' l3 b: F3 t4 [8 L4 p1 }
      "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",", + O5 p; j& u! l; a
       "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}], * ]" E3 W! Q: x; ]2 T; E
      "}"}]], "Output",& O, G" D1 ~3 Y' D
    CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9,
    + r: s9 }% y) g* S/ }: N) s  3.5779607642027593`*^9, 3.5780122103125*^9}]2 l* O  J( y: h+ H
    }, Open  ]],
    4 Y4 d/ K1 i8 J
    7 e6 e" l, ]0 j, z5 w3 e7 B9 GCell[CellGroupData[{7 a5 E4 l0 V6 x$ r
    . t2 T0 D* W; @! R0 l8 b1 z$ K
    Cell[BoxData[
    ! O, h7 |; x1 u1 q* } RowBox[{"u3", "=",
    / V4 e0 a$ O1 ?8 U* q  RowBox[{
      v4 ~; d0 h) v% H+ f: b( o   RowBox[{"Exp", "[", ) |+ y2 S; `7 a
        RowBox[{! k7 T$ {4 u+ m9 Y9 S5 d5 I, x/ d
         RowBox[{, v7 [; `3 p. F3 q2 X! C
          RowBox[{"-",
    - }& G+ [, a5 d       RowBox[{' L" v# W; @' @9 c$ `( {# C
            RowBox[{"(", 8 Z* ]) ~+ d1 f3 U& ?
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
      d, c: Y/ E0 Q        RowBox[{"(", ( x, w; ^" q7 j
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],, m  T' O: E. ^" R3 M3 P
         "]"}], "/.", "DeltaX"}]}]], "Input",2 \! w) O' T0 N
    CellChangeTimes->{3.57792064921875*^9}],/ |- G& q: B1 Z3 h
    * J( A: z4 v- Z# _: F
    Cell[BoxData[
    : u: S/ J! G. w3 `5 ~ SuperscriptBox["\[ExponentialE]",
    / d$ q: G$ W7 `  RowBox[{"3.141592653589793`", " ", / A) k% X( {9 Y* A
       RowBox[{"(",
    + f; b8 h3 |  z1 j5 Q    RowBox[{
    % L0 |: S# y/ F) s% m     RowBox[{"-",
    : ^1 e+ Z8 y1 f% U& p0 a" k1 w; e* ?      SuperscriptBox[
    9 [. j: }4 ^3 y2 g$ |% p       RowBox[{"(",
    ' ]' V1 `7 d. S' X; I        RowBox[{
    % f9 J" Y! }$ P+ b; ~( g1 m         RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-", / z& k6 C+ D) s+ _& x
         SuperscriptBox[' F0 r  [# q5 }! U2 K% V( Q  P
          RowBox[{"(",
    % J" j' o# x5 p1 J  A* C7 s       RowBox[{4 L1 U% L0 p  O" _0 K7 q6 T
            RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-",
    , H% ]* S% J1 U7 J5 }2 l: b  O, V     SuperscriptBox[
    " _5 d& R) d$ a      RowBox[{"(",
    4 X' T- e0 }0 K. _+ I& \) H" C       RowBox[{
    / v2 J) O" \1 Q6 Y6 ~+ g+ \/ `: t        RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",
    6 H) B% @8 Q6 A) t  `, l% k* H     SuperscriptBox[
    1 O% g* a& b' s5 i: f5 u      RowBox[{"(",
    ( W. F8 U7 b! m/ @       RowBox[{
    9 ?. a$ W7 ]1 d, R, |        RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", & a3 f0 D" u; S' i* T% t
         SuperscriptBox[
    ; H# h  d3 `$ U# e- ?) E& V* m      RowBox[{"(",
    6 B" v0 \' e3 o5 D) P' \       RowBox[{
    8 R% U& a2 z* V' f# q4 |9 D* q( D        RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-", ! M  O$ |# X2 Y6 _0 I0 p/ o
         SuperscriptBox[' Z3 T- A- R3 p: W1 d: b8 Q
          RowBox[{"(",
    ! w. b- `. K9 G1 z  P( G: Y3 F! M       RowBox[{
    & l5 p! c) [7 y* \        RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-", , ]6 ?$ G+ k* J+ a
         SuperscriptBox[
    ' d! C  \3 W* P) A      RowBox[{"(", $ S- c( h$ k# h* r) }9 R2 b, P; [
           RowBox[{
    ( j- m2 ?3 C8 V9 c        RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    $ A* C: E# X6 U0 [     SuperscriptBox[
    , }) o0 d8 ^# H% Q; z; K/ P      RowBox[{"(",
    # h4 r7 n1 l) x0 u# X) _       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ; J2 s4 {9 @$ d$ ~9 N
         SuperscriptBox[
    8 u4 l2 H- l6 i$ J/ q% W, L* J+ @9 y      RowBox[{"(", " U! D  r' C7 G4 v8 o
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], ; {! f7 E( p/ L" _8 z1 y0 m" O5 A
        ")"}]}]]], "Output",8 i9 I$ y" X8 Y1 L( U- Q- _7 H
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9,
    ! a  j6 [! [. J- F7 r  c* ~  3.5779607654819613`*^9, 3.578012211515625*^9}]
    ; w6 s' t; m) G7 Q. |6 U}, Open  ]],
    * W$ o; L; l) u2 f6 d; W- U/ {6 g8 G6 r: T" @. P
    Cell[CellGroupData[{4 b5 k4 u( m' z; }! ~6 ~

    . w$ F/ o2 k. o& N3 mCell[BoxData[# A0 L# k6 e3 \8 j1 }& h1 e
    RowBox[{"C4", "=", "Ca"}]], "Input",
    9 A7 ^1 U- l( l+ y6 c8 V CellChangeTimes->{3.5779207559375*^9}],
    3 A6 K7 H3 S* M  p# g% W3 J( {+ ~! Z
    Cell[BoxData[
    ) u7 g6 S& f# _' b' a RowBox[{"{",
    $ v. x0 E' {8 ?  RowBox[{
    0 V+ r) O( l6 ]" j$ O  "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",", 6 q2 Z7 `! G; s1 i" d  r
       "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}],
    / G9 H6 N" K! n) W/ [  "}"}]], "Output"," V+ a7 s  x9 V' ?3 K/ i
    CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9, ) `( d) c% r2 n& [  L5 K7 h
      3.5779607861363974`*^9, 3.578012216171875*^9}]
    + F6 g+ C( K' j" C. H4 c5 h}, Open  ]],, `/ i  u" a$ e" M* x

    9 v7 X. v2 f# ?$ Q5 BCell[CellGroupData[{5 E. s1 t2 A# f: s
      }6 U2 Z: z7 b$ [6 o$ O* w
    Cell[BoxData[2 C1 X' j! z3 |9 s1 D
    RowBox[{"u4", "=", ; P9 B( ~* w- a2 _$ Z
      RowBox[{7 \3 w* C! l0 D2 L
       RowBox[{"Exp", "[", * g9 |4 N! r$ }9 H8 P
        RowBox[{4 _: s, t. R' o8 _
         RowBox[{
    5 n9 t$ Y! X$ @# }  d( n      RowBox[{"-",
    6 Q, C, t4 K; m" C6 P       RowBox[{1 s& Z, Y( c! F1 m
            RowBox[{"(", ) f) i% K1 @/ w3 [) A! W5 W
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ( U# m3 n2 F  P; D        RowBox[{"(", * n6 U4 Z) L& ]* p2 a" [
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],+ _, ?9 v- C$ ]$ c
         "]"}], "/.", "DeltaX"}]}]], "Input",+ Y! U' p9 S; T' t3 b
    CellChangeTimes->{3.57792076325*^9}],
    / Y/ }: b7 a. r% l3 i7 k& w& V3 ^* |5 N: Q2 {8 X" N4 b
    Cell[BoxData[* v2 d' C' D8 V6 Q. m
    SuperscriptBox["\[ExponentialE]",
    % t0 e; V2 z/ b2 O7 i! \  RowBox[{"3.141592653589793`", " ", 2 l5 z% a' x+ `1 V$ H6 K
       RowBox[{"(", 1 z3 `: P+ [$ }
        RowBox[{+ p+ q' l5 |' z$ {8 o0 }8 l# N8 [
         RowBox[{"-",
    ( |; ?% t& q% h/ j& C      SuperscriptBox[& M) g3 o: G* r- I: M
           RowBox[{"(", % C/ ]7 p5 c5 {# D5 T# L: G$ j
            RowBox[{
    " v0 @) n; `. G2 C8 S: p1 e7 H         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    6 H/ H& A( E& J+ R     SuperscriptBox[# ~% b+ F! u6 ^+ r- v
          RowBox[{"(",
    4 F. D2 _  h( T" K( }3 F       RowBox[{
    % u: {. z2 Q6 k9 s+ J0 g; M: M; P$ N        RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-", $ s4 g. `( i. a* A* z; k* L3 M
         SuperscriptBox[) n) w  ~0 W9 P) d$ H  d/ _
          RowBox[{"(",
      B0 N4 w! u" z* T. x& K( p1 x       RowBox[{0 r9 r" S1 k- d# Z! q
            RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", ( e5 ~8 o: S# n2 X/ f* h
         SuperscriptBox[" F$ {/ a4 t$ D& F/ Q6 x  C
          RowBox[{"(", - e0 B. r( D7 D0 U/ H9 z
           RowBox[{; c: A+ k" Q! i; @
            RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-",
    5 @6 Q/ O5 o: D, Z1 m' ]2 q     SuperscriptBox[+ Q* Q7 S- n4 r! z( m: w
          RowBox[{"(",
    2 F' c. u* P6 p& v       RowBox[{
    4 k" ^9 Q6 u* o( r0 h$ b0 }9 J        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    7 V8 ?2 @3 L# S! Q5 [     SuperscriptBox[3 v+ Z! }- {7 M4 V$ s2 k
          RowBox[{"(", 7 @; J* E# B! c4 F. ~# D
           RowBox[{3 j3 m) b! Y. O8 x
            RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", % u, _7 u( S8 X2 @; h
         SuperscriptBox[
    2 u- j) D9 Y1 l/ r      RowBox[{"(", 5 n. C- l  c6 d1 q1 `1 J- B3 d+ _9 x
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 3 ?6 ~  K9 c* n: G- r7 h
         SuperscriptBox[
    1 W& R! Z' w# z3 }      RowBox[{"(",
    : s/ \/ k9 w" o8 F3 x; |% }0 J       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    8 }4 c6 G  ~( C, q  O! {4 U     SuperscriptBox[
    . Y9 j  |) O2 W& z, z& J      RowBox[{"(",
    ! E8 \% T% C% I- ^* d6 P, e       RowBox[{8 P3 n# U# N6 v6 p6 p0 q+ b
            RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], : M# d' C( @3 ?  |# T
        ")"}]}]]], "Output",
    , k5 t# k1 P1 `" d' B CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9, ; s. c' R# A. Y3 _, I* S& B8 Q* [
      3.5779607873531995`*^9, 3.5780122169375*^9}]5 e& t$ h! v( ]+ h* Z* r; w1 ?2 j/ u
    }, Open  ]],
    . q' F* v- d2 o5 E4 z
    $ a: f. p0 R6 ?Cell[CellGroupData[{2 L2 W0 c) W" l; b% L/ I7 m7 u) c
    : r3 e) x9 w. I* y2 l3 |* w
    Cell[BoxData[! S! x- x& j+ N8 S7 V3 r. K! d
    RowBox[{"C5", "=", "Ca"}]], "Input",6 x7 d5 G$ H* ^! C! R
    CellChangeTimes->{3.577920860671875*^9}],
    $ n2 B! b, c+ [
    . R5 P- a+ }9 Q; `Cell[BoxData[- w* l- Q" H. C. X: s( M
    RowBox[{"{", " [6 m( ?* G7 }% m+ h# {3 {1 h
      RowBox[{% v, l5 I( ^4 J* O4 Z' j# l
      "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",", 6 i. u; V1 Q0 o+ s6 @, b1 d
       "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}],
    0 b0 i, l% X# l: C. J  "}"}]], "Output",; \7 G: D! G/ p" K) o
    CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9, # H# Z$ z9 w$ g8 d% w+ Z
      3.5779608137328453`*^9, 3.5780122209375*^9}]
    ' W+ Z6 O" e+ ^. n( O}, Open  ]],
    2 s# t7 q$ [. p) O6 W
    + J6 u) v# S% A% ECell[CellGroupData[{
    8 x4 ]2 ^/ g% m2 X$ \
    3 J) A. _0 z3 ?( R) b: k6 iCell[BoxData[3 e) l3 L7 F2 T* \0 k
    RowBox[{"u5", "=", 4 y+ Y; B6 @$ D' W* m* o6 `
      RowBox[{
    * l. n8 U6 T- \6 ]   RowBox[{"Exp", "[", * e3 J; G! t* c
        RowBox[{
    $ W+ H1 E0 A2 c0 g" h$ r     RowBox[{
    : M- n  p: U( R1 l      RowBox[{"-", 2 r5 x# a) \* j" J( i, j1 v% o; c1 T
           RowBox[{! f3 `- x7 N; c" b8 n) u
            RowBox[{"(", & x/ o, V( b' _! r' I" d% E$ N0 @
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", : T; l; i" I0 b* U) I/ K1 u6 v
            RowBox[{"(",
    / ?( L; t2 U2 c+ p2 `         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    3 q* p. C: W7 ~* |5 L# q     "]"}], "/.", "DeltaX"}]}]], "Input",# i5 ]& S2 p  r
    CellChangeTimes->{3.577920869375*^9}],) g  B* U3 N  i  \
    4 W0 [9 M8 x+ X' P, z/ _8 ?9 Y
    Cell[BoxData[. J+ \% I8 q+ {9 A4 E* y! U: u! F9 p5 |
    SuperscriptBox["\[ExponentialE]",   M& x$ z+ Y0 J/ T2 h$ o
      RowBox[{"3.141592653589793`", " ",   _+ W+ K. G6 c( V& o
       RowBox[{"(",
    ( i* ]' C4 V/ |    RowBox[{7 ^8 q. R9 V9 }& I/ R
         RowBox[{"-", 7 C( K8 [) y8 i& D
          SuperscriptBox[& k: E6 R% d4 U0 S
           RowBox[{"(", 3 T1 m- F; R3 E0 K" ~( S  ]
            RowBox[{
    0 Z, o& T3 E. w1 e& z+ f$ F+ O         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", 4 {, O& k1 Z, F1 M) p, K
         SuperscriptBox[
    % k1 R6 S$ X( t- h7 u      RowBox[{"(", ( Z/ U; I- s4 m5 t: L  C, w, \
           RowBox[{0 a% l& G- n- {
            RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    . B) k& v3 d9 q! U1 m     SuperscriptBox[
    $ F; v% i4 S4 S6 d1 J9 `      RowBox[{"(",
    * B7 _5 ]; v6 H  u       RowBox[{
      t0 S) z0 a# c0 F6 Z        RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-", & q5 p- J$ y- r4 b/ F4 c
         SuperscriptBox[% P4 P: O! f& U+ U0 |
          RowBox[{"(",
      R6 j4 N" k# [9 C       RowBox[{
    : O* i7 I2 v! l' ?        RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-", 3 K4 F2 B8 t' O3 i, ~7 ^, Q
         SuperscriptBox[
    - o9 ]; o, m& m" {; j# n      RowBox[{"(",
    6 o' W. Y( U, m       RowBox[{
    1 R: e& p1 e* V$ o* N1 b" @        RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-",
    " C8 L7 Z- b4 A3 ]7 c9 t     SuperscriptBox[
      V, l; J/ I! K; U2 c      RowBox[{"(", - o. s' s, q" W( L- a
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", + n5 C% t9 p6 F" R
         SuperscriptBox[
    % |& Z, `% E; s: b7 R7 G3 a      RowBox[{"(", ' @. Y6 ~+ s3 K) ^
           RowBox[{
    4 o* ]( o2 g6 h8 W/ t& Z        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    # p- v! y' P1 x) y9 s' |7 q     SuperscriptBox[' ?" o, N: i) |  l+ k
          RowBox[{"(",
    $ P! I& \: s' k8 z$ [       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ' i% F) `- A% H0 M! K% H
         SuperscriptBox[
    ) u1 y9 Q' D. O# |1 i% S      RowBox[{"(", # {& y% s8 g, i, w
           RowBox[{
    * B. }; K0 C1 h5 c! \: F: J" f        RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}],
    # T; t: o, {9 D; z- N1 d! N% z    ")"}]}]]], "Output",  A  E8 i" w. I
    CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9,
    2 H6 I+ w/ t- h/ _6 k  3.577960815043248*^9, 3.578012221953125*^9}]
    3 r" g# @  e& E}, Open  ]],
    / g3 z' C/ d' n/ L: C! x' ~/ n3 Z: W1 ?9 k7 j: A
    Cell[CellGroupData[{: q/ ?. ?, Q" w/ k( V$ h

    8 D1 a2 u& e# z- u$ s/ Q+ W8 \Cell[BoxData[
    & F' n% \& m, o RowBox[{"C6", "=", "Ca"}]], "Input",8 i9 x" `& ^7 p* v  `
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],8 |, \; U: E4 y3 Y1 O5 j
    : Z; {, ]2 c' c3 N1 B
    Cell[BoxData[
    % ^) f$ G3 R. m9 R7 w6 Y0 V RowBox[{"{",
    ( o; G7 U, X% g  w# [/ F& E" C  RowBox[{1 B) O1 M9 u, K! l6 Q0 D1 {$ n6 Z* c
      "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",", % [& U; }. w9 v9 n
       "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",",
    ) B" \  V7 i: r   "0.494866`"}], "}"}]], "Output",
    , V7 E4 x3 T, f" n CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,5 v) [" h) y- B  f+ d, g
       3.5779608373044868`*^9, 3.578012227359375*^9}]
    # Y) G3 P2 ~, {2 X}, Open  ]],
    4 |2 o9 L9 ], g5 h* w2 g/ E: }9 b2 h' O+ D1 r
    Cell[CellGroupData[{
    # I& k: T/ s  O! \1 p) e' L
    9 d4 W- P+ l7 [$ jCell[BoxData[
    . g5 G6 t; f. f3 B8 l  c RowBox[{"u6", "=",
    6 ~9 p2 m" Z$ f% b- T% u9 n  RowBox[{! `) d% u+ a5 ~/ o2 H
       RowBox[{"Exp", "[",
    ( \) H& w3 q: S: }  l, f/ R    RowBox[{
    . x/ e6 s& d/ R" w. U     RowBox[{' C, l" Q, S4 w# i; B$ r& }( I
          RowBox[{"-", # G. F7 t$ i1 I5 [/ X5 d4 m$ ?0 j( |
           RowBox[{- |2 p( i& D4 b0 s0 |
            RowBox[{"(", & F& F, @1 j- T* L3 J1 R! c
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", * ]3 u9 q, N9 i
            RowBox[{"(",
    + `; b/ _; u' P! [0 M8 q( o! \         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ! [# {6 L& \# M/ d& B, D     "]"}], "/.", "DeltaX"}]}]], "Input",7 t7 R% P" z* G" a" e) J
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],9 b; \9 f& s6 x6 d* B3 ^
    9 _7 C4 ]" p$ S5 \1 |
    Cell[BoxData[2 @* t! X; d6 U. a
    SuperscriptBox["\[ExponentialE]",
    ' o3 w. Z- r; C1 k. m5 ]  RowBox[{"3.141592653589793`", " ",
      k) `  t) `. d  N   RowBox[{"(",
    " ~1 H, E, D6 t# j+ Z    RowBox[{
    ! M' d+ d$ `' z) V  t     RowBox[{"-", 1 Z# _3 D* e" @- \* |; j! }- h& \' J
          SuperscriptBox[$ f  _3 H; `( J2 q$ M' l
           RowBox[{"(",
    ! W+ c. r0 T6 Y% F" @* F3 ]        RowBox[{6 K6 g6 \; f* Y' ?. O- U0 a( W
             RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-", ) R$ K4 u" ^& k
         SuperscriptBox[
    : ~9 B& n5 [. u' d      RowBox[{"(",
    ' s. ~# |1 b* v$ v" w- @  p       RowBox[{2 t& U5 o' M' X
            RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-",
    . O& y. s0 p+ f7 A1 p     SuperscriptBox[
    ; a, {; X* z9 s% T% W4 N* K# @7 \* U      RowBox[{"(",
    ( ?6 N( O. a$ s" Y. m1 \: M       RowBox[{) H* w) q1 [8 ?/ S
            RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    0 A- J. C; B5 J& ^+ i% h: Q+ q  C1 O     SuperscriptBox[% O4 A% W; y% J$ ?  W# G& @+ Y" [
          RowBox[{"(",
    ; B% Q2 A& m% ~1 W3 z       RowBox[{
    ) a' d& {" H& W8 O/ M% ?6 g; w        RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-", ! ?% L) a9 D+ z. o0 D
         SuperscriptBox[
    % e( v# s: M1 o7 F      RowBox[{"(", % g9 l) h9 T9 q& J5 F6 e% K
           RowBox[{) _  q* p5 K, k3 ]+ p  ~, E: k
            RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-", ) Q* _7 e, \/ d; R6 f4 K  s
         SuperscriptBox[- y2 y  D- M& `* X# U& S
          RowBox[{"(", 7 e2 Q' o8 _6 ~3 z  r
           RowBox[{9 l/ K$ u8 W. |
            RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    ; H( C& _4 Z3 O; \: v" p     SuperscriptBox[" t6 x/ Y: S; {
          RowBox[{"(",
    # l: B2 K4 w( l       RowBox[{( y" z1 `  z" }+ n* \
            RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",
    / ?0 H- R3 h) B     SuperscriptBox[
    7 g( y7 {8 [2 L8 b  x- |      RowBox[{"(", + h$ b% l  n$ m2 P
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ! l2 y1 b* X% c" L; \0 I     SuperscriptBox[
    ) }% s5 B2 f; L5 o: Q3 `4 r' A6 H      RowBox[{"(",
    " x! x5 c' j3 \, X( e- F5 _       RowBox[{- T- K8 [: W1 P; V- L( s
            RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ' k- C* G6 V0 z  M5 ~4 y) O3 ]
        ")"}]}]]], "Output",
    - \3 L+ ~* B' @; s( D1 |: S: } CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, $ `8 A  M; x4 Z$ z" _
      3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]$ s- x* ]/ y2 X
    }, Open  ]],
    % D* K' E  U1 B8 q" A2 }* b5 W# M3 b* V( {
    Cell[CellGroupData[{
    2 |' ^6 J3 j' |- q
    1 @6 j3 S. B, r% H( uCell[BoxData[
    0 {. Z# \0 s- V) y) T' V) P# q RowBox[{"C7", "=", "Ca"}]], "Input",$ I8 \3 d; c' ~
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    ! s0 o. a' n8 I# h* q  r  3.577921316125*^9}],
    * ]2 U# H  u3 R8 j8 _$ w5 M/ V  X3 ^
    Cell[BoxData[
    * ~/ a+ t: y4 c, f/ ~ RowBox[{"{", . H; ^$ I# b0 w* k& u" s
      RowBox[{3 K: \' C6 Q8 C0 g/ \8 x0 y- E, ^* W
      "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",",
    0 y) g  w: c$ ]   "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}],
      B' t! B, e4 S: r' i  "}"}]], "Output",
    ( x" k" x( i* n  t. y% M4 z$ d! u CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    7 ]  v0 J3 ]4 A1 e  3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]. z0 [8 a, F3 u! n+ n- d/ j% D5 n
    }, Open  ]],+ g2 G3 d) d1 f( e7 I6 ]

    - }) i. c5 H7 P4 PCell[CellGroupData[{7 {# D$ l" U, Z
    3 ]9 C7 r, [0 y
    Cell[BoxData[
    ; o8 X4 b& m0 L* w2 I RowBox[{"u7", "=", 7 P1 _/ r; R, @# \5 d. O# C6 r
      RowBox[{
    , i) _5 F. U& s6 X/ F( e+ ^! ?/ b; }   RowBox[{"Exp", "[", 3 H; v. J3 U" O7 G1 ^4 J. `
        RowBox[{
    # b. p! n! H6 t' g# Y     RowBox[{4 d8 v7 q$ x4 {* r/ \+ z
          RowBox[{"-",
    % T. _$ r, ?# a0 @, _       RowBox[{
    . \  {: Q1 c; n2 ?) b        RowBox[{"(",
    ! }9 l4 b0 |& `# u6 c         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    2 ?  G$ l+ F$ l/ i$ @        RowBox[{"(",
    1 Z' t* z- L2 ?6 L  o5 l         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],& j0 D/ x4 T! k; ~) t
         "]"}], "/.", "DeltaX"}]}]], "Input",
    6 E; r% A$ h% L3 [+ D" B" M CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, ) Z! w: I/ v  B# [( z
      3.57792132028125*^9}],
    ; b0 k/ a+ \" z' Z  V/ f3 [2 x% c% u* H+ X, _
    Cell[BoxData[3 @3 R% w/ o- |  y( K* a7 k, N
    SuperscriptBox["\[ExponentialE]", - G- G- i5 K- K& ]1 G
      RowBox[{"3.141592653589793`", " ",
    - [: L/ Q2 b. ?" Z& l. U   RowBox[{"(",
    0 I4 l, A$ u4 g# L( o' {# @    RowBox[{. G# t$ O; i0 |/ E) G: f, x
         RowBox[{"-",
    * w% |3 M  k3 V0 @) A. H2 L* v      SuperscriptBox[
    # s0 D1 c' z9 ]% l: O9 E) P       RowBox[{"(", 5 }7 G' b$ p1 ?0 b
            RowBox[{
    4 F8 f+ N) k; S         RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-", 4 l& M6 H6 x1 ~2 k+ m8 F; m# _- V; ]* {
         SuperscriptBox[
    ' S% ^1 r4 D0 H4 C) N. w8 i& R      RowBox[{"(",
    ( x. i2 p" J7 J       RowBox[{% W' H/ n, n9 c/ P
            RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-",
    : k/ j5 P1 M) O6 ]: q     SuperscriptBox[
    - {1 {4 O" n9 l      RowBox[{"(",
    ' W! z0 |# g2 B, k% t7 g% O       RowBox[{
      q* r4 X. v: M        RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    7 c* x) Y. g3 n9 m' b     SuperscriptBox[# l3 ]4 C( e0 C% ~6 l  I: {
          RowBox[{"(", 1 ], u+ k9 N) z4 U  b
           RowBox[{1 {7 q9 O8 c7 B, T! d3 s1 w
            RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-", 4 u- r) m3 d4 |) z7 v5 n* U
         SuperscriptBox[7 i, c7 p4 }% v3 x1 U# ?
          RowBox[{"(",
    $ h1 h: N- F1 Z$ T  q       RowBox[{, b, u& h6 o: [! U6 a
            RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-",
    % |9 W& ?& ?: U3 n     SuperscriptBox[9 ?" T- A9 ?6 a7 w
          RowBox[{"(", : G4 {7 J/ Y& Z: q0 Q# b: A
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 9 v5 l, W! y8 H6 a8 \
         SuperscriptBox[
    " ^3 [+ X7 l4 r      RowBox[{"(",
    ( c0 ^" H# t( L       RowBox[{2 x* o7 U2 k. D4 V! b" C5 e+ P
            RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    0 b5 ]1 i, O* q5 u8 w" w     SuperscriptBox[0 {. D0 l+ B5 l* _2 x
          RowBox[{"(", 3 K5 T+ ~& I, L2 z2 @
           RowBox[{
    5 G- J0 L& U( ~4 X, t4 S! R9 v( V        RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-", % q3 J6 l  n& ^0 V9 |
         SuperscriptBox[) u$ L. N9 c' b! P9 P8 Z* O4 d
          RowBox[{"(", 7 J$ Q; S: u$ @% Z6 L6 N
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], # ~7 G+ `( |( s4 n
        ")"}]}]]], "Output",
    6 i3 ?. z7 T) _* ? CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    , V. [+ X* b, K  3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9, ( u. W$ D+ \$ C4 D6 p
      3.578012251359375*^9}]
    ! Y! f; i5 s8 D' Y}, Open  ]],
    " \) L4 i/ A5 o5 Y
    ( \# b5 M) q9 c* VCell[CellGroupData[{: }: R1 m& a1 f0 J: V# ^" j

    5 ]  c5 ?2 b4 k' r6 WCell[BoxData[" z9 n* n' G$ E1 b' X! D+ c
    RowBox[{"C8", "=", "Ca"}]], "Input",
    . ?0 i# B) i: j CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, 5 }& t6 V$ ?$ N  _7 p( l; q) N
      3.577921316125*^9, 3.57792141421875*^9}],
    7 R0 H1 E, d; l6 H5 _' D+ ^  y4 W- L1 z4 M5 [6 J- H* ~
    Cell[BoxData[
    , ]7 {2 [* L0 U) f) p( L RowBox[{"{", $ Q# C8 l( F4 R/ J) m
      RowBox[{5 ^$ g9 q4 y, x# v8 e  W
      "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",", " s1 U9 S9 K  B6 d& S
       "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}], 6 `2 d/ a) a! n! L* y
      "}"}]], "Output",9 p  T1 G; B8 w' }' g8 p& m
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    & P( E* E0 p3 R' \4 I: X& G  3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9, 4 c# H/ ?* F! R4 k4 |
      3.578012260515625*^9}]* V  V9 `' Y0 ]; R2 U; W
    }, Open  ]],2 g; h) Z* T5 E0 T; W0 x; L0 R- m- @

    $ I3 Z* ~; s' l# mCell[CellGroupData[{
    1 I: i- V$ B, I, g( A) h; a( |8 C, z1 ^4 W. Y8 G
    Cell[BoxData[
    2 p- d* o5 Z" @3 d/ w RowBox[{"u8", "=", - y4 i9 B& t9 F& V1 d4 X  Z5 Q0 ]
      RowBox[{: |' j" w2 D( T8 ]% t
       RowBox[{"Exp", "[", 4 g: U! m/ h! K; d' H' z
        RowBox[{. D0 S3 Z& b( o1 A" [
         RowBox[{: p+ s3 W, H) I# x% g* H% I
          RowBox[{"-",
    ' Z% M' `0 x8 l4 Z0 ~4 h, I       RowBox[{+ C3 @+ @# @! r" V: ?0 m
            RowBox[{"(", 2 {, Q4 G. R. s3 H2 u$ M
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 6 f/ q# H4 E8 A& }- i
            RowBox[{"(",
    9 a% `, [$ H9 h' w: ^0 |         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    0 v/ j) q  y1 f4 e  b2 @* y* R     "]"}], "/.", "DeltaX"}]}]], "Input",6 I3 |6 a  d3 R
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    / w5 j4 v1 k0 x$ q* \9 |  j# c; m  3.57792132028125*^9, 3.577921416921875*^9}],' v( B5 K7 D: [4 s2 w) A; x
    0 |) k# M: I2 b: t/ C
    Cell[BoxData[
    % o7 W' ?2 r2 V SuperscriptBox["\[ExponentialE]",
    4 X! A  }1 o4 V- U  RowBox[{"3.141592653589793`", " ",
    ' s. w1 r" i2 X$ B& R8 S7 i   RowBox[{"(", # u7 j4 G/ Y) x/ Z0 [) F4 b
        RowBox[{0 c5 f- k( U+ x4 Y$ L1 o) w3 P) {, d
         RowBox[{"-",   V' a7 k7 C( m: t  F" R4 ]/ I/ p+ k: I
          SuperscriptBox[) X2 i$ ?6 \- `0 W1 t- `2 v1 y
           RowBox[{"(",
    7 h/ K' ?7 y; O& K        RowBox[{
    ! G0 ^% n' W- Z+ ^7 i4 e         RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-", ( a# ^* B* H  b: ?0 ~4 ^7 i
         SuperscriptBox[
    - j+ j* x: p; s( F      RowBox[{"(", ; U; h; E# o6 [
           RowBox[{
    ; u! k" m4 ]& C        RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-",
    , c& i$ l5 n) D( P     SuperscriptBox[
    5 i3 a9 f+ [" \4 c9 X      RowBox[{"(",
    ! I* V% @8 w# ]$ o+ ~6 i       RowBox[{4 I* }. X+ X. W0 p8 W/ o" O
            RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
    * w; \+ K* @4 ]1 s     SuperscriptBox[  Y9 ~# a" H! Q: j) s# l
          RowBox[{"(", - U( h' x( E( d& N- Q
           RowBox[{( K5 R+ X0 n, n" p) z
            RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-",
    5 I8 w2 o7 i5 b! a% u     SuperscriptBox[2 S: {6 o' S9 i: y+ T( L+ b
          RowBox[{"(", 1 o+ a/ ~: B& I& [
           RowBox[{
      T% `" P& P4 f2 x! ^: L, O" f        RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-", * c. E% S, w8 }: X$ \: ~' C. {
         SuperscriptBox[3 R4 Q% ?5 A- O9 s
          RowBox[{"(", & L# l) i- `- Q! h8 L
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    * H& \" \: f( R4 S* D/ x     SuperscriptBox[2 U5 j7 ~# v1 C1 {
          RowBox[{"(", 4 b2 w( S# }6 s/ U4 d2 N) o
           RowBox[{/ q! r  j- q* M
            RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    3 P) n5 A6 ~. N5 ~2 I9 C. G     SuperscriptBox[" ^3 G* s; o/ I5 Y/ c$ O+ O# N
          RowBox[{"(",
    - G) y7 ?* G; v, Q, C. F       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", / g0 M1 x/ O+ ?5 h: f" g! {
         SuperscriptBox[
    8 r' ]2 f# C% E  H1 e      RowBox[{"(",
    3 b: A6 t" n6 e& j4 r. ~       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], & D' Y7 E6 Z% F0 q" [
        ")"}]}]]], "Output",( y8 V* v- K7 {2 @( B
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    " o3 H7 G# a- B) x8 c  3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9, % ^9 Q3 p6 x4 Z! R+ F$ Y
      3.5779608945565863`*^9, 3.57801226165625*^9}]
    9 h5 r( A3 j& m}, Open  ]],; l/ s# _2 u- I( m
    3 |' o0 n0 x% [* |
    Cell[CellGroupData[{" U" {1 Z4 ^6 {

    & g: q. Y# q3 a  _0 PCell[BoxData[4 P& |9 G6 h7 g( x9 Q
    RowBox[{"C9", "=", "Ca"}]], "Input",. B$ j9 Y, q7 H5 c3 B
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, ( E2 ~1 T, g( \
      3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],
    ) J9 I, [3 f( g+ x0 f; W
    4 G7 d& }: p" u) n7 r. CCell[BoxData[
    # _  x* U4 ^9 D% ~ RowBox[{"{", " H# G6 H, T' N$ n$ F( G" O
      RowBox[{! i3 y( n! l! p" F) R; b! ^6 D
      "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", * ^4 P- N* q+ B" g2 W; P$ y# }
       "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}],
    7 k: Z! k; k4 V3 x. z. c  "}"}]], "Output",
    + B+ O* Y  o( K# v, ? CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    % x5 }, m9 o9 x; H  3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9, 2 n4 n% H2 \! n) o/ g3 t6 V9 S
      3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9,
    6 }$ g& `1 X1 d% ^4 m* {( s4 u6 k  3.578012268234375*^9}]
    4 _& i' h% i- u4 E, J; R}, Open  ]],8 K  o# y! W$ x: V3 D9 A5 C# Z' a
    ; _7 v9 Z6 o, R2 H2 t
    Cell[CellGroupData[{+ ^. J1 u* Q- x6 Z9 Q+ Y! x! l5 X  A( j
    " ~6 V& W" F$ [1 `* P, z8 U9 f
    Cell[BoxData[# h* S# t) e2 F' R: q) x1 c& k8 L
    RowBox[{"u9", "=",
    ' j' m2 c% J6 B  RowBox[{$ a3 M9 Y# ^* E& a$ @
       RowBox[{"Exp", "[", 0 G" i2 l9 |7 s% p
        RowBox[{
    6 y0 d3 \* u8 }3 p9 ^9 M     RowBox[{
    / X+ ~+ L1 M7 ]( u- X& O3 e" t9 D      RowBox[{"-", , I' T4 S* M& A- h  F" E
           RowBox[{2 ^: E$ T1 |, }# b. _0 _
            RowBox[{"(", 5 r- Z+ C5 l5 K  U
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + j: i; C! s$ _5 f3 p( M        RowBox[{"(", - z6 q" U0 V8 n& \9 U* [
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],: U; D  K- |* q+ [9 K$ l( n
         "]"}], "/.", "DeltaX"}]}]], "Input",
    8 A3 ~' ?7 s& N7 p, _ CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, . [! H0 i3 h) C
      3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],
    8 Y( ^! ^! e8 y* B" o9 W
    / m4 Q* O8 Y6 U5 ^& L, ~" u9 BCell[BoxData[8 k$ t$ ]# n+ r* I' e, P5 p0 r
    SuperscriptBox["\[ExponentialE]",
    ( K$ M7 o+ L+ M& e  RowBox[{"3.141592653589793`", " ", . X3 v; p( y, [7 z
       RowBox[{"(", , ~! J& z  ]5 r5 N7 m6 F8 S
        RowBox[{/ }  o: B: H  i5 K, I/ p- R$ P
         RowBox[{"-",
    7 ~' s  \  i6 o1 k      SuperscriptBox[
    $ U- V  J7 G: H       RowBox[{"(",
    3 ?1 J$ q& u; G% T        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-",
    / l5 y; Y4 ~2 d" N5 y8 i! C. G     SuperscriptBox[
    " b! l, I' o$ w3 c! @. x8 Z0 B      RowBox[{"(",
    , }; p8 C0 N5 F! `       RowBox[{
    / H8 [' r" b5 h9 \        RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-",
    8 ?* b" R; @* V" G, f, z/ `2 A     SuperscriptBox[
    9 B0 b" q! x4 [4 `% \      RowBox[{"(", + G3 Z; `! D# i0 t) x6 [" S" u. U! ^' Z+ G
           RowBox[{/ A( t4 W. o% Y) d; a( ~7 U
            RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    ' x3 C& w% \/ v$ f     SuperscriptBox[
    $ p/ `4 L/ F, W+ n7 B( A      RowBox[{"(", 8 U& T7 B3 j6 ?: K/ s8 o; S& j% r
           RowBox[{
    5 z/ k% Z& u+ F' `( ^5 D; T        RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-",
    $ {0 K6 F. W) t$ ]2 D     SuperscriptBox[. `# W% e/ V2 ~8 t
          RowBox[{"(",
    + n9 L* {( Y& V       RowBox[{5 \5 Q$ R+ m) D/ R
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    ; _* _% c5 ?4 t: M     SuperscriptBox[1 N5 z- T$ |9 o/ y
          RowBox[{"(", , g( e) R, Y- Z$ B7 @# D& g
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    0 t$ S1 d8 ]& Q" p0 ^; l3 y& e' ]     SuperscriptBox[
    4 u( k# I3 Y: T      RowBox[{"(", ( g9 B; M, o- a1 _; ]
           RowBox[{6 \) s1 Y/ p8 ^$ Y* O% [2 p1 T" |6 _% e
            RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    7 X- e- c" _- _) c! }: _0 s5 p     SuperscriptBox[
    8 N" f5 M0 j0 J/ s% n      RowBox[{"(", $ a% H; r9 H3 c4 {
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    6 @. ^3 m6 ?9 ?) E! ~6 T% u     SuperscriptBox[
    9 L! U4 D0 ?  g8 E8 |' d' m, I      RowBox[{"(",
    8 i) y' O0 d6 D       RowBox[{/ F' m  p9 P/ f3 a: b. z8 G
            RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], # a" ~& \  |- s' P
        ")"}]}]]], "Output",
    $ F  w; n4 L4 C- _; X CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    ( ?6 T# S* j8 E7 T+ O3 c6 M  3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9,
      |) d; b$ j/ d. E6 \! R  3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9, # j3 t: ]0 q! Y: ?6 v4 ]
      3.577961530421959*^9, 3.578012269125*^9}]. h0 h. o& k0 }& Q1 @, p% J2 I
    }, Open  ]],+ f% I  q8 U# G
    ; M" ^% x: h( O2 n! S
    Cell[CellGroupData[{1 t% \: `7 A; U# v  G4 j0 e: q( P% m
    ( D0 _! S  K, B, M
    Cell[BoxData[{. R( y1 h7 w+ _! N2 S5 ~# J0 W& `
    RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]", 4 g$ F+ f& v7 [4 c- }. b6 N; k
    RowBox[{"u10", "=",
    6 ?: ^- Z4 X, T5 y3 P' w  RowBox[{
    9 J- l' _1 o- e: P   RowBox[{"Exp", "[", 4 E% g  J, W) R9 ?# B; T( o$ F: i& ~
        RowBox[{
    % G5 h7 n( d' f3 R" A' l/ H     RowBox[{
    : f0 G' \6 g& a      RowBox[{"-",
    % |+ M8 J0 ~/ E& c) v       RowBox[{
      }9 R$ C9 m: @2 `        RowBox[{"(",
    % F/ @  `4 a& u% Z& Y7 `/ |1 p  ^& F         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 6 ~! Q2 J7 B0 P
            RowBox[{"(",
    7 @% w: W$ {* \, R' {" M2 d         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    : e+ `' |) i! G" I     "]"}], "/.", "DeltaX"}]}]}], "Input",: q1 N0 \5 U2 ~9 D) ^4 h7 W
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],6 b' [* S) Q" [. K. Z  `* @- u

    5 Q6 R0 h( O4 j1 Q& B* HCell[BoxData[, J. N* @/ N6 k' \) b
    RowBox[{"{", / o# w7 e. \( \  G) I' E1 p
      RowBox[{! o1 r+ }) y! {" W" q  ~
      "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",", & W7 d4 P% s( ?- H
       "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",
    6 L. |6 U* F3 J CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],0 G& t! N) Y) }0 X4 n

    ) q7 x  Y' c/ M, o$ {Cell[BoxData[
    ' @( k  C& ^0 u9 e& s& b: } SuperscriptBox["\[ExponentialE]",
    7 h+ s* D* f( c1 A4 h0 b0 d  RowBox[{"3.141592653589793`", " ", 7 _  z" ]/ E* Q
       RowBox[{"(",
    5 ?& _/ s' `2 A  z3 x- l    RowBox[{& v  B6 I/ n4 o7 A% B- p
         RowBox[{"-", % n9 d0 M3 x* p, G9 t9 P7 O9 {
          SuperscriptBox[" G" e: y5 h4 \3 O
           RowBox[{"(", ' l  ?, }  e. K' U9 w% f
            RowBox[{
    $ P5 i0 a1 y# X6 K9 M& Z         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ! ^! r: m: D& F+ w( O  a     SuperscriptBox[
    ; A$ ?1 F9 a4 T3 A9 ~      RowBox[{"(", 9 {4 l0 v7 n( p! P; V* K
           RowBox[{: [# d4 x0 c* j$ I) Z
            RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-", + W0 L2 M6 I1 Y9 d  ?8 A
         SuperscriptBox[: ?) _* U( Q7 b# v, {" j" T& _: a
          RowBox[{"(", ) E5 g$ C: e  O, x$ P8 o; |; g
           RowBox[{
    - }7 W2 @) V% x) H        RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", / v9 m8 ~; r' m; H- @
         SuperscriptBox[
      ~8 d% ^) M8 U1 U0 ?/ h2 y' P$ w      RowBox[{"(",
    : _) k; S. z" F# r% D       RowBox[{
    4 r$ p8 X! O8 j; H        RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-",
      V& I. k& S. {     SuperscriptBox[, L3 V  J; G; y8 R% h; ?
          RowBox[{"(", & b4 ]2 Y3 L1 M- p* R
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", 3 J2 s0 f1 x  x
         SuperscriptBox[2 p* D3 d* d1 y% U4 x9 Z
          RowBox[{"(",   ~$ s: x* r9 t7 A; j
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",   h: T$ N' e- B! ?4 |3 z: M
         SuperscriptBox[
    . E6 E* I5 u4 h" U- q1 p: @/ H% C      RowBox[{"(", " @* X8 G4 L5 l0 D! J* p" ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    9 D5 E& y4 H1 K7 W9 W     SuperscriptBox[
    # O7 G" C% u& d. H+ k: B      RowBox[{"(", 5 b9 b( f$ d. s- X0 f% }0 y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", % l7 @, b7 C! W; L% }* b% y1 t6 o
         SuperscriptBox[- a5 ~1 i2 n" I$ `! r4 T
          RowBox[{"(", + y4 S6 Z% e6 x* s
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    + a* M1 Q- |1 E/ z( R% r1 k1 z    ")"}]}]]], "Output",0 y$ @. D# i5 l% Q
    CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]
    , X2 T1 s5 \+ ^8 n}, Open  ]]," Z: H0 V! j' u) \* w7 q

    ( \/ ?% e2 H5 n( e. X+ LCell[CellGroupData[{) M. Q9 x! [" T* C7 X
    4 E7 d; P4 Y2 s, t+ v! k/ ?
    Cell[BoxData[{- S, u& |* }! J) q2 e3 F/ @
    RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
    ' e4 A  G% [5 K6 t) c9 C! r RowBox[{"u11", "=", " ?6 Y" J  _; x) i( Q
      RowBox[{
    9 g0 ?. y& f- z6 }, f. ^6 n   RowBox[{"Exp", "[", - ~1 L  }% _7 O8 ^2 `
        RowBox[{- V$ ?9 _6 c  y9 r& J) N
         RowBox[{
    + t9 \) ^1 @4 T6 B; C$ e1 n$ `      RowBox[{"-", ' _# w7 ^4 L' x0 Z2 p) d; v
           RowBox[{2 w8 I  w! T3 O0 D2 U; ~1 u6 h4 j
            RowBox[{"(",
    , l# R( V. n! N+ G; I         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 f& [0 K7 L# O5 O# T8 ^( R4 n        RowBox[{"(",
    # T$ E7 U% ]5 ]* Q, C0 v         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    0 H; B5 c# r# ^# v% W, a/ A6 R     "]"}], "/.", "DeltaX"}]}]}], "Input",
    3 n: X/ H/ q% L+ n CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
      l) r6 V5 ~, D# T; X  3.57796154237158*^9, 3.5779615434011817`*^9}}],1 T, ^- }9 K& I( N

    1 E7 D) O! h* ?  }. ]Cell[BoxData[
    " g; s7 N' u! e% f! N) v( s RowBox[{"{",
    % \* j5 d8 u' D  j* c- T' N3 j  RowBox[{
    2 D/ i5 H  p9 O$ l& C2 H6 @% J  "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",",
    6 c/ z- Z$ V9 w9 m   "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 9 y& M) H5 \- N2 }! _, u# K5 ~! ^
      "}"}]], "Output",8 F  k! _) x6 U; t& Q
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    / S! [/ g9 ]1 p  3.57801228203125*^9}],' A. e( z- R; s9 E* x
    - j7 C8 z7 [0 I0 O2 d" E2 B
    Cell[BoxData[; n0 d. P& L( C: g2 B, j3 E
    SuperscriptBox["\[ExponentialE]", * N! q* d& h& j0 Y3 D8 C9 |( @
      RowBox[{"3.141592653589793`", " ",
    / B; K) R! I$ B( B   RowBox[{"(",
    ! Z3 [, K8 A4 M, v2 Z    RowBox[{/ D. t* K+ `. t
         RowBox[{"-", ) v1 O4 p8 J3 z# d
          SuperscriptBox[1 F0 ?9 `+ E- i$ J
           RowBox[{"(", ; u, E% L% F+ `- s6 |
            RowBox[{
    $ o% n& p( c) ^; m' w( o/ |4 S( w         RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-", . c3 c, H- b0 j% e* C& H
         SuperscriptBox[( D9 [; ^5 O' w% t
          RowBox[{"(", 4 h: G9 P7 w7 N8 o4 h
           RowBox[{  c& Z) ]* Z# C2 b
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-", 4 A' H, \! _- `# E4 ]% {3 X3 @7 ]
         SuperscriptBox[+ Y3 K: o3 z5 F3 G) g( c# ^( l, S& t
          RowBox[{"(", 9 n$ Z) C5 r  T/ J- m% i
           RowBox[{) Z  x8 \5 J2 t0 A1 G
            RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    - v* o3 v: V/ P9 s! Y" W     SuperscriptBox[. ~8 ~( @# g1 q0 U( t
          RowBox[{"(",
    & j/ Y4 u. E0 j( ~       RowBox[{
      R2 {2 Z3 o; s/ q        RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-", . N' D/ S  ^: Z% [
         SuperscriptBox[
    / `0 A5 }- ^+ p5 l; q+ G# M      RowBox[{"(",
    : i( b( l. L: h       RowBox[{
    ) @! u4 b9 z. @  n8 ^        RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-", 2 F  |; D2 h5 h* H
         SuperscriptBox[
    9 d. X' Y' n- p/ j% y# N! k" ]& f/ @      RowBox[{"(",
    ' K' w" m/ S+ g: `' m5 [& I       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 9 P2 d4 R; f1 i) J! \2 J
         SuperscriptBox[
    0 U, ]# r: [  L: T' I4 q* z6 u      RowBox[{"(", ; m2 m) O& J  U3 R! s1 S
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    4 }2 {$ G6 U9 X4 g0 |1 w     SuperscriptBox[
    & d, G$ s2 v0 o( K      RowBox[{"(", ) v  E- J0 N! b) h" k
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    , }7 ]8 w, |; T% ]     SuperscriptBox[
    ' i# d; j% ^: ?% m' `      RowBox[{"(", " o2 {; w$ D. ?8 o
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    - l4 [2 ~) w' q7 v    ")"}]}]]], "Output",) L5 H4 c% h* A8 L* Z
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, ) K9 S0 }% E* o+ {" ]2 f* p
      3.57801228203125*^9}]
    : y; ^' G2 V, y+ w}, Open  ]],; V3 f2 h5 c$ N+ F/ E

    . v# O  z4 R" c9 h' K5 NCell[CellGroupData[{
    : @3 }0 F: @" H: J8 F/ J1 G  e) T& w5 F1 ]" B. w8 h5 N
    Cell[BoxData[{
    - s( x5 z/ @! ?  X+ k RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]",
    * \: p$ v" [) {3 G8 }$ O$ n% r RowBox[{"u12", "=", 4 g; E3 h- a( N9 N( q
      RowBox[{
    2 A* u$ |6 s1 o( @, Z   RowBox[{"Exp", "[",
    4 ?4 |$ h7 \# ^; k    RowBox[{# s  w& g3 A, Y  j; [9 Q! q% c
         RowBox[{
    2 i8 `' K% h) Y2 C2 S: J+ H      RowBox[{"-",
    . P" D: h0 z( W& _# Q       RowBox[{
    " I, v+ @! o  Q- D        RowBox[{"(", ! s) v, V: ]1 }
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 _) \. U' [/ L9 {* R        RowBox[{"(", 3 Q' d( |+ m" Y4 O" k7 Z
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    $ u% [7 O- z$ ?1 n# g     "]"}], "/.", "DeltaX"}]}]}], "Input",3 L/ l: r7 ]- c6 i& B4 R7 d
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {" g) N" ]5 V3 P: w2 x. _4 C. D
      3.57796154237158*^9, 3.5779615576284065`*^9}}],# _. h% }9 c- f& S% @0 X1 l
    0 T! Y5 @2 x( y9 U3 U. ]
    Cell[BoxData[+ {! S: G, o5 i3 z  B1 E% u
    RowBox[{"{", ) j* N8 I# g8 @" U' ~! q, d
      RowBox[{
    $ v6 ^" g' o  {5 {5 I  "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",", ' u" L! W) y* I. i1 X" H
       "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}],
    % H& p+ b) E! }1 q5 c- z  "}"}]], "Output",/ ]$ {9 G6 Y1 W/ a! ^4 z3 D9 W7 }$ r) U
    CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}],
    ) C2 t  T6 e; Y) S% ]& U
    3 k2 }3 s" e8 Y+ R6 UCell[BoxData[
    4 S% m5 p: e: L2 t# s, ]: f7 O SuperscriptBox["\[ExponentialE]",
    7 g8 `' I4 c4 B8 }4 q  RowBox[{"3.141592653589793`", " ",
    * e. l2 r6 f5 n5 b" h% g   RowBox[{"(", 3 ]+ S; ?1 Q0 u8 b9 i7 t3 h
        RowBox[{8 C$ ~( P& D! c; K9 g* K  D2 [' i
         RowBox[{"-",
    5 g3 n0 v+ P2 V* ~* d      SuperscriptBox[
    : n/ m# }% }' r/ o0 i7 y       RowBox[{"(",
    . p8 K( N6 O: [! b3 M        RowBox[{& j. i7 x4 E9 G7 M; z! n
             RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    . v- Q$ y" C3 a) N, [" M     SuperscriptBox[
    # y: J0 O; B) m5 b5 Z      RowBox[{"(",
    ( ]) y1 P0 D6 v5 J       RowBox[{
    + s5 }; ^! H" O        RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-",   R0 _, F1 N5 s0 R) |
         SuperscriptBox[
    ; g0 Y5 B) J2 C9 }" H8 F      RowBox[{"(",
    ( v, i5 m8 V5 d. J8 ^: F       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-",
    $ f% l% w$ F2 {* [) k     SuperscriptBox[' D% T% X6 W1 m
          RowBox[{"(", # ]7 I* ?- R1 k# g  ]
           RowBox[{
    ; J- {; `/ F% b& H        RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-",
      [: ~( B" m; S4 ~     SuperscriptBox[& U" z) V& [1 L+ F; ?% N) F
          RowBox[{"(",
    " h; x$ T! `, E5 X9 W/ Y       RowBox[{1 G& r9 a* _7 I0 W
            RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-", $ l# f. d8 \) G% o
         SuperscriptBox[4 N4 y; C. e/ E0 n
          RowBox[{"(", # v9 f) O3 E: N8 N
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    + @5 E( j, x& ?/ f) E7 w. N     SuperscriptBox[  A1 X4 F, W: `9 R; d
          RowBox[{"(", - b; S- H' J5 s1 x0 r7 a- G
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", : G# ?! S4 @( @3 @
         SuperscriptBox[
    0 Y& ?  T* x1 O4 C2 K      RowBox[{"(",
    / S7 ]$ A; e8 D/ z+ V2 _3 T- p5 u6 `- ~       RowBox[{
    ( g) m' }# w. x2 c/ v' z        RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
    + z3 k* `, z( d' j/ H     SuperscriptBox[; m; T5 `$ i4 m9 S
          RowBox[{"(",
    ! A& `  ], t7 z0 i( n1 j       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 2 V, E( b4 @: }; H, t
        ")"}]}]]], "Output",7 _7 `6 L; m5 d$ K* T; x8 X9 @2 L7 O
    CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]
    4 O% I, W6 _6 S1 P- g. L, P# H# }0 g}, Open  ]],
    , \5 K. {6 V6 \  c7 n( W% w* n6 D* k; x7 q% O
    Cell[CellGroupData[{
    " H7 f* k2 Q+ z) Z5 z) @6 f
    9 T. h. L1 V4 O" `' v4 c( R1 bCell[BoxData[{
    # Q5 n; X7 W# ^6 G6 o& R RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]",
    / s3 K0 j% S+ W1 @ RowBox[{"u13", "=", 4 d+ x# _( W4 B9 z; y$ p
      RowBox[{
    9 d4 D2 v" U7 `4 C+ \1 b& }   RowBox[{"Exp", "[", 8 }. ^8 L7 _" h3 K  G8 C
        RowBox[{. Z2 `7 r9 x! I3 Y6 @# }
         RowBox[{
    ; U2 e( t" h9 M1 |$ v      RowBox[{"-", + C) A; l3 s1 I5 \
           RowBox[{2 d* }; c( k9 A' X
            RowBox[{"(", % i% x( K: ^8 ~1 Q9 J1 P: O! N
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 9 K/ K: ]  g6 O+ z1 a) ]6 J
            RowBox[{"(",
    0 M2 f- \  H9 }+ q5 t) E         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],* J  k& ?" F- T. _& z+ {7 Z/ ^
         "]"}], "/.", "DeltaX"}]}]}], "Input",0 h  J* R+ F0 \5 N  f2 K2 o/ C3 u
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    : F* ^- o, ~0 u! W& L$ M4 j- l  3.57796154237158*^9, 3.5779615599684105`*^9}}],8 T2 m6 k9 R) o5 \5 K3 g7 h* P1 R/ F
    * t! V* J7 v& m6 Y
    Cell[BoxData[" g) q; t. v5 `
    RowBox[{"{", : G8 m* S" u; d2 K0 \! v7 b! f: Z
      RowBox[{
    1 s3 i- }* @- ~  "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",",
    6 N+ V. Z0 M2 m2 R* @" A0 a/ Z6 T9 w   "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}], 2 x. [( f2 m# s/ ]) y
      "}"}]], "Output",6 |/ m1 ~7 C% ^
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],
    3 P+ M- W7 z$ @) |& R# U3 P2 G6 r) s8 }, y. W9 j: n7 u. F
    Cell[BoxData[& E* j9 b" g- Y! H( T. E% i
    SuperscriptBox["\[ExponentialE]", " ^. H/ t; s, {" Y: K
      RowBox[{"3.141592653589793`", " ", $ a. e7 `) j$ \  D0 O
       RowBox[{"(",
    % N  X# h. a; v. Q6 s# A; A- S    RowBox[{1 m6 ?6 u7 j: c1 ~: w6 w
         RowBox[{"-",   B" W6 ]/ ], d" Q
          SuperscriptBox[$ h2 r& X! P8 l1 D. r6 e
           RowBox[{"(",
    / X$ N" x* m( q: A        RowBox[{! c, M/ U7 f3 R% C' E$ M' x
             RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-", 0 L" G3 L9 ~7 N- q0 t* ~8 `  N
         SuperscriptBox[" o6 O& O: ?2 i! c- a7 \
          RowBox[{"(",
    & n0 e/ f1 N7 q) v$ L/ S/ O7 O       RowBox[{
    8 Q4 O1 A- t+ a- O( a! A& E        RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-", & U* l3 _; K, u7 ]) ~# D3 b- S( f) K
         SuperscriptBox[
    " L% `3 W* T. `5 j4 c      RowBox[{"(", ! w, R7 f4 J. ^! y8 x
           RowBox[{
    / w& ^/ u9 f0 r% V' Q0 ?        RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-",
    # J" V1 y9 R7 ~+ a. e+ j     SuperscriptBox[
    " _# l  E" h& X( b* p+ q1 e  @6 k      RowBox[{"(",
    - y5 m  B2 e% ?, G. T       RowBox[{
    # g" s% q) C. K  I  P- T5 V  Q        RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-",
    % I! u' A- C6 a8 q( U# i     SuperscriptBox[
    : a" O. K  A3 o  f7 @  ^      RowBox[{"(", / [; D0 t3 \& a3 a
           RowBox[{# J% o) N' Q+ D% Q2 k
            RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-",
    " }+ R+ T$ Y- `" H$ H& h6 E     SuperscriptBox[
    ! O) Q3 v& m) `; L* Z      RowBox[{"(", * }: x6 s* p/ z: M6 l' i$ Y% ]! B  k4 x
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 4 e0 F+ s  u" G
         SuperscriptBox[
    0 m: z3 K. {1 d, N2 I. D" R  |      RowBox[{"(", ; R% y5 v- Z( R5 D7 R
           RowBox[{! r! u- ~: O7 I3 a3 j) n. e4 Z% @
            RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",
    - k* V  H# [# u$ c- P     SuperscriptBox[2 A$ J. q7 W. M6 ^" I' w3 Y3 s" c
          RowBox[{"(", $ t+ |; r$ ^  C( ]6 R& W6 P, y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    + _3 T, g+ S+ B' j     SuperscriptBox[
    ' x* }: N" h, |, s5 Z      RowBox[{"(", ' L9 b; Y$ q! Z- ?
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 0 \0 ^! [0 ?) @
        ")"}]}]]], "Output",
    8 H# h" l$ e4 _1 K CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]
    4 \. r8 A  X5 [& N# G( ^}, Open  ]],( x5 V# ^+ l- {

    . q  A$ W7 V1 `# ^% S- u$ s3 d! vCell[CellGroupData[{7 G" `1 i" B8 c- d
    6 j: ?( B3 l/ N2 o/ {, ?& i; V
    Cell[BoxData[{
      u. o- \0 X0 M6 o" _$ n, e5 M RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]", 8 I! X5 }0 }% K# o+ @
    RowBox[{"u14", "=",
    . R* d$ u5 [, x6 K& }* P! z3 p  RowBox[{
    % m4 h# ~& Z( A% P: P) e3 m   RowBox[{"Exp", "[",
    5 ]! D1 j4 M2 l7 G  U! [    RowBox[{
    + [% k7 j2 d, \' h     RowBox[{
    ; R0 }. ^* K8 M, S      RowBox[{"-", / S% w' ^/ X3 R: H4 t
           RowBox[{8 }  Z% _. c& N& _* R
            RowBox[{"(", " R0 `" ?( Z0 b1 [0 ~% a* W& z
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", / x' F, C  {5 f( A( P
            RowBox[{"(", ) A3 ~( s1 ?' Y4 p  P
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],1 U: ^- i' o/ H9 a: \; R
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    9 }- r: x" U: v9 l CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {+ _& U# v9 k: w3 J" t% {  o( T
      3.57796154237158*^9, 3.5779615663176217`*^9}}],8 Q& Z: `7 B- D. W+ P* U
    / w+ _6 {: i2 h# a& s, a# v
    Cell[BoxData[
    0 |3 {$ j% X! ~1 o6 L) o RowBox[{"{",
    ! z1 t: f- R3 E  RowBox[{
      J& X# \. H9 ]0 P" H  "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",", $ @) O8 h& r" s0 _$ h) O! a
       "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 2 S5 C6 f, R' z( N$ C" }
      "}"}]], "Output",
    4 x- O. t8 x; x# u8 o! D! f CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],( _( b. s/ o9 X2 @% R

    # ~  s" r7 [0 Z9 Y- h$ V# v* e+ nCell[BoxData[9 v2 D+ f" b8 E/ W
    SuperscriptBox["\[ExponentialE]", 9 u; S! \$ G, }
      RowBox[{"3.141592653589793`", " ", $ |% j8 ?6 O3 W2 x
       RowBox[{"(",
    - s" m7 q; E8 ?# a0 w    RowBox[{3 h. `' t0 D! C; \, R0 w5 {, Q: @% s
         RowBox[{"-",
    * W% W8 S( `- ^1 D! l0 I      SuperscriptBox[6 t0 e7 ~0 ]9 r7 Z6 M
           RowBox[{"(",   g1 v$ M  t( n
            RowBox[{, y, ^" ?2 n" W' H+ {
             RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-",
    / `5 w/ d" S9 g, E! _9 x6 g     SuperscriptBox[
    ; |. n, X0 x1 X9 J' G      RowBox[{"(", ) z) l' B7 c1 y& `
           RowBox[{
    - X8 I: N* P  m, g8 ^) W# t        RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-",
    + D+ k4 Z7 t1 A' X9 x     SuperscriptBox[! j0 e" O& g  n, }  c
          RowBox[{"(",
    * n& q% q/ l; x+ A       RowBox[{
    ; I6 ^6 g- L& H* y! s        RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    $ o! M2 |" ^8 C7 E' ], n2 t2 F3 R  `) u     SuperscriptBox[2 _: o" j' V5 D: F6 D9 ~5 D
          RowBox[{"(",
    & {0 {. F4 C1 e0 |! K( N& V       RowBox[{
    3 ^$ P# F! m$ M& C9 k) Y- T& {        RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-",
    5 l/ r3 C' B; `- l& A     SuperscriptBox[5 `  ^1 n2 P. @0 Y
          RowBox[{"(",
    8 e3 u+ ~2 E7 \: G" q# Q! z* u       RowBox[{% h6 `2 F5 M- x# F7 w( j
            RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-", 7 S% O- m  W( y% I
         SuperscriptBox[* d" l% i# R8 j, H/ i6 f" s
          RowBox[{"(",
    2 h0 j( K+ K1 z1 y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ) ]8 Y$ O; u2 e1 w, B4 t, O, `     SuperscriptBox[
    7 X6 Y/ ~; R% C3 N2 r      RowBox[{"(",
    5 ~# q$ M) l# M6 R       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    2 o3 U' w+ s1 n. v# W" A2 a" T+ f8 e     SuperscriptBox[
    $ w! E% P* G2 b3 l- O: u8 g3 z' C" `      RowBox[{"(",
    9 M) F' n/ D! b; S0 A: H  v1 T6 _       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ) w; N# L% a7 A
         SuperscriptBox[
    ; W9 b: d( u$ k9 t$ J0 f3 N      RowBox[{"(",
    ! h4 l' e* R4 V9 Y9 H/ F7 ~       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    8 ?; k/ }$ u5 i. b    ")"}]}]]], "Output",6 U" d0 Q* I+ Q) n
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]
    $ J; e! T6 ?8 {9 {) h4 H' v}, Open  ]],% A% q& y& y* z) l6 A0 G+ [  u
    2 }! ~% ^& [) w# E' L- H& W5 u2 L# z3 l
    Cell[CellGroupData[{
    2 a1 y/ J$ T6 W8 |; w
    $ |" w+ ]2 g- t1 aCell[BoxData[{5 e6 X4 l" G5 [2 c  M  A
    RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]", ' t1 A9 B# [5 T. h
    RowBox[{"u15", "=",
    $ J* s. C; D% s  RowBox[{
    7 B# S0 `5 y: R& C: R   RowBox[{"Exp", "[",
    ' T- ?4 n/ w% s' F' R, J    RowBox[{
      o& T2 N# s$ h* g6 X     RowBox[{
    8 s9 C' ?% d. V/ s      RowBox[{"-",
    8 \. l0 L$ ~+ B/ w7 Y       RowBox[{/ c% \7 t) O5 r+ I" k
            RowBox[{"(", - _3 P- ?. z5 Z
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ( t- o9 }. U/ x9 P, c+ \/ K9 y! ~
            RowBox[{"(", ' j1 P! T- p4 s# A2 ^
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],  |5 o0 M$ s8 _. [
         "]"}], "/.", "DeltaX"}]}]}], "Input",$ x3 p  }- ~5 K% [
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {& D! B; W8 _0 G9 Q
      3.57796154237158*^9, 3.57796157098203*^9}}],
    - d0 C# [# z1 X, I& h: M  v3 s
    * _* U: u# e1 ICell[BoxData[
    ! w: M# O+ z7 T$ R2 \/ X RowBox[{"{", 3 g. d( B  t6 n5 x* w5 {! S# ?
      RowBox[{! O8 b! ]7 d* o# u- J# h- ?
      "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
    7 C# ]0 a" |0 i! P$ ^# P; T+ G! c   "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],
    % l, u; s7 M/ M/ F$ s7 v  "}"}]], "Output",
    0 C3 K4 a# n4 t9 _ CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],0 s1 L; U" }: |6 N# D; O1 f
    , c/ w# Q, W; K: F
    Cell[BoxData[
    ) l: Q' C( S: b3 b5 R/ s SuperscriptBox["\[ExponentialE]", 7 ]% }. J& m; x9 i% f
      RowBox[{"3.141592653589793`", " ",
    3 S6 Y. ]( |3 Z; |7 ^   RowBox[{"(",
    ' j6 H. F* Q9 \# n+ o, S2 ?3 w    RowBox[{3 _8 X% i/ t8 C8 F5 ^
         RowBox[{"-", & a! S2 M. ^( N, h* s5 @' [* B) Q
          SuperscriptBox[* A( l! U8 m- m- N! u" Y
           RowBox[{"(",
    4 [' w" P3 g0 G        RowBox[{
    & p; G$ d" f6 u9 O" |. D9 ]8 J         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ( Z5 ^) m! g' N( P     SuperscriptBox[
    / F6 a8 U+ Y4 ~- j/ L      RowBox[{"(",
    % ~! M0 I3 M6 a! F2 `       RowBox[{6 G' N$ {, k4 E9 G
            RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-",
    8 f9 Z3 ^/ I) Q% @! p8 s7 E     SuperscriptBox[
    , F9 |6 T  p# T2 ?$ F5 f      RowBox[{"(", $ a' j% t6 W* ]
           RowBox[{
    , |4 h% M, A0 t* m        RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    : ^- v  _8 F9 F/ q5 @- b     SuperscriptBox[8 l2 d2 R# X/ @+ C- ~& C
          RowBox[{"(", - ^6 o$ K+ o$ z  T; i1 d& n  _
           RowBox[{) B9 ^3 n7 {' Z& T3 x) O  C- ~
            RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-",
    + U1 m( m7 r# k# r. y; Y- D0 D% l     SuperscriptBox[
    8 T# K/ w1 u! U$ d      RowBox[{"(", $ }& f: z$ ~6 c; g4 L: ^( n
           RowBox[{
    3 E8 P  A% |# p* y7 D3 {        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    + P0 q( }9 I6 D3 W2 E5 W     SuperscriptBox[
    5 k5 {8 O, K- z4 W      RowBox[{"(",
    & Y- Q( V0 M$ g' [! V* @; }       RowBox[{0 O7 r3 d; i( m2 t  n' U6 I+ c% {
            RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
    + S6 y; Y" G, I+ ]" t     SuperscriptBox[4 i+ e& d5 F; T5 }9 I
          RowBox[{"(", ' U; ^/ E5 v9 R( V7 V. d
           RowBox[{5 `0 z, _. W8 E3 E# s% O) ^
            RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", 9 S: C* i* F" Y1 f6 f3 Y
         SuperscriptBox[
    7 Z, e% t% _( {  e: G& N! {0 Z      RowBox[{"(", , |. }1 T' v! h" B6 _
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 8 A5 l! p3 E" L) T
         SuperscriptBox[4 G7 @. e4 h' G, O" R
          RowBox[{"(", - J" O: C( X1 X6 F
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 7 S3 [5 C1 ~( n/ X
        ")"}]}]]], "Output",
    * J' c) }: c' u! n CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]
    + \8 q2 w' W% S4 h}, Open  ]],7 `) Q5 z3 w; ?" s9 {# |6 |
    : W; V- v7 p: X, }6 b
    Cell[BoxData[7 l! D2 L- }$ t  p) z. \
    RowBox[{"For", "[", % h& b/ \2 ^+ Y) f( n
      RowBox[{; v/ x$ `! [2 T. P3 u- T
       RowBox[{"i", "=", "1"}], ",",
    0 s% L( p( l: |2 |   RowBox[{"i", "\[LessEqual]", "9"}], ",", ) N; A6 L. z: Z; [* y" o, n/ I
       RowBox[{"i", "++"}], ",",
    3 ~$ v7 G# f) _5 [8 h   RowBox[{
    : u1 _8 m& c5 v2 B0 I+ c+ ^& {9 ]2 c    RowBox[{"Ca", "[",
    2 m, g: A7 ?7 v% c     RowBox[{"[", "i", "]"}], "]"}], "=",
    % e4 Y; b. ]8 i+ ~    RowBox[{"CM", "[", 3 \% t3 A9 o3 k! h% I
         RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input"," F0 `$ \& `+ W* \
    CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],5 T& E7 J7 _# y  `
    ; k8 L5 ]& p5 ?4 W) ?/ T! b/ _
    Cell[CellGroupData[{6 a% C1 J4 g8 n9 ^
    0 K  Z. d$ d3 v# o. C
    Cell[BoxData[{$ H+ b- y$ c  H2 |2 H
    RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]", 7 y2 o1 M; l4 X# e, _) F1 _9 f, S4 m
    RowBox[{"u16", "=", # k: I$ m1 T3 V4 \) z+ G2 \
      RowBox[{2 p) O/ C% c, B5 r' K
       RowBox[{"Exp", "[", * _- q7 ~* ?3 L! F/ A7 i
        RowBox[{
    2 m2 m& N! n+ d     RowBox[{
    $ ?- _! P2 Z* T- h      RowBox[{"-",
    & W% {$ y* }9 p0 n       RowBox[{% i. V6 x5 E" G. a! I
            RowBox[{"(", ( Q( D4 w' F8 o" {7 G
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", % C6 c# R$ L% [) T  a" ^' R
            RowBox[{"(", 4 Z  a/ L; S' w/ t8 f
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
      d! k7 C6 F2 f0 s2 x6 p     "]"}], "/.", "DeltaX"}]}]}], "Input",) W1 }' ^% H2 q: k8 `$ e% ]" q
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {- X" L! N/ T& ^- m- j. m( n- U: e" q7 X* N: y
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9, ( J' _  K. K6 ~0 S1 s  p- f
      3.5779615751004367`*^9}}],9 @( _6 D6 A" B" i$ j. l7 P( z
    : W, N: c. }$ \1 s
    Cell[BoxData[
    9 H% r  l/ L6 E$ K2 f RowBox[{"{",
    ! o* N. O( T6 P$ T( |  RowBox[{
    * ~# {7 E9 y$ j& C, A2 z  "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",",
    ! ~9 f8 i& u  q8 m# b9 s   "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}],
    & N  n. ~/ R/ E! P7 [) ^" D; M  "}"}]], "Output",5 r0 q/ K/ n' a4 w5 @; _! L
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],
    , C9 v0 T3 H% \) y" A& x/ X5 A& B" B
    Cell[BoxData[' g7 h/ h5 J' g: b, ?. j
    SuperscriptBox["\[ExponentialE]", 4 [3 F) o( N$ V9 e/ U
      RowBox[{"3.141592653589793`", " ", 8 `7 q- [1 d  F2 n7 m
       RowBox[{"(",
    & o3 X; w) ~$ {4 b/ ]2 J6 n    RowBox[{
    , F1 D9 F. E1 H; ?1 j     RowBox[{"-",
    7 t. }: _9 v3 D8 d9 f3 B      SuperscriptBox[. X- q1 l6 k" D* h+ m6 c' P
           RowBox[{"(", . @) u2 [8 r8 S1 c
            RowBox[{, L) P2 v! E* T0 v4 U! V
             RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-",
    6 `" w8 i+ a' s; V7 ?" w. A     SuperscriptBox[0 s3 L' s  ~+ p% G
          RowBox[{"(", ' }/ e( s  @3 M' b3 e# P, r$ m
           RowBox[{
    / Z8 `, k1 |1 V+ W' G        RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-", ; v7 _! a# L6 w3 w
         SuperscriptBox[! T; P. A% ~* E4 U- Q
          RowBox[{"(", 2 I9 q# @% T( Q) s6 B
           RowBox[{' g; Q: x6 ~7 W7 l( m# S
            RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-",
    - I  b* i2 [7 C/ W0 x4 _1 D     SuperscriptBox[
    + M. g' U4 A" P% r      RowBox[{"(", # J4 ^( v( X. a
           RowBox[{
    4 }: h- W- K6 F/ e1 M( d- b( ~        RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-",
    4 v' `' @7 `5 y" w: B: h$ P     SuperscriptBox[. o5 H) S/ X; D! z
          RowBox[{"(", ! y4 R! X* s9 G+ z  y1 O7 a2 D
           RowBox[{9 F+ y; U# L, }
            RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-",
    8 `/ T% X( B' i0 p     SuperscriptBox[
      x2 Z) \9 H( [1 S      RowBox[{"(",
    - k) {6 x+ D- Y" |       RowBox[{; Y9 k( g  n" G' {/ I1 }( N! \* g6 _
            RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    $ g* g1 i* p2 [& x     SuperscriptBox[
    1 m+ D. Q( x3 {* H# z      RowBox[{"(", # V" U; F+ q6 n  n
           RowBox[{
    3 G4 R8 F( U% E5 S" D- k        RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-",
    , E6 |; l% b$ q0 u) |: V+ f# e     SuperscriptBox[) D$ D  T- M6 d' p
          RowBox[{"(", : X1 Z$ H7 Q( @; L, u7 }1 `5 ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 0 b7 a& ^. I/ f( ~' s7 e
         SuperscriptBox[/ R7 K) H/ k6 q7 ^' h  `; T
          RowBox[{"(",
    / X& }$ L" P  |* J$ c7 H3 s- F       RowBox[{
    ( B7 B' l; a; M1 X        RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",% w" k" {* i' S. [
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    " V* S6 o* s& r9 \, U; B& }}, Open  ]],
    ( S. _7 [% t# I6 h6 n: {6 d( w- h- C  x* Z: b5 ?8 H
    Cell[CellGroupData[{! v5 I5 O/ z' m& L

    1 r3 H0 P8 t5 {! y2 x* l' N. \Cell[BoxData[{6 q9 I' P! C2 j( H
    RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]",
    5 N7 F. X3 E  P  p( X RowBox[{"u17", "=", + a5 R+ O5 I/ }2 I9 S0 _
      RowBox[{# j  ]) Y0 m4 Y3 G9 A1 k5 L7 n9 x
       RowBox[{"Exp", "[", 3 ~& n4 s% i# e& q! O2 k" Y
        RowBox[{
    ! l! K! y/ _7 k5 l1 g     RowBox[{
    " r, `4 H6 O* v0 A7 B" R- E3 |      RowBox[{"-",
    $ \( _5 w5 T# ?) z+ c2 U       RowBox[{6 n* |0 t# z& s& K9 [8 i
            RowBox[{"(", & p: d& m1 a5 I
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 k3 r! d6 N& ], V! \8 r) G! F4 B        RowBox[{"(",
    5 M/ t" \6 K. a# \' e% u* B         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ) j0 g4 P. Q0 N; v+ ]     "]"}], "/.", "DeltaX"}]}]}], "Input",
    7 _& M; j! |: s% S CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {" I9 f  U0 n% O; U& W6 C7 t
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9, % _+ W7 y" M: ]; k! w  s8 [
      3.577961578953644*^9}}],
    2 D: f- ]5 Q( f0 b+ d' N2 M/ w( v1 a" o! l
    Cell[BoxData[: u/ f, l( r" s6 @4 v% ~
    RowBox[{"{",
    " T6 E- ^; A5 o0 `3 n  RowBox[{
    ) T- i* D+ B1 i/ N; M3 z8 h. H9 u# h  "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",",
    : g5 V7 J0 m5 N# \. o0 y   "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}],
    / D7 x/ @* r6 Z! L& V  "}"}]], "Output",7 L1 d$ _9 u8 X* ~! B
    CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],: A% ^1 {# m: i

    & m1 `+ x  _4 y& P+ G  r) b! }Cell[BoxData[
    : m  F/ o8 V: E5 x' e. c SuperscriptBox["\[ExponentialE]", 5 U4 W5 L, p- ]4 a; {6 v- E3 B
      RowBox[{"3.141592653589793`", " ", ' d6 V2 C+ Z6 v
       RowBox[{"(",
    ) J9 {5 t" O* T2 ?" E4 R    RowBox[{
    - n4 d1 z  G' B     RowBox[{"-", . I3 ~  p0 E5 l( ]6 y
          SuperscriptBox[
    ' v/ C' G. C0 E5 K0 X       RowBox[{"(", 2 T) E0 J/ O; O5 g( g
            RowBox[{8 h. B+ ~0 }1 d& O
             RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-",
    / w8 M& A9 u; k5 S' N* i! z     SuperscriptBox[
    ) O0 \5 {) e" y- [6 [8 A# |      RowBox[{"(",
    6 ^/ \" ~6 g/ `- x& l; M: ~       RowBox[{$ c: D3 \# o: G2 V& L, E3 n0 b
            RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-",   M! c) K. L8 {% |
         SuperscriptBox[  H& c; u( b1 H* [
          RowBox[{"(",
    / P+ n/ d& B* a4 E       RowBox[{
    % c; e4 g, C5 b# v+ t1 x$ s        RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", 0 w% M& u. M5 M4 W
         SuperscriptBox[
    5 n0 \# C+ i0 g5 ?5 D$ u* R% E      RowBox[{"(",
    7 I' ?3 @  k0 j$ U       RowBox[{
    , `3 B7 M- f5 p  C        RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-", 8 W) u+ s$ g, \% F5 u" A) ~
         SuperscriptBox[  Y7 y) Q5 N3 r2 ~
          RowBox[{"(", - N# {5 z/ `0 m( K
           RowBox[{
    # E5 i8 `% @0 B% O        RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", / P- K; C' h* H% d# j
         SuperscriptBox[, [, M. Y. p! O) W( g1 t  u( p
          RowBox[{"(", , _' e; [5 s5 |; o7 `
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 9 v0 B7 u  M+ W1 l- H
         SuperscriptBox[
    2 y9 q/ x: Y3 z1 m/ A7 x) P      RowBox[{"(", 6 T6 r3 X- p9 R1 j4 U8 [
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    / ?' p! j; N! g3 S     SuperscriptBox[' R8 n1 F0 q1 o
          RowBox[{"(", 4 b3 D5 `  R# a6 t
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    " f* F3 [3 J1 P$ K- H! Z* s     SuperscriptBox[
    0 G. W4 o! ~( F# N5 _      RowBox[{"(",
    . E0 ]& v' B- T( b. S; a) h       RowBox[{& v& O, P. f  N) w- i) N+ t3 p/ E
            RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}],
    8 Z- M9 ^- ~% K+ x5 J3 g* K5 m% |# P    ")"}]}]]], "Output",
    / B# _( U1 y; u, Q CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]/ S- @) E" b7 [% C1 X! a9 v
    }, Open  ]],; h1 \+ v4 E3 G
    ; k. ~- r$ U' g, Z0 q0 p
    Cell[CellGroupData[{
    & K: M' b6 ^) W6 ]
    * N- |. |' P7 `4 t! QCell[BoxData[{
      ^/ _8 H# _: h& A# t7 b RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]", - a* E8 C( }; X0 [
    RowBox[{"u18", "=", ' x* A1 j/ `6 M! t5 v9 i% w0 f+ v
      RowBox[{* W( X" ~6 {) m* q8 ^
       RowBox[{"Exp", "[",
    ) ~% U5 F7 e: @! E8 i6 t    RowBox[{. E- |0 [& o: r' R
         RowBox[{1 d" L0 E& q  R5 ?
          RowBox[{"-",
    + q+ G7 r, Z- a/ y8 P1 m       RowBox[{
    5 F% L1 r: O" o7 h# O' O  S3 j        RowBox[{"(", 0 Q+ B: o/ j+ l7 j
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ; |# _1 {6 t8 z0 X" Y; n6 L- S9 f        RowBox[{"(", 1 F' T' S! O/ \7 l; B  d; \* x7 H; e
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],3 V' R7 W% M; }" M: M8 R, @
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    $ w7 N) y/ P9 f" Z* N9 x CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    8 P1 _( l5 U" X" Z6 H# F3 _  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9,
    8 t4 {1 ~  h$ H6 R  3.5779615828848505`*^9}}],
    * s2 B# z$ m# w- K% |& t& v# Q# h7 A2 w
    Cell[BoxData[* n* k  y) C5 [6 n
    RowBox[{"{",
    # d& z+ j$ X6 U& e+ t% w  RowBox[{
    # M5 D. Y* m' W9 ^% A  "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",",
    6 G/ t4 V, @: F( t; i   "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], . ?' v( q6 n: `1 |, }% N2 R
      "}"}]], "Output",
    ) j5 e( n; G1 G6 n1 q3 O/ A' e' S. O  U CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],+ J3 N+ V9 K- @
    6 D! ?3 u/ {6 R/ m
    Cell[BoxData[  D& s0 N7 E: e4 t0 Z& D
    SuperscriptBox["\[ExponentialE]", # o3 z) P" P- K2 X: J# U1 A# ?7 O
      RowBox[{"3.141592653589793`", " ",
    8 u, m* @8 u8 @& k- @0 S0 {   RowBox[{"(", ) k" P6 D5 T. ]. }9 ~! V
        RowBox[{
    , Y: k& q' Y# E: q" Y. V     RowBox[{"-",
    ( ~4 H. A1 _! N/ H. u      SuperscriptBox[8 V5 R6 F7 v- u- k; B' Q0 {& N8 F
           RowBox[{"(",
    ; u: s3 R" y* ]2 T# u  F        RowBox[{
    # I5 g* t# P- B+ @4 B         RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-", + X, g+ s, n: S. ]2 B
         SuperscriptBox[0 I" m" t, S1 p
          RowBox[{"(", - c$ A! z; [9 z
           RowBox[{
    0 f$ N/ \% K! r( N' m. ~- L% Z        RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-",
    7 \7 K; Q) S7 G% Y. x  ~: z     SuperscriptBox[6 z0 y  W5 \- V0 m8 r& H( i
          RowBox[{"(", 0 c, `0 [$ j+ Q) t
           RowBox[{
    1 [, R* ?5 U7 a  g/ v        RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", " M) G: a! a6 F* n; A. [
         SuperscriptBox[
    " c  `1 p4 Y4 V8 m3 `% N5 q. E      RowBox[{"(", 6 T7 d/ C: O( O- w5 ]8 b$ u" g, |1 I
           RowBox[{
    ' [: R' E: T- H$ L. X- r6 t        RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-", ' h- N: m/ k! _1 }+ G
         SuperscriptBox[3 B3 t: W, g. Q; D2 H
          RowBox[{"(", 7 o9 ?8 m4 |! x( F
           RowBox[{$ m+ c! E  Z1 H
            RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    ; \# H7 Z! C, S     SuperscriptBox[* s$ W$ D6 K4 S! r0 s" ]9 {
          RowBox[{"(", * y1 o6 h# S7 i; @; w9 P' `9 K
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",   ^7 q8 {% Q; h' A, o4 H9 N
         SuperscriptBox[  \- z& K7 I( @' a" k  }
          RowBox[{"(",   T# D0 |: L4 P" I
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 9 U) d$ }$ u+ `% y% U
         SuperscriptBox[
    - O/ T. D. X' y$ n6 h7 S. O      RowBox[{"(",
      S: C, |8 b7 E7 m5 P5 Q       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    * L1 C, w5 d# i, L6 R& ?5 W     SuperscriptBox[( [3 L( C6 M3 F
          RowBox[{"(", 9 N; x4 p4 |4 [& {* j9 h( O
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    0 m- h, |7 b+ X9 b    ")"}]}]]], "Output",: F8 V& X  w3 X" [- {% s
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]
    ) l6 B" L) R, Z8 G4 R}, Open  ]],
    3 d4 q0 [  n3 l$ K0 @/ y, }5 w0 Y# p) w# y; s
    Cell[CellGroupData[{. |3 g1 T; Z. L+ s% k: T, m
    : `. {9 b7 s" n) N% t
    Cell[BoxData[{
    ( w. A; u! z' g RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]", 0 H8 C1 t1 D9 f8 u
    RowBox[{"u19", "=",
    0 x- f4 I# _) w6 n: k/ E' ?% S9 @  RowBox[{
    : b4 o5 q& B8 b! N   RowBox[{"Exp", "[",
    ' M5 [; G$ O6 |    RowBox[{' n( H0 B' D) O7 M
         RowBox[{
    8 @5 d6 `7 L- `  B& E  y9 b      RowBox[{"-",
    ! \1 x1 x- d  ^! h* G) Y       RowBox[{
    : H  a; }1 e; `- ^9 B        RowBox[{"(",
    2 N# a0 ~7 i+ L/ g6 I/ V         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", & r8 E/ ]1 G  A0 g
            RowBox[{"(",
    . q5 F" H3 C7 ]/ f         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],3 u1 E6 L4 @3 [8 j
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    , }; S4 Q9 Z% v2 z/ k8 j CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    + h" g: S. A2 g' W1 L# N+ a, T  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9,
    9 h% _  z8 n1 ?$ g/ f% ~  3.577961588890861*^9}}],
    1 _- t2 m' K, _
    ; M. G' C) G4 C7 R& Y2 qCell[BoxData[
    2 S) ~, [3 X6 }% F! t2 u$ S2 S+ v RowBox[{"{", 3 R5 C1 I( _& T9 W" b4 }
      RowBox[{
    6 a4 p" p; S. H+ Y  "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",",
    3 e3 w7 K3 q% E) Z   "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}], " X0 I; z; X: N) ?
      "}"}]], "Output",
    2 O; ]. T2 ?% g- S4 X% B. o CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],% c; i8 @( j0 u% L3 i2 z
    ' a- g- F* B; O' n  |$ h* J7 b
    Cell[BoxData[, U' x1 i7 r5 u! Q2 B  _+ C
    SuperscriptBox["\[ExponentialE]", 4 v# O- d3 h! M0 S
      RowBox[{"3.141592653589793`", " ", 9 q1 z4 u$ T0 B) _
       RowBox[{"(", - M  b- j3 V/ O0 _  r
        RowBox[{
    5 Q5 |% y% g. @- s' V- f     RowBox[{"-", / i0 b9 g6 s4 I" b: P
          SuperscriptBox[' S  j. w3 K$ k' S5 I+ G  Y, D* i
           RowBox[{"(", 0 f$ a# L4 X" O% k! _# I! e) R& t
            RowBox[{
    1 C( u" l2 u: G         RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-", 7 e! V1 i' y2 v7 t1 K% [
         SuperscriptBox[
    ; ?0 Q  p3 v8 x3 X* `4 b, S+ s7 k  m      RowBox[{"(",
    & i  D; V, n3 l8 v# ~       RowBox[{
    : f  L  U/ m9 F3 x6 _4 S2 f2 u& k- q        RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-",
    4 G% K- z8 K/ W: c$ i     SuperscriptBox[' t- J+ I* K& M: s$ v0 P
          RowBox[{"(",
    $ t6 u' l: M8 M3 W( x# b; L       RowBox[{
    # G; ~: k5 I& T0 i  E) z4 w1 i        RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", , P! b7 P6 h! y& Z( R$ z
         SuperscriptBox[; _6 I0 G4 L/ Y! }' N
          RowBox[{"(",
    4 }+ d3 W- }, R. L9 m. {       RowBox[{
    - c9 O# }% M/ s( h, P8 A        RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-", 5 i# c7 q' O+ {  v/ L+ V
         SuperscriptBox[/ m: J2 [& `! N  F0 y. p
          RowBox[{"(",
    ) Z7 J  G9 V# c, V# o       RowBox[{# `. ^" r2 W8 c, \
            RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-",
    # c! F' R8 T2 M     SuperscriptBox[/ B* r4 d4 Z" N
          RowBox[{"(",
    ' F5 y5 ]6 u5 z* H& @6 ]       RowBox[{% x7 x( _, q2 F* n6 P
            RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", , B6 o- T3 _0 t& W0 z
         SuperscriptBox[
    ) f; W% s+ ]2 U# |. o; z      RowBox[{"(",
    $ |6 l& j: ]% ~+ B& r( Y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    2 F6 I9 n+ }6 y     SuperscriptBox[2 \1 g2 {' a. a8 ]3 Z1 x- i
          RowBox[{"(",
    + {' O7 m4 d1 {       RowBox[{, C) D/ s  b, i2 v! ]5 I+ S
            RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    8 i+ T# }& ~) ]$ ]& g     SuperscriptBox[
    2 U6 Q& S7 {/ E  H% h      RowBox[{"(",
    ' m0 }# v7 C7 f- k       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    5 Q: R. a6 H5 \/ O    ")"}]}]]], "Output",
    ) u, ^: j2 q5 h  V9 l7 v! D$ n6 E/ d CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]7 U2 a; s- M' H( c
    }, Open  ]],* }9 ^1 b4 n0 J/ S, R2 l
    : _$ ?8 ^, t* r1 ]0 x* ^
    Cell[CellGroupData[{. J4 W0 ?7 I& w% G9 r
    / F5 L! d$ Y# R
    Cell[BoxData[{, v0 N1 g- i) C3 p# R( }$ ?4 u
    RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]",
    0 v$ d3 _  ?* I: b' Y RowBox[{"u20", "=",
    / Y0 u- @5 m4 L/ |/ z  RowBox[{  P8 s" o3 ?  `
       RowBox[{"Exp", "[", % z" r5 d) q" `9 c& b8 C
        RowBox[{( X- H7 `, D3 B) ]1 c9 @' {8 l
         RowBox[{
    ! l7 E! I$ h$ g- j$ b      RowBox[{"-", 8 W8 W" u) \6 p
           RowBox[{
    % |3 j4 b) y  j( O6 k. T$ o# _+ r* U        RowBox[{"(",
      n$ r. X+ V# H# c$ h         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    1 `/ d7 D: |' l+ R        RowBox[{"(",
    * e8 J9 q) u- x/ |; @" o, j         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],2 ?& N- \# X3 q* D, c+ R1 y; C2 @1 {  W, h
         "]"}], "/.", "DeltaX"}]}]}], "Input",0 M, n1 L/ J, `6 q; q" R0 Y+ ?
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {$ F) y) S6 h* v+ H& L5 [4 V) {
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9, 2 j4 ^  {! t* C! O- c( I
      3.57796159382047*^9}}],  \" e5 ^% I4 R: m5 {. g

    7 a4 M, z* ~. M0 R: sCell[BoxData[
    : [# q4 C6 H0 B3 c: J RowBox[{"{", 8 ]2 T* q$ b& \) Z5 l7 F
      RowBox[{* `, ]- _9 d3 {, e
      "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",", * S" M2 _8 S% S6 O+ B6 f
       "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}], 8 {& F; Y( N- [4 A( c0 T1 h
      "}"}]], "Output",
    ; x. y8 }$ M. n7 f CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],: C) @+ R) t1 n* q, I

    " K. ~# b# X8 q# n. P: j0 iCell[BoxData[
    7 w. V. @# N: y0 c1 s; X SuperscriptBox["\[ExponentialE]", - v* ]% o" v5 S. z
      RowBox[{"3.141592653589793`", " ", ! [9 m/ I  T9 V5 P
       RowBox[{"(", " z/ w5 T7 x, a! t& b$ Q8 [
        RowBox[{1 i" Z9 g! g' c# c
         RowBox[{"-", ; k8 a' b  y; G8 T8 T/ [( |3 S" J# C
          SuperscriptBox[% a: m) p. I( W" T9 y3 o
           RowBox[{"(", ; C- R4 {& F; Z" U
            RowBox[{
    ( i% c# s' B# m0 J         RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-", 1 |5 F: |! T& y" `' A/ [- `: d
         SuperscriptBox[1 \8 Q3 Y8 F+ i$ X, w2 J
          RowBox[{"(",
    0 g# m# V/ x, O! \, P0 M/ Y) d- @- w       RowBox[{
      r% ?% |' y3 d        RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-",
    # S0 d- J" U% l7 ~     SuperscriptBox[" `/ Z5 }- L9 C; z. H4 n# O
          RowBox[{"(", * f+ k# x" r: t9 W" q; [+ p
           RowBox[{! {. r6 b' G0 }6 }/ b, t5 ~
            RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",
    ! y8 h' k0 u/ K* z     SuperscriptBox[7 Q3 L: u6 b3 _8 K: h
          RowBox[{"(",
    5 [, y, x$ ^8 J3 Z9 U, V( `% K6 x       RowBox[{' a. t! z2 `& |( F" w, @8 M7 I
            RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-",
    - ]. |2 O* `7 Q- M  s( i8 ?8 f$ l6 c3 P     SuperscriptBox[% y5 N6 \5 }4 {: ?5 K2 g
          RowBox[{"(", + o8 C9 a" ~  m1 k  |& W; Q/ @
           RowBox[{
    : t, \: u/ t* i7 a+ j: h        RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-",   ^" k* j" T+ Y8 U$ k3 i
         SuperscriptBox[
    % \$ d. C, _5 U5 q! z1 b      RowBox[{"(",
    7 C6 @/ y% g% K* Z, |! I# v: S" I       RowBox[{3 f, p) ^" a2 f& J. f
            RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", ) Q* K+ o! |! D, z6 U# G/ \1 U
         SuperscriptBox[
    4 B$ U  B- r. n      RowBox[{"(",
      H0 J; k* K4 x4 t' Z7 n) o       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ) f6 y. l4 W/ K6 p+ s     SuperscriptBox[& u: L6 Q1 I" L5 r* p
          RowBox[{"(",
    $ D3 R- X' U. Q' e5 P       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ) \3 M1 J6 F) O! B  p& X$ J4 X
         SuperscriptBox[, V/ E9 ]* K7 X- [( A2 ^
          RowBox[{"(",   F$ j1 N; l: \5 }4 @2 S7 |
           RowBox[{! L, y3 w' Y% ]2 E; l( i& p/ t
            RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], : l! W" X* n- n* Z0 u
        ")"}]}]]], "Output",9 c* {$ P0 Z+ k5 J. U
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]1 B; U# z& K$ m8 W
    }, Open  ]],
    ! q$ K9 _- v& H
    # X9 b: E2 S' L! FCell[CellGroupData[{. y, z9 B8 B, |  }, ~

    1 e9 Z, I* Q% Q4 O& ECell[BoxData[{
    . Z: I8 d. r1 h+ L RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]", : s, g# O- q/ e
    RowBox[{"u21", "=", . o/ J/ b6 X" v; v
      RowBox[{6 o, Z) Q# s" S. \
       RowBox[{"Exp", "[",
    * H8 w! G/ q! k0 I  L! u2 b! {    RowBox[{, q; {" K+ h) g/ u' A  t
         RowBox[{8 u$ @. b* @0 ^) N6 z0 y* P. j
          RowBox[{"-", 5 }6 c/ F5 `) w9 J: K$ Q$ d, K6 N
           RowBox[{; g0 B# r9 ^" ?
            RowBox[{"(", $ Z, b& e+ L; ^1 \) h8 B+ z+ v
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + A' n; `5 m, b2 G& }        RowBox[{"(",
    ' p; H4 g! c0 a9 U8 Q         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],4 }; m- O  M. m  r$ n3 M
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    ; t* q" ]) {7 m! Y1 x CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    8 ?' C( y% ?( c1 a  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9, ; T$ A; @6 W( ?
      3.5779615991556787`*^9}}],
    ; k9 ~% O8 M: A  z
    4 [6 T( ~& H2 Z* I+ JCell[BoxData[
    9 Y  Z" ?. D. C5 {$ n6 [ RowBox[{"{",
    6 C+ U) \7 s2 W; S; t4 V  RowBox[{0 `7 u2 z' m' v' q( r2 O0 H1 u
      "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",",
    4 y) D: o) q( k1 Z% T' j   "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}],
    ) W6 V$ S4 C' s7 h' h3 C) V  "}"}]], "Output",
    $ m- b. ^2 z- l" f- W' q$ f" l CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],' p. d+ e$ e& T7 g4 F# \

    0 s. L! S: _: w* l( F4 dCell[BoxData[" E6 n$ r1 k( E9 ?! q# b
    SuperscriptBox["\[ExponentialE]",
    ( c- i4 ]% a1 n# i. t7 }$ `  RowBox[{"3.141592653589793`", " ",
    ' w4 c+ J$ O, S6 f3 c; ~8 B1 w# _' p   RowBox[{"(",
    + \& O/ Q, Z5 U) x5 ^# t    RowBox[{
    + E& h. b. q% b# o- [1 v+ w     RowBox[{"-",
    ! H+ \3 _7 J0 s      SuperscriptBox[
    * o5 ~- {  b9 N# O+ b       RowBox[{"(",
    , C4 \. y6 c- N. k3 ]        RowBox[{  M" x) T8 `2 J, Q/ l  E/ c
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ; n, a5 n" }$ N6 {( i8 q     SuperscriptBox[% B) N# {! h+ z6 ~7 s8 \
          RowBox[{"(",
    * z) ^- a$ [# W. `- r       RowBox[{. b+ v' y2 T8 `9 D' {
            RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-",
    1 Z3 Z- J3 _3 }: j$ {8 a     SuperscriptBox[
    1 j# z8 t- I/ n2 o% z      RowBox[{"(",
      H* Y* o% v: q- L) T/ ^! e       RowBox[{
    # w2 B1 A( d' z9 l. {% b        RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-",
    3 J9 }2 ^- G- _+ B) T     SuperscriptBox[
    ' C! H- S# l  H      RowBox[{"(", : G0 d6 W: P3 G$ a9 d( j
           RowBox[{
    # p7 z! w4 P3 l) r        RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-",
    4 H% B( S: e' x. u     SuperscriptBox[
    # J: ~1 R9 X5 z' F( A7 w0 B  Y6 N      RowBox[{"(", , j2 G, k) y# ^" Z: F* q6 @
           RowBox[{: f1 x) c+ B& i4 n! l
            RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-",
    4 @) Y6 y6 @4 Y; ^7 o9 t: j     SuperscriptBox[( C; w: t: V! w) x
          RowBox[{"(",
    ' u& Y4 C& N% e) C6 j" c' W% K7 n       RowBox[{( ~3 v& ~0 x2 X# c
            RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    ! m' E2 P# E/ n     SuperscriptBox[
    3 I( Q/ O% x3 f- w      RowBox[{"(",
    % ?1 {+ i, ^5 [% I3 T1 i       RowBox[{
      o, H% [6 _8 G! k2 o; \        RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",   @( c% v" b, I" k" N/ C1 h
         SuperscriptBox[/ i( y) N0 S/ D% P2 J+ c
          RowBox[{"(",
    ) S1 o0 N1 h1 L) S5 c# B* Q' R& b       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 0 Z: [! n& c+ v% _
         SuperscriptBox[
    * e! E/ C+ I3 ^      RowBox[{"(", # c; x* q+ `+ S' \
           RowBox[{
    9 z0 _6 v7 p( \& A) y$ k3 I        RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}],
    + s' m3 C- e, f0 Z- {, K. v    ")"}]}]]], "Output",- Z0 |' p9 |6 @3 ]4 u
    CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]8 X9 [' M. r5 T/ H8 x
    }, Open  ]],
    # N1 }4 {9 j: ~. }1 ]# N2 Z6 Z2 H
    ( Q7 F* [7 v2 _9 nCell[BoxData["\:62df\:5408wi"], "Input",% i7 u/ |3 o1 \: e; B
    CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],
    : K/ M/ C1 E4 b  P6 S) u6 ?* u& U" P, Z& j) @
    Cell[CellGroupData[{
    2 T4 s) N: `5 K2 i, H% ?' ?. R) S' ^' f8 h* b
    Cell[BoxData[) z( P: m0 Q! ?5 |$ H% R' M, N, z' r
    RowBox[{"y1a", "=", ! W0 p, Y6 `( I$ X2 k) ?4 I% _
      RowBox[{"Table", "[",
    . ]& D2 ~" Y4 ^8 H+ }: ^0 y   RowBox[{"x", ",",
    ' }  G6 {: {4 n0 [3 g% B) d4 l+ X    RowBox[{"{",
    + p  A" y! M- f1 q     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",+ @1 v9 [& D5 `2 h
    CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {! H  h- l7 N' X. T
      3.5779226649375*^9, 3.5779226810625*^9}}],- s/ ]* L  m) n, M7 G0 t; V: t# u
    ) I% ~; y  P" l/ J# X
    Cell[BoxData[( V8 }2 {8 O; s4 ]7 H& }
    RowBox[{"{",
    " E, D0 b  x& H  RowBox[{
    # W1 n( _! a0 M7 `2 f" j1 T  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + \& R9 O, Y8 D( R, Y! Z/ s- `5 M   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    : ~3 C9 Q: q5 v! t    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    ' h3 l' O8 \7 B5 B6 t8 ^( @, ?  X   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", + o3 [1 k' |6 l3 ~- H- e. p& x
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    7 |5 v2 x4 t4 S+ H0 l, ?& t( [   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    % s( G1 s) a3 z( E: [7 r( z   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", 5 X8 x+ c7 W, T" M9 j( E- ^# |
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    4 F7 v  Q4 b5 @   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    , B7 V( f5 F3 ^8 D- r# k  "}"}]], "Output",
    " X4 A" }& w: J2 S& Q# B- X9 H CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9, ) i3 W; b& k8 a" t, b2 ]5 g+ r* E
      3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]
    : |2 |# o0 d% C% X4 j) L; z}, Open  ]],
    / x8 Q. b) m2 b: f- B8 d3 [) K- }/ n: U; }3 D
    Cell[CellGroupData[{
    3 @/ d3 W2 \3 ^
      v; [1 T. |0 B8 w* W4 OCell[BoxData[
    $ Z: N* G& K5 @1 q% f RowBox[{"Data", "[",
    8 m  N8 V& M5 [0 M  RowBox[{"[", 1 y  L% x* Q9 R- p# B8 A1 ^9 P6 C6 y
       RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",
    , i  z7 O  d$ Y# I! Y3 O  W# D% { CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {- d, N& m& }. U! I
       3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],
      ^4 b* m3 X6 f
    ) o3 t6 C0 @, B9 X* x. J/ JCell[BoxData["0.899882`"], "Output",
    7 d3 {9 d3 f) f2 I" @; J CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9},
    ) Q. m! X. o  r: l   3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9,
    . d$ g! M/ e1 ^$ V; f6 E   3.577961929080654*^9, 3.5780123419375*^9}]! W/ l0 W* o( }
    }, Open  ]],
    $ a  e$ T( R$ q" ^4 J6 n
    3 {4 F8 O; k! e1 c; y& g  iCell[BoxData[- |" d# C+ }) L. o7 [% Q
    RowBox[{"For", "[",
    4 v" y" D/ v5 x+ A. Q  RowBox[{  i6 n# s: Q- i
       RowBox[{"i", "=", "1"}], ",",
    & B( x: |4 O1 G  ~/ y, L   RowBox[{"i", "\[LessEqual]", "60"}], ",", 0 g0 O7 b/ S3 u# H
       RowBox[{"i", "++"}], ",", % c: u- ?8 z1 m: o$ y
       RowBox[{
    ' h. Y& I7 A$ Q1 E+ |; a  `    RowBox[{"y1a", "[",
    " ^" C, B* Q5 y6 x- S6 s7 ]0 D3 d     RowBox[{"[", "i", "]"}], "]"}], "=", 3 Z8 o2 K- z5 w" Q$ c+ y
        RowBox[{"Data", "[",
    2 d! E0 A1 \- B2 _  R- b5 ~$ e     RowBox[{"[", * k) Y; L+ i0 @
          RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",
    ) J  T& C& q. ~* U% e CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    3 r) Q) |0 f: J) O  ^1 x   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    0 ^: T) Z4 G% X   3.577922923203125*^9}, 3.5779588839702806`*^9}],
    2 Z+ n5 w0 _/ Q. E" l! }' A
    7 V2 ~; s/ N" n5 B& L+ |- W! ~Cell[CellGroupData[{
    5 j% G/ Z  l* i- H5 j# x; n& W; f( }# V6 k8 U
    Cell[BoxData["y1a"], "Input",1 J- d, C7 |/ i  B8 u2 q1 ^
    CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],7 p! N3 x* T% A. G  D

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

    + ^8 @: v- A( {) k3 s5 n2 DCell[CellGroupData[{
    $ m5 ~2 M! q" j$ m% d; H! l; o. i0 h+ o
    Cell[BoxData[
    4 \# S9 T) F$ A% _, b8 P. f RowBox[{"y1fit", "=", 1 W6 Y8 S2 }# U" \6 v
      RowBox[{"Table", "[", ! O. F' n0 j) V: n% `
       RowBox[{"x", ",", * L; K$ T* e$ g4 J4 U
        RowBox[{"{",
    ' |6 w" o1 Q- }9 C; C* d( U     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
      ]/ V# ^0 K. G4 O7 X9 W& \ CellChangeTimes->{{3.577924969375*^9, 3.577924979515625*^9}, {
    6 Z% @- x. f7 o  3.5779252768125*^9, 3.577925277484375*^9}}],
    # [& v8 p; M2 a. x( \: ~3 ?! s
    ( b5 i) n. z# _6 s' Q4 }Cell[BoxData[
    / T) `, ]( y- {) N RowBox[{"{",
    ; q- Y# |5 w8 R+ Y  RowBox[{
    0 z' T2 R- Z4 Y  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", # H# R1 I( r1 |( N
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",/ }1 Y. P& p1 m& E+ K9 J
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    9 b( C% L5 @4 }5 }) ^- t+ P9 T   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 6 `9 g9 @- \3 T# x- h
       ",", "29"}], "}"}]], "Output",6 j% u+ ^* Z2 x( d* ~# b) r6 g6 r
    CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9,
    / N1 T0 I! O* \8 n) h  3.577957594916795*^9, 3.5779589579612093`*^9, 3.5779621294942036`*^9, : O5 K- j) e( l+ h3 E
      3.57801235340625*^9}]8 Q* p% ?- O! |' \$ F
    }, Open  ]],
    ) g7 M4 A9 s& v' K9 c* C7 S9 s3 b1 l: i/ I' ]
    Cell[BoxData[
    ) O7 H" w8 D0 D, {: @ RowBox[{"For", "[", 0 w0 @# j8 y2 Z) D# X* X, X
      RowBox[{
    $ |) N! d+ b, O$ ]5 m8 F1 ]3 e   RowBox[{"i", "=", "61"}], ",", ; l4 v$ t6 l4 v# n, Z
       RowBox[{"i", "\[LessEqual]", "89"}], ",",
    ) N5 ^/ P$ f+ D/ k4 `- n& `: Y8 q   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    # y4 M  B  Y* t( K* }   RowBox[{7 {) @" X9 [* E' b3 V
        RowBox[{
    % g/ r0 |) i3 M     RowBox[{"y1fit", "[", 2 o0 o6 J( C3 ~  D& Z6 z! J  s! C9 [
          RowBox[{"[", 5 Z9 z- R' Y" Z
           RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", 6 N- j# s3 t8 M) R
         RowBox[{"y1", "/.",
    $ e6 B7 V, [1 R: W; t3 q- j      RowBox[{"{",
    0 {1 }! @# m8 e( v       RowBox[{
    ' v2 H; Z5 N  [& S1 w( i        RowBox[{"x1", "->",
    % I9 S! M" H6 j         RowBox[{"Data", "[",
    6 n: [' f" _4 e, I* f! ^" Y( j3 ~          RowBox[{"[", % s, }' b2 O, P8 e# d7 Z
               RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ) Z! f" G7 t+ M( ~3 }& a& V
            RowBox[{"x2", "->", + F: C6 b/ d3 q8 X$ e3 J
             RowBox[{"Data", "[",
    , e3 S' e% c( O7 h1 x3 D0 K          RowBox[{"[", * o# ?; e8 C) [# a9 V9 x2 M
               RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", 0 q! B. x8 P. |/ r* I" d
            RowBox[{"x3", "->", " ~, D) N8 K7 k* G
             RowBox[{"Data", "[",
    ( Y; S  a+ h& Y6 T) `          RowBox[{"[", % y( t8 T* |, U: w
               RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    0 N$ _! ^3 \: |9 H+ R8 j+ G        RowBox[{"x4", "->", + V5 F: y% Z' m9 A
             RowBox[{"Data", "[", , M$ W1 N* p* Q" P% g$ d& ?7 B
              RowBox[{"[", 2 g2 U5 J+ x, M
               RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    : h+ i# V  h! o# q* R        RowBox[{"x5", "->", ; B1 u+ P( ^) U# K8 f
             RowBox[{"Data", "[", ' N! C. s- u. t$ y, E& r3 M
              RowBox[{"[", ! Z* A1 m% H) J7 z8 u# G. C+ t% x, q; A
               RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", / i: w- J/ c: a/ h& m3 F+ r
            RowBox[{"x6", "->",
      t; T0 \/ E3 j5 j8 Y/ N* j         RowBox[{"Data", "[",
    3 k8 ]7 w& C- |" ?* p3 |9 k6 ~          RowBox[{"[",   n' G: e+ h: p( K" S  ^/ R
               RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    2 Y# m" j+ {" J        RowBox[{"x7", "->",
      B  A! d  r# Z$ o) C4 `) R- g         RowBox[{"Data", "[",
      P5 `1 V, ]  l          RowBox[{"[",
    0 {% {" c, ^4 ^! `7 v/ c2 y           RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    3 a7 a# C0 v  C$ v) z        RowBox[{"x8", "->", : w  X0 s; ^( F0 F: ?7 }$ I8 O# B
             RowBox[{"Data", "[", / l) g$ x5 e) g4 z8 a5 t! Y9 D
              RowBox[{"[",
    % E, X7 e3 k: |6 k4 w% D# R* T! M& x           RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", 1 q1 z3 T* a6 N: t, i9 ]
            RowBox[{"x9", "->",
    8 @5 R/ I/ d' x5 e' p  J7 [% T         RowBox[{"Data", "[", 3 \$ T7 x3 r+ ~+ V0 R8 ~
              RowBox[{"[",
    " W1 \1 y0 i8 h           RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}],
    ! h; n3 z4 Q' t1 U. G+ x  "\[IndentingNewLine]", "]"}]], "Input",
    ) }* B  N6 p$ _: P3 z: |1 J CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {: ^, g& z& N+ j1 p  l
      3.577925286140625*^9, 3.577925306765625*^9}, {3.577958922517948*^9,
    ! P4 ?5 o9 R0 U, S8 i- A  3.577958922549148*^9}}],
    9 m+ q! E, L3 m
    # G) C) @6 _4 _$ _" jCell[CellGroupData[{6 A/ s3 Q, X. u
    ! Q  D+ z+ ]5 `0 o. Z2 r
    Cell[BoxData["y1fit"], "Input"," Z, K  {! I' J; {5 z4 Z) |3 w
    CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {
    ) J2 N7 L4 _5 n$ W3 O  3.577925040484375*^9, 3.5779250440625*^9}}],7 b+ B7 s0 U, D

    / k% x4 _, `+ g$ BCell[BoxData[
    & D) l/ K% y. C1 t& |' U, c0 p! N7 A RowBox[{"{",
      k5 i2 g4 M9 r8 M! I  RowBox[{
    7 i1 ?6 r1 ^9 Y: _8 c. |0 p7 f- A  "0.43193416525930517`", ",", "0.4501634853493982`", ",", $ z9 C  f* i0 k/ ?% |$ M' s# |
       "0.33336034768525247`", ",", "0.4418609896858925`", ",", + P3 ]+ @" s6 b' h4 ~
       "0.41030378932283024`", ",", "0.516814798191575`", ",",
    8 p; J3 W% s# Y" H- D   "0.4476631213729994`", ",", "0.3016552978696669`", ",", # W+ s1 m( z$ I0 n; I! j
       "0.378122167437847`", ",", "0.020339844919720733`", ",",
    ) Y/ A9 n- P0 \- u7 r9 b' e   "0.018745375782087376`", ",", "0.2919925992695025`", ",",
    7 j, S" [3 }/ y   "0.2649067959681263`", ",", "0.16343444284525593`", ",", ) u+ K+ g  _* N
       "0.4182466778551563`", ",", "0.27347752211364934`", ",",
    7 N* o* g0 U/ G# \3 P   "0.38554057386385654`", ",", "0.35253160453718047`", ",",
    : H/ |- K4 N' z; F* s8 o( w   "0.2054745841100774`", ",", "0.45504377112716676`", ",",
    5 V3 i' j1 G  w4 K" t7 ?$ ^   "0.1598805094678612`", ",", "0.18662509982279485`", ",",
    ) G9 j- I. D$ u   "0.10684797493248213`", ",", "0.013349212673286828`", ",", # m# a2 c  N! R' L$ x
       "0.08215836003004297`", ",", "0.2979041599362813`", ",",
    6 `. O0 J2 ~+ z/ Y1 U! Z" h   "0.05995976512343641`", ",", "0.3884793499104568`", ",",
    ' r/ J) @9 r  g$ Y   "0.5361889337034293`"}], "}"}]], "Output",
    $ I  l) ]0 o! v' t9 L4 R CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9, % F) U- T9 u. W  ^) w
      3.577925312375*^9, 3.5779575978808002`*^9, 3.5779589654960227`*^9,
    # E1 u5 ~/ p' `1 ~9 t, k  3.5779621416934247`*^9, 3.578012355546875*^9}]
    0 |7 ~2 A6 l& ]) S. m7 ^}, Open  ]],
    5 c; N4 V9 \0 A2 V! o- I7 J' ^6 N6 Z
    - b# @9 Z+ O7 r  H" }Cell[CellGroupData[{
    : ^4 `+ k" T3 G6 {4 _6 D
    5 A' u, [5 }* d- e& kCell[BoxData[1 F4 i0 M1 b% j# d" ?+ o
    RowBox[{"y1fit", "=", 0 w1 ^; q& G- W6 I; N$ d* P
      RowBox[{"{",
    - d6 a& O! J7 D0 ^   RowBox[{
    % ~8 j! B5 ]: w' ~   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    6 L) w/ U$ |. b* b% C    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( w" J5 ~" D! U  g4 b5 K
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    " e) r; c/ k7 S9 A- g    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    & |4 b# {$ H9 z    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34",
    . H- w. e& r5 Z8 [    ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    / i" I# K' W. k7 G5 l4 Q7 N    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ( c4 |$ c! _  y( u
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    4 a! t; ]  ~. T7 Q! E    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    8 a/ O& r; q0 s9 v    "0.4319341652593058", ",", "0.4319341652593058`", ",", # r# _. @9 F% J7 o' B" \5 T) d+ F( n
        "0.45016348534939865`", ",", "0.3333603476852527`", ",", % X0 B5 I' h2 [
        "0.44186098968589294`", ",", "0.41030378932283074`", ",", / U  J, p! k3 x! k0 E; @' ?
        "0.5168147981915754`", ",", "0.4476631213729997`", ",",
    ! e6 F$ b# H4 D; I    "0.30165529786966755`", ",", "0.3781221674378473`", ",", ! V9 e' _+ f. Y2 ]
        "0.020339844919720775`", ",", "0.018745375782087393`", ",",
    ) F/ x7 R1 L( r. w/ }& F    "0.2919925992695026`", ",", "0.26490679596812655`", ",", . \' z! n* r  j8 `' U' ^
        "0.16343444284525593`", ",", "0.4182466778551567`", ",",
    / j6 c5 [/ ]  V" m% Z! J5 [* z    "0.27347752211364945`", ",", "0.385540573863857`", ",", % @5 ~; F/ v% {' p
        "0.3525316045371807`", ",", "0.20547458411007796`", ",", 6 r8 u& ~% U4 J/ i& B+ \  Q8 z
        "0.4550437711271672`", ",", "0.1598805094678611`", ",",
    % C" z1 c; _! Z) ^5 E    "0.18662509982279502`", ",", "0.10684797493248224`", ",",
    ) x* M: m4 o% _4 Y' c    "0.013349212673286806`", ",", "0.08215836003004302`", ",",
    , m2 _/ I5 @+ K% j, E9 P7 o" F0 v    "0.2979041599362817`", ",", "0.05995976512343637`", ",",
    3 V1 f) B+ N9 G    "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]}]], "Input",
    " M2 y* `+ A1 t8 d8 U1 _. r) v CellChangeTimes->{{3.577959701349306*^9, 3.5779597161381316`*^9}, {
    # r/ u* E0 Y! ^  K# s) R  3.5779621548286476`*^9, 3.5779621618642597`*^9}}],
    8 ~& h2 ^% W' @6 a6 g  ^: _' o1 o5 Z# c3 U. I9 K& w' `0 H
    Cell[BoxData[, r' \- J# K% H. l8 {" C% l+ ]
    RowBox[{"{",
    % p5 a, T# D2 l6 r  RowBox[{
    : a, c. y, `" C" K+ j  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", . J8 w2 }, W, d; t4 a/ v
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",; q( k6 g5 Z2 b. a" x; B
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    ; c* [0 G5 f$ c  W9 h' E   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    4 O& p2 n6 t/ M8 d( `   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    $ s/ W) |7 p. s3 d9 M   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    0 C7 y# k- P2 _+ C. J9 ~   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    7 T% L0 C1 \# [( I   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", # `8 I9 c, q/ {
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    8 s1 l  r  V/ [4 @( y   "0.4319341652593058`", ",", "0.4319341652593058`", ",", 1 k* p, ~2 a) B& i: v2 S3 y
       "0.45016348534939865`", ",", "0.3333603476852527`", ",",
    - j4 i- B7 d9 ^$ u- V   "0.44186098968589294`", ",", "0.41030378932283074`", ",",
    ) X  E$ p6 t1 J7 B* ^& G   "0.5168147981915754`", ",", "0.4476631213729997`", ",",
    # p7 ?. F' g9 w& M# l   "0.30165529786966755`", ",", "0.3781221674378473`", ",",
    2 C, ~7 R, |" D   "0.020339844919720775`", ",", "0.018745375782087393`", ",", 5 `$ R1 e% h  c) y
       "0.2919925992695026`", ",", "0.26490679596812655`", ",",
    + z1 j' P& r' N8 s- ]   "0.16343444284525593`", ",", "0.4182466778551567`", ",", 7 K5 P% o* u+ L! {# _& {+ `4 Q
       "0.27347752211364945`", ",", "0.385540573863857`", ",", ! f$ [& x4 [7 O; k0 D2 e
       "0.3525316045371807`", ",", "0.20547458411007796`", ",", 8 [  M& M( t& X$ O9 {- m
       "0.4550437711271672`", ",", "0.1598805094678611`", ",",
    2 G7 ^0 m, k+ S" u& t/ ^   "0.18662509982279502`", ",", "0.10684797493248224`", ",", ; M2 H' s2 [5 ]8 J
       "0.013349212673286806`", ",", "0.08215836003004302`", ",",
    0 X% e. a8 @9 c6 o   "0.2979041599362817`", ",", "0.05995976512343637`", ",", - S- U* l2 N( V' [# R
       "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]], "Output",
    / G8 C( s2 ^8 \: B$ ]) E CellChangeTimes->{3.5779597200381384`*^9, 3.5779621650778656`*^9, $ ^" [' _4 R( w1 s) r0 o
      3.5780123569375*^9}]
    9 U6 f5 ^: D& @( p# c( @! _* G. o. R# l}, Open  ]],
    $ m& {5 M4 d  q: L0 M4 E8 q1 B3 J4 |/ W& b$ j, [2 m4 g* j6 H
    Cell[CellGroupData[{7 F4 x7 i* K1 o( |+ Y9 I  N

    ' A+ B" C) c0 J( N* ?Cell[BoxData[' I1 ~8 h4 O% e7 Q
    RowBox[{"y10", "=",
    1 V% l( t6 P+ f/ W  RowBox[{"Table", "[",
    ! v& G8 A( [$ q$ _! k& b% N   RowBox[{"x", ",", 4 L9 s: v: E* b0 v# ~
        RowBox[{"{", 7 t+ O. E" k+ U# u4 E9 z
         RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    4 Y. K. a; ^+ b CellChangeTimes->{3.5779253628125*^9}],
    , O$ S2 s9 J7 m
    6 V/ i' o6 x9 m) B7 d/ FCell[BoxData[
    0 M! f9 n& l! p6 ^ RowBox[{"{",
    . a3 s2 k( @) X& t! t6 L- q  RowBox[{/ B5 V% k' i6 c( Q
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", . p# {. ]" M/ x
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    2 [1 y. A3 P! Z9 B    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", * O9 h% v- h) a5 T* k% \
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    ' L& x" T" q/ W0 ~4 I) E  M$ ^1 Q   ",", "29"}], "}"}]], "Output",
    / W. S: b! D3 f CellChangeTimes->{3.57792536553125*^9, 3.577957599565603*^9, / g% A7 z( m& i  Z
      3.577958967383626*^9, 3.5779621678858705`*^9, 3.578012358609375*^9}]
    " l. x# {, c- v. o/ C# N}, Open  ]],
    : }1 {; w1 u: a' o1 e, M# u" c1 `/ I8 J
    Cell[BoxData[
    1 }2 G  f. Z- ` RowBox[{"For", "[",
    # C% ^5 P% C7 K( B, G  RowBox[{7 S/ D# n* f4 t8 a, g; i# [: x  C! d
       RowBox[{"i", "=", "61"}], ",", / ~- w  L  ]8 z( |# ~
       RowBox[{"i", "\[LessEqual]", "89"}], ",",
    9 a; e: S, l5 ?* @1 Q4 S- L  A   RowBox[{"i", "++"}], ",",   u+ I$ q' y; D: A) p" q
       RowBox[{5 d. @3 i: k; K3 T# Q
        RowBox[{"y10", "[", - X. t# s. j; M/ i1 g' v8 q# P
         RowBox[{"[",   b% p* v$ t+ z& G5 O2 h
          RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",
    9 Y# y! h/ y: V; }8 ~    RowBox[{"Data", "[",
    , I  b! H5 S" \0 U5 g     RowBox[{"[",
    : B! d4 d, a: e7 N/ C; W      RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input"," z5 V% S& E: g9 O
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {# V/ B2 m& F  G
       3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    / z; C2 [% O  o6 f% k/ j* F- b/ j& J   3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, 9 P+ t, C! b5 B0 W# ~9 c) ^0 F
       3.577958922549148*^9}],
    9 p5 S! S& z! t/ j( Z( E' t/ ?8 m- X8 c, F" J2 e- A  p- P8 n8 l
    Cell[CellGroupData[{
    & ^1 m2 A2 q" _7 k; P) \
    6 a) D8 @3 ~& H- r1 p9 k- \Cell[BoxData["y10"], "Input",' X5 f! k. w. a' [3 V
    CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {
    / l" M2 E+ P& I- x4 ~   3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9}],) [, f( m: N" b% p/ J

      t1 J' i! k, L2 a" S8 oCell[BoxData[
    $ \. f6 ]$ \. I3 J1 I1 _0 b& d RowBox[{"{",
    , K# g# }( Z4 ^$ l5 a1 k  U( I  RowBox[{
    & g% L# q9 q9 j1 u' x; `  "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`", ",", ) D- `; R/ Y  j" Q
       "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`", ",",
    7 ~+ ^2 |. i+ P! y   "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",", 0 B0 q' y, {4 j
       "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",",
    / d' a6 W4 Z/ y  f. ]   "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",",
    0 d" b% v) g! F* u8 y* @   "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",", 6 w/ l' w8 F) |  D& h: C0 O/ k2 E* _
       "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",",
    - N8 F+ n( n7 }! G# M   "0.694935`"}], "}"}]], "Output"," i+ U  D  p" @
    CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9,
    ; c, g0 R1 \0 z# z  ^  3.577925393046875*^9, 3.5779576032628093`*^9, 3.577958971767234*^9, , w' x  V7 D# `9 q
      3.5779621736734805`*^9, 3.57801236071875*^9}]
    . b2 `; K4 K! y( `% A}, Open  ]],0 O- }3 ~. ?9 q9 |$ N" D

    / d4 {( S- a+ u8 m6 NCell[CellGroupData[{! T" V' Q  h4 j1 p

    # u8 r  e- y8 vCell[BoxData[+ V( O3 Q) h5 W# P" |; p% `
    RowBox[{"y10", "=",
    % Z0 H6 ~5 l& q  D+ S: T  RowBox[{"{",
    7 A: O5 R- N8 z1 D   RowBox[{4 Q( }, H% M2 I/ |- [( ^) D
       "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    " w, w5 u' ]" E* C+ C! E    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " ?8 ?# O' I5 \/ _6 c
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    : E4 e7 P: ~# ^0 u  U    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", " G+ q7 f( ?. t' `9 B$ }# o) P% I
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 6 }# q1 f8 N1 _% Z" H
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    / }" `; [# i) G( y    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    , T: W$ q3 b$ u. c9 t. P/ r    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", 3 l, o2 Y! w) l2 U- k) k
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    , ?$ c4 y7 B/ j    "0.380742", ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",",
    " }: A. h7 C& p9 h7 K: W1 P! x    "0.448763`", ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", ! t; C* e' A% m1 z' J! @+ \+ D
        "0.057715`", ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", - p3 H6 D$ s1 n/ {8 v# F4 C3 k
        "0.570966`", ",", "0.468198`", ",", "0.414016`", ",", "0.18669`", ",",
    $ Z! ~  M) z$ u    "0.442874`", ",", "0.68669`", ",", "0.244111`", ",", "1.`", ",", 5 d: t4 `1 V, V
        "0.957892`", ",", "0.266784`", ",", "0.826855`", ",", "0.341873`", ",",
    0 t" A; Z* C" o' d7 Z    "0.412544`", ",", "0.322144`", ",", "0.370436`", ",", "0.333039`", ",",
    2 i6 p1 [% p! `    "0.390754`", ",", "0.694935`"}], "}"}]}]], "Input",
    ! U9 w8 t- A$ ~+ o, G CellChangeTimes->{{3.577959733438562*^9, 3.57795974955339*^9}}],
    8 T, D; C) h7 r( W4 g# {( l9 x6 @4 \1 T% [' [* Z
    Cell[BoxData[5 G/ [1 |. V' X0 u0 n
    RowBox[{"{",
    9 U- f# u) k" r2 Z- w  RowBox[{
    5 h1 l" A3 @3 J  \  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 4 j( `: w$ k; n  s
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    6 S9 c3 K2 v" E/ s7 U- k; l    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", 1 }1 D" l. r; ]0 V
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    $ F# ]) d$ W1 J' Q/ L   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 2 ~+ E8 j! j" k1 h( ]+ ?
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    4 ^; Q! Y) O( y   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    9 ^+ y. y. x8 B   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", : `7 r# i$ w- \2 T! j7 A
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.380742`", 6 U; i$ A6 h, D! S
       ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`",
    " K4 u8 q6 c+ s$ ^! {2 }   ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`", ' K1 Y' b, }; ?' Y, m7 g  \
       ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",",9 I+ ], S* r% h; F/ ]7 o' M
        "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",",
    % T6 E. F' l: {% p% p7 n. c   "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",", ! G8 O" z) M- l
       "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",",
    : c$ b) N1 Z6 y1 O* t: I9 I   "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",",
    6 Y4 Y$ R: o6 C. u! R" x   "0.694935`"}], "}"}]], "Output",( Z" E2 `" i% g7 G, F  \; U: i3 s
    CellChangeTimes->{3.5779597517529936`*^9, 3.5779621844842997`*^9, - Q3 f4 d5 d: s! u9 Z
      3.578012361734375*^9}]4 |8 G0 x: B3 Y  i* t: F% i
    }, Open  ]],
    ( |( @4 l* ?0 v9 \( Q
    ; Z' ]4 c( L! c! y. gCell[CellGroupData[{
    3 }, _; P; d1 S( f5 r7 p/ M5 ^- h1 }8 M: H! R7 @/ @
    Cell[BoxData[
    0 G8 _1 V. [  {/ ? RowBox[{"p1a", "=",
    ) U/ ~$ l$ @# s/ z; d5 S3 K+ l- G' C  RowBox[{"ListPlot", "[", * S1 J0 O7 {8 q* @- G6 ^' X
       RowBox[{"y1fit", ",", : z/ J/ Z; }- ]( M& F7 ^6 V
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    9 W4 F% ?& Q% X9 `    RowBox[{"PlotStyle", "\[Rule]",
    ( v* ?2 a0 E! H: W0 I& ~     RowBox[{"{", ' z7 p: q. J5 w; |. \
          RowBox[{"RGBColor", "[", 5 \4 Z9 `- w5 _
           RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",",
    2 O+ f; }5 ]/ B; T6 M" \4 s' T    RowBox[{"PlotRange", "\[Rule]", + r; w' ~( ~8 ?; p
         RowBox[{"{", 5 O9 ^* W3 E- U* j/ [
          RowBox[{
    $ k: X+ O5 T! S* {# }       RowBox[{"{",
    5 P; o3 W, T8 c/ d. J# r        RowBox[{"61", ",", "89"}], "}"}], ",",
    " y( H2 n1 h* k& }# P7 `! v1 U: y       RowBox[{"{", 4 V% z5 x9 z0 K9 |$ N
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", " V6 Z0 W4 R. n8 q
        RowBox[{"AxesOrigin", "\[Rule]",
    # G  z" G) k' n: G$ k2 }3 D     RowBox[{"{", / N1 H2 E+ F3 Y( }; p, l
          RowBox[{"61", ",", "0"}], "}"}]}], ",",
      Q6 D6 n1 A  S    RowBox[{"Frame", "\[Rule]", "True"}], ",", 9 }: E' X, g; x4 L* S
        RowBox[{"FrameLabel", "\[Rule]", # e! p% k% g2 E. {1 q
         RowBox[{"{",
    # k3 E# i) h9 \, l: U      RowBox[{
    + `7 y: v$ b# b3 e! o+ Q& Q3 o5 N      "\"\<\:7089\:6b21\>\"", ",", & o& j" p8 n5 b
           "\"\<\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\# @* ~! i( {; j3 X0 @; F4 \6 h1 t, U) l
    \:ff09\>\""}], "}"}]}]}], "]"}]}]], "Input",
    8 y7 T: [- k" h* v; B+ K CellChangeTimes->{
    . L7 ~4 `$ P1 e/ F4 y, b  3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {
    - ?. d7 \: C- j$ O   3.5779576143076286`*^9, 3.5779576277548523`*^9}, 3.577959769006624*^9, , m' a5 h9 A% P" A3 T; o1 e
       3.577960184458948*^9, {3.5779602338174343`*^9, 3.577960278745513*^9}, {: W( y! E  u; e5 @
       3.577960347588433*^9, 3.5779603994429235`*^9}, 3.57801239140625*^9}],
      @' s* E- v" c, h  `: }& K8 H0 _
    6 }' M9 L; z% G1 }0 p- |6 p* yCell[BoxData[
      \3 ]' @; P# {- D& l9 X GraphicsBox[{{}, {}, 4 e/ ^' i; W: t; @1 R) Q7 j6 r2 [
       {RGBColor[0, 0, 0], LineBox[CompressedData["; L6 b4 u7 q6 X5 y/ |
    1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn0 H. K; ^) I& m% u9 o( z4 X( C" K* B
    8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq- L, \% r% D( z7 g# E
    D3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B- o% M  v2 H# X. W  E( \. G4 F
    1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX
    ) B! D$ D9 Z- k: t" j: K/ xC1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN
    - R. E# b4 D' q: s3 ea2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff  Z& U+ ~9 E# F' R$ Y5 y4 Y: L
    yqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb
    0 H! O5 {$ u7 g/ vwrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX59
    # {. O4 R9 H5 wY6nGQ3sAieueIw==
    2 W6 b( i) k) U* x, g$ U7 v     "]]}},
    ; m" W  c: H$ w. E1 C- l  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],1 q& U& ^. p5 C
      Axes->True,$ w! _5 ~4 ^" y% d8 h5 g2 }
      AxesOrigin->{61, 0},# U, c2 q$ ]# `! [' W3 f
      Frame->True,
    , z8 _) E: k7 `0 Y1 M  FrameLabel->{. r" g1 e; [9 i" s# \3 _/ x6 a. K( r
        FormBox["\"\:7089\:6b21\"", TraditionalForm], + G0 [& V5 E, }& ]0 y
        FormBox[, k1 ^2 f( {4 ?+ B
        "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\
    8 G. P  |& N) H+ {+ Q" X1 w# F\:ff09\"", TraditionalForm]},
      v8 I: W  Y0 N( m, S! a% B  PlotRange->{{61, 89}, {0, 1}},  F' j4 H0 s) f7 A: J  g+ @* j
      PlotRangeClipping->True,( H: J. P9 a! V+ c" k% q
      PlotRangePadding->{Automatic, Automatic}]], "Output",( v( }: q  j0 u
    CellChangeTimes->{
    4 U* ~" R) K4 r  W3 k  3.577925144625*^9, 3.577925396578125*^9, 3.577957630297656*^9, , z3 ]! Y  J1 r" _
       3.5779576933061666`*^9, 3.5779589732960367`*^9, 3.577959771908229*^9,
    ( y: S4 Y/ W2 d  G9 K   3.577960281756318*^9, {3.5779603518628407`*^9, 3.577960407664138*^9},
    % }9 y+ d) w5 k. F   3.577962187510705*^9, 3.578012396921875*^9}]
    3 O( ~2 C% b/ C3 i8 `7 v}, Open  ]],0 S6 o! ]; Q  P3 T. y. P
    ( L( E7 V" H! H+ J2 B/ W) u; l
    Cell[CellGroupData[{
    7 a+ F$ @( Z' E4 o; j( v7 b  k
    : d9 x& r! }: f1 c4 G2 H0 {Cell[BoxData[
    / U4 ?$ n  x( O RowBox[{"p1b", "=", 8 }, q1 t/ y( G3 H+ }
      RowBox[{"ListPlot", "[", ' z- a, g$ l7 Z0 U8 z1 S9 {
       RowBox[{"y10", ",", ; h5 U! D) `( i; P
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",", 6 n+ k2 B) e- A+ k
        RowBox[{"PlotStyle", "\[Rule]",
    - K4 `5 V( X  _, E3 M) n     RowBox[{"{",
    * ?" _' E7 l" x6 c) @( u" f      RowBox[{
    . C' m8 c: F0 P/ }6 u/ P% Z       RowBox[{"RGBColor", "[", 0 F2 A4 |! G0 `" Z
            RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}], ; L* r2 O( R' t  m5 H
        ",",
    ' E+ }0 L* w  L2 s$ b    RowBox[{"PlotRange", "\[Rule]", 6 H! n8 `: ~3 d# y
         RowBox[{"{", " d$ e& R- ~; C8 h+ r. N9 m
          RowBox[{! [/ i7 S2 A- a9 Q' B( X4 u" H
           RowBox[{"{",
    9 W, B! t2 B7 }  Z        RowBox[{"61", ",", "89"}], "}"}], ",",
    7 q7 ~4 C( {& S. Y5 [+ Z       RowBox[{"{",
    $ v5 H& g1 z/ Z" {        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    % l6 u3 F- e% `* H1 M    RowBox[{"AxesOrigin", "\[Rule]", 6 u0 J2 k% r1 D  \4 w4 k
         RowBox[{"{", 9 f+ ]3 E. ~' H3 v' Y
          RowBox[{"61", ",", "0"}], "}"}]}], ",", " U8 {5 h; x7 s1 Y* h( R
        RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",
    0 `0 _/ n* K& T7 j) o) C4 [9 X CellChangeTimes->{3.5779253991875*^9, 3.5779576384564705`*^9, & X" Z8 Q0 m3 Y6 ~
      3.5779597764166365`*^9, 3.578012409265625*^9}],, j6 D9 |! }) S5 ]8 m1 q

    1 R- G& u8 u, x- I$ DCell[BoxData[
    ( w) E. G# ?& b5 V  l8 f6 I3 p  \& t GraphicsBox[{{}, {}, - O- z2 o# q) R, c6 d
       {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["0 R/ ?3 W% m) m4 x( D# h
    1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ- K/ e8 S/ b* V' C$ c0 D. T1 t: }
    /B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy  e) K6 U  h, i# I
    GwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy. b1 M! K  |; ?
    GFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy
    & K4 R# T) B4 T1 {) Q; k9 r. h) h) N) o7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/
    # K3 m3 S4 U9 MQu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri
    : R% \1 n0 k  m" V: ]# K, T, y! JH+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV% R/ q2 C. j6 q: s  P7 [$ B* ?
    rQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T
    1 l9 ~" _$ [5 i- ovA==* x) A, N4 h" V0 v
         "]]}},
    * s2 P7 [" H/ `  t  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],0 _! P& t2 S+ q( T: |( N0 H- f
      Axes->True,
    5 b% ^+ G$ t$ q& l  AxesOrigin->{61, 0},8 [' f/ O% z) f; p2 }  ~- f
      Frame->True,
    . A/ w, h( \$ y3 ^0 H( f* h  PlotRange->{{61, 89}, {0, 1}},
    * x. t+ ^$ D. N; ?  PlotRangeClipping->True,' z: p  G' H* J/ h, R/ e
      PlotRangePadding->{Automatic, Automatic}]], "Output",5 ?, m9 Z! W- q: ]$ j2 p  U' B
    CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9,
    % K( Z* V+ J: j* P* p/ I& L! `  3.577957640266074*^9, 3.5779576946009684`*^9, 3.5779589749964395`*^9, ! q$ ?! h7 s  g
      3.5779597781950397`*^9, 3.577962189476308*^9, 3.578012410328125*^9}]1 Z8 B; ~3 Q* _- E3 ~7 w" Z% D
    }, Open  ]],8 C3 \  D& U% @; ^
    4 p" P- }. h4 Y
    Cell[CellGroupData[{1 \+ L7 d5 v" Q$ T
    " @) u2 S. }7 m- }9 E9 g
    Cell[BoxData[
    & X( M+ j* x' W& i) w, A( H; K RowBox[{"Show", "[", ! U2 e$ Y# I  X; O- `
      RowBox[{"p1a", ",", "p1b"}], "]"}]], "Input"],' p/ r7 T  J- M( N( w

    ' z2 t# s) d" I* b, fCell[BoxData[1 H, N7 |* B- s
    GraphicsBox[{{{}, {},
    - f( Y  s5 b" i% G! ~* |" f    {RGBColor[0, 0, 0], LineBox[CompressedData["
    0 N- i! f. `2 U7 J; o. y1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn
    / r  l! j% Y) R8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq
    " I! G5 H1 \: o. q% P' X" TD3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B3 j0 S2 V8 }% T0 C5 d
    1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX
    ! y. x) b% }" ?' R+ K, i( \C1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN6 a, _$ O1 _+ ^7 D1 v  n; T
    a2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff* F& u5 l1 Z5 \4 s* z  F9 X
    yqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb3 E5 g9 J0 r0 Z3 P% ^  h
    wrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX59
    2 D; o) Y7 T; ?& M" t3 tY6nGQ3sAieueIw==
    / I7 c: T5 |6 _      "]]}}, {{}, {}, - p; P8 [; ^- a! F; Z/ H
        {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["
    ! ~- y& L' ?4 ]# q1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ
    3 n: J9 C7 w4 l5 B8 u6 b- X/B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy
    : o4 f0 ~/ \$ G$ g1 ]1 cGwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy
    5 V1 W+ ^9 C' P1 N% X  F5 QGFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy
    # ~. I. [6 v( q7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/
    / W! h9 g7 H* l+ c2 aQu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri, T7 P3 Z$ q+ R0 Y
    H+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV3 r0 Z* `, x0 K" Y1 E& h8 D
    rQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T
    * w, a' P! K( o/ `2 a3 fvA==/ U+ I7 T0 c& O- f5 x5 @
          "]]}}},. t5 V  ~- L' l; H+ a& l( a& f5 {
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],; I: W' H. g* Q5 e) \  A
      Axes->True,% i* ?& x; G5 f7 a5 z, v" T
      AxesOrigin->{61, 0},* M( l9 H* x+ H; R( V1 J
      Frame->True,: s( d- S! i4 r8 A
      FrameLabel->{
    ( m' u7 O$ X/ |& A$ e! Q    FormBox["\"\:7089\:6b21\"", TraditionalForm], 0 d4 N+ i! `! l: O$ e* B
        FormBox[, I, o9 O$ o4 w: c6 j$ c
        "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\
    5 F/ \, T* t4 y7 |\:ff09\"", TraditionalForm]},
    # r' E' C% b; X- `: U  PlotRange->{{61, 89}, {0, 1}},$ O" u7 h+ H3 m0 e. a. A
      PlotRangeClipping->True,2 A6 I7 P: V% t% T+ q& n
      PlotRangePadding->{Automatic, Automatic}]], "Output",
    - U% C" r( c' r8 Z: O& S. p CellChangeTimes->{3.577962196683521*^9, 3.5780124119375*^9}]: _# u+ s( X9 ^6 h" a" z: v
    }, Open  ]],
    6 ]( ?' x8 ?7 x( j# j- ~" J/ k3 C) p) k) n4 ~
    Cell[BoxData["\:62df\:5408wi1"], "Input",
    # S* \4 ^* n; k" D% j- u& @ CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}, ) T' i( ]! }" Q1 x% i% t; Y
       3.577959662349238*^9}],8 Q! Q" m. O2 R* @' k$ s7 c
    ( _/ S% ]& C  Z7 d  u. i' b
    Cell[CellGroupData[{
    # P7 }+ Q2 i  W. a4 H5 V0 }# b2 _) ?1 `/ Y: x
    Cell[BoxData[
    6 ~! {8 z1 G3 j. O/ @; |) W+ g RowBox[{"y1b", "=", 5 [6 N5 Z% C$ K) ~, R
      RowBox[{"Table", "[",
    - D/ \/ m$ P/ t( V5 [- ?, [( M   RowBox[{"x", ",",
    - Y2 c- d$ G. j) Q" w( C9 K    RowBox[{"{", 6 g' \* g) u4 }# E" x
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
      m1 j" T8 b6 K/ F6 M9 f2 ` CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {
    " _# [. ?4 I8 ?% u   3.5779226649375*^9, 3.5779226810625*^9}, 3.577958232403945*^9}],2 w0 i' F4 d  `% K, a) _  \

    7 W8 h, H/ h& k. N9 O% tCell[BoxData[
    / e4 D4 L! Z: Q3 E7 | RowBox[{"{", 0 K! T7 m: n% Z$ F7 x# d' j/ a( Z
      RowBox[{; [/ p+ e1 `  c3 K  D+ Q# P$ F
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ' g( ~# h& D! b8 n5 R6 U$ U9 x
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    , u4 q9 N' _" F. r( P* s    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", ) o) Z/ e3 V. l4 {7 E% z
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    ; `( Q1 l% }8 @% ~9 ^8 T& T   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 1 h$ h1 D0 z0 E/ I% D( W0 a
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", 8 F# y  d6 k- n, v2 Z
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    % s) n9 W3 B( U: S9 e, ]  i   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", 7 c0 N9 X( X3 u2 ?1 l
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}], # y, y/ i  c1 g5 F( b# U
      "}"}]], "Output",3 Z# I" H8 ~. c: f+ W
    CellChangeTimes->{
    & K! _* c  w$ [: o8 X  3.577922682296875*^9, {3.5779582291435394`*^9, 3.5779582351339493`*^9},
    7 u' X1 }/ n: G2 w7 w* {, E   3.577958478041973*^9, 3.577959010205701*^9, 3.5779622225483656`*^9,
    7 u' _6 x0 ~( T4 D* N4 g' Z, p8 w   3.578012438953125*^9}]2 S$ _' z& n: ^5 o4 l7 B
    }, Open  ]],7 }' X' s" |! V/ e' {! o, V

    ; h; E) l+ r- h: kCell[CellGroupData[{7 L8 E# n) u; w$ ?: F* o: P7 H9 |

    2 c" [7 h- A$ }! t5 mCell[BoxData[
    2 b! x+ h. N. W$ P8 y- Y& R/ q. Q RowBox[{"Data", "[",
    % n) v8 a5 u- k3 g- u, H0 q  RowBox[{"[",
    - i) _& y! {3 U3 `1 R3 g   RowBox[{"3", ",", "11"}], "]"}], "]"}]], "Input",& |/ Y* F9 {. F5 U. d
    CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {
    + ]6 V- [; z' u& `1 s5 |+ b* J   3.577922912015625*^9, 3.577922912171875*^9}, 3.5779582414831605`*^9, {
    & d' F. P2 |( K* e   3.577959014090108*^9, 3.577959016040111*^9}}],/ O, P- W* B$ p5 [: b% ~1 l; C6 P, Y: u
    , j* B3 h6 _4 l1 d$ ]
    Cell[BoxData["0.492958`"], "Output",
    % {& ~! r5 X! D& T CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9},
    8 R" t7 R4 @  H  n# F+ R- Z) Q9 B   3.577922913203125*^9, 3.577958242809163*^9, 3.5779584790403748`*^9, , W  G/ W) N! `8 H
       3.5779590175689135`*^9, 3.5779622239523687`*^9, 3.578012439828125*^9}]0 s( p7 W3 K* \# E2 [6 C. o% |% [. ^
    }, Open  ]],
    8 E3 C( B+ ^: w" k. k; U0 d6 y) q; e- z. c; G' O/ \* O
    Cell[BoxData[0 C/ N& j. l* S' |" y* Z4 u
    RowBox[{"For", "[", + L6 x" l" R. M
      RowBox[{* _3 l- {* f2 \0 Q& h6 x
       RowBox[{"i", "=", "1"}], ",",
    ' W; X: H+ E; ?2 Z- V1 m* T   RowBox[{"i", "\[LessEqual]", "60"}], ",",
    * R  I& s0 {+ X0 t; \; ^! \   RowBox[{"i", "++"}], ",", - \/ p0 e2 h! \* f5 |
       RowBox[{
    2 M0 R1 m& n5 N8 h- Z+ E. ^    RowBox[{"y1b", "[",
    ; Z4 C$ D8 b3 b5 c" q0 _: I     RowBox[{"[", "i", "]"}], "]"}], "=", ' z" q9 d4 B/ v8 {1 @) A0 `* C$ |
        RowBox[{"Data", "[", % m; v2 l' F6 B
         RowBox[{"[",
    % p8 A) D; H. ^0 D( Z. T+ G0 J      RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",9 p# Z* K6 Y! f! h) k. o
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {8 O* Q9 p- P) C9 Y5 f
       3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    , E# H- M! h: E2 E, H   3.577922923203125*^9}, 3.577958246272369*^9, 3.5779584755771685`*^9, {( ~% ]$ q4 ~& _1 v' r/ A
       3.57795902089172*^9, 3.5779590227793226`*^9}}]," U0 Y7 O, ^4 v, f0 c, L1 I* H

    0 x* Z+ F1 A9 _) m# f* ^1 LCell[CellGroupData[{6 i5 k+ X! ~4 o% _1 B7 a+ i

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

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

    . o& j) g+ L+ s4 I$ M* eCell[CellGroupData[{+ D' _8 {" E8 E" c
    # p/ [0 n3 Z$ R6 ~+ `* k4 s& x
    Cell[BoxData[% G* O/ z9 B- [7 q0 @7 g1 }
    RowBox[{"y2fit", "=", % d5 e9 }; R6 H+ P) j- ?$ ^
      RowBox[{"Table", "[", 0 w& P" a" L; P: D5 C, e
       RowBox[{"x", ",", + L2 Z+ @3 o. }) C2 C+ z
        RowBox[{"{",
    ( L: q* b, R: @6 W& w( m& X     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",) W# I' L, o. p  n; J
    CellChangeTimes->{{3.577924969375*^9, 3.577924979515625*^9}, {
    7 X' y  q6 t, S; a6 n6 h( R; C   3.5779252768125*^9, 3.577925277484375*^9}, 3.5779583246625056`*^9}],
    " `8 l5 l. G% d% h# ~8 C7 X  E. c" P
    Cell[BoxData[
    2 ^1 }" W6 Y7 R' I RowBox[{"{", 2 ^" x9 Z0 h0 Y5 i
      RowBox[{
    ( J& M' B& L) I1 s' ~& N5 |# m& W1 e  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", # f! r4 e0 w0 l) v+ Y, |0 P- J/ `
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",8 @2 `# O. v% t7 c7 P9 W
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",   O' j. K0 I" y; @0 h
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    6 L9 L$ y( ?8 j  ?) ]   ",", "29"}], "}"}]], "Output",1 r! C; e: \* i) w
    CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9, 9 K) T1 c5 K- }# n- B1 D* b
      3.5779583268153095`*^9, 3.577958508118826*^9, 3.5779590470685654`*^9, 2 ^' s0 v+ m" M& k: l1 }3 h/ p
      3.577962320173336*^9, 3.57801245028125*^9}]
    8 R& @4 d9 R3 q  {0 }4 [: J+ K}, Open  ]],
    , n2 i) X' z( ~$ ^- A5 ]2 @* Z
    7 D, x: P, `4 w  q; q0 _3 v  oCell[BoxData[7 \0 e# _9 f! J# z8 r
    RowBox[{"For", "[", # K& P  Q" J4 _8 U! I
      RowBox[{
    % D9 _/ l# g: y0 i2 q   RowBox[{"i", "=", "61"}], ",", / e0 s" p$ t. H: h+ w: s! Y
       RowBox[{"i", "\[LessEqual]", "89"}], ",",
    , b% n/ Y" S2 O1 r   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    7 o( Z7 s/ b- Z   RowBox[{
    $ L3 g# m2 h0 e5 J/ k" Q: H    RowBox[{* d( a4 l9 j, K9 B( T
         RowBox[{"y2fit", "[", ' }: F- [6 O/ ]
          RowBox[{"[", ( Y2 ^. x/ H6 l: E1 I- L3 O" ?
           RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", 1 z- v: g1 v- {) K- |4 N- p8 ^/ `
         RowBox[{"y2", "/.",
    5 F$ K( p3 u+ @0 ^      RowBox[{"{", ( }& g4 Y/ T. h9 U. M9 e
           RowBox[{! Z, r6 z0 {7 r3 @- l
            RowBox[{"x1", "->",
    , D+ N4 \2 ?  I' p' Q2 ?7 m         RowBox[{"Data", "[",
    9 ~1 A; T' p, O          RowBox[{"[", 8 Y; |2 D" [) L* j6 ^0 V
               RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", 1 P) N; f& \2 G4 ^2 F; Z3 D
            RowBox[{"x2", "->", ( }2 T! a$ x2 ]8 |% l0 f
             RowBox[{"Data", "[", / _: |2 [7 N; ]/ p' A, x( b+ w
              RowBox[{"[",
    % z0 k; U6 B+ K. C6 L+ }8 w           RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    $ U/ i. T7 W6 P0 f. s# q3 u5 Q        RowBox[{"x3", "->", % f2 I0 Q/ L2 A9 W* a
             RowBox[{"Data", "[", 2 J  F: P4 W  T4 P" h6 G( d* w
              RowBox[{"[",
    . _4 ?4 r* X1 t0 D" A/ C6 M           RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", & l; ?( e( S4 f: t
            RowBox[{"x4", "->", ; C( Y; u- h% @& s9 ~& _" K  ?; d0 F
             RowBox[{"Data", "[", ' U( I$ Z) [' r  q2 Z; Q
              RowBox[{"[",
    - J7 ~7 r7 l! _  d2 g( O0 c           RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",   L0 b" V  I1 z- ]
            RowBox[{"x5", "->",
    2 b3 X, u, J. o  N         RowBox[{"Data", "[", 2 s: F9 K, R0 V" F
              RowBox[{"[", 4 p+ u5 L* h) ^& M* a
               RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",", , a5 [, k0 ^! F7 P) s, L
            RowBox[{"x6", "->", * S- R9 _  a6 _* R. s& U
             RowBox[{"Data", "[",
    $ y/ X1 A' Z$ s% p! w          RowBox[{"[",
    " f" k; p# j6 Y3 Z" s& X           RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", 0 ]2 S/ {! w) r- `. }8 b  E
            RowBox[{"x7", "->",
    9 |4 H' R6 B" b4 U7 ?         RowBox[{"Data", "[",
    - ~0 l2 M' ]* i" P0 y) b          RowBox[{"[", " [8 m& R0 T  J
               RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", 5 [5 O( p1 N/ @6 c* t0 X
            RowBox[{"x8", "->", & G4 a/ U6 ], x" l( c1 w! T8 d3 {) b
             RowBox[{"Data", "[",
    1 _: d$ M( Q$ y" v) A5 \5 ~4 p, \% j          RowBox[{"[", $ r5 @! Q  N, B: Q2 x) }( J" X
               RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",", ' j/ n! P5 e+ F# Y/ j8 N
            RowBox[{"x9", "->",
    $ E/ F. t; M6 x1 a8 `3 b8 P         RowBox[{"Data", "[",
    / O) V4 U1 s$ h+ I. a4 z          RowBox[{"[",
    % `2 o: M- C. }; m: O( I2 l+ i           RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}], 3 U, p$ N! S+ D, }3 y% q3 h
      "\[IndentingNewLine]", "]"}]], "Input",
    3 B1 W0 @! q5 U8 C' F* M7 a CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {3 v& L2 H) Z- F5 s5 M% M
      3.577925286140625*^9, 3.577925306765625*^9}, {3.577958329919715*^9, ) I6 y: w' B; b; L& _$ ~
      3.5779583326341195`*^9}, {3.57795892351635*^9, 3.57795892354755*^9}}],
    - |7 G$ F3 x( O. v( t; ^: Q( V; h* |1 P8 @, ^- F$ j; I& B
    Cell[CellGroupData[{( I& {. U1 M& s. [& ]4 ]
    , U# g6 {; J7 G! k5 O* B
    Cell[BoxData["y2fit"], "Input",6 _2 A" c' z! |$ ~  S4 @
    CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {. C! y) K. {# p
       3.577925040484375*^9, 3.5779250440625*^9}, 3.5779583419785357`*^9}],
    8 P% b0 U; c. s2 w/ |' S/ c1 U+ r7 E/ r1 f( w# E+ w
    Cell[BoxData[
    ) {- |8 k8 Y/ w# L, E" D- x8 v6 N RowBox[{"{", " H" U% o1 D" b& J  U
      RowBox[{
    " z3 A" d2 Y: _8 ^( A% M  "0.4853171132859182`", ",", "0.4508635216665074`", ",",
    0 f% Z4 L8 T. I: f# ]; U* Q   "0.3642119241752518`", ",", "0.42852077425595436`", ",",
    0 [8 U* x' e) z5 p- h   "0.4712694272667798`", ",", "0.5257533056184774`", ",", " N7 ?! ]% f1 H1 k
       "0.48620658140716133`", ",", "0.41106838915591876`", ",",
    & o# }; N3 c2 L7 ]3 L3 f   "0.5486894206610674`", ",", "0.007731168540073459`", ",",
    2 q- M. c5 p& U3 y, M   "0.013872406140339109`", ",", "0.3956995051659558`", ",",
      H) C, H4 C8 B% _8 K   "0.3663118256142708`", ",", "0.29094217358055163`", ",", 0 T: k' D1 [* L5 K( G
       "0.5453093690736555`", ",", "0.44138898880777927`", ",", 7 O% |# L2 b: |; l; V
       "0.42944922031163496`", ",", "0.43092890556748836`", ",",
    * Q+ Q0 I- u- m+ J" N8 [! b( S   "0.5942402821739969`", ",", "0.330046090785457`", ",", & f) t- u& ]* J8 C7 k
       "0.18938658036630585`", ",", "0.4263720292858679`", ",", 3 ^9 ?: ~" b1 I) ~0 E
       "0.23377136184738775`", ",", "0.02232858193309988`", ",", + a; O' g/ ^7 T4 k$ v$ U
       "0.244364200084268`", ",", "0.5562383565309971`", ",", 8 F  l* Y' B- C% g: w
       "0.13114103402954333`", ",", "0.5815052048989465`", ",", 9 b1 j$ K" C8 |  q( }
       "0.4253455966293501`"}], "}"}]], "Output",$ @& d4 Q) x1 T; U7 @  M: l- B3 ^
    CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9, 3 v3 ?& E/ r4 V% X+ N
      3.577925312375*^9, 3.577958343257738*^9, 3.577958511784832*^9, " O- o, X8 s; z7 }' F1 n
      3.5779590518421736`*^9, 3.5779623249157443`*^9, 3.578012452421875*^9}]& t8 x6 _# A; h0 y/ l
    }, Open  ]],, I0 A5 d8 x6 r7 L
    % |/ H) l7 b7 o$ @: W. }0 t
    Cell[CellGroupData[{
    6 g- C9 M* V( I$ Y
    1 K0 r! f  n* y3 E  w% t  ?1 iCell[BoxData[
    % r# x* R% d1 J9 Z$ S RowBox[{"y2fit", "=", ) g0 ~  Z% F) _1 q: Q, @& k
      RowBox[{"{", $ M4 G/ p5 [2 q  }
       RowBox[{; `1 J( G1 C/ v5 y0 ~& f' Y) `$ M
       "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 e" Y% I: r1 Y  s    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    # r2 C. s' C* v0 t3 I0 F6 T4 R    "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", 6 E) q3 e; d8 D
        ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    $ m, U; M# e/ V% g; o% p2 x    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 1 m; k, L+ U8 l! a
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", 3 u1 A, A0 x  P8 z" G% e, L1 I
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    , j/ _+ ?/ \* o8 ^; n    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", / n% P, H/ B& _5 {0 Z9 i
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", 0 I  o& ]- @6 e1 r! }
        "0.48531711328591953", ",", "0.48531711328591953`", ",",
    % H3 @/ Q% G- ~    "0.45086352166650845`", ",", "0.36421192417525217`", ",",
    * f, N5 X% }. o. R# V0 t    "0.4285207742559556`", ",", "0.4712694272667811`", ",",
    # S, l# `  o7 f7 @; F    "0.5257533056184786`", ",", "0.4862065814071623`", ",", ( `5 \6 B/ F7 t$ |
        "0.41106838915592014`", ",", "0.5486894206610683`", ",", ( w$ `) W& v; ~6 ?" R# X
        "0.007731168540073532`", ",", "0.013872406140339166`", ",",
      k1 U% C0 t7 f9 P) _    "0.3956995051659565`", ",", "0.3663118256142717`", ",",
    ; g9 a; i, b/ C8 C/ I( P4 ~% K; |% t    "0.29094217358055185`", ",", "0.5453093690736568`", ",", $ L' U3 f. f- h0 C# {2 e
        "0.4413889888077799`", ",", "0.42944922031163585`", ",", & L/ R& i& y- h4 u
        "0.4309289055674891`", ",", "0.5942402821739983`", ",",
    . d( h6 P0 v: q) A7 ?1 B; i    "0.33004609078545805`", ",", "0.18938658036630632`", ",",
    2 v* K4 W# T. J5 w9 ^" S    "0.4263720292858688`", ",", "0.23377136184738778`", ",", 5 m& L+ Q  N; S8 m2 Z2 Y5 h
        "0.022328581933099827`", ",", "0.24436420008426807`", ",", * W3 [8 _, M- G: _
        "0.5562383565309981`", ",", "0.13114103402954314`", ",",
    - G' k7 A2 v$ P7 X! k* K    "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]}]], "Input",
    9 [. j  T4 U9 ?+ o# O3 j CellChangeTimes->{{3.577959355746303*^9, 3.5779593854019547`*^9}, {6 Q- P3 N. y+ S
      3.5779594223272195`*^9, 3.577959425104024*^9}, {3.57796233399496*^9, , B2 u1 f6 b$ a4 k5 Z! i( \6 T( I
      3.57796233957977*^9}}],
    ) ?3 f, r) K4 t' T" ?  o/ x4 q
    0 i2 t: ~6 M1 V$ `6 ]Cell[BoxData[, m' V! S% X/ @1 K! T
    RowBox[{"{", 9 k( ]" L4 {4 q9 s
      RowBox[{& o+ C9 p: ?. Y! P' X
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", , s# U" g9 z% X4 D
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    " B8 a3 B& v3 r, @    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", + w5 A) M, _+ v+ g+ L
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", ! s9 g! o0 ?! k" u& Y' m
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 8 C$ u& Y# W  F' V  M1 R
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
      q. [, w6 Z: W& l; _. N   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    ) t1 A! i  x% h) @/ R; b# ~   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", - c, D$ H: {7 C0 R0 _0 E3 p
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", " F$ i* h3 X' l9 L2 R/ i: L. H
       "0.48531711328591953`", ",", "0.48531711328591953`", ",", 1 ^" k6 Q: D. |5 b
       "0.45086352166650845`", ",", "0.36421192417525217`", ",",
    ( x" }8 Y% h, q% V0 B: e) ^   "0.4285207742559556`", ",", "0.4712694272667811`", ",", 0 n7 ]1 H/ t+ r( @1 t4 H! {
       "0.5257533056184786`", ",", "0.4862065814071623`", ",", 3 `2 d* ~  A! Q. V
       "0.41106838915592014`", ",", "0.5486894206610683`", ",",
    6 `# [/ {$ S( {. s  Z8 y0 d  Y   "0.007731168540073532`", ",", "0.013872406140339166`", ",",
    # H: k( h0 X' f   "0.3956995051659565`", ",", "0.3663118256142717`", ",", ) M' @9 a1 U( O9 `6 ~$ K9 e
       "0.29094217358055185`", ",", "0.5453093690736568`", ",",
    / m" U: j6 R: l$ p# m. Z9 Q   "0.4413889888077799`", ",", "0.42944922031163585`", ",",
    ; @3 N6 k! w! _" R! P$ T5 I) F   "0.4309289055674891`", ",", "0.5942402821739983`", ",",
    7 ?8 I; {) Y7 X( G9 `2 q( T- t. {   "0.33004609078545805`", ",", "0.18938658036630632`", ",",
    9 q) U/ l! w( _, v8 i& L, z   "0.4263720292858688`", ",", "0.23377136184738778`", ",",
    ! n+ ]) u! ]7 K2 ?# d0 I   "0.022328581933099827`", ",", "0.24436420008426807`", ",", 1 G4 E1 D7 j3 N% R; L
       "0.5562383565309981`", ",", "0.13114103402954314`", ",",
    4 o4 ~# `: v5 Q: @4 O   "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]], "Output"," x" E3 C) t( P3 d* W
    CellChangeTimes->{3.5779593961191735`*^9, 3.5779594268512273`*^9, ' |2 t5 j! ]% H+ _' Z
      3.577962342060174*^9, 3.57801245340625*^9}]
    8 M: `' p, H  \& H+ S}, Open  ]],- f4 p! U; [# ~5 b3 P1 U4 P
    % m! y% `3 d' F5 m/ f
    Cell[CellGroupData[{% W, t  U/ k* E! F0 o  C0 a
    3 H5 n/ {* l* ]( j9 H" r) y& ?) O
    Cell[BoxData[5 d# Z4 \  y% c+ ?# ]
    RowBox[{"y20", "=",
    / z) y/ m$ w0 u# s5 `  RowBox[{"Table", "[", + j1 W  N/ X; \% o# {$ t: |
       RowBox[{"x", ",",
      E4 u- U% O1 J5 ]% S6 m& `    RowBox[{"{", ) T$ e" Y) g$ z$ _3 v7 E
         RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    ! f. ^) _! o; @' D CellChangeTimes->{3.5779253628125*^9, 3.577958351198152*^9}],
    9 _1 H: c! ?" l: S2 r4 v
    # U8 L3 W2 S, ^# U& r1 S; TCell[BoxData[
    0 a( }) n8 i" o) h. m" A( j9 I RowBox[{"{",
    - h& e3 c7 l. Q) a" ?+ Y  RowBox[{
    ' _$ v7 M$ P+ W& }+ c  I% [6 j  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - O$ e  U/ j+ _5 z& o! d- @, ?   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",* p" |6 s% e1 d  M# o1 ^" S
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", 2 Y3 H/ y. A, \( C$ T5 U
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 7 V4 Z8 z- ~. ^1 a# H& d
       ",", "29"}], "}"}]], "Output",
    ' w- r7 N8 x) o( ] CellChangeTimes->{3.57792536553125*^9, 3.5779583535225563`*^9, 2 j; |( [# S$ P/ m: X
      3.577958515653639*^9, 3.577959053714177*^9, 3.5779623443065777`*^9, 3 _, E# |( ?1 S+ W& k0 z8 t
      3.578012454875*^9}], V, g4 i5 L" x
    }, Open  ]],5 N7 E6 `$ r# D

    9 b# h/ y( Y0 [/ f- i2 SCell[BoxData[
      S! Z6 U% `7 p1 }# N- v/ g RowBox[{"For", "[", ) D: v: `; P0 i& O  c7 v- w
      RowBox[{, e8 _5 k) G8 r6 s0 V4 U
       RowBox[{"i", "=", "61"}], ",", , _" Y5 T9 l7 K0 F" s5 \
       RowBox[{"i", "\[LessEqual]", "89"}], ",", ' Y: }. A) T! h) r* w- X5 {
       RowBox[{"i", "++"}], ",",
    - L4 l& t( C, W! T! J3 s/ u   RowBox[{
    " j2 O% d8 `' ^5 b7 Z' _- Y" }    RowBox[{"y20", "[",
    ; U3 p# S* D2 X2 j+ W     RowBox[{"[", ! Y2 L# u, J( Q
          RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",
    3 V: |2 `, I( w( L2 I    RowBox[{"Data", "[",
    , R. a* k# M- B( z* r' }     RowBox[{"[", . J* J2 T, I# }# G# o1 C# X4 R
          RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",
    % q4 @1 Z9 n) N. j% N CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {$ ?1 N( T" P% A* A0 N* s; S
      3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9, ; \* Q9 i, ?( B9 ^; C
      3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, {
    9 l- w* p# Z/ {: b7 e1 m1 G  3.5779583574225626`*^9, 3.5779583606673684`*^9}, {3.577959056849782*^9,
    / v/ d  b% R% W& m* y& G3 C  3.577959058690585*^9}}],1 K5 ~7 q+ Y3 V* L4 ?9 i7 f* C

    # D- c" @+ i& C4 X0 ?. UCell[CellGroupData[{: `: {$ K& M0 L& ~6 R, n4 s
    - y5 Z1 t/ }5 D: J5 V
    Cell[BoxData["y20"], "Input",
    1 H0 q7 z$ F! p' X1 D CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {
    7 a, g" U' D3 c1 _) r4 o   3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9,
    3 s' |; {. h& W( U' h* x6 w" b   3.5779583657841773`*^9}],
    : o4 k3 l$ ^. K# V3 r- X2 `& H; A
    Cell[BoxData[
    1 e* y' G- U3 a" m  L# s) X RowBox[{"{",
    0 z3 Y  D2 H9 B7 v0 ^  RowBox[{- M! u* \5 B+ s, T" b. B/ v
      "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`", ",", , d2 z& n  d! a
       "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",",
    ) P: ], x1 o/ y! R0 U; d- v; i   "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",",
      P  \' G, R4 R' ^8 O3 d   "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",", 8 G7 A+ F$ x% k& g$ W: p
       "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",", ! s  W" C' y) k7 C. \8 K( y
       "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",",
      v& r" H8 W0 g# o   "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",", 5 `+ D. l$ B8 E: C+ ?6 m/ F# R* X+ w
       "0.323944`"}], "}"}]], "Output",
    / a1 W2 V- K6 e- L9 ~; w6 K CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9,
    . N, r( g8 k  [  w  3.577925393046875*^9, 3.5779583678277807`*^9, 3.577958517946843*^9, ( G% g) C! c$ Z8 z6 `0 ^
      3.5779590634017935`*^9, 3.577962347629384*^9, 3.578012456484375*^9}]
    2 }8 T6 s. N8 h' K3 @( C$ C! N* u# d. ~5 X}, Open  ]],% c0 M( _8 B0 ?% k5 z
    8 g  j+ Q( m% [  a+ ~
    Cell[CellGroupData[{
    3 i" f  F! O' P: z! [4 G" V' D) Q; }
    * D4 R# Q# p- m0 K; S: ICell[BoxData[
    . C# Z7 ~+ l% Z( ] RowBox[{"y20", "=", 6 I0 D" o, R6 f+ t" x  P8 U
      RowBox[{"{",
    ! K% y. K# Z0 \( I( m( G/ t  b/ H   RowBox[{
    / V0 I, Y# B+ B) z   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", : z5 w: x/ G- S7 v) Y  U
        ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' g" v: B: l( A, o4 @: {5 j
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    6 z6 C7 w  ~2 x( E- M    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    + Z( ], L( v! Z" a* @    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34",
    ! _3 r; a+ f- d3 |    ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    5 }; P$ s  O; r: u* D. |2 }    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    4 t. x- \- q5 q# @9 B# B    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", 6 c+ U+ v1 t4 w1 }7 A/ i
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    . a4 B1 ?9 t2 F7 U; k' J! n    "0.507042", ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",",
    / B! R% ^0 i' H' J    "0.338028`", ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", ) i: t5 V  C9 `
        "0.408451`", ",", "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", , v: V  S4 Q4 g- ?/ U! W
        "0.746479`", ",", "0.887324`", ",", "0.84507`", ",", "0.704225`", ",",
    , h& m+ D7 z7 o4 k  D8 K    "0.760563`", ",", "0.43662`", ",", "0.633803`", ",", "0.422535`", ",",
    ) |- u6 \) p# \0 t& A    "0.295775`", ",", "0.309859`", ",", "0.408451`", ",", "0.197183`", ",",
    . c* o- u' N" v# a    "0.732394`", ",", "0.802817`", ",", "0.746479`", ",", "0.380282`", ",",
    ) t7 {3 H1 a: e9 J+ T0 O3 U    "0.56338`", ",", "0.323944`"}], "}"}]}]], "Input",. g4 b" V9 _) v1 A, ^6 v
    CellChangeTimes->{{3.577959534959416*^9, 3.5779595573142548`*^9}}],
    7 F0 O/ c  ?0 L: T3 M  b: _& I6 U  x0 k8 t  m; e! C
    Cell[BoxData[% j' k6 a( D% m' `9 a2 r
    RowBox[{"{",
    9 e' o' y* |/ z6 r  RowBox[{+ R9 Q' u& ^/ \7 Q/ F8 h
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ( w! X- w$ |' g2 J' Y# \  Z   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",3 N1 b! E* S, L8 z
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", , M! \, ^; A/ Y) a/ K
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    - P0 u  Z0 W) w* E. W6 o   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
      ]% w6 ~  U3 Z) j   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    - d/ m+ k0 e, d   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", : [5 j# Y) u$ r$ V! ~! |% Y
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    ! |; [6 F; m1 q9 t* Q. v3 i   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.507042`", , b) v. U" s: `% m
       ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`", & _1 T* ~0 W' T( n% Z" C! `
       ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",",
    % a7 ^: z0 f  P# E8 u8 m( ~    "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",",
    6 h( a4 d4 _7 X) R6 t- O: g   "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",",
    # k9 ~5 [! o# z8 h/ Q! {. n   "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",", - x; Q0 B  q- h  Y! u
       "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",", 3 G/ A4 D  P# A) u
       "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",",   O& d3 B* U4 B; k
       "0.323944`"}], "}"}]], "Output",) m; n+ X/ e  d
    CellChangeTimes->{3.5779595594514585`*^9, 3.577962351778991*^9,
    4 I0 R* Q. x, C0 S' ~  3.578012457234375*^9}]# G* H% i7 c( x$ D  }% D
    }, Open  ]],/ O+ b+ L- z% ^0 k% i8 W

    " K# o2 f2 z: UCell[CellGroupData[{: z# V! X! |$ a: [6 }1 P; a  _
    , t4 N$ V3 K. J* p& ~9 j
    Cell[BoxData[
    ' ]) [6 |0 Z* r+ r4 p RowBox[{"p2a", "=", # N" f1 W6 K2 p4 c* ~* W# Z
      RowBox[{"ListPlot", "[",
    : T3 D. U5 s8 u$ t, B   RowBox[{"y2fit", ",",
    + D3 i3 x. T; |% \( @- \    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
      b8 W4 }3 d$ E5 l" i    RowBox[{"PlotStyle", "\[Rule]", " U' [% q9 q# A7 g$ K6 W
         RowBox[{"{", 2 b" Z( d, g6 ?7 i% j; [
          RowBox[{"RGBColor", "[",
    ! H% k5 j" C+ [       RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",", % |: f. M# N9 d; O, H& e
        RowBox[{"PlotRange", "\[Rule]",
    5 m" y( O' z6 F5 C/ |) K% w     RowBox[{"{",
    4 C& w/ k* V, m( A! ~/ a+ e0 Y      RowBox[{  G2 S( E' W. M
           RowBox[{"{", 5 V8 y& d7 [" r/ L# ~5 y: U' y) X
            RowBox[{"61", ",", "89"}], "}"}], ",", 5 W' G9 j  {3 X& y% p
           RowBox[{"{",
    ' E0 C8 f- n* D. M$ K        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", ( m* x. C4 }1 P" G5 y( k$ d9 B
        RowBox[{"AxesOrigin", "\[Rule]", " R4 ~- ?2 N4 U
         RowBox[{"{", 7 W$ j2 u$ ^4 h  P. l
          RowBox[{"61", ",", "0"}], "}"}]}], ",",
    2 H  G1 n( `) n    RowBox[{"Frame", "\[Rule]", "True"}], ",",
    $ W# M' W: F) e0 d    RowBox[{"FrameLabel", "\[Rule]", ! f1 i2 C, y9 E' M
         RowBox[{"{", ( Y$ @7 K( E- F: g2 p
          RowBox[{
    5 s  H1 E/ x/ k      "\"\<\:7089\:6b21\>\"", ",", * N: h$ l( h/ N% y: o
           "\"\<\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\' e' z! \& H0 ^) J) a) M0 F# w. R
    \>\""}], "}"}]}]}], "]"}]}]], "Input",
    1 V( [5 T' _- e, p CellChangeTimes->{) w0 v; \5 }( G: h5 n( v1 {6 d
      3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {  z. L* B. {* c# h7 k8 A
       3.5779583712597866`*^9, 3.5779583781393986`*^9}, {3.577958536604475*^9, $ N& Z+ z7 s7 k) ?
       3.5779585491624975`*^9}, {3.5779592802577715`*^9, 9 r" B1 o( \: s" B! u
       3.5779593014270086`*^9}, {3.5779594039971876`*^9, ( S- V3 _) Y1 S' e
       3.5779594059783907`*^9}, {3.57795949706695*^9, 3.5779595174717855`*^9}, {0 G- l2 F; f) o! t2 K: h0 `/ f
       3.5779604302529774`*^9, 3.577960442311798*^9}, 3.57801246978125*^9, ' S% |- U( w& F# M
       3.578012920859375*^9}],
    7 z. H/ ~! U7 v- c8 J+ d
    , o4 G. C3 m) S: ?8 J; oCell[BoxData[( m" E3 T5 F7 E) T" N; ^7 p
    GraphicsBox[{{}, {},
    5 ~; ]9 L" C1 r1 |5 S4 C, L3 _   {RGBColor[0, 0, 0], LineBox[CompressedData["
    6 ?3 {; \. S/ e! _) ^& {' y1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM: {5 O; e" W" m5 S; `* u
    /g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ, W) p' B+ b  s* b
    9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P
    $ B) |9 w( G. @" YofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC0 l1 R# ]! e4 t+ F# ~" g# f2 J  \( k
    qPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK
    8 e) I% t( A% d1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx9 h, h2 i7 }  k; ]1 S& @! u2 Q
    0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p18 N9 Z$ L/ w; e/ n/ i
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH1 l" H. f1 g$ L& X) o0 v
    99yxuG0PAHw7nyU=, ~1 F/ b, W7 {0 y( X  W1 v! ]
         "]]}},+ t: c2 k, d7 }  h
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],# y/ @9 R3 O8 E2 U5 n
      Axes->True,: m/ I% J  {4 f* F8 W
      AxesOrigin->{61, 0},
    # x* ?& P% ?$ e$ @  Frame->True," y; o( G  @; K: }! l. U; F% q
      FrameLabel->{
    . O) [7 u/ J) |. u5 X5 Z    FormBox["\"\:7089\:6b21\"", TraditionalForm], # [) `1 G" ?  j4 }0 w9 }3 p+ f2 R+ e
        FormBox[2 @" V0 a1 M  V8 x
        "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"",
    5 y# K. ^5 d" J! T) @* G     TraditionalForm]},
    3 u4 P, b! Q) a4 O/ l  PlotRange->{{61, 89}, {0, 1}},2 l/ ]$ z. o* _0 m  \- I+ t- ?
      PlotRangeClipping->True,
    . @$ y* y! s. v/ z0 g" @  PlotRangePadding->{Automatic, Automatic}]], "Output",
    4 l1 Q! |& ^0 a& H) j CellChangeTimes->{: v6 `/ N! l  i
      3.577925144625*^9, 3.577925396578125*^9, 3.5779583797150016`*^9, " l  F9 M4 s% \/ U6 R1 G" w' Q3 O
       3.577958519990446*^9, 3.5779585510813007`*^9, 3.5779590670678*^9, 9 }) u9 A8 [. E; X& q5 z5 O. C
       3.5779593035642123`*^9, {3.5779594075383935`*^9, 3.577959430158433*^9}, 7 \7 n3 l; ^% S) z/ S4 |, |6 O
       3.5779595184233866`*^9, 3.5779604438874006`*^9, 3.5779623548833966`*^9, / e& F8 J8 o. d2 m, W" i, R
       3.57801247209375*^9, 3.5780129225625*^9}]5 p+ b& l* J) g3 C( F7 Y- F+ k; V
    }, Open  ]],0 W. H& M/ k& o/ b* [$ j" ~" i' ?# F, D

    ! N/ w# P8 s4 A) j7 s4 GCell[CellGroupData[{* u- _! l; d5 a1 f7 j7 K
    ; g2 w7 ~( g/ h& F; y3 i
    Cell[BoxData[
    / h8 o; s3 U. t# Q) j RowBox[{"p2b", "=",   O& X5 S! I; p' t  [: T
      RowBox[{"ListPlot", "[",
    . z% N- r7 j3 a! e, v- z   RowBox[{"y20", ",",
    % U; i3 v; S( ]% X  j    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    3 w0 {8 K3 S. G    RowBox[{"PlotStyle", "\[Rule]",
    6 F6 ~6 S1 a6 g$ E4 [3 L$ V1 O     RowBox[{"{",
    # O: ?# Y# e8 j& o3 D/ t" x      RowBox[{
      O6 x: \( h- ^0 n1 k' r7 y       RowBox[{"RGBColor", "[",
    ; ^, H" e7 v* ^4 M9 \8 Y/ G- f  l. e        RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}],
    , u9 A. T9 X: e$ w# \! @+ A' i1 b6 J    ",",
    / p4 R3 f3 V- ]0 B3 F5 c5 b8 h% ^    RowBox[{"PlotRange", "\[Rule]",
    4 S* R1 z* t7 B. i; g# Y1 q6 Q9 _     RowBox[{"{",
    3 x1 Q* V# D! L- \% U$ ~6 F0 I      RowBox[{
    3 @6 V- d& z" A( F       RowBox[{"{",
    7 S- l, ~8 {7 B" x4 K+ r% M        RowBox[{"61", ",", "89"}], "}"}], ",", $ h/ F2 a9 {6 E6 u% a" L2 x9 E
           RowBox[{"{", 3 r$ F, u8 S% Y5 |3 g$ _) t+ C
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    + B5 \5 l& G! b* ]! n' r# C    RowBox[{"AxesOrigin", "\[Rule]",
      t: F2 B; u4 i5 j     RowBox[{"{",
    $ m- m9 G8 |! x+ X' X      RowBox[{"61", ",", "0"}], "}"}]}], ",",
    ! d, ~$ T* w7 _. b9 n2 Q    RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",
    / H/ `! E. S; \+ D9 l+ e5 D CellChangeTimes->{4 z- ^" M; L4 q$ d- p  E
      3.5779253991875*^9, {3.577958382429406*^9, 3.5779583843326097`*^9},
    . S* @4 ]! T1 c* z1 |, H1 w* h   3.57795855655691*^9, 3.5779595724462814`*^9, 3.57801248346875*^9}],* ]$ v# b4 \+ l( U8 ^

    $ x% B! r1 ]! p* ^. iCell[BoxData[
    ! T. C8 U2 m. q+ S4 y$ |: X  S GraphicsBox[{{}, {}, : J& G* G0 n' }# C9 p! J* N
       {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["# ~/ n) J! x; |6 ?, N8 ^
    1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn
    7 F; G% }9 V# ~% R! p2 R8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV9 z( }( k9 T9 e
    c/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc
      }$ W3 V4 J1 u. V/ D! Q  HiX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk4# O) Q& Y7 M4 {' P* }
    TZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO
    ( B& S0 I5 l' _  KfzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB
    ; m$ x) F  l" I# A( c3 ITWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG0 _# ~: r" i$ V1 H- Z
    p0OYg4Fg/tz63VfsAdsCnzU=1 e6 j  g  n# |& N! N9 e* w8 p
         "]]}},  c  @9 v8 O' {" E6 i% t0 L
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],8 w$ f- D: k# S3 h% C
      Axes->True,
    * L# _2 A* c5 I  AxesOrigin->{61, 0},2 [3 o. g/ u7 D7 ~% O) t/ q
      Frame->True,. d9 v0 S& `4 }# b5 S
      PlotRange->{{61, 89}, {0, 1}},
    6 x4 m6 Z, v. l  PlotRangeClipping->True,
    0 _8 M7 a4 o# Q5 @  T  PlotRangePadding->{Automatic, Automatic}]], "Output",+ p& T1 [3 \. r4 I# Q- [
    CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9,
    2 z* Z6 k) h- L  3.5779583861890125`*^9, 3.5779585219092493`*^9, 3.577958558132513*^9, 4 K5 c4 i" q0 D* C- n3 {5 d
      3.5779590691114035`*^9, 3.577959577906291*^9, 3.5779623569426003`*^9, : J( g4 i2 a& d0 u  ^
      3.578012484703125*^9, 3.578012925875*^9}]9 U# i3 H. G/ A% `' G, T
    }, Open  ]],  ^) r- w8 w# V& f+ Q
    9 D% W- O; S2 {  E" O
    Cell[CellGroupData[{) T9 `# I% O2 k, [
    + ]. U$ }7 j- q5 v" F& q
    Cell[BoxData[
    ( s- W: E1 n: a. ]% p  ? RowBox[{"Show", "[", / O" h4 e! H+ b3 L2 i
      RowBox[{"p2a", ",", "p2b"}], "]"}]], "Input"],
    2 X' |9 d, J5 A5 y) o/ L' M
    * M+ @2 U. r0 i6 _7 J; z% }! }( sCell[BoxData[* h( r2 x& t( L& a" }
    GraphicsBox[{{{}, {},
    7 y9 Y; W4 K7 q5 p. y1 k7 \6 r    {RGBColor[0, 0, 0], LineBox[CompressedData["
    / {, p' H2 W/ ?4 W1 }1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM
    6 L  ~, q0 S7 {1 @2 Q6 G/g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ% C9 M, J# X8 H" a+ U( h
    9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P
    ( r( W$ b8 p4 Y9 G1 zofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC& r( p# C  d& a7 ]. l
    qPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK% M, Y1 h( ~1 s; a" Z3 h
    1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx, D/ K$ i- I( [) Q4 _/ X+ T
    0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p1
    4 P) U% o! S' D. T- BsPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH, Z4 G2 t1 }( ?# G! N5 S3 y& M' ~
    99yxuG0PAHw7nyU=
    3 I: \6 R1 b' h; H      "]]}}, {{}, {},
    - d; k" a3 [8 @; C4 b* f    {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["' F% B9 Q$ h5 f: _) W. X
    1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn
      u  T+ G1 S) o& \* ^8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV4 w* f* h2 D0 G4 Z7 Z4 g
    c/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc- n) G8 T1 l, g% H" M
    iX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk45 B, C  {$ j8 S- Q
    TZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO0 M) ?4 s. ^, A% c
    fzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB
    ' d) ^: C9 I( J6 p$ y( `4 ^TWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG
    2 x3 d* g4 Z& o+ y" t! Dp0OYg4Fg/tz63VfsAdsCnzU=2 n) N% \2 I) J0 |4 ^$ _
          "]]}}}," d* }6 T4 L! _
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    $ I$ f2 l/ d, Y) E  Axes->True,
    : x6 c" t0 z& w, |: H/ O: i8 q4 D" |1 l  AxesOrigin->{61, 0},
    ! n  S* k5 H6 C: e; |1 ]  Frame->True,6 o! |7 {8 u: R: j) A% V1 a
      FrameLabel->{7 u0 ?: l9 ^: U0 r, O/ b
        FormBox["\"\:7089\:6b21\"", TraditionalForm],
    ; {! p; x9 A& Z) A6 c! l    FormBox[
    2 l- _( Z3 ?# x9 X    "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"",
    4 T$ n3 _5 [: x: p     TraditionalForm]},; k5 r/ a9 l( I0 y4 O# P# W( m- ]
      PlotRange->{{61, 89}, {0, 1}},
    - c, I* k) z4 [% P* l  PlotRangeClipping->True,
    7 z: S5 `4 p! B. \: l  PlotRangePadding->{Automatic, Automatic}]], "Output",# B  V# i0 H3 S  g8 h! S4 I' ^
    CellChangeTimes->{3.5779623624182096`*^9, 3.5780124863125*^9, # X# K- H* h+ j9 |0 p6 x0 ]- s
      3.578012927734375*^9}]! C( w: R1 j8 ]( a+ B0 f& ~
    }, Open  ]],
    1 x) M9 t2 |# \/ t+ L" h# m( r. \7 r  D0 A2 `6 f
    Cell[BoxData[
    ' a# \$ Q+ Y+ [' D& y, e RowBox[{"\:ff08",
    ! x: Q7 s' H7 L4 \+ ~& Z+ c5 c  RowBox[{! j2 i5 U+ k! x( m$ @. {! Z
      "\:5df2\:77e5\:521d\:59cb\:94c1\:6c34\:8d28\:91cf0", ".7406", & X; Y" I! T& e, e! ]2 w
       "\:3001\:5e9f\:94a2\:8d28\:91cf0", ".4621",
    5 i  Z: L$ e9 |! ~9 v8 i" h- H   "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea60", ".5208",
    4 `2 |5 M3 K8 `  L+ v  e   "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:542b\:78b3\:91cf0",
    + }2 b7 I7 C4 {& a" ^   ".2221", "\:ff1b\:76ee\:6807\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\* t2 Q5 V5 x. ?2 B+ B& a) l) a6 r3 z. y
    \:4e3a0", ".6224",
    ! a4 m5 x% P! K( P0 U   "\:3001\:76ee\:6807\:94a2\:6c34\:7684\:78b3\:542b\:91cf\:4e3a0", ".2521"}],7 Z& c5 Q5 L: p
       "\:ff09"}]], "Input"],
    3 R# O4 {! q3 O3 v4 n
    : E! G6 o5 X; V+ q+ aCell[BoxData[6 s$ l; L( y2 }% f
    RowBox[{"{",
    2 j3 E9 v, _/ v% E4 ]9 o  RowBox[{
    , X8 L# l6 h' C% [8 ^3 G  "\:94c1\:6c34\:8d28\:91cf", ",", "\:5e9f\:94a2\:8d28\:91cf", ",",
    . W& Q  t4 n/ q0 Z   "\:5439\:6c27\:91cf", ",", " w+ H/ ~& x) o5 C0 {2 U9 u' O8 t
       "\:4e0b\:526f\:67aa\:65f6\:7684\:542b\:78b3\:91cf", ",",
    0 E8 E( A  p" s# `; |   "\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea6", ",",
    9 [9 p6 ?/ ^& T$ X   "\:5757\:72b6\:77f3\:7070", ",", "\:8f7b\:70e7\:767d\:77f3\:7070", ",",
    4 ~* V) V+ ]' T   "\:83f1\:9541\:7403", ",", "\:5757\:72b6\:767d\:4e91\:77f3", ",",
    0 o% X$ u0 |, m; e   "\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf", ",", % M9 C' |. \! c3 y6 o( G
       "\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6"}], "}"}]], "Input"],
    ) L2 k. |+ q- S8 u# p# d/ b  L* l$ i5 g/ Q* `4 E
    Cell[BoxData[" "], "Input",0 B2 Z  b1 m' P, k: B) X7 h
    CellChangeTimes->{3.577962834553033*^9}],' V5 p- o$ }/ [! f) @, l
    * \4 [+ c% P" O; |' d5 [( \0 D; ^5 j
    Cell[BoxData["\:94a2\:6c34\:7684\:78b3\:542b\:91cf"], "Input"],
    % p0 }! b% o0 O/ r0 ~9 [; g" h0 e) n0 w5 j+ Y1 [5 g
    Cell[CellGroupData[{
    7 w! f6 t& h% I* K  X" w! e  z; v% U( n' V3 ?3 E
    Cell[BoxData[4 [) c+ q* G8 u
    RowBox[{"y1", "/.",
    . Q: i3 @9 m# f6 ?9 |  RowBox[{"{",
    ( `6 f$ t" {5 \9 {2 ^& Y" N4 u   RowBox[{
    4 M: g* M: ^# b7 b9 a+ Q# r    RowBox[{"x1", "->", "0.7406"}], ",",
    9 }5 Z9 A, Q0 p! E6 v    RowBox[{"x2", "->", "0.4621"}], ",",
      g9 j7 u% `! G0 v' ]    RowBox[{"x4", "->", "0.2221"}], ",", 6 }2 }3 B( J2 w7 H$ [; S/ }. G
        RowBox[{"x5", "->", "0.5208"}]}], "}"}]}]], "Input",# x# Z% @/ e' J  v
    CellChangeTimes->{{3.57796267209435*^9, 3.5779627224200373`*^9}, {
    . B4 i; |$ \! [  3.5779627663029137`*^9, 3.577962774820529*^9}}],
    1 A7 L3 ~) {* j$ f" I, B4 ^+ D
    " m9 a  k4 a1 T8 `1 N) e1 }Cell[BoxData[$ m: G9 k6 j6 _8 a& P" y
    RowBox[{
    * j; T, q# b) Q2 I" B+ K  RowBox[{"0.2286149508637297`", " ", , P$ G. o% _" v* C. \
       SuperscriptBox["\[ExponentialE]", + [, @) F$ S7 P
        RowBox[{"3.1415926535897936`", " ", 6 ?* ~7 }; B3 E3 `4 b3 C
         RowBox[{"(",
    6 {2 k5 _  i$ V% z6 p      RowBox[{( J) a6 b/ I* \2 u: ]6 m& T
           RowBox[{"-", "0.17911224641499998`"}], "-", 7 X4 c# _. R9 ~$ [( q
           SuperscriptBox[: d' V1 ]4 R0 l9 U1 ~) m
            RowBox[{"(", 0 H# x/ e# c: \& x
             RowBox[{
    % P# X) P! l; W2 o) _          RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-",
    9 B/ x- V* |: A* u/ f- n( l* [4 u       SuperscriptBox[* z" X  w, B1 j) ?% v4 B
            RowBox[{"(", * D6 m$ f  k* n( {0 a& ]2 R$ M
             RowBox[{; B9 \3 ^# [4 V$ z8 Y; E
              RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    0 q0 V8 [5 I5 h9 I" {4 i       SuperscriptBox[
    ' ?( N" K* {$ S" |* m        RowBox[{"(",
    6 d4 y7 A  _/ N& D4 z$ b- E" E         RowBox[{& n6 u, b! s7 [! u
              RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-",
    + ^0 g8 g7 z: L8 D9 ]8 l       SuperscriptBox["x8", "2"], "-", 7 }# |. ~2 t1 i* j5 k! e
           SuperscriptBox[
    7 L: C( b+ u. \# ?, i% H( @        RowBox[{"(", ; t* i- u1 G' E& r( C- {$ a
             RowBox[{" n- U  y" p6 b2 I
              RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+", ! y& t) g2 [0 p8 L* l
      RowBox[{"0.020180806675835994`", " ", . T6 H7 }  C) n! t$ i5 W# U1 N
       SuperscriptBox["\[ExponentialE]", + M+ P% h6 P3 n& V: I
        RowBox[{"3.1415926535897936`", " ", 1 D+ {  O% f. ]' @
         RowBox[{"(", / d0 o) m  B, U- B* t7 |1 L6 G
          RowBox[{
    8 j( d6 Q/ z+ O       RowBox[{"-", "0.105619387859`"}], "-",
    " R$ {* u9 I9 ^       SuperscriptBox[$ E3 V) a. L, R9 `6 q% l* h
            RowBox[{"(", $ n' h/ b9 Y6 ^2 I7 b9 f1 L9 h- }' a
             RowBox[{
    % K! ?( k" O0 O          RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    $ z& p+ F* K  G" F/ h0 A  m       SuperscriptBox["x6", "2"], "-", " b2 F5 r( D  g$ v( ^. V
           SuperscriptBox[; N& G) i2 P$ z* u# F
            RowBox[{"(", ) j6 q, T' O, y- ^
             RowBox[{
    ! K8 C9 l# }3 n          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    & }' Q! S( c6 [2 x& k$ r9 a       SuperscriptBox["x8", "2"], "-", 3 z$ d; C1 y. G! L0 |8 g( Q: F
           SuperscriptBox[
    & M5 k) G2 d6 A! V" i        RowBox[{"(", . L4 d; Y! N. i- p9 _6 L
             RowBox[{
    6 C  e# v+ z' L& Z" v          RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    : I3 Q0 u6 r4 X  "+", 3 I3 b! n  {" W! v# D% r8 T; f
      RowBox[{"0.13092706311748437`", " ",
    ! F8 h2 M' ^, `! [) k   SuperscriptBox["\[ExponentialE]", . h; E; `, E- R$ p. e( q
        RowBox[{"3.1415926535897936`", " ",
    ) l, x3 I, P2 V7 x; c     RowBox[{"(", & Q# q5 p$ H0 E2 F
          RowBox[{) \4 |0 ^  u6 k5 O, u5 t3 j9 ]7 l
           RowBox[{"-", "0.236605670085`"}], "-",
    4 h& `2 o, [& ~$ `" {& K' y       SuperscriptBox[
    ; m8 I% [7 S% F  `6 _+ f        RowBox[{"(", 9 F. q4 |; S: X# f
             RowBox[{+ c" ]. t6 w$ p
              RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",
    : a  z7 h$ }; J2 _# a; D/ A       SuperscriptBox["x6", "2"], "-",
    2 M+ B, D& D+ D2 ~- @) A       SuperscriptBox["x7", "2"], "-",
    , F- g$ M: k2 [" y       SuperscriptBox["x8", "2"], "-", % H. |6 j' v+ G' \5 Y5 Z/ ]2 }
           SuperscriptBox[4 J1 W% G: E+ t) n
            RowBox[{"(",
    2 d7 ?" U5 `# @& E, u         RowBox[{
    / b' g: J& G2 {# Q# ]4 J% k! n, g0 H          RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 0 {. Z5 Y- g, z( c1 Z% z
      "-", / J. B! N% k9 a3 D- W% |- n
      RowBox[{"0.033459349088924784`", " ", 6 G9 N, u8 h0 K* i" W# u
       SuperscriptBox["\[ExponentialE]",
    5 q& H, e. @; S! v7 K    RowBox[{"3.1415926535897936`", " ", & v' e1 t2 n* V9 m
         RowBox[{"(", 8 _6 U1 E" |8 S6 b/ G: J# N7 y2 @
          RowBox[{
    6 h+ r  B' t6 t' j( C/ S       RowBox[{"-", "0.46221081830200006`"}], "-",
      J6 y, N. G! G       SuperscriptBox[: t7 _0 Y7 P6 L9 E
            RowBox[{"(", ) x7 j6 W; I1 g+ j  d( M6 s
             RowBox[{2 u) T  T9 N$ ~( R0 k
              RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",   ]$ x5 C. B- }/ o. }- \5 Y- k6 Y
           SuperscriptBox[
    4 e0 t+ a3 d& v2 S5 F        RowBox[{"(", - }# S; K4 q- q, s# Z! I
             RowBox[{; g3 E# B+ j2 j. T1 ~
              RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-",
    * |5 e% i) q4 F" f5 @       SuperscriptBox[: U6 ]6 {6 n, @, F3 Q
            RowBox[{"(", # _1 Q& |% R$ |9 j
             RowBox[{
    $ j& L8 ?9 z0 U5 f: p" F4 p' ]          RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", & E3 h/ @( Y. ]% m
           SuperscriptBox["x8", "2"], "-", ; ^: _3 I" F4 e5 \
           SuperscriptBox[* K; S8 S$ `+ A
            RowBox[{"(", . ^9 f  D# P3 I! v/ R4 t
             RowBox[{
    % N  \! L& _$ o- O3 P0 m' U0 Z          RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], , V( S6 O" W! ~/ \  R
      "+",
    $ ?5 K$ k- R5 f% ^  RowBox[{"0.39611806709006653`", " ",
    2 j- _7 Q) K" A  h3 }$ H, d+ ~0 w   SuperscriptBox["\[ExponentialE]",
    4 ~8 f. @! q" Q* T$ p6 d    RowBox[{"3.1415926535897936`", " ",
      J% ]( d9 ], ?9 t3 j     RowBox[{"(",
    5 h0 e. ?! a: K# ~      RowBox[{
    $ U2 {. r! J3 l" f       RowBox[{"-", "0.5837889295140001`"}], "-",
    3 O; }; D% M- ^' h! e, d/ A/ }       SuperscriptBox[1 M) Q1 K1 l( V
            RowBox[{"(",
    % @$ |% W( i; W, ?         RowBox[{# @( N  l: B4 Y% f! F" G
              RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    ; I) C& S* b" H. `+ `       SuperscriptBox["x6", "2"], "-",
    , z! J) S- w* g' |! p2 z       SuperscriptBox[
    ; d) i' q* |; T0 _8 s8 p' K        RowBox[{"(",
    . P8 x1 U9 U7 ^( W- W3 t. B8 |         RowBox[{+ U: q! I8 t, A& E& N7 Y
              RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    1 M4 V. C; Y$ E* `' s1 F       SuperscriptBox["x8", "2"], "-", 8 X7 r" |$ ?+ N2 u1 m8 [
           SuperscriptBox[( D" \: U% V2 ~( ]' Z, y
            RowBox[{"(", 2 ?1 A' p5 O7 v
             RowBox[{
    ; G6 |/ L: w* j9 b          RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    - a) Y  v9 F' i/ z$ Y# b0 @  "-",
    * S: `9 i7 A; N2 w: ~  RowBox[{"0.19996885877792045`", " ", " h( T9 Q8 U# h  a5 j% g; I  T1 x
       SuperscriptBox["\[ExponentialE]", / ~- B& G, [5 ?4 X( ^
        RowBox[{"3.1415926535897936`", " ",
    9 d" T" \% `1 o     RowBox[{"(",
    0 }0 v0 Z" T  H1 Q* ~- q  F9 L9 f      RowBox[{; P  \/ x. V: N: L7 m5 Y% |2 v+ Z  N5 F) h
           RowBox[{"-", "0.19030188470200005`"}], "-",
    ' N" ?) s& Y: q2 `       SuperscriptBox[( z/ R$ D6 G0 z3 s1 }
            RowBox[{"(", 6 [" i, x& v" W. D" V0 k$ `+ j
             RowBox[{+ z% g& ~! V  [2 c% T
              RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", 0 p: B' s/ [: \( Z( O+ K- ^
           SuperscriptBox[
    , ]5 G) e* d# w        RowBox[{"(",   G, U  c" c6 k0 C$ J8 ~
             RowBox[{  O+ k5 U% |8 {8 q
              RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    # l8 U2 r+ {3 E# V       SuperscriptBox["x7", "2"], "-",
    1 Z6 I" D( m; [. N' r- K3 F       SuperscriptBox["x8", "2"], "-",
    1 m9 K3 F# ]/ M: ]  @       SuperscriptBox[
    ' t7 \) l: C8 _$ D1 r        RowBox[{"(",
    * H) e' F" b* U' M* [+ L         RowBox[{) U/ K5 R6 y8 E
              RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ( H$ a; ?+ R" _+ N8 p( s' a+ }8 j
      "+", / t$ ?2 u- M7 P- q1 w
      RowBox[{"0.23580523388620744`", " ",
    - B2 ^; \7 Q# a, G6 A5 U6 L   SuperscriptBox["\[ExponentialE]",
      c0 n* K4 A) E+ m0 T2 N    RowBox[{"3.1415926535897936`", " ", # ?) n3 {: ^4 {
         RowBox[{"(",
    3 q. t% e( }: B4 u      RowBox[{
    4 t* w* h* W% i% [       RowBox[{"-", "0.28518780882`"}], "-",
    6 r3 L' q* S2 j% @       SuperscriptBox[( J: A9 S' d% S# }) S
            RowBox[{"(", " K) K' T/ ?2 G2 U
             RowBox[{
    ) W9 w# ~& t: h' k8 g3 l1 L3 t: d          RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", % o9 U  `9 v# c0 V$ [
           SuperscriptBox[, I; k8 t" `" B  f: p' b# q
            RowBox[{"(", ' ^, a- Q) N' [
             RowBox[{
      ^& R; k! V3 s) L          RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    ; m) o! w% ~# f2 `. W& y       SuperscriptBox[
    . `- h+ y2 F. q/ U& {        RowBox[{"(", , T5 }  G% I1 p+ N# S  I; S) v
             RowBox[{3 X! J4 L/ l: r" P& N+ @
              RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", ' y6 D- C! R, Z* K1 E$ t7 K) N; w
           SuperscriptBox["x8", "2"], "-",
    & I' k3 u5 |6 C       SuperscriptBox[1 J& G0 w, I+ M. k3 P# v
            RowBox[{"(", 1 t# H; |! R5 P  t4 Q8 e
             RowBox[{
    / q3 v4 c2 d" }$ q          RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    2 m5 e: b, }1 p3 e, z  "+", 3 h' F- n2 z7 S
      RowBox[{"0.667027259367853`", " ", ( M* f% l1 ?' w, |+ R4 w
       SuperscriptBox["\[ExponentialE]", 1 U9 j' D8 ?+ C7 N5 Y0 d$ h+ L3 }
        RowBox[{"3.1415926535897936`", " ",
    6 E9 }5 d/ ?0 S; y: d  I2 [     RowBox[{"(", 1 E8 {$ H( K: t5 }; e  o
          RowBox[{3 y) Y$ K# ^0 e2 V
           RowBox[{"-", "0.11387365200400001`"}], "-",
    6 r- _: T9 v5 Z8 N0 n. {! B       SuperscriptBox[
    3 k# v3 N$ U; E' Q# i        RowBox[{"(", 4 @2 z6 `$ B" L( Q
             RowBox[{; W. o: B$ x6 ~- R$ P& h" I
              RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",
    7 M9 M( O+ T9 \  _6 @5 O; z6 E       SuperscriptBox[! B2 k( W- ~( G/ i! ^" g# v
            RowBox[{"(", 2 e) ^6 h: N; a, a1 v8 G
             RowBox[{$ m$ R2 ]& D2 J7 i8 _3 w# l7 q
              RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
    " p2 s7 ]% R+ f0 s# X2 [, r& C. A, M       SuperscriptBox["x7", "2"], "-",
      V  Y- N$ ^( x       SuperscriptBox["x8", "2"], "-", 4 a) l% ^$ C! p0 S
           SuperscriptBox[
    " R- ^1 R- P- `3 T8 \3 d) z, _        RowBox[{"(",
    5 P6 _- l2 r9 D. d6 j9 {9 F; T& j         RowBox[{* m2 p$ H! B: s5 e
              RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    4 f: D* S2 \% J+ P' H; |  "+",
    - n7 T% q1 X1 h7 u  RowBox[{"0.25282438852646905`", " ", 3 ~- {- U" [& x# c1 {
       SuperscriptBox["\[ExponentialE]",
    : `) ^# h  b) ^$ {    RowBox[{"3.1415926535897936`", " ",
    5 E6 }( b5 v& `9 }9 L, N2 _6 l     RowBox[{"(",
    - A/ q& V1 Q: U5 e2 p# ]2 m      RowBox[{5 P1 a+ h0 d7 G1 r; P8 |
           RowBox[{"-", "0.11442644782500001`"}], "-", / g3 X. e# Z8 j# f( I9 o
           SuperscriptBox[  B$ u. ?1 U4 |- f9 K  b
            RowBox[{"(",
    0 o! n( b  m3 ?% ~; b         RowBox[{
    & o4 t4 Z( ]+ y; P/ s          RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    8 u2 F1 d# C6 m       SuperscriptBox["x6", "2"], "-",
    8 T; p2 f( G  p       SuperscriptBox[
    4 x7 ]! V) k4 m4 x% h0 c        RowBox[{"(", 8 m5 z  i- p* D8 K+ m
             RowBox[{
    + r" r  Q8 y2 |& H: [  y          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 4 Y3 ?! j* N  c
           SuperscriptBox[0 P, Q; S# m( K1 @3 U, }
            RowBox[{"(", 9 N& g; a4 ?- K* @6 j$ v
             RowBox[{
    4 X) A9 q, }! M# u          RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    * {# }  w. N- y3 L9 [5 O       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 7 I$ Y# d! b; E! E
      RowBox[{"0.07581214474544536`", " ",
    0 Z5 M# I: p' ]   SuperscriptBox["\[ExponentialE]", 1 J! n8 S3 g% c' J
        RowBox[{"3.1415926535897936`", " ", 7 |  A; p2 \5 ^. ^
         RowBox[{"(",
    $ r& w) x: A" s2 ]% ]( A5 k      RowBox[{
    ) Z9 u/ ?7 O& N  Q' {+ g       RowBox[{"-", "0.21008576609800003`"}], "-", & [, e' f1 a  T% j, q
           SuperscriptBox["x3", "2"], "-",
    + T5 [' \$ B  m0 \       SuperscriptBox["x6", "2"], "-",
    9 X% C" d# E5 H3 v       SuperscriptBox["x7", "2"], "-", ! o! y/ {4 R) ^2 R- \
           SuperscriptBox[! D/ n; y9 g: X! ?
            RowBox[{"(",
    3 M/ j% q( u( M8 H! }2 d' c         RowBox[{& Y, T& Z) Q" F- N
              RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", 6 k  G9 T: s; T: u- s& r- R4 x# K% }
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", ) Y: W+ k3 m) b6 D, s( _
      RowBox[{"0.10599338351843121`", " ", 5 `3 K$ w* A" K2 K8 C+ E
       SuperscriptBox["\[ExponentialE]",
    / a' ^& j" L+ U# w2 ]    RowBox[{"3.1415926535897936`", " ", # S$ m% ]& ~+ b
         RowBox[{"(",
    ; B# R8 d! K- {# u0 Y* {      RowBox[{
    , f* J9 q2 \% E( R: Q9 c* h% w       RowBox[{"-", "0.4481471925460001`"}], "-",
    ' r7 Q: M- f! k  X       SuperscriptBox[
    * q1 s% H. S/ F' k6 f        RowBox[{"(",
    3 w, j5 g9 I" q: T; {         RowBox[{4 l) |+ D3 i$ J. [4 u9 R
              RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-", 5 z5 T9 @  p' `: `6 f! T5 Z! d
           SuperscriptBox[
    ( s7 q6 f$ I# s! M  r/ K        RowBox[{"(", 1 z9 z4 N0 s# b) S: c, O) v; T/ w. W; o
             RowBox[{
    4 T" H6 _' j( J5 k* d2 Z          RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-",
    3 H, }0 T* x4 @2 B# v) j/ ?& l       SuperscriptBox["x7", "2"], "-",
    ( w8 d. c: A" h8 a! j& v/ C% W       SuperscriptBox[/ R3 p: ]# ?" u
            RowBox[{"(",
    # l7 ~/ m+ t( x7 {0 j' H* v  r- A) D         RowBox[{
    # F, a. t1 |1 j$ {4 t9 G          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    ( M. A: T5 o6 N5 Y$ Q. Y       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", 7 ]" U2 Z4 A3 Y
      RowBox[{"0.5008208386064421`", " ",
    : W  ?$ E& V" t+ ]   SuperscriptBox["\[ExponentialE]", + P4 |7 E) C6 B' W9 M* Y: q
        RowBox[{"3.1415926535897936`", " ", 9 ^& z2 W% i1 g: a& Q) v* _
         RowBox[{"(",
    5 E; v2 Y; ^) D  j/ t      RowBox[{/ `6 I: c; d6 C3 u- Z; g
           RowBox[{"-", "0.08722659614000003`"}], "-",
    $ }0 t5 D! k+ @: \; o7 b       SuperscriptBox[! x: ]! v* f/ v% |5 \; ?' u* h
            RowBox[{"(",
    $ O0 x) C7 k9 ~0 ^* L8 S" ]0 [         RowBox[{
    4 f, Y. }! A. g  w          RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", 0 h/ ~, Z; l9 Y' p- [4 o; _
           SuperscriptBox[
    % w. z! d- f, d  D        RowBox[{"(",
    % M4 _1 y5 T9 E/ Y         RowBox[{
    2 f+ u2 \+ ]3 X0 N( y& t% d9 n          RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    ' H! ]( j# J- x  P       SuperscriptBox["x7", "2"], "-",
    $ d# q; b1 o- V3 Z( t/ M       SuperscriptBox[
    * M1 G6 R3 Z, N( B) D4 `        RowBox[{"(", ; c% w. T  }! N2 w/ K
             RowBox[{
    ) B! m( U8 ?) n, K          RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-", , r% A5 _0 C5 k1 s0 j6 n
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", 7 W! c4 ~" z/ `6 x* j# I0 P
      RowBox[{"0.32564305572552343`", " ",
    6 W$ q1 L, P9 k2 y9 o+ L$ O+ a   SuperscriptBox["\[ExponentialE]", . a0 \# f* ^3 T& ^2 Z8 ~6 {
        RowBox[{"3.1415926535897936`", " ",
    & Y5 ^5 v# o8 i& o# Q     RowBox[{"(",
    * m6 e; e* u: a! _- F2 ]      RowBox[{# Z1 S! X  W% `0 G& C
           RowBox[{"-", "0.23738217000100004`"}], "-", 3 X* `9 Y, D9 y- a4 \1 K
           SuperscriptBox[" |3 a* n$ o- y! c2 h, m
            RowBox[{"(", ! O- X3 w, U. E3 q
             RowBox[{
    1 \- t+ D5 [0 U/ w7 b          RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    9 k/ W, v, P; i  ~& o; M       SuperscriptBox[
    : E$ \$ h' S6 E& F0 N( G        RowBox[{"(", " f- B9 g7 g6 z# U" p" c2 t
             RowBox[{
    9 [/ S/ a6 g) F* r1 h/ R5 D; f- g          RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    0 P. u* Z8 M- u/ u: s; B0 u6 z       SuperscriptBox[2 ?* G; L  k$ e$ F
            RowBox[{"(", ! J1 z" U) q5 ~' H( t' @; n# i
             RowBox[{
    9 Q1 P% T# \7 e' I3 l1 J2 [          RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", 3 c2 S0 j$ x* l' C
           SuperscriptBox[
    . B; i1 `' W3 l. x        RowBox[{"(", 8 c9 t& v) Z/ e0 s) B2 o
             RowBox[{$ [- ?$ @  Z5 S8 M5 ^6 b# l1 M! N
              RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-", 2 F+ c* y, V9 L" l" @
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    . r; Q, j: n. N7 U$ i! ^  RowBox[{"0.6665374509702793`", " ",
    1 |0 t+ c; {/ K# o) J1 T! @   SuperscriptBox["\[ExponentialE]", . z6 G% t3 `1 [: l7 d9 x1 q/ y  v
        RowBox[{"3.1415926535897936`", " ", 7 M! W/ V: C/ h
         RowBox[{"(",
    9 f! K# |6 V& @      RowBox[{" ]2 p& x3 V1 [0 o/ A+ B
           RowBox[{"-", "0.19162171876400003`"}], "-", . N2 X$ _; k# k' M: d, L
           SuperscriptBox[
    5 t; V. U; z) Y# b        RowBox[{"(", ) A: S5 {4 C( O4 E" {
             RowBox[{
    9 z$ s/ s0 U/ d( R  W) {          RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    ! A2 {7 }$ }& r5 `5 y# i8 v, h3 r0 H  D       SuperscriptBox[
    7 _5 U* S3 p& a+ u% ]        RowBox[{"(",
    ) |5 H! u$ r5 t* b9 [+ ^         RowBox[{+ b& p; M8 u! ?
              RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", 3 K5 d$ D+ w% K, k; r$ v$ T; X" o8 T' V
           SuperscriptBox[
    . @0 B5 C5 n# z        RowBox[{"(",
    + r! R4 A0 Z$ W( N$ K& a( R" u& C: v         RowBox[{* P& H7 \; P% e. ]* a+ I& V
              RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
    # S5 c) U6 d6 f% Y# G9 Q, j) {       SuperscriptBox["x8", "2"], "-", + T8 V1 {: A! s2 ^
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",   ^( n( K: W+ R0 ~4 V) |# Y
      RowBox[{"0.4812237524557293`", " ",
    ! ]4 W1 W4 D" H; ?9 @# @   SuperscriptBox["\[ExponentialE]", 9 ^. \: ~) w1 w7 ?" y
        RowBox[{"3.1415926535897936`", " ",
    : Y6 d8 Z& |  i& r, x2 u; b8 c     RowBox[{"(",
    , C, g( ~( ~6 P6 @$ ^      RowBox[{
    2 R$ X: R& o+ u( L7 l& `) s       RowBox[{"-", "0.109748954594`"}], "-", 6 y( W. i3 ~* A5 T  ^* ^$ @
           SuperscriptBox[
    3 N' ~9 e; v5 r! q9 f! X5 ~        RowBox[{"(",
    + G3 h) `! k% S. [5 a, `2 L% J" p         RowBox[{
    . m: [# H/ S/ ^          RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-",
    ) ~8 {8 ^+ z. y8 C       SuperscriptBox["x6", "2"], "-",
    / h+ C5 t7 x) X# X, E       SuperscriptBox[* h7 v/ ~+ k4 V4 c4 V
            RowBox[{"(", % @  |" f  ]! T; J& w- t
             RowBox[{
    : [: I& h! M* J, J2 o          RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",
    ! V' y( c. a2 }+ M4 M       SuperscriptBox["x8", "2"], "-", $ Y5 W) E% w1 }$ [0 b: `$ ~+ W1 S  n9 l
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", * f! c( A, H7 u
      RowBox[{"0.176024676254045`", " ",
    - @  ?6 P$ \4 s% [% |0 |9 \+ X   SuperscriptBox["\[ExponentialE]", $ k9 ]7 J( v+ S5 c
        RowBox[{"3.1415926535897936`", " ",
    ) b3 {, @! R, f( y5 `     RowBox[{"(", . a) G  Q$ H2 R) O" T9 H
          RowBox[{5 T0 M& d. n) g  I) }! @! c& z% p0 m
           RowBox[{"-", "0.14616677062500003`"}], "-",
    4 D8 Z" }9 P  h0 v8 C& [+ l  l       SuperscriptBox[8 A0 K: w& h, a- W" F7 K9 g
            RowBox[{"(",
    7 h& o5 s; T$ K! j         RowBox[{
    : `" a+ b. f1 K/ [          RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", $ {+ a, L7 z: u" p2 C
           SuperscriptBox["x6", "2"], "-",
    7 b9 _5 l& R/ _% \& h' y' W1 m+ U% Z  D       SuperscriptBox[: o. e  l7 ^  s# W5 `7 B" B
            RowBox[{"(", ' J, p# R/ H) E" [6 k
             RowBox[{
    1 T. q$ J; k6 F, B% R# Z" A          RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    9 U* x5 }( ]3 W1 M       SuperscriptBox["x8", "2"], "-",
    ) T. v  q2 ?4 I       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 3 v4 D7 M8 \. B& C8 ~8 o! O% M
      RowBox[{"0.5945873894818965`", " ", 7 a# \2 z0 R1 O" h5 j0 h9 X$ z
       SuperscriptBox["\[ExponentialE]",
    9 x9 b1 m( R5 p  ^    RowBox[{"3.1415926535897936`", " ",
    & n  b  n6 Q% {# k     RowBox[{"(", ! t/ t; k$ w7 A+ s2 @1 ~6 e! ^) c: u
          RowBox[{, K9 X# O' Q  X; e. {
           RowBox[{"-", "0.10407011464100005`"}], "-", 9 L% x+ W$ [5 ]2 Z, }9 H$ P
           SuperscriptBox[. l0 i2 u, e. ]+ `
            RowBox[{"(", 8 d# B% h+ t3 A# v
             RowBox[{
    ' a, v. f( I+ |+ M; i' W$ x. P' Y          RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", " F0 l$ C- d! |+ A; V% d8 a* s( M
           SuperscriptBox[
    7 j  F1 C$ l6 m2 q        RowBox[{"(",
    - L) w& i4 H2 B! K% W: v4 x         RowBox[{
    ) A2 T* B8 p, d  G) V  u6 ?          RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    & y# f/ M% }" T( b- W       SuperscriptBox[
    : J0 P2 I, A8 d        RowBox[{"(", , s/ k& X- v0 y, B* d! a8 ?
             RowBox[{
    ) ]' ^4 |! `; g          RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    4 J- Q& m) `: ]' Q       SuperscriptBox["x8", "2"], "-", ( c/ w. o" t. ?6 c: b* w
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    - ]) M- m* H" h  RowBox[{"0.027591936509660075`", " ", ' N% d3 n4 ]% }! o# ]
       SuperscriptBox["\[ExponentialE]",
    9 O5 e6 q. h( |) F1 M$ _    RowBox[{"3.1415926535897936`", " ", 6 e' o6 ]5 \7 Q! J
         RowBox[{"(",
    ; Z; f* S% j3 ?% j7 S8 x      RowBox[{& D1 W+ K( n- u
           RowBox[{"-", "0.31770463544200006`"}], "-",
    1 p# Z* A1 C, K" z' e- [       SuperscriptBox[' i( d$ {7 E; z, i- S3 [& C, t6 d
            RowBox[{"(",
    6 E9 }) J! I4 h# d         RowBox[{; D$ D2 s8 f& i# n
              RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    5 k& I5 b, U  p( C$ Q       SuperscriptBox["x6", "2"], "-", ' q' [6 x) e# O# T
           SuperscriptBox["x7", "2"], "-", % L- E: N. j3 L$ W4 j/ Q8 q, r# e! `1 s
           SuperscriptBox["x8", "2"], "-",
    6 b/ W- ]# k2 d9 Y       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    3 ]# r% e; O2 y3 E6 J  RowBox[{"0.5252475961933536`", " ",   r" B0 I6 ^/ h0 s
       SuperscriptBox["\[ExponentialE]", % i) i) s0 y! O( W
        RowBox[{"3.1415926535897936`", " ", 4 |4 N+ G  o. r: p$ u
         RowBox[{"(", ; Z  b- S) l6 m  [9 ~
          RowBox[{
    3 u0 H7 ~8 J  g3 Q* ^       RowBox[{"-", "0.6410867660730001`"}], "-", ! x8 I: W& w7 a! w' I3 v
           SuperscriptBox[) L+ a) x  V( T/ a8 B
            RowBox[{"(",
    # L3 [1 {5 {$ Y         RowBox[{
    4 e+ j$ w) z, o4 F% g% ?8 n+ i; D          RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", # W3 [1 j5 t; R  i" ]7 X: r( H+ y3 X
           SuperscriptBox["x6", "2"], "-",
    ( B3 I, ~% j, Q8 t       SuperscriptBox["x7", "2"], "-",
    4 g6 D, {, J, f6 N9 E  q       SuperscriptBox["x8", "2"], "-", + u2 m5 }+ f" }* g# s- b
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 8 q$ g/ a* R- ^. m" `
      RowBox[{"0.32047284779644936`", " ", 9 W3 N( T0 Z1 n
       SuperscriptBox["\[ExponentialE]",
    * w0 E6 G* D1 |$ ?! ^    RowBox[{"3.1415926535897936`", " ",
    ! H8 d/ o3 M/ n2 E. L8 Q- n8 N9 ?     RowBox[{"(",
    ! \/ T: ?. x( }- {: ]+ p      RowBox[{8 i' c' Y3 ?/ t6 L( W% Q5 f
           RowBox[{"-", "0.155663887074`"}], "-", 9 L  u) e9 e$ I: L7 {
           SuperscriptBox[
    ! u& E# H. W5 J# M! i4 H8 g        RowBox[{"(", ; D' l  Y( j9 D
             RowBox[{
    6 n1 @* j. h/ c! H; [          RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-", 9 m1 q# [2 M) l' {" B7 F
           SuperscriptBox["x6", "2"], "-",
    $ u' }' `/ D; Q( I% K, y       SuperscriptBox["x7", "2"], "-", ) i9 ^% Z' {  `4 w
           SuperscriptBox["x8", "2"], "-", 6 D/ d, _1 @& P  G& x6 }
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", 1 Y+ X5 ~. L1 B) s  E5 O" j
      RowBox[{"0.7528674241482847`", " ",
    9 }) A5 z! a" S7 W6 q" k& r   SuperscriptBox["\[ExponentialE]",
    * D6 A0 J3 T3 l; N4 t    RowBox[{"3.1415926535897936`", " ", $ b( g7 b4 i  c, x
         RowBox[{"(", " x4 M5 w1 W+ b# o
          RowBox[{
    # F) m0 X# i0 W. w( o$ U       RowBox[{"-", "0.14151232428600002`"}], "-", # p9 R/ m, T+ u+ w9 k: X+ g# T5 e
           SuperscriptBox[% X  @+ Q( j4 n7 v1 U. x# u, m& |
            RowBox[{"(",
    , B9 t$ |6 k# B6 L1 Z         RowBox[{
    3 x& @9 P0 c; t          RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    ) S6 e& Q0 c- a! L7 \5 Z5 V       SuperscriptBox["x6", "2"], "-", 0 c* n1 _% d- {
           SuperscriptBox["x7", "2"], "-",
    3 u% c* h$ j, ?, w$ u# v1 f2 W% u' Y       SuperscriptBox["x8", "2"], "-", 3 X5 j( Y- M1 u8 I( C
           SuperscriptBox["x9", "2"]}], ")"}]}]]}]}]], "Output",
    3 \: O0 Y% o6 y) n, | CellChangeTimes->{3.5779628386090403`*^9}]
    ; w7 u7 ^$ E$ B}, Open  ]],
    7 `& G' g0 e0 `6 X( B
    7 P9 F9 [% d: t0 e- {Cell[BoxData[" "], "Input",5 _# n0 }' P) z% ~  k$ n: b3 X8 i
    CellChangeTimes->{3.577962835879035*^9}],
    & q. n& r# s7 b0 O9 \9 R7 w& \+ G; s- j; Q8 v; F
    Cell[BoxData["\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\:4e3a"], "Input"]," s6 Y- m, p7 v$ ^& }% _

    4 G1 q' c) e' p  \; d6 N' h  XCell[CellGroupData[{
    - T# V$ o; t- D9 M7 [0 u9 `
    $ ?9 q7 E' H- ]* H2 b0 F& @& G1 B/ NCell[BoxData[) x3 B/ h: D4 F$ h9 T; Q
    RowBox[{"y2", "/.", 6 e* N6 a) [/ p5 Q
      RowBox[{"{", 2 K" R* V/ H6 V
       RowBox[{! W; j% r9 [5 W% E
        RowBox[{"x1", "->", "0.7406"}], ",", 3 q2 \" H1 P6 Z/ i, ?. _
        RowBox[{"x2", "->", "0.4621"}], ",", / x& g5 l6 x2 j& k6 w1 L
        RowBox[{"x4", "->", "0.2221"}], ",", " v) N5 }/ L; X- ^; s+ g/ Y5 ~
        RowBox[{"x5", "->", "0.5208"}]}], "}"}]}]], "Input",  P6 ]; p: N7 Y
    CellChangeTimes->{3.577962787784151*^9}],
    ) r7 t, ~& |9 I( K5 k+ z/ U: r% }6 g
    Cell[BoxData[2 o+ u! {& t3 W" G6 p
    RowBox[{( k. I. V9 l8 P8 Y: v
      RowBox[{"0.9125798890455848`", " ", $ g& k5 ^1 V% C5 Z3 l& I
       SuperscriptBox["\[ExponentialE]", ( [% z9 K' R$ q/ b
        RowBox[{"3.1415926535897936`", " ",
    # b# ?8 `' z. \     RowBox[{"(",
    - q6 Q8 L# y! r% p, G& C      RowBox[{) X, p  \8 r  {; M
           RowBox[{"-", "0.17911224641499998`"}], "-",   V2 r) A; K  b# P7 m5 j
           SuperscriptBox[+ ]! V3 J. B! N: c: T4 h! v# A
            RowBox[{"(",
    + q( |( ?% K) Q         RowBox[{3 i* S* F4 F  {5 O! G" W) U
              RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", % s. J% A3 w+ a/ @+ |& k! F7 C
           SuperscriptBox[* c; n7 ?: l; E9 t' N. f
            RowBox[{"(", 0 l1 l( `4 U# S* @; _! W9 S
             RowBox[{- ]: m- a& A0 X5 [4 S
              RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    2 i" T1 M0 d* C! Y1 K; x       SuperscriptBox[% n4 |6 U/ A4 A) i9 i% }
            RowBox[{"(", % V; [$ A/ N( o: G0 _1 _* C
             RowBox[{
    , f, v5 k3 j- m+ ^6 p: ]1 Q  g# R          RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", * n! ^+ i" T# W: {+ ~( Y* D
           SuperscriptBox["x8", "2"], "-", 3 }$ i6 [9 U+ \
           SuperscriptBox[/ i7 ^( t4 G6 ?( i. m
            RowBox[{"(", - ~, a5 Y% {' f# P
             RowBox[{$ Y; `$ R4 B2 t% \' L$ x3 L
              RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+", 4 @0 S$ o6 w2 R/ h! T
      RowBox[{"0.2883186011296682`", " ", 2 Z3 Q0 ~' w0 r& V/ b$ j7 Q
       SuperscriptBox["\[ExponentialE]",
    3 k& K: T6 w& D9 M    RowBox[{"3.1415926535897936`", " ",
    * c; U: ]! A1 r) {/ z4 l" y     RowBox[{"(",
    ( v1 y+ ^: u) Q$ n9 [) I2 k$ ^- j      RowBox[{1 W; K1 \5 J) J
           RowBox[{"-", "0.105619387859`"}], "-",
    ) a" a2 K+ B5 ^       SuperscriptBox[& w, X; g/ m" A- u7 s& [
            RowBox[{"(",
    , T. p6 U6 G) p4 G         RowBox[{
      H- N4 x# S* m" S7 J          RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    7 V; P; y1 e& O       SuperscriptBox["x6", "2"], "-",
    7 U  t: e, k2 L" H, B; j       SuperscriptBox[
    2 Q  H, y* t2 J6 h3 k4 `& L# @  l        RowBox[{"(",
    & P/ V6 n$ T! l( y+ o         RowBox[{
    ( \7 _+ `# [+ D7 H          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", ) M; S3 r$ D: g2 T- L
           SuperscriptBox["x8", "2"], "-",
    / |5 p$ s8 w* O. y4 |+ `0 n       SuperscriptBox[
    # g+ K$ [% M( C8 r        RowBox[{"(",
    , M# ^: b9 }$ f( D( K/ K; V         RowBox[{1 Q1 K3 X, D# X) P7 G, j
              RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ; F* [. B) o0 v- z: \. n
      "+",
    , W: C, b" q0 z! Z9 W  H' C  RowBox[{"0.2115905228598317`", " ", ) J. p$ C1 D% T& l6 N& v& h
       SuperscriptBox["\[ExponentialE]",
    % T0 I# {5 C+ \( R    RowBox[{"3.1415926535897936`", " ", 9 _6 Q" Z$ C8 T2 y4 y
         RowBox[{"(",
    , u5 s& x5 B/ v5 G' e: c: w      RowBox[{; x  H# |5 h/ a: |" ^& V
           RowBox[{"-", "0.236605670085`"}], "-", ! e! G* u" R0 G7 l/ b
           SuperscriptBox[. h( l, y! s( E' @# S
            RowBox[{"(", ( F5 v# j1 u# S" s1 J1 R; r- x8 e' M
             RowBox[{9 x9 T5 @9 E! N- ~" k1 F7 ~" M
              RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",
    ) ^7 J6 s9 \8 Z7 p7 F6 l% i! o: J       SuperscriptBox["x6", "2"], "-",
    8 y" h+ A- m/ U2 U( U* s       SuperscriptBox["x7", "2"], "-",
    1 n% k8 z( G- c  f8 _: L% p: F3 ~       SuperscriptBox["x8", "2"], "-",
    . `4 @. V7 ^" L) V0 |       SuperscriptBox[; v8 c8 |: i1 C5 N1 F1 K# N
            RowBox[{"(",
    ; U- _0 R' @' u( g+ d0 H9 m         RowBox[{
    - Q  ~1 j1 K: j6 e          RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    : H& G+ Y4 ]0 V/ m  "-",
    0 S: i' z; d; b, x4 ~0 \  RowBox[{"0.22829938846668896`", " ", 8 {3 [1 {" |' O
       SuperscriptBox["\[ExponentialE]", 9 Q8 {: X6 |. u, R: j1 n
        RowBox[{"3.1415926535897936`", " ", 9 t# v" w4 ~, o/ S' D5 S
         RowBox[{"(",
    : F0 \% P/ v' D      RowBox[{
    , u5 i9 e% e- C- \. S! D       RowBox[{"-", "0.46221081830200006`"}], "-", ' }' R3 O6 Y+ U* S" z9 P
           SuperscriptBox[
    1 ~( W- j/ {% y2 \        RowBox[{"(", 0 f( I) t! x% t: J# i! H; y
             RowBox[{5 L  ^( A! m- f& u
              RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    $ T' ~  p( u; N; I& k2 r, V  s       SuperscriptBox[: K( S  j- w4 W' @# O5 T
            RowBox[{"(", 0 X# y  S9 E- k2 y4 h
             RowBox[{
    1 j3 w+ D9 w6 V) x0 `5 Q          RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", & ^* Z! d6 @! S. W- f+ b
           SuperscriptBox[: J) v9 F  ?1 U) p; d; [  i, R0 J
            RowBox[{"(", ) ~* l) h( v: e1 {$ A7 q6 X6 v
             RowBox[{2 n/ b' v9 ]" o
              RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", 3 Y3 \; d1 q  B( y$ A: D8 m8 B9 ?$ m
           SuperscriptBox["x8", "2"], "-",   |- \' r( C7 i" }& z1 R: f& E
           SuperscriptBox[
    ( l4 K/ K4 L& j# m  P" D        RowBox[{"(",
    ' f0 \" [: W' J& r5 ]1 v         RowBox[{+ r8 K* y8 v/ f' Y8 y
              RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    0 r/ G. U8 }& m) E" B0 |. H2 P  "+", ' l" {/ A6 u7 ]( x  G0 d
      RowBox[{"0.27551257162880105`", " ",
    4 ~3 a# ~& G$ C9 u$ ^   SuperscriptBox["\[ExponentialE]", ! X; Q6 o, ]( N. z! s( T8 ?9 t, ^, [
        RowBox[{"3.1415926535897936`", " ",
    % C* @) k* S* D: c* D  c     RowBox[{"(", 6 R+ D3 p4 r4 l# n! @+ D
          RowBox[{1 K; L9 U1 B1 o! z* Q& Q& c3 X
           RowBox[{"-", "0.5837889295140001`"}], "-", $ {* L4 q. w4 W" r
           SuperscriptBox[
    ! s9 `  f1 Y% ]2 j9 i- v        RowBox[{"(",
    , x# i, Y, y; y         RowBox[{
    , F, F- ?  k, ^1 x; d6 I4 ]8 E6 \; F          RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", * ^4 k* r$ w4 k) h3 _- x
           SuperscriptBox["x6", "2"], "-",
    , [* D0 S+ _/ N. T. z0 Z       SuperscriptBox[* `& S) w' k) V: L  E
            RowBox[{"(",
    , t* W1 J: `) R% b9 Z' g         RowBox[{; R* \  G8 u! i8 o& q, T
              RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    ! B: t/ h2 T  ?! o; B3 ~       SuperscriptBox["x8", "2"], "-", 9 [' d% G! N" ]* d, b
           SuperscriptBox[
    : T/ X! T: w& [" I# j        RowBox[{"(",
    / Q' s7 L- U! J* U6 x( Z         RowBox[{6 d2 Z+ B, w+ s5 q$ m9 f
              RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    5 H' v7 X# Y& v$ m  N+ ~" h% F) X  "-",
    ) A$ ]* N+ V+ Y. \# Y  RowBox[{"0.12620581913715256`", " ", & r9 B5 ^( X4 x/ g. k' W% ^9 G% F
       SuperscriptBox["\[ExponentialE]",
    ' i  S$ X$ O6 Y5 R; K3 z+ m    RowBox[{"3.1415926535897936`", " ", : i! `+ s$ c( A( q
         RowBox[{"(",
    - Y" j4 y- J- D      RowBox[{
    " n6 Z1 j4 k5 Z5 ]3 i       RowBox[{"-", "0.19030188470200005`"}], "-", : S& ^  X, n- j4 ^: r$ s% D
           SuperscriptBox[
    * w. ~. D7 }9 @, N3 N  u& i5 k1 \        RowBox[{"(",
    * E  S' V1 z+ f' G         RowBox[{! L! r9 R6 E0 Y. ~$ g+ }: U4 W
              RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", . N+ L, |' P$ I
           SuperscriptBox[6 I# }( [9 }( Q4 ?5 r/ o- y
            RowBox[{"(", + R6 }( C3 a9 _
             RowBox[{7 X3 Z  n  \. d% H; Z0 h
              RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", 9 S, v  i) u9 v
           SuperscriptBox["x7", "2"], "-", 6 i9 i$ f, E+ U% d7 ^
           SuperscriptBox["x8", "2"], "-",
    ; B8 U% x( P% r' \       SuperscriptBox[2 J9 E/ y2 m& ~! f4 P& C- b
            RowBox[{"(",
    ' ~; N& P6 _7 q1 m& @         RowBox[{. ^2 Q  C5 _& n4 N
              RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    0 M: m9 u7 o6 L9 s1 q+ ]$ C  "+",
    2 t' m* G- J- w5 O2 ~) q0 [  RowBox[{"0.12782130225993898`", " ", 2 L# d1 r/ d0 w) [+ m: F$ I
       SuperscriptBox["\[ExponentialE]", 4 W7 \; p& K1 p+ m% p
        RowBox[{"3.1415926535897936`", " ", 0 C; I" |5 H4 n$ l& T2 c
         RowBox[{"(", ! f" w; u) J) x  l
          RowBox[{- T* U4 V1 H! E1 ]$ f4 A
           RowBox[{"-", "0.28518780882`"}], "-", 8 z4 z, R: F8 m* r8 ^* H8 [0 ?
           SuperscriptBox[6 S* U+ ?4 z( a' ]5 ]6 {6 v  e
            RowBox[{"(",
      C1 B" t2 I. j, u5 b7 ]4 a9 ^# v6 w         RowBox[{5 Y5 T# \/ \/ Y( @) H: }
              RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", 8 p, d+ e5 z) \$ u8 _# Z
           SuperscriptBox[
    5 [4 }! z. v. Z( I        RowBox[{"(",
    # _; L0 T: P; X7 G; y         RowBox[{' D2 g9 C# ~: r7 A0 y$ U
              RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    * c3 [) z8 p. U# G* @8 k       SuperscriptBox[9 \& w: E' ?9 s* ]
            RowBox[{"(", 8 O/ o1 Z/ @4 Y7 q/ T. h+ d
             RowBox[{
    % l8 w5 V3 O6 J+ T  D          RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", , X2 V' A2 w' v# M. v
           SuperscriptBox["x8", "2"], "-",
    ) _9 ^; T2 V$ c: N2 S; p3 H       SuperscriptBox[
    9 F3 z' x+ B7 u: i( S        RowBox[{"(",
    , m7 c6 o4 \, r% o5 O         RowBox[{1 V% S% o4 J: d! T) }1 T* f
              RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    ! k  {; f9 w* o  c- ~/ i  "+", 3 h% f9 f. w, m9 b2 R
      RowBox[{"0.23615247809381104`", " ",
      r3 O/ k8 M" e   SuperscriptBox["\[ExponentialE]",
    # ~* G! i6 R" N( N: T. Q$ `    RowBox[{"3.1415926535897936`", " ", . d7 a4 z! E2 o; s) L  U3 q# O
         RowBox[{"(",
    # ]( \2 y4 Z0 w/ x      RowBox[{
    : S$ R: O, Q; Y: o8 O% I  G% `       RowBox[{"-", "0.11387365200400001`"}], "-",
    ; n6 ?; c6 x! J: e" k/ l       SuperscriptBox[+ \$ [* ?# M+ F  Z/ S3 o
            RowBox[{"(", 6 z( }% m' R: s7 X
             RowBox[{
    : F" i, ~! G  w* q          RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", * _5 |/ I( j1 i8 M" E1 K
           SuperscriptBox[
    0 U. b# F/ ^: i- M' O/ v+ B        RowBox[{"(", ; B/ z* Q& k, }! U# @8 ?
             RowBox[{
    ' R( q; H  B+ g          RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
    : ?8 I( M8 e# W; C/ P0 A       SuperscriptBox["x7", "2"], "-", / h% a# g; L( j& F  E5 a) n3 \
           SuperscriptBox["x8", "2"], "-", - f9 z! ], F- e, m3 c- x+ f" H9 V2 I
           SuperscriptBox[
    5 \) F7 _3 W% p        RowBox[{"(",
    ; q8 y1 l5 |, q! C2 i8 q         RowBox[{1 l/ I  ^5 ]3 s8 U' k  D
              RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ; U" U) `2 G0 ?9 u, V, S
      "+", ) r  B: a1 U6 T% C) C
      RowBox[{"0.3207174990295845`", " ",
    : f4 p3 @5 H1 p. A* E1 M   SuperscriptBox["\[ExponentialE]",
    ' Y7 c, J* \5 t6 o1 l' u    RowBox[{"3.1415926535897936`", " ", 9 F9 h5 m+ Q- |) E
         RowBox[{"(", ) H' ?  g% {1 O6 e: E6 m2 ?
          RowBox[{
    2 A8 [$ Y' j# V" b+ t       RowBox[{"-", "0.11442644782500001`"}], "-",   z5 p! G' U" L/ L: `* M
           SuperscriptBox[4 ^8 B9 d/ V6 X, l, A
            RowBox[{"(",
    * _3 ^8 D5 p( c6 J         RowBox[{
    2 b: u- D. i5 b" D          RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    / m$ Z7 R4 A4 h2 w& Y       SuperscriptBox["x6", "2"], "-",
    5 b$ W. @% r# N# F/ m) _       SuperscriptBox[% _* ?. A  e9 Z4 `
            RowBox[{"(", 6 y/ \) g0 M5 ]5 [
             RowBox[{
    1 U( l  `  M, Q3 L; C9 n          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    ) E+ Y; U1 Y6 T1 G* R6 ]! t/ C8 i       SuperscriptBox[
    , k) s" ?2 w$ I) r        RowBox[{"(",
    1 |. ?3 J% ]: L+ {7 [+ p( y         RowBox[{  A( V0 n, a3 T; S( f# a
              RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    * s2 c) q& K% d6 s9 [( c& J6 ?" u       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
      F/ w( m5 |9 F" U# r! r: e; P  RowBox[{"0.15852708848338293`", " ", ; K& k# @8 o/ z# T
       SuperscriptBox["\[ExponentialE]",
    & R/ ~: x) H; p. ?    RowBox[{"3.1415926535897936`", " ",
    " h, v* p& G& U  ~/ y     RowBox[{"(",
    , F( |# o( o* V. b9 t$ F4 V/ e      RowBox[{- c# v( s* }" X5 m8 {, H: n# g
           RowBox[{"-", "0.21008576609800003`"}], "-",
    4 b; ~+ [* k- z. v       SuperscriptBox["x3", "2"], "-", & A2 J& u# ], v1 R% s$ z) H- o- _
           SuperscriptBox["x6", "2"], "-",
    0 d+ z+ n" N! x! E% L0 K       SuperscriptBox["x7", "2"], "-", 3 t0 g4 C8 J0 O* x2 t
           SuperscriptBox[/ E0 Y/ L2 l- H7 W9 t. b5 S* n1 o
            RowBox[{"(",
    4 f6 z$ K1 H, C! ]6 c3 O         RowBox[{
    ( l& S  P% {0 x6 i9 y6 l) c          RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", ! _$ c. P9 {. |. `/ d
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", # d# G) f+ b7 c# p" N' Y- [
      RowBox[{"0.6019775648968266`", " ", 6 |+ X4 B' U! V4 E7 V: J# W! \) Q
       SuperscriptBox["\[ExponentialE]", ( ]. C/ |' b, b8 S
        RowBox[{"3.1415926535897936`", " ",
    3 e% w* \2 _# l) E     RowBox[{"(", " G) p7 L, h2 q1 R( J
          RowBox[{
    ! W; l  W2 c. ]1 }; n       RowBox[{"-", "0.4481471925460001`"}], "-", : I7 b# X8 b9 h5 X4 r+ O( E
           SuperscriptBox[$ j1 v% N+ c  t" Q$ y3 c
            RowBox[{"(",
    1 @2 R' c( T& n9 `8 m$ t         RowBox[{
      u! {, _  N% ]- |! b          RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    - E. f+ \5 B; ^- e$ ]8 g       SuperscriptBox[
    + ?; N2 o3 P0 k) t* U: l0 C        RowBox[{"(", ! o  U, y" o( [0 P4 ?" ]
             RowBox[{$ n% f5 C$ X/ x. n4 q! N
              RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", " {8 [+ z: Z! f
           SuperscriptBox["x7", "2"], "-", 5 L3 @! C3 J8 l8 }+ ~- l
           SuperscriptBox[
    * K" v; V- m2 `        RowBox[{"(",
    9 X, @% Y3 `9 ^, z, p4 `         RowBox[{
    ; t5 y3 w# _2 L- |% b9 ]          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    ! M6 D, g, t6 }; v       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", ' X1 ?6 P" H+ `: T
      RowBox[{"0.16041393254115266`", " ",
    5 T! m4 g& `* a2 i0 h+ f   SuperscriptBox["\[ExponentialE]",
    % }' ^3 ]% Z8 o. J    RowBox[{"3.1415926535897936`", " ",
    , i5 [. }% t  J' N     RowBox[{"(", , |" C3 u, s) h' n1 f
          RowBox[{
    5 S" t  `1 I7 d6 F  W. \       RowBox[{"-", "0.08722659614000003`"}], "-", & i9 ^$ Q* ^) y4 d
           SuperscriptBox[; }4 Y; }  d: |" ~- O2 c
            RowBox[{"(",
    " ^* U( {0 `# [: [1 p* R3 S$ S0 w/ q         RowBox[{. ]8 d# _& D+ x( v- X7 z5 [6 x2 x) L
              RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-",
    : R3 ]& j% j! ~. I$ h- w& |       SuperscriptBox[
    9 A" ?  B, _; W$ ~& ?        RowBox[{"(", 2 N$ Z1 x4 D/ @0 x
             RowBox[{
    : V3 |; Z0 A2 I          RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", * P0 R- ?$ Y$ A
           SuperscriptBox["x7", "2"], "-",
    + Y. T1 \" T: ?4 e9 m0 S       SuperscriptBox[
    . S: b  W# n: l% L        RowBox[{"(",   q& ^1 J  N, ~* n2 V
             RowBox[{
    4 P" Z9 j% n$ T4 C1 W* E          RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    1 Z( {/ t3 C- U0 J, _  L( p; u2 k       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    5 `' J, L2 S+ G, ?* d  RowBox[{"0.482281849713638`", " ",
    - J" B0 y: @. }* N   SuperscriptBox["\[ExponentialE]",
    - j6 l4 b0 c( `    RowBox[{"3.1415926535897936`", " ",
    ' W( l5 p8 h8 Q     RowBox[{"(",
    ) [' U+ n( e- ^' x; t" s      RowBox[{9 Q, d+ [) Y  [3 s4 {& q) d
           RowBox[{"-", "0.23738217000100004`"}], "-", 3 y2 ]/ v; m# W# Q% A( H
           SuperscriptBox[1 ?! a9 W: G$ I; J# r: ]  r, s
            RowBox[{"(",
    . Q: f  O1 d6 _         RowBox[{
    ' [) i7 i" _6 L" c9 }          RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    $ O3 g5 \; Q3 J) x       SuperscriptBox[2 S+ d# A( D9 x7 z. c6 @$ L
            RowBox[{"(",
    4 p9 ?; x3 K" x+ E         RowBox[{- Y/ Y5 T% ~! \2 n4 g
              RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    " S- q7 |1 v4 E# R2 m, b3 b* K       SuperscriptBox[
    8 |9 Y; J6 U, m        RowBox[{"(",
    & t, A8 E7 w, ~% J7 w- F         RowBox[{. ?, m, D) b: Q: n
              RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-",
    ( \# @7 b+ H; N: p0 M3 w5 _       SuperscriptBox[
    " e, J# V: p6 K$ c        RowBox[{"(", . v, i4 t1 j$ N% ?
             RowBox[{" ]5 i. y" d4 E, v7 @$ [) j
              RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-", , i. T' z) s# [
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    8 Q0 h' H- ^; w) q4 \* s  RowBox[{"0.29549238400772093`", " ",
    0 a6 c% t& i& i) ~" j   SuperscriptBox["\[ExponentialE]",
    8 S* ?* {/ k. S    RowBox[{"3.1415926535897936`", " ",
    , X5 \) G9 ~7 x4 |1 L+ r     RowBox[{"(", ; e6 a( ~; n/ ~; O8 W
          RowBox[{5 S) e( f: M/ L8 A
           RowBox[{"-", "0.19162171876400003`"}], "-",
    % S0 e( n* U6 x# n       SuperscriptBox[
      f2 c- ^+ R2 h2 A* w3 c        RowBox[{"(", ! `5 w( T# f! [- B
             RowBox[{
    $ W$ w( J- U/ _* @. z          RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    9 A# d9 d) _$ t8 G* ]0 \       SuperscriptBox[# e2 B( S, e& I$ o, F. w
            RowBox[{"(",
    ) H# S3 `" U# k! g: i! i0 F: G         RowBox[{
    1 v, [% S- K8 }: |          RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
    & t. j; z6 j3 U9 C- I       SuperscriptBox[0 G8 r9 O; l3 {2 m
            RowBox[{"(", 3 y5 Y, g. f* s; n  T  h
             RowBox[{
    7 u* E/ z; q2 y* T          RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",   @' Y6 s* H7 h# }) B  g6 G
           SuperscriptBox["x8", "2"], "-",
    7 l% z% D. x/ E) c% W5 i5 I       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", 4 P* _& D# r- P: ]2 J5 A7 P
      RowBox[{"0.31296872769679895`", " ",
    # o4 e2 d1 |5 T) q2 r. _   SuperscriptBox["\[ExponentialE]",
    / O& b2 C9 t3 g. `! ?    RowBox[{"3.1415926535897936`", " ", 8 P( e% F2 k! g- ~. D9 _) Y0 l9 x
         RowBox[{"(", ; ^5 V4 Q$ N% S; z! [: x
          RowBox[{
    + F% b0 Q8 `4 F, f+ J       RowBox[{"-", "0.109748954594`"}], "-", ! T0 }7 \  m2 Z5 Y
           SuperscriptBox[+ E3 p  O# N6 P6 Q( b4 S
            RowBox[{"(",
    : j9 O" w" c6 K% y+ O         RowBox[{
    0 N0 ]: W- X* `  y5 Q6 f8 H          RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", ) n0 q1 K8 m, w9 `2 G
           SuperscriptBox["x6", "2"], "-", ) l9 b- o8 J, |4 I+ s
           SuperscriptBox[
    . z2 X! S* `7 Q, a0 S        RowBox[{"(",
    5 ~/ K9 d. V- b6 W3 @         RowBox[{9 r" i9 g5 L2 ^& ~6 u
              RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-",
    # Z. d8 v3 V/ w5 A. E$ c; x       SuperscriptBox["x8", "2"], "-", 0 O) v& j3 }2 t
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    ( C8 h- X/ w6 \2 H0 Y  K9 E  RowBox[{"0.4666313851213299`", " ",
    / d. R; i3 m1 o  n3 E   SuperscriptBox["\[ExponentialE]", ' \) @1 k. m4 g- K
        RowBox[{"3.1415926535897936`", " ",
    . X  `6 e) e1 V0 r6 _4 Q6 x! H     RowBox[{"(",
    8 o. f/ V6 t  d      RowBox[{) m, D/ R: X; h; z& s1 \
           RowBox[{"-", "0.14616677062500003`"}], "-", 5 u- t; p2 D% G, g# \& o* X/ b
           SuperscriptBox[: }2 M8 q4 C' e$ J: f0 D
            RowBox[{"(", 4 O' u5 n+ s7 I% X9 L
             RowBox[{
    4 O) `8 x5 D, e$ ~          RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
    ! W7 k+ V) r7 m, T7 X       SuperscriptBox["x6", "2"], "-",
    , @* }( A' F8 N9 W( w' O# |# Q; D       SuperscriptBox[% ~, R5 R/ w5 [1 c8 T* Q6 i- S, v
            RowBox[{"(", ) a9 w* @# h/ D5 a3 m1 x& B
             RowBox[{" n( h+ p; t1 c: Z' f
              RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    ! N. W3 d2 h3 T% A       SuperscriptBox["x8", "2"], "-", ; W! q9 x2 Q+ o  W3 \. w* b1 k
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    ; u4 c5 G0 L' E/ B/ c$ f  X  RowBox[{"0.37419828116611387`", " ", : ~3 N! x, G* _# O: w- _
       SuperscriptBox["\[ExponentialE]", ) U9 _( C  ?" T
        RowBox[{"3.1415926535897936`", " ",
    4 F- F- W# f8 _, J1 P) `     RowBox[{"(",
    ! _# Q' X5 F2 d8 ^5 n% h      RowBox[{
    - O& e9 R# T- W2 E! W, `9 t% c       RowBox[{"-", "0.10407011464100005`"}], "-",
    5 s% W4 E& M, U( d- U* W       SuperscriptBox[
    % c& X( ?' }+ S' m1 Q9 h6 a+ `        RowBox[{"(", 6 W; a7 b& j" L
             RowBox[{& ?2 u7 Q; h6 I0 d7 e$ l( ^$ R
              RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", 3 Q6 q: S% [: C7 R( M4 b) x/ P
           SuperscriptBox[
    / S2 i3 g: S( g+ u' A        RowBox[{"(",
    . i; r4 `1 i9 t# e         RowBox[{( R( O5 M5 e1 T5 K5 W# G3 V
              RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-", 5 K7 j6 U5 L/ ^$ Z1 F" x/ P
           SuperscriptBox[  G& x7 k& f/ C5 Z
            RowBox[{"(",
    $ E/ e+ ]" Z) }$ U! D4 j# `/ k" w         RowBox[{, a4 r% K5 W" m! u0 A
              RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    - E0 j1 R+ ]+ P       SuperscriptBox["x8", "2"], "-",
    + `+ ~8 _/ Z/ s9 }: T! u( B       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    # L* R' l- M( x8 h4 J  RowBox[{"0.025873988843992612`", " ",
    / r( V6 }! V8 }% v* y$ O! b   SuperscriptBox["\[ExponentialE]",
    * f9 [0 u' {! m$ c/ ], |% y: F4 m    RowBox[{"3.1415926535897936`", " ",
    : w5 ]7 B4 C7 m4 t     RowBox[{"(",
    6 _! [. Q  v" Q) v- @      RowBox[{. z  c# t6 m0 p. u/ }
           RowBox[{"-", "0.31770463544200006`"}], "-", & L- S9 l0 E! o9 ]) \3 Y
           SuperscriptBox[
    * s: k) ]8 m4 {6 g. j        RowBox[{"(",
    4 x/ v4 S5 ?2 o4 X( O, _4 @' y4 ]         RowBox[{( s! ]- a6 b! w2 {7 p5 I
              RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    $ ^2 Z& p& y9 y3 }6 q7 k8 E       SuperscriptBox["x6", "2"], "-", . o+ Q# h0 ^, _" u
           SuperscriptBox["x7", "2"], "-",
    3 C5 v1 j( t3 i. a6 x       SuperscriptBox["x8", "2"], "-", - e9 g6 ~$ O, L7 }% c6 m
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    . n. \  t. _, Q  RowBox[{"0.5575503376854455`", " ", % @* V4 {* D* G
       SuperscriptBox["\[ExponentialE]", 5 a7 G( d+ C4 A! e
        RowBox[{"3.1415926535897936`", " ",
    ! I$ w) f/ L5 i" u8 @) d* y8 H1 p  ^2 B     RowBox[{"(",
    - \2 I- K% c2 Q4 Q+ j- S  K      RowBox[{6 o1 ?( }4 I5 I  A5 B$ R( E
           RowBox[{"-", "0.6410867660730001`"}], "-", + O3 x3 R. k6 P1 u
           SuperscriptBox[
    : Z' _- G3 V% l: b/ F        RowBox[{"(", ! L( i. e8 V7 ~& L
             RowBox[{
      _2 m$ G/ X; T& n          RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", 5 O6 ?' q# b. P% ?
           SuperscriptBox["x6", "2"], "-",
    ( I6 a. f3 s- L& s: K$ b       SuperscriptBox["x7", "2"], "-",
    " H( }! g- u5 K$ ]/ Z6 W       SuperscriptBox["x8", "2"], "-",
    , v  @0 d/ V: x6 n       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    * s: G1 u* {, A3 m' F( n  RowBox[{"0.13398540448199214`", " ",
    8 u% Y) ]* h% ?: v( K. W5 U& t- Y5 e   SuperscriptBox["\[ExponentialE]", 7 W5 Z$ W* F5 E+ y$ M
        RowBox[{"3.1415926535897936`", " ",
    ; v+ O) M: t- v- Z3 [     RowBox[{"(", % O5 t; Q( F, p* ]& n6 R! o
          RowBox[{4 C; C, m0 t: g
           RowBox[{"-", "0.155663887074`"}], "-",
    % i, n/ w8 [8 Q- J5 p# M       SuperscriptBox[/ K" i! ?* q7 ~. `
            RowBox[{"(", , C# ?' E' R, |  z
             RowBox[{! R0 @8 F4 Y& R  k; m* O4 a
              RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-", ! y+ `8 `, b3 m3 C. y; j
           SuperscriptBox["x6", "2"], "-",
    " X9 S/ c: p) _4 a# k       SuperscriptBox["x7", "2"], "-", + o/ n$ N0 T0 }* Y
           SuperscriptBox["x8", "2"], "-", + A, A/ L& i0 M: V8 P+ d# b0 N
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    ; C6 b. O; x) b, F0 m  RowBox[{"0.4572385099113415`", " ",
    # E4 Z* C  L! }# ?$ }- a+ S$ A   SuperscriptBox["\[ExponentialE]", . O# z7 L3 X3 o0 U1 B  e
        RowBox[{"3.1415926535897936`", " ", 0 B. r' l% L6 i& A$ Y* V
         RowBox[{"(", 8 L: T' w9 J# a7 r" L$ q9 j
          RowBox[{
    ! _0 M, l5 J  H7 Q7 V" U. N& E/ V       RowBox[{"-", "0.14151232428600002`"}], "-", 5 }2 u; g! C  ~
           SuperscriptBox[
    $ ^* `1 T2 e/ o. J- k3 _1 m        RowBox[{"(",
    , O/ N& n% D0 H3 Y0 N# E         RowBox[{
    2 p& n/ ~' P* [          RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-", : x( |+ P, _: U& m
           SuperscriptBox["x6", "2"], "-", 2 l" c+ Y" R8 y' C' m  B
           SuperscriptBox["x7", "2"], "-",
    / z3 D4 b5 X9 y5 A% a, B       SuperscriptBox["x8", "2"], "-", * r& F  ^$ i) j  R  f
           SuperscriptBox["x9", "2"]}], ")"}]}]]}]}]], "Output",! C/ E7 A* _: w# P
    CellChangeTimes->{3.577962841401445*^9}]
    9 j+ O; i: S5 |: T}, Open  ]]# j$ j7 e, n  a# M! Q
    },5 J& A& u3 a. [8 ?* ]
    WindowSize->{1093, 659},% a( ?3 }: q! `# s( W
    WindowMargins->{{61, Automatic}, {Automatic, 15}},
    2 U* k, ]: x/ ], {7 JFrontEndVersion->"7.0 for Microsoft Windows (32-bit) (February 18, 2009)",
    2 J3 a, ]. f' UStyleDefinitions->"Default.nb"
    4 v/ Y8 P( D. Z% E]
    : i  j: E( b4 ^9 d$ _(* End of Notebook Content *)0 \- H% u2 P3 R/ }

    + d  L( n" J" F(* Internal cache information *)
    9 D4 M7 P% k: n/ I/ }+ z$ E. D(*CellTagsOutline
    / m6 ~" b1 _% }) j# TCellTagsIndex->{}
    . f: W$ H3 Z& c+ E*)
    4 i4 P5 o- o" d(*CellTagsIndex
      ~' a! h% u  H. `1 h- KCellTagsIndex->{}0 z0 T, T! s4 b: p! {5 o6 z
    *)
    ! W5 Q2 C. o/ T& R0 G$ z(*NotebookFileOutline
    2 v/ u7 Q3 M, B# BNotebook[{
    . `% I2 b0 s8 B7 u0 v; A  ?7 nCell[CellGroupData[{* j$ ?. Z( R' A- w7 ~3 \
    Cell[567, 22, 22639, 450, 1792, "Input"],) r2 V: w( r* z( |* P
    Cell[23209, 474, 21281, 449, 1703, "Output"]" a2 Z/ M7 X) {3 o
    }, Open  ]],
    : v; j+ @5 O: O( _( ]5 U  ?, HCell[CellGroupData[{8 u5 j5 Q0 _, e4 ]6 S8 M4 |
    Cell[44527, 928, 198, 5, 31, "Input"],# |. A# i* j. m9 D+ [2 r
    Cell[44728, 935, 53666, 1605, 1532, "Output"]
    % q4 H; t& }/ L! U$ l5 h}, Open  ]],: A% @9 c$ X7 o  Q
    Cell[98409, 2543, 614, 16, 112, "Input"],: @% Z8 T; i1 |" ]% r: Y- y. z
    Cell[99026, 2561, 667, 17, 72, "Input"],6 b2 T8 _, l: m7 d3 [
    Cell[CellGroupData[{' P: A6 N( c2 L3 R! }
    Cell[99718, 2582, 885, 13, 52, "Input"],
    9 q: D6 `+ c% l0 d$ u- I* ~4 E) w4 QCell[100606, 2597, 935, 14, 30, "Output"],3 C) x# W) n8 J& e
    Cell[101544, 2613, 932, 14, 30, "Output"]
    : [8 j% A: h+ d$ V}, Open  ]],
    % `( c1 O. T, D! g% o. l3 m* ZCell[102491, 2630, 4236, 93, 412, "Input"],
    ( J" d7 N+ H3 aCell[CellGroupData[{5 f) E& U4 L' z: i% M0 k& i" Y
    Cell[106752, 2727, 90, 1, 31, "Input"],
    3 X! _' H5 o# G% o' y3 ICell[106845, 2730, 872, 13, 30, "Output"]: g, f( w  q8 E# p& n; K: {8 ?
    }, Open  ]],
    * j  w) O! Z1 RCell[107732, 2746, 458, 10, 31, "Input"],
    ) Z# I, [4 F( v! ?4 |Cell[108193, 2758, 126, 2, 31, "Input"],: g8 S! y% B8 k( }1 R& s2 ~! D
    Cell[CellGroupData[{$ N9 u  g* Z1 x' o
    Cell[108344, 2764, 248, 6, 31, "Input"],
    4 e1 @; N! l" x  |  l* lCell[108595, 2772, 1007, 17, 30, "Output"]- B6 ?$ O; j. L% g( @0 ~, m: Z
    }, Open  ]],
    7 e; \! z- K: F( V+ B! P8 r! @/ O- xCell[CellGroupData[{5 Y- y* h5 f0 r4 Q
    Cell[109639, 2794, 251, 6, 31, "Input"],) o9 d. b, M# i2 @& I/ \$ y8 c
    Cell[109893, 2802, 1013, 17, 30, "Output"]
    & ?6 _4 w" d; M# K4 J}, Open  ]],
    ) c1 g' C/ f; l; ]Cell[110921, 2822, 1232, 23, 31, "Input"],
    # C6 w6 d8 ^: Z; p6 DCell[CellGroupData[{
    ' G1 W: }  F$ B8 q! |Cell[112178, 2849, 147, 5, 31, "Input"],. D+ C" |0 z1 @; r2 S
    Cell[112328, 2856, 1979, 50, 50, "Output"]
    0 Y( m. X( L' m+ _$ K& J}, Open  ]],
    / m8 C# p8 b# V" x, M1 ZCell[CellGroupData[{
    3 S9 m/ r2 C7 {Cell[114344, 2911, 195, 5, 31, "Input"],
    ( x0 p( ^% U  o7 }6 H3 b# s& i: G9 FCell[114542, 2918, 123, 2, 30, "Output"]' w' v( ?6 H; M/ C0 S6 m  b
    }, Open  ]],
    . P9 }0 }1 _: U/ Z6 f2 c0 R9 q5 gCell[CellGroupData[{$ }: a8 m0 g& \/ J3 a* [* P/ W
    Cell[114702, 2925, 144, 4, 31, "Input"],
    5 s% Y$ d$ ^& e( }Cell[114849, 2931, 96, 1, 30, "Output"]
    8 j0 }1 }3 c0 j6 D& ^( H" C* ~}, Open  ]],
    ) \4 G  Q+ H. j: U- ?- bCell[CellGroupData[{6 N7 g/ C* F6 r7 \( R$ P
    Cell[114982, 2937, 146, 4, 31, "Input"],4 R$ W( ]; {/ o, d% W
    Cell[115131, 2943, 495, 7, 30, "Output"]
    6 L! P4 }4 T" }. ]}, Open  ]],; `9 p" `5 p" Q+ t* `
    Cell[CellGroupData[{; J( {1 ^  |* E$ r% b! n
    Cell[115663, 2955, 144, 4, 31, "Input"],3 k( b8 k( B& \/ h! M
    Cell[115810, 2961, 418, 6, 30, "Output"]; c5 A1 D* P9 q( b$ O
    }, Open  ]],/ Y$ L; @1 v& Y6 F4 L! K& F( D
    Cell[CellGroupData[{
    . n; [/ j9 `5 Z; l6 z: SCell[116265, 2972, 144, 4, 31, "Input"],
    8 W$ t' s3 q' U$ F. gCell[116412, 2978, 549, 8, 30, "Output"]
    0 y1 E" B7 {4 R2 t6 Z0 U& D2 @}, Open  ]],
    5 Q6 t9 f. h2 NCell[CellGroupData[{* \3 r: J; ]9 N! F& P* @, y
    Cell[116998, 2991, 537, 10, 31, "Input"],
    ' E; j, ?3 b, PCell[117538, 3003, 998, 14, 30, "Output"]
    ; P" S3 F4 O0 x}, Open  ]],( x" A' e; c2 N1 {4 a7 m) i, {9 D
    Cell[CellGroupData[{
    - ~, {# ?0 C% zCell[118573, 3022, 2321, 55, 44, "Input"],* x6 y1 ~/ R1 t. d$ D  Z9 [( J
    Cell[120897, 3079, 1541, 38, 91, "Output"]
    5 W" v, I) a" Q0 J# |4 r}, Open  ]],
    5 ~" {* d7 f8 A. D. ZCell[CellGroupData[{
    ) G$ F% U) G) S* Y, g  Q8 cCell[122475, 3122, 856, 19, 87, "Input"],
    ! D$ A8 U! k" h- ?" }3 UCell[123334, 3143, 568, 14, 91, "Output"], S. M' O! z* ]( [
    }, Open  ]],5 W6 Y- U" k7 ^" v4 r3 U7 Z3 Z0 J; L
    Cell[CellGroupData[{
    * X/ h# O0 g$ n( s  c% ?Cell[123939, 3162, 437, 10, 31, "Input"],1 O, B, Z' k) I/ c& F
    Cell[124379, 3174, 739, 12, 30, "Output"]
    / d; k; h* t" v/ o4 w8 v# W! [}, Open  ]],
    & [6 H" u1 W1 D- b7 w$ jCell[125133, 3189, 242, 3, 31, "Input"],
    6 ?9 k+ N) B& n( ~8 l6 `Cell[CellGroupData[{  C4 Y6 n4 T" e9 `0 k
    Cell[125400, 3196, 109, 2, 31, "Input"],, _! N' N' ~4 a3 Y, M, h- t% e
    Cell[125512, 3200, 323, 7, 30, "Output"]0 ?, X' U) y: B" `
    }, Open  ]],
    5 m$ q2 c* {) G5 b8 t; `& U0 Y. mCell[CellGroupData[{
    ) ?( M* M6 f0 f; [) v) @' OCell[125872, 3212, 526, 15, 31, "Input"],
    : f8 v. p" X- Y) ?. N% }2 Y) fCell[126401, 3229, 1436, 44, 36, "Output"]
    ) W/ ~$ O/ z" L, x}, Open  ]],4 {0 i+ @( m, s8 _3 x5 b8 j8 ^
    Cell[CellGroupData[{
    2 J# Y$ Z8 \2 t9 \, t% g6 P, _Cell[127874, 3278, 92, 2, 31, "Input"],& i: g/ E; V! B# u/ a* o4 m
    Cell[127969, 3282, 326, 7, 30, "Output"]- j$ I: L/ i  K# y+ `% ?
    }, Open  ]],3 b) M- x* o. ?* p8 h; c
    Cell[CellGroupData[{1 H& G; b3 h2 j  c9 h- _
    Cell[128332, 3294, 388, 13, 31, "Input"],
    ! ]7 x! p6 W; I) A6 UCell[128723, 3309, 1381, 42, 36, "Output"]" c: ]# ~# J5 L0 ]4 U( o
    }, Open  ]],
    8 J* A* G5 q/ [; Q# jCell[CellGroupData[{
    - G  d* L2 z, k  s3 rCell[130141, 3356, 89, 2, 31, "Input"],
    . Y* a+ b: l. t; ]Cell[130233, 3360, 320, 7, 30, "Output"]/ I8 r) s" J( O/ d# I, H' S( o7 ]
    }, Open  ]],
    9 u5 m& T7 H. c5 C' D: yCell[CellGroupData[{' J2 u9 S: J6 ^$ }1 s# F% X* e+ C
    Cell[130590, 3372, 387, 13, 31, "Input"],, x8 p: s; F4 a8 z) x' r
    Cell[130980, 3387, 1381, 42, 36, "Output"]
    - {# l# i3 x2 b* {0 q( A}, Open  ]],
    # I3 s2 l# I/ i/ xCell[CellGroupData[{6 y. P6 y# G0 ?
    Cell[132398, 3434, 91, 2, 31, "Input"],9 A6 c7 s- |: t* q% m! l
    Cell[132492, 3438, 328, 7, 30, "Output"]
    * X: {! g" s% T' X6 m4 l/ d+ P}, Open  ]]," k9 @6 s/ y1 X3 H9 F
    Cell[CellGroupData[{  h6 {$ Y, T9 P1 }
    Cell[132857, 3450, 384, 13, 31, "Input"],
    9 V- z8 k9 l- V, ?Cell[133244, 3465, 1379, 42, 36, "Output"]
    . `- t/ h: a( L9 |5 o! l; B}, Open  ]],7 m9 [  C4 v- @8 l; y8 x  o
    Cell[CellGroupData[{( Y! t" g/ G& S  _% ?8 P0 T
    Cell[134660, 3512, 93, 2, 31, "Input"],
    ) ?  O4 I6 L; B" _; R* W8 yCell[134756, 3516, 322, 7, 30, "Output"]
    4 u$ u0 F9 E9 d4 f3 v, ^( o7 r}, Open  ]],
    6 m6 R) {# j( Q- ]4 E2 BCell[CellGroupData[{
    2 U% {) |* U$ h" I+ z9 t: z) zCell[135115, 3528, 385, 13, 31, "Input"],
      I  C/ c% Y9 W! a( ICell[135503, 3543, 1379, 42, 36, "Output"]6 s7 I- b; H0 D1 e6 _. |
    }, Open  ]],
    5 ]/ T- d0 X+ V2 ~* B: }Cell[CellGroupData[{' {* L5 o/ q! ~
    Cell[136919, 3590, 113, 2, 31, "Input"],
    4 t* f" U& v, F6 zCell[137035, 3594, 348, 7, 30, "Output"]$ U1 ~) ]- i+ z& Z& d
    }, Open  ]],# x& f3 s  e+ d# n2 x; r) r. U
    Cell[CellGroupData[{
    , d  Z. ~* f. ]Cell[137420, 3606, 406, 13, 31, "Input"],
    . y) n# ^# }3 M4 lCell[137829, 3621, 1414, 43, 36, "Output"]
    6 o$ ?$ m, h) O& a1 f}, Open  ]],; u% u/ C3 x8 }! r- n  ?( I
    Cell[CellGroupData[{. t: d* H; g& J1 v% a
    Cell[139280, 3669, 135, 3, 31, "Input"],9 a" U& ~+ V4 }9 T2 g
    Cell[139418, 3674, 358, 7, 30, "Output"]* O3 ?* R1 C( y4 ~- |
    }, Open  ]],
    6 y0 k. K) p7 _+ F  v( RCell[CellGroupData[{; o# E$ u# A8 _. a5 w. z
    Cell[139813, 3686, 430, 14, 31, "Input"],8 _5 o$ T7 N# _  \8 B; q8 a
    Cell[140246, 3702, 1426, 43, 36, "Output"]* P2 w% u! J" A. v$ e7 V( H# u
    }, Open  ]],; A7 G7 X; j% u# p6 Z4 t4 F
    Cell[CellGroupData[{2 J# e7 ]  ^) Q: l% C( ?" s
    Cell[141709, 3750, 156, 3, 31, "Input"],# ?3 K* X! k; F/ l" p1 g
    Cell[141868, 3755, 377, 8, 30, "Output"]& H; ?# r9 ~0 t' ~0 B
    }, Open  ]],
    0 U7 G( T3 g* g, O0 ]Cell[CellGroupData[{
    # ]  c8 l* }7 s0 q- K% Q. [Cell[142282, 3768, 452, 14, 31, "Input"],
    ; D" `$ P% I8 D4 l9 v$ TCell[142737, 3784, 1440, 42, 36, "Output"]9 u7 @8 x6 r9 Z) s: Q: C6 j4 A
    }, Open  ]],
    , \/ K$ g# f9 X0 mCell[CellGroupData[{
    : t: ?- o& H0 D, KCell[144214, 3831, 178, 3, 31, "Input"],
    * h) ~- O% ?; j2 V8 HCell[144395, 3836, 448, 9, 30, "Output"]
    6 S  S. j7 ]) h6 g}, Open  ]],
    ( n7 }5 q3 X' I+ [9 NCell[CellGroupData[{) }& ~- Y+ A7 p/ l
    Cell[144880, 3850, 474, 14, 31, "Input"],
    , o& |; Y4 ]- ]! D6 KCell[145357, 3866, 1510, 43, 36, "Output"]& C' N, M: O( w( L( N( K6 J
    }, Open  ]],0 v( A# C+ F5 P6 y, Y, V- M
    Cell[CellGroupData[{
    3 I6 \1 l- y4 K5 j: PCell[146904, 3914, 470, 14, 52, "Input"],8 j% t! u. L2 v* q$ y# c  T8 s& p
    Cell[147377, 3930, 257, 5, 30, "Output"],
    2 e1 q5 {0 ~( Y, s2 R9 ZCell[147637, 3937, 1310, 38, 36, "Output"]
      b2 W% t' C) C& [# j' o4 }}, Open  ]],6 ]- _! o# Z; q0 w. T4 B' Q- i  q
    Cell[CellGroupData[{. ]5 \& W1 `: s& C. n
    Cell[148984, 3980, 520, 15, 52, "Input"],+ s2 X2 a1 o: b: \' U
    Cell[149507, 3997, 293, 7, 30, "Output"],
    , O6 X+ s5 o& \5 X5 b8 x8 pCell[149803, 4006, 1345, 40, 36, "Output"]
    2 I& t% e. @- q# W}, Open  ]],
    + G4 B9 x# h  R) ]Cell[CellGroupData[{
    4 W0 q- e, q7 cCell[151185, 4051, 520, 15, 52, "Input"],  A: x3 x) U' {7 H, ?( M
    Cell[151708, 4068, 266, 6, 30, "Output"],
    2 [/ F9 L8 O% l- u; [7 ]* M& \Cell[151977, 4076, 1319, 39, 36, "Output"]; D0 T" k$ I( j% {
    }, Open  ]],% B" r8 o( V, {/ {! Q
    Cell[CellGroupData[{* O: ]% a  I- ^2 E2 R7 N. |4 a1 M
    Cell[153333, 4120, 520, 15, 52, "Input"],2 {1 P* x, {, I0 t; O, N2 L. O# {3 ]
    Cell[153856, 4137, 272, 6, 30, "Output"],9 i' ]3 Z' ]! X2 y% i$ U  m5 }
    Cell[154131, 4145, 1327, 40, 36, "Output"]8 s% A& [2 k7 ]2 v6 S  T$ |" H) ?
    }, Open  ]]," N' N$ Q: ]- |0 A
    Cell[CellGroupData[{
    . [/ T4 p/ t* x3 ~6 LCell[155495, 4190, 520, 15, 52, "Input"],3 M3 k5 Q0 s' ^6 j
    Cell[156018, 4207, 265, 6, 30, "Output"],
    9 @% I, ]6 }* F# k5 X- X/ b& \$ fCell[156286, 4215, 1318, 39, 36, "Output"]
    : M5 h: o3 r: G6 o6 w}, Open  ]],
    * R; ]) |7 f; x0 ACell[CellGroupData[{. H& G0 L6 I7 D& b! {' d
    Cell[157641, 4259, 517, 15, 52, "Input"],
    + C  C" @, Q4 i# }' QCell[158161, 4276, 275, 6, 30, "Output"],+ a# |8 Z! E, E; U3 G3 n7 N& b
    Cell[158439, 4284, 1333, 41, 36, "Output"]
    3 U( P# q" V/ `  c2 p" }% X; N}, Open  ]],- F$ Y: f8 I$ o8 r$ V: F* V0 E
    Cell[159787, 4328, 381, 11, 31, "Input"],$ j4 x+ j5 ?; r
    Cell[CellGroupData[{4 L  v. N% e/ F% P& S
    Cell[160193, 4343, 573, 16, 52, "Input"],
      R6 k: {+ V2 T9 m0 \  LCell[160769, 4361, 278, 6, 30, "Output"],) m( u) Y* g) y
    Cell[161050, 4369, 1328, 41, 36, "Output"]
    ) n4 i9 g& Z; }  p}, Open  ]],; p  }4 B( N! g4 G) w+ h
    Cell[CellGroupData[{& g. n5 l7 i# Q# k
    Cell[162415, 4415, 571, 16, 52, "Input"],$ c. t6 `; `2 x4 n! I; ]$ q
    Cell[162989, 4433, 270, 6, 30, "Output"],
    & M/ h# C2 k- O, c7 qCell[163262, 4441, 1325, 40, 36, "Output"]: w3 u; V% y* t" |! J& e  l) u  }# }
    }, Open  ]],
    - o5 H; d  \. O# B8 `) r/ FCell[CellGroupData[{! m: S5 R! m  c# _
    Cell[164624, 4486, 571, 16, 52, "Input"],# O* R9 q; I4 P
    Cell[165198, 4504, 264, 6, 30, "Output"],
    3 E; i. \& \2 f6 L3 w# dCell[165465, 4512, 1316, 39, 36, "Output"]4 \  ]  x! Y+ t3 ]8 N3 \/ U0 n
    }, Open  ]],2 F( m: t! i2 [
    Cell[CellGroupData[{
    $ m+ w) J5 _6 T# y2 k/ I, L  e: tCell[166818, 4556, 571, 16, 52, "Input"],2 o$ G; M/ N. G8 `
    Cell[167392, 4574, 271, 6, 30, "Output"],- R! ~, F) F; {6 B- s; j8 m
    Cell[167666, 4582, 1329, 41, 36, "Output"]
    , K8 c0 F4 j4 @: C; X$ N}, Open  ]]," P5 r5 M2 T2 o, u: T
    Cell[CellGroupData[{
    8 Q. B1 R; s" k1 r& qCell[169032, 4628, 570, 16, 52, "Input"],
    7 R9 u' Q" k$ m5 s$ t# u9 H/ |Cell[169605, 4646, 277, 6, 30, "Output"],5 N5 W% w* `$ J
    Cell[169885, 4654, 1335, 41, 36, "Output"]0 M. V, _, ^, `+ r
    }, Open  ]],& U9 q" f3 _9 c1 K' E# o7 h: [4 D% a
    Cell[CellGroupData[{
    ; E2 X- H. j: g+ j& ?Cell[171257, 4700, 571, 16, 52, "Input"],
    : m, q8 H9 ?/ n6 p) qCell[171831, 4718, 274, 6, 30, "Output"],0 E2 G- `* p9 }$ Y  `" {6 ?6 b
    Cell[172108, 4726, 1335, 42, 36, "Output"]
    ; q, \$ p3 o2 p! D1 J$ T}, Open  ]],
    ; ~. @% I" d! U! f( ]* sCell[173458, 4771, 104, 1, 31, "Input"],8 K, L5 J0 C. c9 Q+ N( W( s
    Cell[CellGroupData[{
    5 L" j& i: @) O) B# Q) d, z+ \Cell[173587, 4776, 279, 7, 31, "Input"],/ g$ P+ K2 }' [- I& O/ C
    Cell[173869, 4785, 878, 14, 50, "Output"]
    + x# L4 L7 i; e0 ~  \}, Open  ]],$ R5 q7 P! b5 j9 v5 C! Y' ]3 N
    Cell[CellGroupData[{! _3 X4 C0 i" j2 R. T( G" K* e
    Cell[174784, 4804, 243, 5, 31, "Input"],
    8 _+ W: ~' U, V5 ^Cell[175030, 4811, 216, 3, 30, "Output"]2 G# t. R. S; k1 y. }, T3 i
    }, Open  ]],
    2 U- j% x; a& Q' dCell[175261, 4817, 537, 14, 31, "Input"],
    ) x; |. s* b3 e% uCell[CellGroupData[{) R! ]% v: ~9 a" F0 L
    Cell[175823, 4835, 94, 1, 31, "Input"],- E2 I; [" o& o- r; N
    Cell[175920, 4838, 1319, 20, 107, "Output"]
    9 m8 i( p7 z4 ]+ @5 ?9 d}, Open  ]],; j( g' |4 ~: |  z7 h+ O7 K
    Cell[CellGroupData[{
    $ U3 h( w; p0 }" x4 rCell[177276, 4863, 464, 12, 31, "Input"],
    ! d  @+ I4 F0 E  `: E, KCell[177743, 4877, 17248, 366, 582, "Output"]
      `7 x4 K- f* `}, Open  ]],
    5 B  q( T  [* H/ `Cell[195006, 5246, 32810, 934, 912, "Input"],
    ) Z6 d, o- L/ ]# q5 PCell[CellGroupData[{
    ' ]# h: y! A7 d# Q4 j# {8 q4 G3 X2 bCell[227841, 6184, 284, 6, 31, "Input"],
    % h- E2 U2 i9 X. ^Cell[228128, 6192, 961, 17, 50, "Output"]! S* f; v- a8 ?5 N; ^, \- I+ I7 S( o
    }, Open  ]],# T) I9 E# _& y" I
    Cell[CellGroupData[{
    * X. W& R) ~# |! ~8 ?; |0 b5 pCell[229126, 6214, 531, 11, 31, "Input"],
    * ^2 m! |* E/ d2 _: I% `: cCell[229660, 6227, 28858, 853, 537, "Output"]
      [4 k6 y7 \! q, o# P  x2 t* Z7 k% i}, Open  ]],) z6 t3 H( s) s. a0 R; o; l
    Cell[CellGroupData[{5 s( l" I/ n" s( n
    Cell[258555, 7085, 281, 7, 31, "Input"],4 O7 X% T4 D) ]; \/ l6 M
    Cell[258839, 7094, 540, 10, 30, "Output"]( Y$ S. A" C! s
    }, Open  ]],
    . e1 s. a# f0 V6 f) PCell[259394, 7107, 1869, 53, 92, "Input"],
      |8 M: \/ _% H7 M, {Cell[CellGroupData[{& Y, ?6 \) Z. T1 `
    Cell[261288, 7164, 138, 2, 31, "Input"],9 z" d" N; P% _- s$ w5 q, x
    Cell[261429, 7168, 1122, 20, 69, "Output"]- I5 R! L: A4 u' i" _" L
    }, Open  ]],
    & k- Z9 F/ J$ n/ N. M6 x6 S3 m9 LCell[CellGroupData[{1 h9 n2 k& f! t$ x! C
    Cell[262588, 7193, 1816, 29, 152, "Input"],
    ! j$ F& R( n: p; wCell[264407, 7224, 1736, 28, 88, "Output"]
    2 z! `( c  L+ n3 z9 d1 D}, Open  ]],
    ! s; O0 ~4 p8 c% r1 oCell[CellGroupData[{
    . `. f* C6 g, ^! o2 {+ D% OCell[266180, 7257, 209, 6, 31, "Input"],
    2 ^7 n( t- S/ v- h- \4 nCell[266392, 7265, 516, 9, 30, "Output"]
    3 E2 ?# S$ r8 w% F% n}, Open  ]],
      M% i( b: p3 `$ e4 pCell[266923, 7277, 613, 16, 31, "Input"],
    ) n, r( M  s% R' ?7 H3 a$ ~% U* vCell[CellGroupData[{8 Y$ R, q" R7 t- U; G
    Cell[267561, 7297, 157, 2, 31, "Input"],
    ( m3 p! y4 Q8 a1 }7 [8 NCell[267721, 7301, 776, 13, 50, "Output"]0 g9 ], ?3 h1 Z' ~
    }, Open  ]],- g5 B  _/ l5 j- x1 N6 Y8 g# t
    Cell[CellGroupData[{
    5 p! S7 d- f* r1 B! i$ _2 bCell[268534, 7319, 1397, 21, 112, "Input"],
    5 M4 W# _2 q1 l/ k/ Z  Q( @Cell[269934, 7342, 1384, 21, 88, "Output"]
    + h) o. w! s. H% r3 o}, Open  ]],
    . y+ a& G( [! g) n& KCell[CellGroupData[{' L" L; Y. q7 I. A
    Cell[271355, 7368, 1208, 30, 55, "Input"],% D- Y" `7 v0 @8 h9 S
    Cell[272566, 7400, 1299, 29, 256, "Output"]+ R$ G% g5 ^( n3 k( E: j, \1 V
    }, Open  ]],
    # e& k# s" ]; T: j# H2 S. iCell[CellGroupData[{+ h: h. L6 J: e. Z; n
    Cell[273902, 7434, 829, 23, 31, "Input"],
    $ P& S; @6 S: u; |) UCell[274734, 7459, 1053, 22, 249, "Output"]
    ! ?) e1 x3 U+ o% m# e  c* h}, Open  ]],/ P6 u  @0 q5 N( C; z  @' Y( R6 e# U  P
    Cell[CellGroupData[{
    ; G# |: e& A# hCell[275824, 7486, 84, 2, 31, "Input"],
    0 A" Z9 [4 e8 R$ fCell[275911, 7490, 1675, 36, 256, "Output"]: H& _5 ]! L/ H8 P; Z
    }, Open  ]],
    ) a0 D9 z; w" ~2 dCell[277601, 7529, 131, 2, 31, "Input"],
    # R& f4 ~2 C! |Cell[CellGroupData[{# ?& a! ]; U/ O% e7 P
    Cell[277757, 7535, 302, 7, 31, "Input"],
    % o+ j+ r8 ~* p/ {8 yCell[278062, 7544, 935, 16, 50, "Output"]
    7 B: C. X- A1 a" \- w( T}, Open  ]],2 P1 @& @  H0 I/ s
    Cell[CellGroupData[{
    # i+ g% X7 h$ N  kCell[279034, 7565, 295, 6, 31, "Input"],4 P0 I/ {7 p. c3 x
    Cell[279332, 7573, 244, 3, 30, "Output"]
    3 u2 b( x" ?/ m; q" |}, Open  ]],
    4 @" ?) y5 H- K. Q9 w" c1 ZCell[279591, 7579, 610, 15, 31, "Input"],
    , D$ f2 g- J$ l* z; n% I/ n! ACell[CellGroupData[{
    + V5 q! J4 [2 Z: n) C' }  |Cell[280226, 7598, 120, 2, 31, "Input"],+ c0 r/ H  o% p# E6 Y0 u
    Cell[280349, 7602, 1334, 21, 107, "Output"]) ^5 ^( I* g* I; O4 ]3 E) H
    }, Open  ]],) c4 @& K. b; S2 q  C$ S
    Cell[CellGroupData[{% F( _. x5 N6 y* B5 C# j2 _( {7 S; R
    Cell[281720, 7628, 460, 12, 31, "Input"],
    % [: b& y: w$ t, e2 S; o6 zCell[282183, 7642, 17248, 366, 582, "Output"]' E9 |( m3 {/ \/ g
    }, Open  ]],
    % A7 b# ~1 s+ [  pCell[299446, 8011, 32810, 934, 912, "Input"],6 u* N0 X8 y, n- b0 o, `
    Cell[CellGroupData[{
    2 S9 v6 X. C( E0 V( m# T* pCell[332281, 8949, 334, 6, 31, "Input"],
    & D" e1 ?9 @* C" s5 X9 QCell[332618, 8957, 1004, 18, 50, "Output"]
    5 m# \6 P/ J& g, J0 X4 |& ~}, Open  ]],* y  l- H. C1 r' F) {$ Q" I7 r
    Cell[CellGroupData[{
    - o7 |# {! A% ^7 b1 x' ?* ZCell[333659, 8980, 559, 11, 31, "Input"],
    7 x0 ^$ D+ n2 i2 z3 D$ nCell[334221, 8993, 28881, 853, 537, "Output"]  Y. O0 A. e) A
    }, Open  ]],& C/ d7 m) t& G  @; @; Y+ U
    Cell[CellGroupData[{5 p) N/ `; A8 l. M2 ]$ Q4 ?
    Cell[363139, 9851, 306, 7, 31, "Input"],$ a% h5 u: b* \; F
    Cell[363448, 9860, 562, 10, 30, "Output"]% A( s" B: f& a6 `, @
    }, Open  ]],. R3 H* X- l  e# b; q1 ?
    Cell[364025, 9873, 1915, 53, 92, "Input"],
    - {6 z; c1 d0 L+ j2 z6 NCell[CellGroupData[{& ]8 c+ r" U( i3 \/ a; G" J
    Cell[365965, 9930, 163, 2, 31, "Input"],3 w. D/ j1 M/ {4 i( c: Y' V
    Cell[366131, 9934, 1139, 20, 69, "Output"]
    5 K+ n) i# r( g  |" P}, Open  ]],
    ; h9 H1 ?) z! M* o% q: c. XCell[CellGroupData[{
    ! i; T, B; ~: D: e1 \: Z$ k9 _Cell[367307, 9959, 1863, 30, 152, "Input"],
    3 o  i/ c7 H: G: ACell[369173, 9991, 1761, 28, 88, "Output"]
    - }' e0 o+ k. }4 e" }: [" C}, Open  ]],
    $ q2 d* S! P$ I( `; dCell[CellGroupData[{/ T9 Q/ l+ }, T: w
    Cell[370971, 10024, 231, 6, 31, "Input"],; J- w% O& y  I
    Cell[371205, 10032, 540, 10, 30, "Output"]
    % i) u5 O, L( J# [8 s5 p, X}, Open  ]],, \6 d+ F' e* E) x; f: L' W* o
    Cell[371760, 10045, 687, 17, 31, "Input"],- R; R+ U5 Z: h$ e; D% T3 J4 O2 r
    Cell[CellGroupData[{$ ?" l& I% T9 V8 [; z
    Cell[372472, 10066, 185, 3, 31, "Input"],* c% S' b6 X1 n* Y
    Cell[372660, 10071, 804, 13, 69, "Output"]
    ( d# k2 O% P$ N# t% Y- x( l* k}, Open  ]],
    % M% E  `2 v) @" P+ oCell[CellGroupData[{
    5 O5 U; N/ t) ]7 @, u" CCell[373501, 10089, 1405, 21, 112, "Input"],2 Q( {8 k  h. T6 s; }: H
    Cell[374909, 10112, 1387, 21, 88, "Output"]' G; Z) G. x7 d1 e
    }, Open  ]],3 @0 q) O" A6 Y
    Cell[CellGroupData[{6 a. ?! s! H* A& n, q, n
    Cell[376333, 10138, 1339, 33, 55, "Input"],
    " q; \9 h; ?3 k/ mCell[377675, 10173, 1370, 30, 256, "Output"]
      y6 L% D( Q, B* M}, Open  ]],
    $ z8 s' [* r' \; w  \; m) U1 d/ FCell[CellGroupData[{  a) k/ p; B0 ?% t4 F- n
    Cell[379082, 10208, 877, 24, 31, "Input"],
    2 g* G3 ]; _& m( zCell[379962, 10234, 1058, 22, 249, "Output"]3 _& |& Q; t" O$ @0 m1 f
    }, Open  ]],
    $ D0 o, M, D" m6 J  c( gCell[CellGroupData[{
    ) [, [8 j2 X7 A6 _9 e- E- \9 [- fCell[381057, 10261, 84, 2, 31, "Input"],
    6 D! {. @* h; V' kCell[381144, 10265, 1659, 36, 256, "Output"]
    / p" e3 e  {9 L: W& W* ~}, Open  ]],
    * s/ }* q6 L2 R9 x) b1 x+ iCell[382818, 10304, 509, 10, 52, "Input"],( ^- ^' I% M- ^. L4 r! i
    Cell[383330, 10316, 530, 10, 33, "Input"],8 L% w+ M# ]0 C2 ^* `! S# W
    Cell[383863, 10328, 69, 1, 31, "Input"],
    ) F, t7 K" @/ RCell[383935, 10331, 62, 0, 31, "Input"],
    , R( t0 \7 z- a, Q' P( q9 w, o3 kCell[CellGroupData[{7 n: S/ z; Z0 d0 N- |& d3 X3 D
    Cell[384022, 10335, 364, 9, 31, "Input"],$ A( [: c! ?$ y9 f+ E, t
    Cell[384389, 10346, 13864, 402, 287, "Output"]# r: L4 S3 y6 z4 U
    }, Open  ]],% y. `( K% i9 ], w0 k
    Cell[398268, 10751, 69, 1, 31, "Input"],5 P" V- b1 G" j) B  M  a) H' C/ Z6 r
    Cell[398340, 10754, 74, 0, 31, "Input"],2 ?6 t2 ~) C% N" Z! e
    Cell[CellGroupData[{4 ^0 c8 H( S$ @9 }, g
    Cell[398439, 10758, 288, 8, 31, "Input"],
    3 K8 r2 D% D: S  G9 A: h9 qCell[398730, 10768, 13861, 402, 287, "Output"]. M- {8 V+ _2 m. a
    }, Open  ]]
    ) m8 H* p! L( y1 W8 o6 u}
    * S9 _0 s8 G0 D]9 Q& q8 U  U0 f
    *)
    : g& F, Y) D. b+ ?4 o$ \) L- G+ V' l, O
    (* End of internal cache information *）
    $ k1 E- L1 N7 W+ q5 K& n" d, Q( S4 ]) K) e
    这个是用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
    可能不能导出系数
    回复

    使用道具 举报

    -___        

    0

    主题

    8

    听众

    44

    积分

    升级  41.05%

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

    • 签到天数: 12 天

    [LV.3]偶尔看看II

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

    使用道具 举报

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

    qq
    收缩

    • 电话咨询

    • 04714969085

    fastpost

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

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

    蒙公网安备 15010502000194号

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

    GMT+8, 2026-7-27 11:32 , Processed in 1.844429 second(s), 99 queries .

    回顶部