快捷通道

QQ登录

只需要一步，快速开始

  注册地址  找回密码

数学建模社区-数学中国

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

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

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

1

主题

10

听众

296

积分

升级  98%

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

    • 签到天数: 75 天

    [LV.6]常住居民II

    自我介绍
    无

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

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

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

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

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

    相关帖子
    回复

    使用道具 举报

    兰秋小沫        

    0

    主题

    7

    听众

    31

    积分

    升级  27.37%

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

    • 签到天数: 7 天

    [LV.3]偶尔看看II

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

    使用道具 举报

    涳夢        

    0

    主题

    0

    听众

    1

    积分

    升级  20%

    该用户从未签到

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

    使用道具 举报

    冰E柠檬        

    10

    主题

    43

    听众

    1434

    积分

    升级  43.4%

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

    • 签到天数: 278 天

    [LV.8]以坛为家I

    自我介绍
    冰E柠檬

    社区QQ达人

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

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

    群组: 数学建摸协会

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

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

    使用道具 举报

    百年孤独 实名认证       

    3503

    主题

    538

    听众

    5990

    积分

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

    • 签到天数: 691 天

    [LV.9]以坛为家II

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

    群组: 2013年国赛赛前培训

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

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

    群组: 物联网工程师考试

    群组: 2013年美赛优秀论文解
    5#
    发表于 2013-7-30 20:56 |只看该作者 |招呼Ta 关注Ta
    问题完善一下！或者把代码贴上！
    & U4 D6 ?& A& g1 [# m; A" L  x
    回复

    使用道具 举报

    琳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
    ; U# v4 G1 p! @$ b) C2 D; e, G* o神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗

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

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

    / D7 b( M8 B9 W0 D0 U, g/ \Cell[BoxData["0.2`"], "Output",6 [# P. p* c8 z1 _) [: G4 n
    CellChangeTimes->{. d# M3 J! ]0 o2 c4 s: M
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, 6 r$ Q4 I4 u* d6 O
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {' \6 A. ^) P) m. y' G
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9, # ^. a2 C  o; d% a! y2 r0 e; f$ Q+ K
       3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {# y/ l6 I! ~5 S3 Z0 b/ c
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    ! j% r; G# @' d( h) Y   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    / \& e; Z  {* }' j   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9, , i' v6 y5 I/ u3 O9 Z
       3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    ; t% ^8 P; V( w   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    . Y! E) c! [) k4 l% F, l3 z. n8 L9 W   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    6 P5 N" [/ Z) f) i# x3 a1 F. b   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, 1 y: o; R: E- t& X! T
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, 7 ~8 ^. L: K0 r- j* x" T- ?
       3.577960510686717*^9, 3.578012149296875*^9}],
    2 k7 m. v, b" Z( _/ c6 a4 S7 R
    " c2 u& Y" {- |8 v7 E4 ~Cell[BoxData["1"], "Output",
    0 V9 n0 c7 e/ z; I# Y5 Z CellChangeTimes->{2 U! [# [) T7 b5 P
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9,
    : j- R8 y+ m9 z  v$ G2 v; y' E   3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {% f- L# I+ o7 z  a: H- b  y- ]' C
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    ( o8 o1 B' U7 R% e" j3 r: ?! e   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {
    4 g/ r. ^6 A; a3 q8 b8 s   3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    2 m9 Z& D7 @8 T4 R6 E5 ~6 y2 ^   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {6 p! N; c# z6 I' Z+ ?
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    - T! p  _% M. r- W" Q* s0 X' j: @   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    4 d4 R: K, X% K; v* R   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9, 8 }% r3 R+ D3 y+ y- N
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9, / @' h. P/ f0 o* V, ]2 E5 z. t
       3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, - U; p+ ~' l9 M. A; i. T# ^
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, 6 S; w' h. {# K5 b; g
       3.577960510686717*^9, 3.578012149296875*^9}]! ^$ j# J  D" f5 |& n# C6 N( P2 T
    }, Open  ]],
    * o  z- _' m. I; o; e! O1 a- }
    2 L6 M0 m/ E  x5 H1 [- BCell[BoxData[, D& H: V8 l! I$ q8 H. O: O
    RowBox[{"For", "[",
    4 d9 H( K( I) M5 |  RowBox[{5 ^/ v8 I3 l% O& L! z$ m0 Z# w
       RowBox[{"k", "=", "2"}], ",", 9 D5 b: g4 ~/ }, I% r1 S
       RowBox[{"k", "\[LessEqual]", "60"}], ",",
    : A) V' I$ ~' g- ~* G! ~6 V* \# Z   RowBox[{"k", "++"}], ",", 5 d) I5 S3 r5 f
       RowBox[{"{", "\[IndentingNewLine]",
    , Z7 {! Z) |, G: \$ c* B* x3 r    RowBox[{: h6 T  z: D' p& L& [8 D6 U
         RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]",
    , L; O) Q. L4 \9 i) d     RowBox[{"For", "[",
    ! r5 C8 H4 d% U) A) i2 F6 T      RowBox[{! N  s) @; z# V5 J
           RowBox[{"j", "=", "1"}], ",",   B) y7 z8 l' h7 t$ v6 r; }
           RowBox[{"j", "\[LessEqual]",
    7 z# T/ w) m2 }" Y$ ~        RowBox[{"k", "-", "1"}]}], ",",
    4 G) m4 M* S) S       RowBox[{"j", "++"}], ",", 3 l9 ?9 o0 A$ r
           RowBox[{"{", "\[IndentingNewLine]",
    0 r: E" j* ?5 e/ a' I        RowBox[{
    ! Y4 P7 g6 ?+ I6 U; U         RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]", " u4 v. ?4 t4 D9 x
             RowBox[{"For", "[",
    : V4 B& c" W  B3 c( c          RowBox[{
    8 P: u5 K3 E1 x9 r. Q# ?           RowBox[{"i", "=", "1"}], ",", 8 \) y( U4 [7 f; w; @  {4 D1 \
               RowBox[{"i", "\[LessEqual]", "9"}], ",",
    , _% P5 b6 [5 o* s$ F  q! O) l1 t           RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", : c! y* _3 s- y+ s4 z3 J$ N
               RowBox[{) E+ K" b% A1 L, \" i, Z1 z7 O3 Q  ~
                RowBox[{"r1", "+=",
    0 w8 k' ]9 j4 J& j             RowBox[{
    & Q! }2 Q( v7 \+ T: T  T1 `% k              RowBox[{"(", 1 B7 U% d8 k$ {* |/ b+ R( j# Y
                   RowBox[{- g. l+ D) V7 l; [: s1 ~
                    RowBox[{"CM", "[",
    , {) C: ]5 c) O7 G$ }. h6 v                 RowBox[{"j", ",", "i"}], "]"}], "-",
    & M  ~$ K( v! L$ z3 M. A                RowBox[{"Data", "[",
    2 f" _: s) R2 V# _8 h                 RowBox[{"[",
    4 H4 y) t: X( B6 f- ~, i4 G                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*", 8 g; Y8 e2 X- s( x& d
                  RowBox[{"(",
    / T* I/ v% N5 W# E/ Z. n               RowBox[{- k; l: E6 \/ l" \  I1 D% V7 i0 v
                    RowBox[{"CM", "[", $ {- o" Y: k: F. E0 [
                     RowBox[{"j", ",", "i"}], "]"}], "-", 5 f. p" _- \- W* p4 a$ t: z% t
                    RowBox[{"Data", "[",
    ; |2 g& E  R2 y" [% K" Z                 RowBox[{"[", # T4 ?# N/ R2 g# K3 L+ ^
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],, f1 U1 n& N( d* ^2 u& n
               "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]",
    0 l' a( ^8 z/ @  [  T7 _; L- ~         RowBox[{"r1", "=",
    2 F: f1 {' }$ d  `0 r          RowBox[{"Sqrt", "[", * f. T: N; P" U* C+ E, c
               RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]",
    & i! N  L( [( k6 v7 [/ e         RowBox[{"If", "[", " ",
    8 v# ~1 L! v- E% `" W2 \7 T$ D          RowBox[{& W3 X3 I0 h- A3 X. L
               RowBox[{"j", "\[Equal]", "1"}], ",", 9 }  f; q; j# ]5 s8 K( |9 X. K
               RowBox[{"rmin", "=", "r1"}], ",", 2 J# a; @% D$ Y( I7 y3 ~: R) m' z, W7 M% i
               RowBox[{"If", "[",
    % r3 a) Z, t2 L: y  X7 R. b            RowBox[{8 Y+ o! u- Z9 m# q6 m, X
                 RowBox[{"r1", "<", "rmin"}], ",",
    ( ~- t' C( [3 q3 F5 ?             RowBox[{"rmin", "=", "r1"}], ",",
    3 t5 G& `: U. p1 Y$ C5 P- `" O             RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}], 1 Y4 \4 r1 Q2 K4 z" O* ^# J
            "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";", : {  g; G( r3 ^" U3 L# ~; c
         "\[IndentingNewLine]",
    " A; O, l8 y, t. n3 P9 m     RowBox[{"If", "[", % Q9 Z6 f0 P" [  y+ b" K
          RowBox[{  l* j9 d( k; H) n
           RowBox[{"rmin", ">", "r0"}], ",", 1 S3 |1 M' {- Z; {
           RowBox[{"{", "\[IndentingNewLine]", - n% M$ r& n( C5 j3 \7 u& I% X0 r" p0 B
            RowBox[{
    " M1 ^+ ~  I8 [# ~         RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]", $ p5 X: ]8 c, I* w% |6 K  u
             RowBox[{"For", "[",
    , [8 e5 i8 `; C- D0 ?" k- @          RowBox[{( I. W1 Z( d+ @& U5 y- B
               RowBox[{"i1", "=", "1"}], ",",
    / q7 S. e0 m" ?& X- A           RowBox[{"i1", "\[LessEqual]", "9"}], ",", % `" J7 ]6 s; X! k0 _- j
               RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]", * Z% T/ f% Q: l. g
               RowBox[{3 F* G7 B, k0 R. o' h: `
                RowBox[{
    % r2 N9 i4 i" ]             RowBox[{"CM", "[", # E$ k  Y; P" F2 a$ _. S+ e  i
                  RowBox[{"M1", ",", "i1"}], "]"}], "=", $ h/ n/ n( s1 i3 I( o# R' z/ I
                 RowBox[{"Data", "[", 4 Q) k7 Y1 }  X
                  RowBox[{"[",
    + i# W- m) ?" P               RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}],
    " d' [5 A; Y+ X8 }0 r          "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",", + G2 k0 H6 y' _( X2 D
           RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}],
    7 i3 V1 h8 a6 o) t    "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",. O1 y! E7 D& H' m3 A, H
    CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {2 m- O: h) L. J: ?5 `2 g
       3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9, ' B9 t; D# [6 F$ J0 S6 S
       3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {) ]2 y' U3 z- C5 t2 w% Q; r' x
       3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9, : i  H! B( e3 O8 ]) u
       3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {
    / O, j* z4 l" ^( G$ j# o* G   3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9,
    8 z. l  O  J0 T5 T* }9 R& K   3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {
    8 |1 p  J; q+ O* ^8 D9 b   3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9,
    + Z  Q. H) F* u% n   3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {
    , M- _$ i( E% q' ~. p+ |   3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9,
    ! i( G6 Q+ |6 }0 r7 e/ e   3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {$ [! D  F: G. e7 f
       3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9,
    4 [9 B0 _% H9 |4 X  y9 [, ]   3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {
    7 B! m; x# Q1 i- ]   3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9, 1 a: g; z" r+ R
       3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {
    6 e7 ]8 r7 H& N& j4 H. P% @   3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9,
    2 z! Z3 J; b0 [! Y. ?7 m0 g   3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9,
    " [& W  Z7 k- @: {' c: w$ Y   3.577958821991373*^9}}],- f' s& q; H- Z6 ?. Q/ v# N

    1 T; g3 S2 l. [( I( ]Cell[CellGroupData[{
    1 j3 G/ x- G: p( w- h3 h% d- ~; z- Y* l0 |( r* r2 |$ S
    Cell[BoxData["M1"], "Input",9 |. ?  }  F0 r0 N. `) j
    CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],$ u5 _; f( G4 i! ?9 {' D$ u- o

    $ J$ r' k/ I0 Z" C4 }6 N, f: Y+ l& yCell[BoxData["21"], "Output",
    # [7 |6 Q/ L1 t* O; o CellChangeTimes->{
      g& O3 Z+ s' `# \( M  3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {
    , q0 c. r' k) j; O   3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9, ! c  D$ i9 \3 @3 G1 U4 j3 `
       3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {$ _% O' l' g. H  G. w2 t: v- ]! h
       3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9, ! v( M( c1 D  x& S
       3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {
    % W; p! s2 h1 H6 ~% z" y! V0 _   3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9, 3 W. q0 d% m, z! F7 m
       3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {
    " H8 R" R) _/ ~& q2 s   3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9, 7 I& |% @& b" d1 a
       3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9, ! b- x* q. B5 [1 c, d, w) w
       3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9, ) @7 L, M7 W3 Y0 v8 R0 l: K( x/ [* t
       3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9,
    ( Q. ]" p3 F( Q- H0 h   3.577960515600726*^9, 3.5780121541875*^9}]
    1 |( G& K- H6 e- s1 D' M}, Open  ]],* G: m% Q) ]6 t! s; h0 y" m. n
    / W( c) M) \: Y% u
    Cell[BoxData[* X5 I1 Y9 f7 x  o+ Z: ~
    RowBox[{; s( ^2 Z8 V9 h. T
      RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[", % r. F& j0 I& o( r" v$ R6 x$ M+ v
       RowBox[{"1", ",", "i"}], "]"}], 3 ~! C/ j5 M' J$ g2 z" ^
      RowBox[{"\:5230CM", "[",
    1 N0 r5 |2 K' |) T8 B  y   RowBox[{"21", ",", "i"}], "]"}], " d- Q0 x. l, J3 b: Z8 ^0 w
      "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\
    / n4 G5 `! s& F  ~' T4 ]\:51fd\:6570u1\:5230u21"}]], "Input",, D% [3 r7 u* U* U8 C" I  z$ i9 S
    CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {
    2 `$ Q, d/ T( p) q; }. f, V' `6 M3 w  3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9, ! B% o* s* v$ _7 ~" G, `- _
      3.577960526583145*^9}}],6 h: `" r: y8 o" r' q3 ?5 f6 h" G, l& ?
    4 v4 F0 L2 y% E# L$ B
    Cell[BoxData[# T0 J4 g, b& x
    RowBox[{"Clear", "[", "Delta", "]"}]], "Input",9 X7 i. w# Q: `; |3 Q
    CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],: D% N% o4 r! A0 @6 K( \( P  z

    ) m7 m' V: ~& e  {/ T7 b/ N" w, S  u; mCell[CellGroupData[{
    2 k; n* C4 U5 V1 j0 O
    : ~9 u" M, p1 ?% B* c: d5 i$ O; ^Cell[BoxData[
    + z- s& h# H$ T/ g0 |2 J' J RowBox[{"Xa", "=", 2 c, P) _9 T' U6 H# @
      RowBox[{"{",
    8 B% i6 t  S- n: u   RowBox[{7 Y& E# d+ s' A  w3 E
       "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", 4 _# Q0 G! B3 c/ d
        ",", "x8", ",", "x9"}], "}"}]}]], "Input",
    : ]9 t5 _2 k$ ? CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],
    - E/ \! n' F+ {; h2 F
    ! H" b5 {8 k8 }5 x9 [Cell[BoxData[2 l8 R2 x4 _1 x- I& [8 W) x* N6 v& t
    RowBox[{"{", . ^1 l  a: d/ g8 I
      RowBox[{8 N& F( |8 A& k( B  o) b: ^# t
      "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",& n$ J: R! g( ^3 a7 {
        "x8", ",", "x9"}], "}"}]], "Output",! t) X) e3 s( k5 ^7 f3 z2 C
    CellChangeTimes->{
    " @  K9 e6 X! @( w* @  P0 r) m2 F  3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9, # A8 D+ V9 `* J; ]
       3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9, " k- G' G5 a* K  c( _$ W' J# p) O
       3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9, 2 ?9 [7 m9 K/ U" y
       3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, $ }8 f( D3 O! O) H6 C
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {
    : f) S) J9 m3 n* C) d/ ?( k/ _   3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9,
    7 i5 }3 G$ q* t' C! {   3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9},
    0 N5 U+ h" B$ r/ W% E   3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {
    6 c6 M# T: O3 j7 ~, T   3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {$ u* X% ]/ \; ?1 ?
       3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9, $ k; b/ k5 T4 y) f
       3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9},
    ; F. d& ~6 J( [. r- C9 u   3.57801215725*^9}]
    3 V: e3 V; F! H: c+ @, f! d}, Open  ]],: b5 f  E$ d- ?9 U
    % e" B/ `: ?% k4 @
    Cell[CellGroupData[{
    4 a# D1 d9 x, }
    5 O' |6 t6 U5 RCell[BoxData[
    7 I8 j  J) ]& c8 q4 N' Y RowBox[{"Ca", "=", 7 J$ b0 ]  Y$ l7 z
      RowBox[{"{", & O/ D* c) i- j- K. F
       RowBox[{' f8 x$ l' r, W( E8 @6 q2 j7 l
       "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ' S; R; j% m: L: B9 J
        ",", "c8", ",", "c9"}], "}"}]}]], "Input",
    4 M9 r# t8 k( h: J CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],
    # d1 ]6 Z5 e4 i2 y' x& U: |
    " ]1 X0 d& K( FCell[BoxData[) I# ~0 j! a1 P4 e
    RowBox[{"{",
    0 a9 _, ~  Z2 {! G0 l  RowBox[{, }! I# E6 S" j1 b3 l
      "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",; u  P6 H% Z6 ~5 i( V$ K: L  O
        "c8", ",", "c9"}], "}"}]], "Output",
    1 w* D* u6 N; u& z CellChangeTimes->{8 o3 f% T6 v/ o3 l
      3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9,
    ( N& j5 }2 G; Q8 G   3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9,
    & O* V1 J* h3 G2 y  ^( O   3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9,
    5 b! V2 |( H7 L5 k2 a   3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {5 O7 \" W2 T$ N! R6 i% N/ t6 @
       3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9,
    7 S2 G, R. O6 @- V0 l   3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9}, 9 l& m4 q: a/ V* ?9 U
       3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9, + M: @' ?+ b% T  n. Q: h
       3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9, 9 ^5 O6 t5 q! z* e! K+ q
       3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9},
    & t- l. e; g; o2 }: t2 B) a5 }   3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {
    : |# F( Z! u5 j% @4 a' }% I; a   3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9, ) B! b0 M2 _5 h% d
       3.577961904604212*^9}, 3.578012158671875*^9}]9 F6 g0 ]  T; ^; p# Q, o7 u2 r
    }, Open  ]],
    8 e7 G4 k; _( W0 J5 Y. O# ?  J7 m* c+ S3 U
    5 y0 p- F3 m7 ]Cell[BoxData[: I/ i3 @! G8 ?5 e. a+ w
    RowBox[{"For", "[",
      E7 v8 T" w1 Z% @  RowBox[{6 Z2 F$ u6 _* x7 O* Q! z8 N
       RowBox[{"i", "=", "1"}], ",",
    ' W" `# G9 M% U9 z" O   RowBox[{"i", "\[LessEqual]", "9"}], ",", 5 z# V0 Z* a  G0 _! U
       RowBox[{"i", "++"}], ",",
    & Y5 ^$ f: s# F5 H3 w   RowBox[{
    3 F4 \0 V/ F. a, f' r5 o    RowBox[{"Ca", "[",
    . p' X% D7 c2 u$ j     RowBox[{"[", "i", "]"}], "]"}], "=", 6 I$ Y2 ?+ S2 \" V8 `' j1 e
        RowBox[{"CM", "[",
    ) S. J: p- H" D9 N0 V* y3 g     RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",
    5 d5 \+ [2 D9 u CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9},
    & D, y! i3 n7 D: ]$ ^   3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9,
    * p0 _( N( c1 O# j   3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9,
    9 `& [! N$ Z& _+ ]   3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9,
    0 s) T6 {' _) T" O) x) I- P! q   3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9, 7 M! c& C( q* I
       3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9,
    / i" {( i+ s1 v( A   3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9, ) s2 G* ^7 z  O
       3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9,
    $ h8 ^/ V0 Q9 T) t8 w   3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9, : q6 H' d6 R" @
       3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9},
    2 I/ g* t6 _7 S# u   3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {. P: [) i% ]3 ]
       3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9, . Y! S1 N. @; E- ~: N* O
       3.577961906897415*^9}, 3.578012176296875*^9}],# H* O- ~+ m8 C- ~  R

    / M/ W( m$ C4 dCell[CellGroupData[{$ j8 k- ?( g; T! q

    - o; g, s. R0 ^5 @' @Cell[BoxData[
    6 @' m) g! ~' |+ G9 S RowBox[{
    2 ]9 J! {, e$ E( o* ?- Z" k  RowBox[{"(", ; s/ U6 A, @  }8 C: V
       RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    : O' [' W3 p# C% I1 n% M  RowBox[{"(",
    1 {& [" @/ F4 }0 b9 w. _  d   RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],  u2 z1 g* ?& c; [4 {( E

    , v2 t2 f- X5 f- }0 l+ iCell[BoxData[1 D2 c2 H% U7 p* a. [
    RowBox[{5 x6 c4 ~! @% T/ }9 Y1 R0 P
      SuperscriptBox[
    ' O* Y& {: N1 Q$ \4 U. T" |% V   RowBox[{"(",
    * P5 m+ f: @: l" X* A. U    RowBox[{
    ; _9 Q! K0 g' ~* s) ?     RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+",   A; B$ p, o6 F% K8 [: |$ B
      SuperscriptBox[7 x8 h) g: d  y7 Q; F  z1 t$ p1 Z
       RowBox[{"(", 8 T1 s7 L8 J4 h4 G. Y0 A- z2 U5 A) R
        RowBox[{
    2 H6 X; ~! Z9 A% \  C" f# @     RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+",
    ( X! b; E. ~4 U  [  SuperscriptBox[
    : ]2 H4 C5 I! E( {5 S+ M6 z/ n   RowBox[{"(",
    & q, A1 i' ]! e+ G' ]- Q; r    RowBox[{4 j; c; h; b9 s5 ~+ B8 `2 Q5 b3 V
         RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+",
      Q/ c, Q) h4 H2 A; f; O  SuperscriptBox[
    - p2 M& W. B% J' @. h   RowBox[{"(",
    8 x3 d+ A/ s$ o5 \    RowBox[{( X1 K9 l! j) c# d2 ?2 Q
         RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+", , w/ G8 a% F( n' p4 I3 _" A( S
      SuperscriptBox[
    2 V: x% e6 q* X   RowBox[{"(",
    ' R5 G7 D: v: l- |, k/ [. Q    RowBox[{
    + g3 `( T5 V% U' v     RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+",
    ' S9 D9 `( j: e4 _! b  SuperscriptBox[) t8 L7 J$ `+ S- w  E- x2 ?
       RowBox[{"(", " Q; e2 z$ s7 a4 ?  r
        RowBox[{
    9 ]7 i4 q, T& S) q8 o6 k: z6 D     RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+",
    + B& w; v2 H5 r  SuperscriptBox[  J# x( A, Y, M4 c: }
       RowBox[{"(", 3 b* T. z& y% O% Q
        RowBox[{
    * z6 D$ l! ^9 E9 {; Z" y     RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+", * h4 H# _$ z; y  N! u# z; X8 r8 `
      SuperscriptBox[( ~3 E5 ^* s& D% Y5 w' |: K+ ^9 g
       RowBox[{"(",
    3 o) G, I2 ]9 r, W    RowBox[{
    # u) b% l& @$ I6 w; \     RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+", 0 \9 z8 w% k9 j2 L7 D! X
      SuperscriptBox[
    ' i3 Q: V. g1 q$ |, g+ F   RowBox[{"(", $ J9 ]" T  `( g% E
        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",
    " H" d3 x( T( W. g" k CellChangeTimes->{
    ) y9 [. u# C) E* f9 h  h- x  3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9}, ! L  l" W1 V, w) c$ U9 Z8 v
       3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9,
    % J: z2 Q; y, W# n( w# ]8 k1 V   3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9,
    ' |  @+ ?$ C  _   3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9,   S" _2 Z( g9 T+ f$ V# ~, N
       3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9}, ! x: K$ A" F) B
       3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9,
    3 y& p/ |9 e, A% w# Z- v( u8 D   3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {$ ]# E* f9 w- r, l7 N
       3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9, # t) K7 k3 x5 [  k( n& b3 j7 C$ F
       3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {
    + l, |- Z5 j( l   3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {
    & c$ o: I& ~- g% j2 Y/ t1 K   3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9,
    9 F1 e- `, t2 y4 L6 g: e+ ?   3.5779618537169228`*^9}, {3.5779618846049767`*^9, * i1 g' H6 N! [) h% ]
       3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]
    5 ?( C4 f( G' ]: ?; n}, Open  ]],2 f% F) [6 e2 M9 ]
    % y. N7 p8 C. ~9 D" y' Z
    Cell[CellGroupData[{
      f# {! y+ k' R3 z6 M( g& }( Q  o' A, Y- K9 [; h, p( @3 s5 E" T: Z. z/ D: A
    Cell[BoxData[
    8 D, b( U7 l# s1 x0 k2 t RowBox[{
    / N7 Q  t3 g# u- N  RowBox[{"Ca", "[",
    1 E' Y  E, c5 l' I# `. f. z   RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",% T- c) T4 x) o) @+ a
    CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9, 6 h: b- D& u% S( ?
      3.5779616465173616`*^9}],
    3 j; b) q1 W' M! r& @+ ]6 G
    3 k4 p5 Q; C9 W/ A, D0 {' _Cell[BoxData["0"], "Output",
    & ~2 S/ O; v8 F$ J9 e CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9,
    7 r5 g" D, A0 P; N* R3 o# m" c+ C  3.5779616484049644`*^9}], B2 L& G" R% a, `
    }, Open  ]],! L3 E- z( d. o
    4 G2 w+ v, h; M
    Cell[CellGroupData[{
    6 R, {+ Q& v$ m7 J, A/ K) m
    ' H; r. V1 }4 N/ ~; t: DCell[BoxData[) u/ P. j+ k0 ]2 D
    RowBox[{
    ( j8 R8 h8 A0 o3 _) a  RowBox[{"Ca", "[",
      I  q  U" w/ P6 h. c& H   RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",6 b/ @5 R9 Q& [& ?; \% f
    CellChangeTimes->{3.577957376235614*^9}],
    , b; K% f$ N$ @, r8 J! ]% E! \7 E, h- N/ J# h5 G- M3 T& `
    Cell[BoxData["0"], "Output",
    ' }3 D% A* A. O, D6 G CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]. D" B+ m$ o: V  c* |
    }, Open  ]],* s' V  J8 U! M& O; M, [

    8 P7 a  s) W5 e3 e2 T) R4 ?+ ACell[CellGroupData[{: W9 ^/ d' B( J7 E# l% y

      e: D' n$ r) L# Q& oCell[BoxData[
    6 l9 I4 @4 x" M, E9 |$ w RowBox[{& d: M% R1 x( K
      RowBox[{"Ca", "[",
    ' d7 y- i4 ~! h" ]$ t4 X3 d   RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",
    2 ?; V- y6 v; {" P+ o7 E1 x. ^ CellChangeTimes->{3.5779573112927003`*^9}],
    - |; N- L6 f" \/ p. l( |, A! U: [$ {1 `
    % @2 Y" l' d! A- i* m3 ^9 ^Cell[BoxData["0"], "Output",
    ( g, L( @1 }4 g* q  D CellChangeTimes->{
    6 p2 _, `! |, r0 I% H  3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9, ' a7 M' X) R) y( J9 M2 B9 p# G6 H
       3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9, : ]( n, P7 ?$ i' B
       3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9}, 7 |! v5 \9 T8 J( }* z  O5 H: }  W
       3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9,
    - ~2 s6 E& S( N   3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9}, , f5 ?5 L8 y3 K; C" n2 s
       3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]1 F( Y* E, C1 z4 m1 x5 \$ N
    }, Open  ]],
    ) e7 D9 ^# c' v; ~5 Y
    - e  o  k! b/ ?2 ^/ Y9 OCell[CellGroupData[{' a* s4 w, A3 G/ f$ _' K$ {- n9 V
    - G9 h+ `  j$ V9 S7 R9 Q6 ^8 w/ l
    Cell[BoxData[
    : u$ O" X7 K! z8 a3 t( G  d RowBox[{
    + H0 q. k; _2 w7 e  RowBox[{"Ca", "[", 5 }, C: m0 n( Z$ u7 C* u
       RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",
    * u, H& U& W/ y; H" f- I CellChangeTimes->{3.577921461734375*^9}],4 |& _; G& \: I+ `: h$ y" D3 \

    * c, }9 j4 d3 w6 cCell[BoxData["0"], "Output",
    - t: Z. b. E" A% m9 N/ C: W3 k CellChangeTimes->{
    ) B% n5 M+ C$ l$ [, G% c/ L2 V% T  3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9,
    1 u3 }& G) I5 _& ]2 }7 B   3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9},
    0 I1 U+ D4 Q0 ?$ ?   3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9,   K' c7 c4 a+ M: z
       3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9, 2 I8 t2 N0 k& A4 D: d5 V$ V2 e/ b$ |$ c
       3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]* d9 F7 ^" V* l
    }, Open  ]],% I8 T. C  g2 q3 _5 b
    # g& |9 `) [5 Q0 Q  M2 u# X7 r% g
    Cell[CellGroupData[{$ P8 F& J8 R+ R- X% W
    6 q# t0 n0 Z) ~+ O6 ?
    Cell[BoxData[
    & b# t* ^! p# p RowBox[{
    7 r& T/ S" d& g, e2 S% I) Y  RowBox[{"Ca", "[",
    8 w9 u7 N! f6 {   RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",
    & ]; o5 ]3 J) j& P3 k CellChangeTimes->{3.577957303118286*^9}],5 P, Y1 q8 g7 l" J# U( [5 X- o

    ! D, C1 V6 {. S# y: oCell[BoxData["0"], "Output",( P3 ]4 L" M* ~5 ?# j- d" X$ K
    CellChangeTimes->{
    & t/ j9 G) \+ G4 n/ x) W  3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {
    8 r/ [# y" p! N   3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9, 9 t  V6 t- L0 U3 U
       3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9, . b% |% t9 M! a4 \  y' `
       3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9,
    8 s- w: z7 g& x, ]   3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9,
    6 y5 h  a3 ^& ^   3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {5 \# `7 T  e$ L/ y  n+ l6 X) k
       3.577961889378585*^9, 3.577961912965826*^9}}]
    1 s* D9 `6 Y1 s1 b2 X3 K& B& _$ F}, Open  ]],/ H0 ?( Y2 _+ i2 |. j

    6 [4 H6 \6 o- ~* @, xCell[CellGroupData[{
    * A4 P3 X$ ~2 b9 P6 R$ x; V$ y/ n' u9 b" T& M
    Cell[BoxData[5 n- C" F& ^# ?* A) _/ z3 O) r
    RowBox[{) B! E6 V0 R, _7 n4 Z6 |
      RowBox[{"Ca", "[", / _7 B( R! }9 E' V2 t! i) }
       RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",
    " o" a7 i1 L& \6 `2 [8 O$ W- ` CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {
    / P* _& B/ H& O6 t% R* @  3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9,
    9 r& a* @* Y6 U  3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {' z8 m; S5 T5 x
      3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9, , r/ m9 K7 H% L+ s
      3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {
    3 X: U' I! A" I  3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9, ' z4 i6 f& V+ {4 c) K# c* c
      3.577921435703125*^9}}],
    ( I% r) k/ q4 T
    ! |8 q9 i( A3 @2 aCell[BoxData["0"], "Output",+ C. N+ R; i; j& O
    CellChangeTimes->{' F+ L& e7 W7 V! v0 Q: t
      3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {
    4 B5 D* l. }6 h3 F' e" d   3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9,
    . n8 r' j$ v- p& S: v   3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {+ {$ H% d; b( n' I% `9 x
       3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9,
    & v7 ^% ?8 _& O1 q   3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {8 x& P" o5 P* q. ]1 o3 v" i( r
       3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9,
    3 B8 F( d/ f" ^/ L8 [   3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9, 9 u; H0 _" W. `/ n
       3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9,
    7 C# m3 K# G# s6 I, A   3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {, z8 b  G! P1 N5 @+ E, b
       3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9,
    2 N" g1 `! I: g3 y1 \4 u   3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {7 U! n+ {: |$ J: @: ?/ c  I; Y
       3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9,
    8 B4 Z5 {# M, j, }1 G) N+ ]% M   3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]
    : z1 `) r2 M4 I; a}, Open  ]],; B* _# t0 Z( i" d1 p

    - q1 J- u5 s+ |  q7 Q9 kCell[CellGroupData[{+ P  Y' F6 ]/ i3 L( U, a) F

    : X3 r2 B& i! G. pCell[BoxData[) T  J+ a/ F* d6 Q) a1 B1 B; N1 B' N
    RowBox[{"Delta1", "=", ' \2 s- i; N9 L- ]. C( h+ A  p
      RowBox[{) ?' W. @# P2 E: \% O/ J$ I
       SubsuperscriptBox["\[Integral]",
    5 p8 a7 O+ j  ^; W4 Z/ H$ B    RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    / n2 d" U* P) V3 Y" f1 A   RowBox[{
    " n" u, u! |) P, p, @. Z    SubsuperscriptBox["\[Integral]",
    & [3 }; {0 D9 t/ T7 U  v, h$ `     RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 2 g2 r5 J3 G  {) Z
        RowBox[{
      B% ]* w4 ~( a     SubsuperscriptBox["\[Integral]",
    6 C% e( @8 p# F  j6 C, V      RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], " |2 |5 |- ^0 G9 U/ Z! x+ G
         RowBox[{7 e0 K; {. j! i5 d* T+ w# Y. k3 x
          SubsuperscriptBox["\[Integral]", 2 ~6 ~2 V5 N6 O; A3 I
           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    * J/ ^% A" c" ]/ i- @      RowBox[{2 G+ a9 i5 r: ~5 x: _; A
           SubsuperscriptBox["\[Integral]", * ]1 Y. C! W/ X" E$ U" K* T0 h. d6 `
            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], # e. i5 m; I  W' k: }- U
           RowBox[{
    ) B* ~- C. g/ [4 [; K        SubsuperscriptBox["\[Integral]",
    . y$ b& J. v0 |0 |  X" [- y         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    # p% s* b: F# I+ y$ Z6 j' X- W        RowBox[{. ?6 w/ R) `+ V
             SubsuperscriptBox["\[Integral]",
    4 B# _0 a% M0 [; x9 U          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    1 x, V; w) W5 a$ T         RowBox[{
    5 k& k6 C" {+ k+ ^- U& b2 n          SubsuperscriptBox["\[Integral]", % E7 G4 d! |; j; L/ x4 b& E9 K( d
               RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], ) S+ q, D4 I+ @; ^. e
              RowBox[{
    / b- ?  q5 W# J: c: g) v! r6 ^           SubsuperscriptBox["\[Integral]",
    3 Y5 {+ }7 M- u5 N) N            RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], - s9 n  c+ t9 P
               RowBox[{! q. ?& j1 ~0 z/ ^4 O
                RowBox[{"Exp", "[",
    " k( p! z2 T/ _9 C. @  \# G3 b/ `; _2 C             RowBox[{6 k/ d' i+ f* o; L
                  RowBox[{
    6 m5 B0 H) x& b; E' n               RowBox[{"-", ) l2 D+ \: \# q9 P, e; W6 i' z
                    RowBox[{8 b% |$ K9 }# j* c8 s, s8 H8 ?  x
                     RowBox[{"(", & u, f  p# q+ E+ ^- `0 _' X/ P
                      RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ' b# P6 i. i: X! Y- Q0 \, @
                     RowBox[{"(", % j2 B% G4 K* u3 w$ u
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/",
    9 ?3 s! W7 L+ [& B" Z) R5 E( }              "Delta"}], "]"}],
    ; S  F) x/ k1 C! u! K            RowBox[{"\[DifferentialD]", "x1"}], * j" v! }' n5 z) e/ i
                RowBox[{"\[DifferentialD]", "x2"}], ; D7 T2 V6 }2 i$ r+ Q# @* s& n
                RowBox[{"\[DifferentialD]", "x3"}],   ?5 y# b3 \  u/ B
                RowBox[{"\[DifferentialD]", "x4"}],
    $ n; I* B: r, Y8 U' r7 c; p            RowBox[{"\[DifferentialD]", "x5"}], + `, l6 S4 S& c; k
                RowBox[{"\[DifferentialD]", "x6"}],
    5 ]6 S9 k3 m5 {" \            RowBox[{"\[DifferentialD]", "x7"}], 5 n2 C- {; o! P$ Q
                RowBox[{"\[DifferentialD]", "x8"}], 7 l9 |( i9 S" A# R+ b3 Y& \
                RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input",
    4 U& Y3 }' v5 F CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {$ f/ i+ ]! I) [
       3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9,
    ( N& h. d' h. {; {   3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {8 L) m) B2 r9 t5 c4 F
       3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9, 9 ~4 i' ?& q9 Z5 m$ D
       3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {
    * p5 v; v4 L5 }, p" O   3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9, , g, m/ D! i1 z, V- q$ V+ b
       3.577918964453125*^9}}],
    " h: D# N8 r+ Y% }# n- V' `+ [: I5 ?4 E9 S' j; _0 E
    Cell[BoxData[
    ! c: g2 `7 ?& H. l1 w, { RowBox[{"97.40909103400237`", " ", 3 ?8 X! B4 C  U7 z. ?
      SuperscriptBox["Delta", "8"], " ", 6 Q- a# [/ _/ y8 E" [$ e
      RowBox[{"If", "[",
    ( N) L. U3 T, B1 z5 E! i/ b- B   RowBox[{
    4 `6 A) J' e' u; b% ?. p    RowBox[{7 _. k. Y0 J4 b6 u6 k& g
         RowBox[{"Re", "[", # N$ j. G. Z( Z" A/ m
          SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",",
    : \6 \  u9 a2 H$ H    FractionBox[3 _: m" w9 A5 o
         RowBox[{"1.7724538509055159`", " ", . I8 @; W6 q, a& g, C" k' S# h7 ]
          SuperscriptBox["\[ExponentialE]",
    + E3 D1 R) {& C# _       FractionBox["1.1102230246251565`*^-16",
    4 k/ b5 i9 R9 l+ X1 J+ @        SuperscriptBox["Delta", "2"]]]}], / I+ b; ~" ?7 \0 Y( o# Y5 t1 u6 U
         SqrtBox[
    . f, v5 i+ N, e4 ~1 p! e      FractionBox["1",
    ' }5 _% F6 C+ {( _& h# C4 U       SuperscriptBox["Delta", "2"]]]], ",", 2 b  D5 Z) B8 W4 Z2 J9 F6 {! H
        RowBox[{"Integrate", "[", * n) Y" B9 i. f, |1 M
         RowBox[{
    6 L/ Y! M& p8 t; b* j) f; ?8 C      SuperscriptBox["\[ExponentialE]", 8 L9 N! q1 L- b- m) Q
           FractionBox[3 h6 r% u0 j, _
            RowBox[{"1.1102230246251565`*^-16", "-", , ~4 I, M$ P3 o2 D9 }6 P5 l4 c
             RowBox[{"1.`", " ",
    4 u% I8 N; J; h  }          SuperscriptBox["x9", "2"]}]}],
    % p0 A# {, s; t$ ~% \- N( J. V* z        SuperscriptBox["Delta", "2"]]], ",", % u3 A; b, D# q4 C; S% t9 c1 N
          RowBox[{"{",
    # ?5 u$ `! u1 L# B3 ]' {( d' \       RowBox[{"x9", ",",
    / Y) R+ e! t$ K/ f, B2 i! g+ d        RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", 9 \: R; o1 ^) @7 R1 J$ Y9 X) Y0 U" ?
          RowBox[{"Assumptions", "\[Rule]",
    & R* j$ \8 Z1 g$ ^3 g9 m* L       RowBox[{6 x7 I! S) _* [. U9 G
            RowBox[{"Re", "[", 1 Y1 G% I4 ?7 r/ z; e
             SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}],
    0 ~1 A% r) O) a, [" A" f( v     "]"}]}], "]"}]}]], "Output",
    3 D6 x' r. T! a CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9,
    5 J# U1 R1 O+ r+ f  J; w  3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9, 2 ~' ]5 C' c& t
      3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9,
    2 m/ W5 L' d  x7 I  3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9,
    ; c. b$ y7 W9 m5 r  Z+ I  3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9, 7 j7 a3 P) d& T, S
      3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9,
    & x  K2 f; I9 J) |, U9 b  3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]
    6 U- E) s# F; [' H$ o}, Open  ]],, O9 W& |- `1 F3 Y7 o8 D$ J
    * W0 y  ]$ g6 W, |, c8 P0 L
    Cell[CellGroupData[{
    1 W0 g2 E% l* l+ v8 R' H
    6 ~* r! ?) F' G4 g9 s- p/ zCell[BoxData[
    4 z% v8 ^8 o2 ?. i RowBox[{"Delta1", "=",
    4 C& n+ u/ a) A. E  p! w  StyleBox[8 n' n5 R' S: q9 f4 y
       RowBox[{"97.40909103400237`", " ", 8 D8 q7 |. \: N6 x
        SuperscriptBox["Delta", "8"], "  ",
    % R9 w0 c4 Z' {4 n' C    FractionBox[
    ' ^5 W; t! Y% J9 g, W1 n/ F% O     RowBox[{"1.7724538509055159`", " ", ; D* E. [# _/ @9 o' X. g7 I
          SuperscriptBox["\[ExponentialE]",
    * O7 v& _; B' ^! I       FractionBox["1.1102230246251565`*^-16",
    4 Q) T9 r# b  N% I        SuperscriptBox["Delta", "2"]]]}],
    1 q* [5 W, j* F' O* j8 f     SqrtBox[
    ' S5 ?" `) ]/ ~) f; F9 `/ |      FractionBox["1", & `5 Z, S6 V$ I
           SuperscriptBox["Delta", "2"]]]]}],
    5 Y2 V7 ^3 e/ z; ]! Q0 [. E   FontWeight->"Plain"]}]], "Input",
    ; V" d6 Z0 N2 M* _7 ^- b7 L. b CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {& G  {$ M- ?# k0 d" l1 |
       3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9,
    ( D: X( j0 Y. S   3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {
    " p4 `3 A( g7 |" U' e- B   3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9, 3 W( ?' |! L3 Q
       3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9},
    ( i3 @$ E2 \8 n   3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],
    5 {1 X" [* L2 v! q( v) f' Q! Y4 M2 ^1 |7 a: D0 P! F8 j, q5 Y
    Cell[BoxData[
    $ O# ?; g2 w& m" t FractionBox[9 ^) u3 s  T: C- n  b1 x, h7 x3 K
      RowBox[{"172.65311851642346`", " ", $ E, |5 z5 e) ]5 q# [
       SuperscriptBox["Delta", "8"], " ", : `1 A5 u4 a0 {( r
       SuperscriptBox["\[ExponentialE]",
    + F) O* m5 {3 [! [- C6 ~- q    FractionBox["1.1102230246251565`*^-16", + d4 ^( t$ P' Z% e! t
         SuperscriptBox["Delta", "2"]]]}],
    , i" d  h8 h5 k6 ]0 k  SqrtBox[, y6 P. V& T: S* r% h7 q
       FractionBox["1", 2 z9 o0 I4 ]& v  F1 c7 o1 h
        SuperscriptBox["Delta", "2"]]]]], "Output",6 ?$ `. R6 [5 g, \" V0 d
    CellChangeTimes->{2 I: H5 m& _+ @, i. f
      3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9, * k: n  f4 i# g3 Q( T- @
       3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9, - Z& B+ L2 T' y# ~0 v2 R2 P' w
       3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9, 2 j* `" y6 H3 j3 f  r8 L0 J4 ?6 v& J+ N
       3.578012166234375*^9}]) C0 Y. C4 r& P' K( ^
    }, Open  ]]," [- _8 u7 x7 W# s" ^

    " l. Q! F9 t! }: m& F9 QCell[CellGroupData[{
    ' p, J: H8 k; [
    4 C$ h$ y% \# z# k2 {7 h: g7 v, b% tCell[BoxData[
    & \  n) y6 L) T  {% F RowBox[{"DeltaX", "=",
    9 `: _0 z) ^& _( U5 J  RowBox[{"FindRoot", "[",
    . _. F% t7 P6 a8 Q% g+ B* D2 c   RowBox[{
    + P+ h( q2 A' @9 c- s0 m3 d    RowBox[{"Delta1", "\[Equal]", "1"}], ",", 4 x7 R7 x3 Z7 P. M$ ?3 L6 ~
        RowBox[{"{", + j/ w5 B: T; k7 z2 ^) F. T
         RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",/ l5 t7 D. ?/ L, M* O! S
    CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {* Z; Y# h5 D' R* V3 y! ]- j& I
       3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9,
    + Y9 O6 Z" n. K5 Z$ l8 b4 z   3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9,
    - E: w0 J! V! l' E! `! Y   3.57791921584375*^9}}],
    # u) e  L! Z9 b6 f- s7 i4 H" C
    0 Y% R) t. I6 M0 L/ Z, `& F/ zCell[BoxData[
    3 N. |# i5 @8 ^( T RowBox[{"{",   t* {: z# h% t6 f
      RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",
    ! o5 M, l1 E$ i CellChangeTimes->{
      Y. X8 v0 V" V% l  3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9},
    4 {* o+ I8 E+ f# M* i   3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9,
    / c7 S' U/ f9 K   3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9, # v7 S9 h4 M, d. h
       3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9, 8 R9 S( k' u/ C: s, _4 V
       3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {3 b, k1 _& c$ X4 k3 b; D
       3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9, . H- z/ M, a, `+ \" J6 v% a
       3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9, " y% A, o  I+ W/ a  ?7 x
       3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9, 0 k2 U! ^0 W, T0 e+ O
       3.57796070150625*^9, 3.578012167703125*^9}]
    & B2 q6 N' j3 T}, Open  ]],, C# x3 y  A7 q

    4 e; h/ ]8 n) }) KCell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\" o3 a( C: i/ q3 B( A
    \:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",
    , C" C/ }; V7 a. Q+ b CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {1 [- d4 ~9 F2 V% G3 A$ P
      3.577960705312657*^9, 3.577960707621461*^9}}],
    % s9 x% c6 P+ V0 t+ u- [* Z' e+ v* r  @8 d5 }
    Cell[CellGroupData[{- W; y4 c7 z9 k, U/ f
    # t" I, A8 [5 ]$ ^  H  c
    Cell[BoxData[' F* d, f% @# C8 H7 C
    RowBox[{"C1", "=", "Ca"}]], "Input",
    8 t. i. V) l3 M3 t& v+ @; b8 F9 {" H: J CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],0 A+ T% E" ?, M& ?

    5 d- f3 s" O4 P( V$ FCell[BoxData[! M  P- y/ e; u
    RowBox[{"{",
    * H- p5 {) T$ y$ i# ^5 R  RowBox[{! ?3 |5 v/ l7 [5 w3 w- z
      "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",", 6 e- F4 A7 r! H; R  q- o
       "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", . _# v; H/ B1 f/ f
       "0.`"}], "}"}]], "Output",
    / d# O. y; ]4 @6 q CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9,
    ) m5 |3 A% W% t3 B5 V  3.577960710273465*^9, 3.5780121855*^9}]
    % W3 R# x+ G5 S5 h}, Open  ]],
    ! D, f! F/ d. o: O4 L9 q
    . u1 u3 k8 }9 R0 O* n* M$ tCell[CellGroupData[{
    ; o* x8 y) \$ W5 t* {) z" p: b+ u2 e
    Cell[BoxData[
    / A# R  o3 ?3 u+ |( v2 c: D RowBox[{"u1", "=",
    9 x2 f% x) A- G* u  RowBox[{7 ^4 X+ u3 j# b# l0 p3 n8 \) m
       RowBox[{"Exp", "[", $ ?9 C) ^& y3 P. M$ y, h- c
        RowBox[{
    0 G8 m4 \6 y' ?' B( e     RowBox[{
    . O6 x8 p9 \! v0 {      RowBox[{"-", 3 r! }. a; Z7 [
           RowBox[{  M! R9 \4 |6 V% w
            RowBox[{"(",
    ( X3 I3 L/ m$ u4 E" ?         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    9 {  Q3 x) {8 K( n: Y3 j        RowBox[{"(", # e2 X; l! [7 N3 ~
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    2 q9 Z, W7 f8 ?: R; N3 x2 S1 P     "]"}], "/.", "DeltaX"}]}]], "Input",
    ) j7 Q% K! Z! N$ V, W5 V6 e/ t$ M CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {
      S9 ~* L2 q7 c( G1 `   3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {* h- @' {- }! y
       3.577919193484375*^9, 3.5779192326875*^9}}],4 Z- M7 ?0 d4 @  \, ?& g
    & C, O: Y+ @7 L; T  \9 o
    Cell[BoxData[
    % e7 e! N/ E+ O' e$ K SuperscriptBox["\[ExponentialE]",
    ' h" j9 \) q0 U# }  RowBox[{"3.141592653589793`", " ", + @; b8 X( V  {1 s2 v4 v! M% U
       RowBox[{"(",
    ! c% J3 y; X2 H4 }, ~    RowBox[{* j; R( A& |% u0 d# ?3 q$ ~7 p
         RowBox[{"-",
    0 J. Z( l8 Y( @. r      SuperscriptBox[; c8 V5 W7 G3 p; m0 H  {
           RowBox[{"(", 0 U: E! Z- j9 U5 o
            RowBox[{- o& p6 A6 @; K5 r) E8 x
             RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-", # I) Y6 t8 L) A+ W# H7 R) c
         SuperscriptBox[
      a8 S& W0 @& k- _: h/ T      RowBox[{"(", * z$ L/ u/ N8 m$ W$ g
           RowBox[{
    5 p: j% _* d$ r        RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-",
    1 i. X2 m2 O' t     SuperscriptBox[
    0 E4 R. f6 T6 ~& `( \  G      RowBox[{"(",
    - ~- X1 T3 ~' ]. |, v       RowBox[{3 ^- ?( Q1 I" ]% s
            RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    ; t- I9 P! O4 I9 Q$ Z" i     SuperscriptBox[
    . j, c1 s5 y/ m( G      RowBox[{"(", ) O8 A( _5 e6 |" V& X
           RowBox[{
    ; J7 a0 i( p- m  @        RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-",
    : l; [* A# q+ b( H; t3 {* {     SuperscriptBox[3 e' U9 l  J4 _' b. Z
          RowBox[{"(", 8 [$ g3 W# m/ x, l
           RowBox[{- r6 t: L& E9 r# m2 J
            RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-",   F1 t. a, M* D/ l
         SuperscriptBox[
    7 G' F) v( I% e      RowBox[{"(",
    ( j* T* G" Q/ a& O# s' F* k       RowBox[{* o& y! D) t, J7 L+ G
            RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-", 5 m7 J$ l7 K0 b+ `. p( W: i
         SuperscriptBox[
    4 |6 N4 X0 l+ P1 p6 {      RowBox[{"(", 4 H1 {) e: M  h% a
           RowBox[{/ @8 j! E: W* A' T0 r
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", 3 R: h0 `4 g3 W4 I8 b7 U, @
         SuperscriptBox[
    9 |1 }' G% p- m* A# u      RowBox[{"(",
    - |, a8 l: V2 o4 Z9 Y; y2 R       RowBox[{
    1 p- w' s3 `3 n" x- j! R4 F. |/ g        RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-", 1 h0 W. z1 s1 y; c8 w1 L# z
         SuperscriptBox[1 V6 V" W6 S& \9 e9 c( ^8 h2 J) ]/ G
          RowBox[{"(", 7 I# E2 X# P0 M$ L( p$ X+ y" N
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    , p, k/ D  [' n; I    ")"}]}]]], "Output",: l/ [" U- C, G; N
    CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9, 2 \; B. R2 t. l' n* `2 n! a$ D
      3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9, 6 h+ @8 u; d& E0 N% V8 W. |
      3.578012187078125*^9}]0 p9 @2 r" d/ P) {
    }, Open  ]],
    7 A' @. d4 |% g2 C! b$ j2 ]. f- f8 _" f$ C; g
    Cell[CellGroupData[{2 W' A* L& N9 j/ c$ P- M& Z+ E

    1 V# L, V2 i) \9 A+ b! ZCell[BoxData[
    2 W2 _$ Z6 t9 J5 n RowBox[{"C2", "=", "Ca"}]], "Input",8 T! ?  D( F. j- G
    CellChangeTimes->{3.57792047321875*^9}],
    ( b. ]  T! A# ]9 ?6 ~0 L8 Z, r1 Y4 x
    Cell[BoxData[
    + ?) M! C3 \+ A# Q. g$ f+ h RowBox[{"{",
    % y/ q' Q9 U. J  RowBox[{
    " ^. S5 @: [- U$ E/ S  "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",", 3 T+ @; ?" D" Y+ k4 a# g
       "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}], 1 a& e- E3 b- ?/ D
      "}"}]], "Output",) k6 Y% A. g" y! I7 D
    CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9, % T5 K& J, q" ^4 r# ~7 `% s
      3.5779607401163173`*^9, 3.578012204671875*^9}]8 q- S" M$ B7 i+ u' t6 m9 Y$ z/ \5 ~
    }, Open  ]],
    3 t: N, f6 B7 E' `0 |7 Z
    . m- q1 u) _% C5 ^Cell[CellGroupData[{( l, v  ]7 \$ F, ^: K2 E0 A, i. y

    # `# f: {# [% j. k( HCell[BoxData[
    ) P4 Y9 O. X; j RowBox[{"u2", "=",
    9 h- e/ Z# q) _* }$ }3 w/ _. V, [5 \  RowBox[{5 @+ i) s  H. r& ]% j5 _
       RowBox[{"Exp", "[", 9 i  }+ t# h8 ^) p, i' L
        RowBox[{
    ! w. [* W  l1 R# D  ~# z     RowBox[{3 V% ^3 R; J; P1 X: w- q
          RowBox[{"-",
    ! l& r! D0 E9 m: }: m0 k       RowBox[{) T, E" S7 |' K4 g' _
            RowBox[{"(",
    ! l" W, d9 S1 z7 |. W9 F, N3 I         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ! k) ~6 q7 L2 X: {  v        RowBox[{"(",
    5 T0 e+ U0 ?- y) k1 |0 B: B         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ; z( n: K: a& ^5 q     "]"}], "/.", "DeltaX"}]}]], "Input",6 O* Y0 m) p6 v, a
    CellChangeTimes->{3.577920484109375*^9}],
    ( o: @! D9 J8 E5 V8 Y, t1 K8 y% V% d1 `
    Cell[BoxData[" v4 R; k$ h3 q* C9 r5 G2 V
    SuperscriptBox["\[ExponentialE]",
    " |$ j9 a7 U/ f; e  m  RowBox[{"3.141592653589793`", " ",
    8 ^5 k9 c" ^( V1 p) i   RowBox[{"(", * ?% ^) w8 K9 M- `* z7 Y
        RowBox[{2 r4 I+ M8 {& t3 c1 Y& Q; Y  ?) M
         RowBox[{"-",
    , V, [" u' F0 o9 C2 v      SuperscriptBox[& y5 K9 o, `7 P7 h) ^
           RowBox[{"(", " X' g" H0 t8 T
            RowBox[{' i, x. a7 z( o! y
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    9 X5 K  u! x( [, }; }$ r6 B     SuperscriptBox[# ]  w. u& ^  l
          RowBox[{"(",
    0 E: T. H) H  ^- P3 h       RowBox[{0 H4 s1 q# Y1 u  B9 W2 b% h9 \
            RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-", ' m( p/ b1 r' o# f( b, j
         SuperscriptBox[
    0 {3 T$ F# r  L. O1 O8 P6 B      RowBox[{"(",
    / K5 ?4 }: X  h* N0 Q       RowBox[{2 F( Q5 w/ V' b9 }3 p
            RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", & k' G0 v* w  E/ B: A
         SuperscriptBox[( l3 D) F% B8 T. W" n
          RowBox[{"(", . V* K! o/ W2 P7 ~+ j" C6 V! @
           RowBox[{
    . b: q1 `7 A$ x7 \4 }7 `        RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-", 9 M$ J  v5 |' i. ~' D3 ?% Y
         SuperscriptBox[
    $ y, {" ?7 r# ^- d      RowBox[{"(", 6 E, O9 a9 Y. `. p; ]% B% `
           RowBox[{; p0 s+ F* y2 L0 g2 M" D. N
            RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-", & \  \3 f4 b: j$ s5 M. X
         SuperscriptBox[' U) x: D6 m4 x/ t; n% ]8 |& a5 t6 R
          RowBox[{"(",
      j6 t8 b2 V" ?. j, V       RowBox[{3 F! _$ C9 U% [+ v  K
            RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    # V0 i8 ^) A# o7 f8 U* c  A  d     SuperscriptBox[
    ) v  G% e% `  S# y' D      RowBox[{"(", : [4 B) W8 L9 m1 @9 z( ~
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", " U( B5 F3 d" ]3 ~1 |4 S
         SuperscriptBox[( j7 Z1 G3 X4 N& \% |! ^2 J
          RowBox[{"(",
    / `; J) |. q3 p* W       RowBox[{0 o. ]% R3 x9 p
            RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    6 O* |1 ~/ i4 P; @     SuperscriptBox[
    5 W+ O/ s+ f5 K& c      RowBox[{"(",
    ' H8 k" j) S' G6 u+ }; a9 G# d0 \       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ! t+ _  G6 l! C' }) s, Q    ")"}]}]]], "Output",
    % F, X& w3 t8 ^6 a4 {( z CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9, $ z9 m! M3 P2 s4 {
      3.5779607413955193`*^9, 3.578012205484375*^9}]
    , P2 V& a- r& _}, Open  ]],
    ' X$ S" V- p- y4 x% ~+ M3 g# J
    " F8 D& l8 Q+ [3 O- VCell[CellGroupData[{
    * C$ m, E8 @3 Y& [  h
    ) z% f1 r! q8 R9 f( xCell[BoxData[1 l. K; N5 j9 R3 Q+ J5 g4 J
    RowBox[{"C3", "=", "Ca"}]], "Input",
    4 M! X$ }7 l) Z CellChangeTimes->{3.57792064125*^9}],% G( z7 ~# Y0 }6 s! V- i/ u4 C  {; w
      Q' V) E( a# ?( b. m- v" }( y
    Cell[BoxData[! v" e- @4 O+ [6 \1 a& B% e
    RowBox[{"{", ; ]3 |1 Y& {% p7 D- f1 y
      RowBox[{
    3 F4 l/ m3 r: Y, Z& ~, X7 A  "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",",
    5 I% S, g* z* A   "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}], , y4 y3 L: ]" p' k3 e7 q
      "}"}]], "Output",
    5 X% L; P$ ]4 d" x+ [ CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9, 1 C) [- L, P4 ?  s, s( F
      3.5779607642027593`*^9, 3.5780122103125*^9}]
    $ W7 x! W4 q: V, J/ @7 @}, Open  ]],
    % ^, p: H- {' m, u7 v% o+ I
    % [, s0 T( R% VCell[CellGroupData[{
    0 k; W3 h# u6 F7 y( K9 O1 M( i. m' h) L1 w+ ]5 l1 B
    Cell[BoxData[
    - v! e! {# A' | RowBox[{"u3", "=",
    ; |8 N4 c9 n$ x! d  RowBox[{
    9 \- S0 A( E, c! x   RowBox[{"Exp", "[", - C3 z' K+ ^' H( A
        RowBox[{* C( `% D9 C8 i; d
         RowBox[{
    / w4 U0 H3 n# t/ i8 Z      RowBox[{"-",
    : M' ~4 S2 R8 ]( z: b5 _  _       RowBox[{
    & r5 S# P8 C/ v( z; E        RowBox[{"(", + i# J2 e0 c2 ]8 j6 H! h7 `$ @
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    6 D* a' Q% M0 {8 p" j- \        RowBox[{"(", # J& v2 \% i8 f3 @
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],( T: n/ E4 x+ x3 y0 ^3 d' n
         "]"}], "/.", "DeltaX"}]}]], "Input",$ g5 S4 \0 i0 F  X' K3 F1 V4 p
    CellChangeTimes->{3.57792064921875*^9}],
    ) [% e- l5 ?3 o9 Q
    - C1 r7 m* ~' V1 ^1 sCell[BoxData[
    : \4 z+ I2 @. J# o" Z) }/ ^4 C# W7 u SuperscriptBox["\[ExponentialE]", 9 }/ Q3 F- I6 m& W- s% {
      RowBox[{"3.141592653589793`", " ",
    & `& h* u) P5 W4 n" K# `6 g/ k   RowBox[{"(",
    0 E% t% L) u6 b6 S; y# e! V    RowBox[{% ]& S5 a6 ?4 s8 q3 p$ f
         RowBox[{"-", 4 S! `% T0 q9 B5 K3 Q( {' m
          SuperscriptBox[
    7 L3 s  R4 ?6 ]  x       RowBox[{"(",
    6 }! b& `% a) q; a' N        RowBox[{( |! v( @+ a- s4 G! M0 \- A/ ^
             RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-",
    + U- M- U# T3 R: |, |     SuperscriptBox[
    . |  L( v! Y5 k: ~( g      RowBox[{"(", , c0 ?* y" ]/ o0 w
           RowBox[{
    # S/ \+ D8 g4 W3 T5 i3 X6 k        RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-", 6 A* K! l# c! I
         SuperscriptBox[9 S2 e3 G" R& k4 Q8 H! L/ k7 Q, e
          RowBox[{"(",
    ; e) J# i9 x4 ^. V8 a/ G# x       RowBox[{; M% _# B$ q6 v1 f. l2 U- j
            RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",
    8 ]; z' x4 ]2 ^$ Z1 m/ u$ g     SuperscriptBox[8 Z! E; l& m, Z% }" [5 z( l
          RowBox[{"(",
    ) ^* X( _0 h- q. Q- C       RowBox[{4 Z0 ?( @4 e# c5 P( P& ?, z) U
            RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-",
    1 m3 h4 D3 U; c$ d2 d" I( F- j! \1 X     SuperscriptBox[8 |9 [0 J) r$ v
          RowBox[{"(", 2 i9 @) o9 ]/ p5 U0 i  s6 o7 R4 u# C
           RowBox[{, w( N: V+ a6 w+ |6 K! _
            RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-", 7 A7 P& B3 q, L
         SuperscriptBox[
    + I3 U9 W3 P+ O# Y( G( E      RowBox[{"(", + p3 c9 j' S  a/ G
           RowBox[{
    ; r" z! L; i4 M' S1 Z( }; I        RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-", ) Z: Y6 e4 X9 k- ^9 G0 I
         SuperscriptBox[5 f# M3 \+ `0 [6 r& r( q+ S' |
          RowBox[{"(",
    * D$ q: Y  k# `/ F       RowBox[{1 U% Z) v! |, J* S9 y, [
            RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    8 s( N2 N' w7 S& g2 y     SuperscriptBox[: w8 D" x3 E4 D+ Q# [" p
          RowBox[{"(", / }% }7 |% M* I; A( C
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", " u# v' v3 X; Q0 u! E7 Z7 L! p
         SuperscriptBox[
    & _  c, G& J% x* W      RowBox[{"(", % ~+ @5 F+ `5 M1 x( D2 H& z
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], : M2 f$ g8 @- {( o# {' i
        ")"}]}]]], "Output",) Y) v) l3 {0 ?1 T3 D( y, [! ^
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9,
    / g+ b1 _4 S  _3 l  z" S/ p. k" R4 H7 B  3.5779607654819613`*^9, 3.578012211515625*^9}]
    ! ^; h- v- c. _% Q, Z) ?3 P}, Open  ]],* y5 J9 z4 }$ G- h! A2 e' S
    ! x/ r" S/ _, ^' E7 Y9 c' {
    Cell[CellGroupData[{
    ( i) F* T. S& ?+ |2 U% F  i+ X6 a, J
    Cell[BoxData[! F2 u1 |8 f6 H' N. p: ]4 k7 ~
    RowBox[{"C4", "=", "Ca"}]], "Input",
    $ s; c- d" n$ N) k. g6 ~ CellChangeTimes->{3.5779207559375*^9}],; z9 S& J( f4 Z4 v
    ' v' C# I. y/ F' G4 C
    Cell[BoxData[
    $ Q" |# c2 p4 y" `. k RowBox[{"{", 8 A/ ~5 U; k" @6 V
      RowBox[{
    : V# s% ~# w9 ^! y2 ]  "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",", * T8 V! c4 O! P3 J& Q1 e+ x4 N
       "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}],
    - n# Y1 Y$ q* S6 J7 Q  "}"}]], "Output",
    9 F' W/ y8 b9 t  g$ J CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9, & J/ {! r4 |/ d; G- ^  {0 Z
      3.5779607861363974`*^9, 3.578012216171875*^9}]% H$ k9 ?% X: _* [  t/ D
    }, Open  ]],
    4 W( E2 f9 P. P& H4 k% A; C- @; k0 _* `7 ^3 r! {$ O$ v2 U
    Cell[CellGroupData[{
    ! [1 y3 m8 Z0 @& J' y$ S
    ! W6 g$ Z! C  W* ]+ D4 uCell[BoxData[: g  w4 C  A8 h& g6 X3 @" n$ K0 V8 o6 X
    RowBox[{"u4", "=", ; W" j8 U0 m, ~& Q& u- g
      RowBox[{5 P  j, ^2 |# x: y6 `3 x
       RowBox[{"Exp", "[",
    . n, M# [% \2 S( u    RowBox[{
    2 k7 |  c: Q* n     RowBox[{$ L; L% `; [, N6 N; i0 H6 _
          RowBox[{"-",
    ! w$ p. t  [/ u% u3 A7 m/ Z, y       RowBox[{
      L1 f9 U% ]+ J# {        RowBox[{"(", " L) n' b: N7 z
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    2 g4 u$ b& z1 N2 ?. |4 T        RowBox[{"(",
    $ q% _$ Y" {  X8 a6 G$ t1 I         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],7 M8 g4 @& N. P% |1 x
         "]"}], "/.", "DeltaX"}]}]], "Input",. S" y/ z3 `+ X5 J7 a* i- q  `  s# L
    CellChangeTimes->{3.57792076325*^9}],0 e/ C* S) ]$ g4 {* A$ g! E' s: C
    : c  Y$ f) A) K* d: \4 [
    Cell[BoxData[$ P9 M1 U# K: P  M% V( ]
    SuperscriptBox["\[ExponentialE]",
    $ U. z- P; ?" O/ w  RowBox[{"3.141592653589793`", " ",
    % `* D0 B, q, S: J$ E* J   RowBox[{"(", 9 J( }, e0 D# c6 I
        RowBox[{
    : J- @/ B& I: G* `& w  r6 i8 W     RowBox[{"-", 9 N# O. A- e, T' e( Z1 T$ [
          SuperscriptBox[
    + n6 X  P7 _' y       RowBox[{"(",
    3 o5 ^# _2 f2 I) p        RowBox[{" k2 b7 J" e. {5 G& R8 L* `
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    " D2 g- n# C! R+ m. l8 [% H# p     SuperscriptBox[
      p( t; R% |! S! w1 E      RowBox[{"(", # _6 d6 ^# G( @6 I& e& S
           RowBox[{
    ; Z, n% `% i; m( |- }1 p        RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-",
    4 r/ y' x! S' a     SuperscriptBox[" k" k, K% n5 ~3 u/ k: P4 z0 v' B# p
          RowBox[{"(", 6 H5 F" F' S/ q
           RowBox[{9 j$ Q5 e3 _8 F7 l1 x8 E" b7 Q
            RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", ! X" _: l# `# P9 P% o! l
         SuperscriptBox[
    2 x+ t- p0 h* J& y& i      RowBox[{"(",
    0 A( U1 }' v- T% _       RowBox[{' t% c8 w/ p3 W8 O
            RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-",
    / n2 I5 \1 b2 h0 t  z3 o/ K     SuperscriptBox[. I+ _0 z. f2 b1 r& u) E, O
          RowBox[{"(",
    1 _) Q9 _0 R+ r9 D' ], h/ G       RowBox[{8 V1 ?* u5 j5 H# ~
            RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    2 s3 k$ D) T& L# g% q     SuperscriptBox[% [# G2 Q4 C& z% }$ ^
          RowBox[{"(",
    & U, H' K7 K0 H: N       RowBox[{" ?% i- W/ `# A, n5 O/ S% }
            RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", , U7 f- y. h! I) R
         SuperscriptBox[
    5 s( W# G: Y: w+ Q9 C      RowBox[{"(", . g" p. X3 C1 D2 M$ X1 T
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    $ i  p4 C/ F/ {' G     SuperscriptBox[+ U- x% R6 r( L3 n
          RowBox[{"(",
    * V, ~& o; e3 ~8 y5 ~* n/ g" `       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ' }% [4 H5 b; m* b5 i$ M; q
         SuperscriptBox[+ [; l5 u! H, V8 \. {
          RowBox[{"(", ( E! f. t/ b8 G6 {' C  r
           RowBox[{
    ) ~2 y% ~9 S3 w# [% ~2 o, u% T        RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], $ V, M# _5 D% o  `& l0 q
        ")"}]}]]], "Output",
    9 l1 I; z. y8 w CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9,
    $ f4 p+ {5 ~% c" P  3.5779607873531995`*^9, 3.5780122169375*^9}]
    1 B; {! h& \4 V' O! r" e}, Open  ]],3 L) H. Y" ^! L5 h6 o5 S0 _8 W
    9 Y5 ?; ^0 d) H
    Cell[CellGroupData[{
    & I& |8 E$ B/ g9 q, k1 q
    7 C8 J5 x0 y! r  u: y! u* JCell[BoxData[3 r0 f" J* O5 k' o& z3 P; r
    RowBox[{"C5", "=", "Ca"}]], "Input",
    7 m6 z, I* t& F CellChangeTimes->{3.577920860671875*^9}],- C0 B1 |) J: d9 M

    ' m) I7 c& \) D' qCell[BoxData[
    3 Y, d/ {) f* s0 P. A$ C' G5 N RowBox[{"{", % V# P6 J, d0 O9 X* z6 q" a9 a' N
      RowBox[{
    ( M6 r" @" N- x" z  "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",", ; S/ h( g' _8 {/ E
       "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}],
    7 A8 b/ x. j* h  i+ D& g  "}"}]], "Output",
    & w2 q% u# A5 k5 `2 `3 k6 o CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9, + @- W4 @6 ?% D4 M8 T/ [8 r) g
      3.5779608137328453`*^9, 3.5780122209375*^9}]' j7 V/ h, o) I$ Z% L; p
    }, Open  ]],
    - Y2 K0 o* b+ {' l4 n% d* G3 p, l& J- o
    Cell[CellGroupData[{
    ; G2 L; F/ t7 q9 x, D) N6 Q0 E( V, |3 v
    Cell[BoxData[3 {) ~- I! X4 x1 C* M( g, x; v
    RowBox[{"u5", "=",
    # L7 B$ k. A. S" n4 _/ J  RowBox[{& I" ^) d/ c$ m/ I9 t) m
       RowBox[{"Exp", "[", - }5 j2 V6 z- [* Q, Z  N% @
        RowBox[{
    8 a; R) F  @0 J! X     RowBox[{  j! n4 Q) y5 T. w8 x
          RowBox[{"-", # v: k$ B' U# l
           RowBox[{
    9 T( e. x$ ~$ u9 N        RowBox[{"(", 8 [2 k1 b& t2 _5 |& G' ~+ j5 U) J
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    + U' i8 m9 b1 }! ]; G        RowBox[{"(",
    / h6 z$ f. o! `1 i; s         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    2 X$ w1 V5 J3 l$ m! [2 ]* y     "]"}], "/.", "DeltaX"}]}]], "Input",6 Y  K' c; \8 l: L/ [  A
    CellChangeTimes->{3.577920869375*^9}],
    0 p$ |+ ]" H) a9 |' N5 I4 i
    1 u0 ?+ R. W+ O8 U# `Cell[BoxData[' Z; I2 n# J2 ?) n& i( q% o
    SuperscriptBox["\[ExponentialE]",
    + u) i/ g) @) ]  RowBox[{"3.141592653589793`", " ", & P0 T5 Q5 }, H
       RowBox[{"(",
    ( P; _" i- P: [7 ?# l5 \/ g3 U    RowBox[{
    ' Z5 z# V7 S% a$ @: j5 f     RowBox[{"-",
    " c# J  G& \' P- O& W      SuperscriptBox[
    ' c5 x, W8 [$ _9 C4 c       RowBox[{"(", # u" l- e+ L6 b- S7 O
            RowBox[{, E, @( E1 p8 I
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", 2 V; S1 v  h: M7 _' z. ^
         SuperscriptBox[: M5 |. ?8 l. F. R) D" A
          RowBox[{"(", ; A- R) t7 M9 }+ ^
           RowBox[{
    : \, T# h( }- ~2 ?' k/ y2 w        RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-",
    9 z5 J3 |( v1 }0 }     SuperscriptBox[
    ( T( K3 b1 y- |: _5 V# W, X6 e% i" G. Q      RowBox[{"(", # I2 ?) m% ?, P+ ], m
           RowBox[{
    1 }# l: i. I/ S        RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    ' F; Y) |, l$ z/ j2 B' ~     SuperscriptBox[/ S" Q3 H3 u( n; s
          RowBox[{"(", + r; V0 E0 P" s6 P. w& j
           RowBox[{' N2 G% B5 t3 Q0 s
            RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    8 n2 H( S5 ^5 H: x4 h3 y& \     SuperscriptBox[
    : k' |" }* V/ O0 }. C      RowBox[{"(",
    . ^( M% w* r- S; q' W. J       RowBox[{
    + e7 I! b) j& K3 ]7 z        RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-",
    3 N3 u. u, H  H1 ~& l3 b9 }     SuperscriptBox[
    1 d& L4 n$ v+ K- ^      RowBox[{"(", 3 [3 }0 u6 a4 l0 x5 ]" G) o# b
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", * I# ~1 N" }- _- g, ]' b6 l/ i
         SuperscriptBox[/ Z9 {0 N( Z7 r  a+ ~# E! S& V$ U3 z
          RowBox[{"(",
    : F, \: O8 p* S, M       RowBox[{
    1 U+ K, ?) R/ K/ H        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    + f9 z, i# v( H     SuperscriptBox[2 K, b4 j0 A; ]; \
          RowBox[{"(", 5 D0 J9 ~7 O  w+ s+ x7 q% ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 0 @! h/ x8 m, p+ J' _& z
         SuperscriptBox[
    ; G- F1 F( K( W: k' }      RowBox[{"(", 9 d0 B4 k$ H9 u9 E) c
           RowBox[{
    $ M2 l! U& O3 K4 n6 g        RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], 2 Y% E" e! c* x- C: a$ a
        ")"}]}]]], "Output",# _! p" h: n! }
    CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9,
    " m4 B- v7 `  P  3.577960815043248*^9, 3.578012221953125*^9}]
    * D* [" r9 _" D' o' \}, Open  ]],
    * N, Q! E  R7 g) N/ w$ [& b; b0 {' u; N* B6 {
    Cell[CellGroupData[{
      x3 c4 [, v* d: b' V- h) f
    ( d- n" r: V* m7 z$ z: s3 z3 iCell[BoxData[- I; o  T$ A) S
    RowBox[{"C6", "=", "Ca"}]], "Input",
    1 L0 _6 r- H8 N% ^4 ~! P# V- t CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],
    , O+ V! M, X! h3 ?0 q: [, @" @# a( N6 I5 F' L% @' Y1 y
    Cell[BoxData[
    7 N# e% n9 P. b" g: I RowBox[{"{", ( W, [) j& ?6 E- q$ C( S0 H1 ]
      RowBox[{+ g5 e0 `7 L9 s; {+ f7 O5 g! E
      "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",", % u8 [2 a+ `3 }$ Z1 }7 f. ?/ E% Q
       "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",",
    - t! E. `& m, c/ W) B/ ]   "0.494866`"}], "}"}]], "Output",) e9 b) p0 w- p# @, F
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,: ~8 S4 ]2 r5 D. Q8 H$ J
       3.5779608373044868`*^9, 3.578012227359375*^9}]
    - I, W1 z1 K  ^0 l5 ?- y: F}, Open  ]],( N9 [" T3 P! _. ?' r
    + y/ u+ ?3 x# z) s" a! {
    Cell[CellGroupData[{
    % P* q  F, h3 D
    6 s7 F0 G( n3 H/ {Cell[BoxData[
    . K0 V+ o4 b/ Y) Y! R7 \ RowBox[{"u6", "=",
    0 n7 t6 U# e# |0 \: F4 l  RowBox[{& Y* s, J- f% t
       RowBox[{"Exp", "[", : [! x5 Q  o0 L- ^7 \% _$ q2 B
        RowBox[{
    * w7 i) k( k9 [  O3 n/ ?     RowBox[{
    ! X' N  N/ |# K' g- j" r) H      RowBox[{"-", $ i* x' z8 O; ]$ p2 Q% a* y% v  k
           RowBox[{6 W5 T) Z- j/ Z4 o' y5 a- J
            RowBox[{"(", . x6 N5 A' c/ w+ X
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    4 \9 h% c, ^; |: A- Y        RowBox[{"(", % V; z1 ^- Z" j- Q8 |5 N# [
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    . u- }* E' `& i1 f+ H     "]"}], "/.", "DeltaX"}]}]], "Input",
    ( Q+ j  z+ q% P3 X CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],
    7 u" \: G' Y2 M8 H! P0 N* }
    * w  z4 ]# M$ `( yCell[BoxData[. k0 U, d, J. m" r
    SuperscriptBox["\[ExponentialE]", " _3 A- Z" h+ a# ^) j0 P
      RowBox[{"3.141592653589793`", " ",
    * v7 \. D, J0 K! V* x   RowBox[{"(", 5 x- v. U' x) h' W8 w( u& E- Y4 R
        RowBox[{; Z0 N( Q2 f# w; ]/ x8 [
         RowBox[{"-",
      `  U4 i9 y; D# Y1 L( K2 v! T      SuperscriptBox[% v6 d% ~- L  U
           RowBox[{"(", 5 }" U; R" t, ]2 A0 H
            RowBox[{. `( c4 b5 j5 ?- v
             RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-",
    2 p3 N2 z( F& `) N     SuperscriptBox[$ A. B) V; `' \' O. g! H" ~# `) }
          RowBox[{"(",
    ; ^0 i6 M" n1 k, Y, s/ s       RowBox[{
    ; z# k4 v% p% G/ F1 y9 a        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-", / X# ?$ V/ D. e& l& X
         SuperscriptBox[3 A. x5 H' U$ M
          RowBox[{"(",
    2 A/ J  [# |2 M' S6 {5 E       RowBox[{7 S) t4 C2 K% ^4 |5 ~
            RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-", 8 u. [5 @  P4 P& J1 i( v
         SuperscriptBox[- S3 g, o. K: h. |, F4 v2 U( ^9 A" F
          RowBox[{"(",
    4 ], D2 t) w# X' I3 x# V       RowBox[{
    : k1 @: y& d% M+ q  l        RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-",
    , j6 A2 x7 R) D( b7 L' S     SuperscriptBox[0 H, f, R8 V: u% A/ L! A; n$ y  o
          RowBox[{"(", ( F2 Y/ }8 {9 A5 l. N
           RowBox[{
    8 b/ C" J7 X. x( ^        RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-", ' s' H8 L& g; G* M8 |+ R$ b  z4 L  K
         SuperscriptBox[
    1 x5 c6 [  ~. e7 y7 t7 s$ Q% ?      RowBox[{"(",
    & _5 G3 u0 Q, u- g       RowBox[{
    . j8 q" {  H( `7 q        RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", ! j7 ^, _  ~0 ?' w! ]: y
         SuperscriptBox[7 Q$ b+ B0 c6 r5 `! y  I# u/ |
          RowBox[{"(", 6 N. V! X4 M% X$ Y5 R, V9 ~" I
           RowBox[{# x6 U  _4 Z0 q
            RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", 7 ], |$ n# J7 g" f  x% a- {' }
         SuperscriptBox[; ?! i/ k  l5 ~. d+ D
          RowBox[{"(",
    ' i" |; M* w* a( w3 ]       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 1 F, T* y) ~+ K0 Q9 {
         SuperscriptBox[3 b7 [3 b: x* p9 s- _1 A
          RowBox[{"(",
      W9 M' l" v; ]5 {% O" O       RowBox[{
    6 j: L: ~0 g9 U        RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}],
    ( p1 Y& a9 ?3 {) a6 U- x    ")"}]}]]], "Output",0 t7 ^2 C0 L: |- Z6 M' x
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    " B* @  L0 V7 T  3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]
    ! D$ s& b- j7 C" e' ~}, Open  ]],
    4 \5 F  D) h( d( o9 n4 ^/ {8 q) a3 I
    8 G6 \- e9 P  qCell[CellGroupData[{
    4 C# J' i5 O1 z5 p& Y
    : c: c& S  u$ R/ V, q& zCell[BoxData[, ]; k. x$ \$ o& [
    RowBox[{"C7", "=", "Ca"}]], "Input",
    ' X' X: X9 H; o' i) U CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, ( |5 `9 D  Q  ]( W7 y, G, b" g$ y
      3.577921316125*^9}],, q; [) w; t/ [# k

    , B0 q% Q5 l* T/ hCell[BoxData[
    1 i5 O$ \, W# n3 ^. U5 L RowBox[{"{", , B) y4 x+ |! s: s7 |
      RowBox[{0 h$ I: h3 ~7 O' F9 |- M( |9 A" j
      "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",", 2 {/ t# P4 h# T! `) A; w
       "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}],
    ' I0 G0 x! X8 r5 k+ q8 m( Q+ c  "}"}]], "Output",
    ! S  |0 O) M% f8 v! S& F# |+ C CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, * k  q; d, W7 b9 S. ]1 L" y
      3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]
    - U4 M# w5 E6 V! {3 m}, Open  ]],& f1 D! {' z* P7 w5 ~5 Z2 b
    8 M/ i1 A& ^$ l+ Q8 ^9 W
    Cell[CellGroupData[{
    * R4 ]- l, W" J3 X7 P
    , g* K0 K" K" H! y0 uCell[BoxData[3 h! P3 `) Q% T( i' ]
    RowBox[{"u7", "=",   ^" \$ U& a7 Q, N7 n. D2 A
      RowBox[{/ C$ X8 X1 I2 o, D7 _2 E' Y. L9 Y
       RowBox[{"Exp", "[", - G! Y) J" ^. N0 O6 C; v' ]
        RowBox[{$ J9 ?" D- D/ o# O% m0 A
         RowBox[{# W2 V1 q" s: D6 F
          RowBox[{"-", 6 Q( w% l% r; W! q# H; f
           RowBox[{% U& O3 I2 u) ^4 w. e- h  e" j+ x
            RowBox[{"(",
    $ f8 J6 X' B  W* i         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", * p; u1 C" k  e
            RowBox[{"(",
    " w" ^7 h9 Y# r- m         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    % n# \6 Y" y% w2 p     "]"}], "/.", "DeltaX"}]}]], "Input",
    % z! m5 _/ l$ S9 u8 s1 A CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,
    # t$ _& S4 [- v/ k- e6 |, G  3.57792132028125*^9}],% M  u7 m3 O0 ^8 X5 j1 Y' l2 H

    ' e' F: v- P* d; Q8 e2 iCell[BoxData[
    $ A$ \/ p9 n9 R$ @2 T; R SuperscriptBox["\[ExponentialE]", ! B4 _* P8 ^) ^5 _/ ]- H) @
      RowBox[{"3.141592653589793`", " ",
    & u6 o- E+ R+ c' s8 M7 Q3 {   RowBox[{"(", 8 J+ D! [: s3 z' n+ b
        RowBox[{! w8 N6 N$ H$ b- J  R4 j; d
         RowBox[{"-", % L! l/ G9 X5 G
          SuperscriptBox[
      ]- \) m# a  c7 ?/ k' t& N       RowBox[{"(", ! L. U0 C1 p, P3 K& p7 C3 C0 Y
            RowBox[{
    ) [2 p- ]" D9 c! [! o3 D+ Y, j         RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-", % R- a1 ^/ S, ^4 g2 ^' q% J
         SuperscriptBox[% v' c4 [$ D' a1 n/ k/ }, c( |. v
          RowBox[{"(", : V% N' h, z6 S+ X
           RowBox[{# g: g" r/ t6 ]
            RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-", , Z* w1 t5 s( C! Z! R: h9 Z
         SuperscriptBox[# y" [) q0 o3 _6 d0 @0 q1 |
          RowBox[{"(",
    ' m+ \# T5 t, j0 _& Y6 e5 l       RowBox[{; g' x1 k' Y9 h3 F6 E
            RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-", " j  x" N2 p( |+ |! \; T
         SuperscriptBox[, I( E) u8 n* K
          RowBox[{"(", & U1 a( q! v) t  ~" l
           RowBox[{
    7 k/ C' y9 k; o' w2 T. @' {, _$ D5 n        RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-",
    : c+ G! [" |, d0 f     SuperscriptBox[; u3 l* o+ P0 c. r
          RowBox[{"(", ! p; D0 C: }( j
           RowBox[{% W0 o1 c$ R( }$ t' J
            RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-",
    , i1 p, R/ f9 u! h6 G9 g4 @     SuperscriptBox[% O, K% \' _, M* x% P2 f8 Z. i+ Z
          RowBox[{"(",
    3 y, Q  c, ~1 b       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", . v8 u! v* l5 s6 n! s# G: q6 G
         SuperscriptBox[8 {. l8 J& s6 q$ S2 n
          RowBox[{"(",
    3 d3 Y0 `. g) s! z; Z, I* l       RowBox[{
    4 ?. G+ O0 U4 B. A7 T; G( a+ T' T        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", * b* Q, Z1 X3 R9 S% l7 a! L) J. ~
         SuperscriptBox[3 c. h" T. i) b- [6 B; t
          RowBox[{"(",
    5 f( M# Y9 T' s4 z& Q7 g       RowBox[{
    0 {* e. H" u; D# }+ a1 `- w" U        RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    5 y, t1 N: _5 n* _     SuperscriptBox[
    . O$ A$ h2 a. X3 @' h# u, |6 W      RowBox[{"(", 6 m. ]0 ~% o' R: J8 Y) w# j- V
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], # [5 S: a# @2 N2 T! |( E/ U
        ")"}]}]]], "Output",6 [% T0 X  N/ i4 a
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    $ ^4 D1 p8 c! _  i  3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9, 9 ^6 Y! H3 v/ p5 h! ]+ \
      3.578012251359375*^9}]$ N! J; [# p* Y: @% `/ X5 T
    }, Open  ]],2 D& @" T/ y1 e2 w# D- b
    % ^  `5 B  ^9 D- M+ f& B- G( p
    Cell[CellGroupData[{' Z( f+ S6 D% u' N
    / ]/ h/ e6 X! C/ C* T# k' l  e( z9 {
    Cell[BoxData[4 I% h" C7 c- \6 i8 W& f& O
    RowBox[{"C8", "=", "Ca"}]], "Input",
    $ h0 r- T/ ]: B6 s. X3 C. Z2 ~3 d8 p CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    , c' K4 O2 ~( |  3.577921316125*^9, 3.57792141421875*^9}],+ i' X: j4 S' y1 x" c

    - `3 I0 I8 }2 H  ]- c3 ECell[BoxData[
    ; o2 M2 o5 h: W! U+ e RowBox[{"{", ( i' [0 q# y0 W% ]) L" `% A
      RowBox[{
    * G2 t0 Z$ P/ H* G$ k, |  "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",",
    % G$ _# a0 {! ?7 y7 v% H   "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}],
    : J5 f! ^" Z* B8 [  "}"}]], "Output",
    ' u# U  t: Z$ x0 I! R7 Y CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    5 B6 C* T, s4 ~5 {  [  3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9,
    2 J+ d/ s9 n+ f3 b1 J  3.578012260515625*^9}]+ R+ T2 b0 q* [5 ~" f& g  |0 M
    }, Open  ]],9 `! r- u1 d9 ?

    & E, U* |4 \8 U& z" [Cell[CellGroupData[{2 w# @. l* P$ Q, j7 L! _
    % c! z3 l8 Q0 A& c) w% K
    Cell[BoxData[
    : @# J& V: @2 _% ^6 C6 b+ L RowBox[{"u8", "=", ( j$ J! J5 h! {" e7 n7 `( p8 o
      RowBox[{
    2 N& D5 T- j9 K; p   RowBox[{"Exp", "[",
    . b/ n; ]$ E, m5 t! b" Q9 c9 V    RowBox[{
    5 {3 q; f* m& T0 e6 z     RowBox[{
    1 V! G3 v; r1 ?      RowBox[{"-", 8 U& M- g8 Q* v1 r
           RowBox[{
    ' x5 T+ g" K+ ]: Y+ U3 ^* n        RowBox[{"(",
    3 n; W  m* i! K' t& _' e         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    $ n# H* ]( A+ {7 k4 {3 f        RowBox[{"(",
    * K! T2 \. o( s8 w0 j; p: t         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    - [7 ?* L, }  z* W. H+ P     "]"}], "/.", "DeltaX"}]}]], "Input",1 q2 p+ J2 ^3 O' k- P! d) V# d& x4 }
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, 3 [: D5 l! Q# j4 A" i& f/ C
      3.57792132028125*^9, 3.577921416921875*^9}],
    9 H* H0 j& d2 \7 G+ O5 ^- H' T3 s& o. H4 o' p
    Cell[BoxData[7 r+ n- d: @+ z; f  y$ q+ m6 f6 [
    SuperscriptBox["\[ExponentialE]",
    ; }  \0 [' Q9 ^5 \  RowBox[{"3.141592653589793`", " ", 0 ]" {! q' G: u- ~) m
       RowBox[{"(",
    * `, ^$ B% A* K% R% F    RowBox[{
    7 _% C4 K: m* G& ?     RowBox[{"-", 4 H. l' n( M% e" x/ ]* Y. T/ l
          SuperscriptBox[: @: x) W* x6 b
           RowBox[{"(", / ?2 x) Z" q& G4 i
            RowBox[{; h/ s. U; J. d7 r, v' w/ k% c8 e+ x
             RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-", 8 p( h/ [  [1 ]7 u; d
         SuperscriptBox[, N8 W5 x6 g- \( y/ l% r3 c
          RowBox[{"(",
    ; B+ J1 y+ Q$ h+ L       RowBox[{
    & c) K9 |8 V" g        RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-", 4 h& o& X2 O% I. I' {9 M; `
         SuperscriptBox[1 ~, U- h% O+ ]& g7 e! `- y
          RowBox[{"(",
    8 j1 ?3 x3 C( m5 d" D0 }       RowBox[{2 s- j) o: h  I# q' g
            RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", # ~. P1 K9 s9 t1 ?% \
         SuperscriptBox[
    + j: E. P$ \. ~( v      RowBox[{"(",
    ) V. C% N7 |% P# R% Z- s. A       RowBox[{/ A! Q; |  I9 h4 i6 e
            RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-",
    . N0 T% ~5 j6 [     SuperscriptBox[- t! m4 j" ^, s
          RowBox[{"(", # h! e  F5 y6 [
           RowBox[{- V  J6 ]) ]% g! j6 ~0 d
            RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-",
    ' \4 A7 n( K9 r) b1 V( k0 n     SuperscriptBox[" I! Y6 W- p; h/ C+ {
          RowBox[{"(", 1 n$ e" v( n1 D& r. ^
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    6 P( E2 o0 H' T( o' H0 S     SuperscriptBox[  m1 W- X! \' [, o1 e& D
          RowBox[{"(",   x! Z5 i. z& F/ A1 `* B
           RowBox[{( M8 N- O' _( [
            RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", " S4 i# s7 w( C" V. D# h7 @1 F
         SuperscriptBox[
    ! a, q8 j) a/ k3 j9 j, I' T      RowBox[{"(",
    3 e8 |7 M# I1 c       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", , r2 j/ \- ]# B! `+ I6 }; H
         SuperscriptBox[+ q! P7 e7 S% {4 H0 t, d0 z
          RowBox[{"(",
    : q5 C  K+ i6 N! P! c       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], : m$ O4 C8 a5 j0 ^" O/ x( @# W
        ")"}]}]]], "Output",
    1 }/ Q6 D6 {, i! q% [; p CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, * n1 p# `7 W/ p# s& t
      3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9,
    7 P% ^7 P0 y. J  ?  3.5779608945565863`*^9, 3.57801226165625*^9}]
    2 T. x+ q0 ~- {  s}, Open  ]],0 a% F! k& j  q

    # Z" y' D/ a$ L' H' h/ ?Cell[CellGroupData[{
    : w0 M8 T: [2 ^' R/ j$ k' M* x" t$ Z; u0 b' W& \
    Cell[BoxData[! ], {, [) f" ^4 a4 y( M8 Q$ R- E
    RowBox[{"C9", "=", "Ca"}]], "Input",
    4 V* H, W( d' U* R; g0 Q  B6 t CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    6 [5 m8 [+ H# Q1 A4 S; x. h& G1 d  3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],, @( @# W/ j; H) f1 G; ?& V
    7 B  E, T$ m! r6 C0 s6 \% j. F
    Cell[BoxData[; u0 M( M; b8 L; C
    RowBox[{"{", ) p9 \1 X: G- W9 a9 ?5 G! K: f
      RowBox[{
    6 A! e, o! a! h: X0 q4 Y% ]5 E5 x( h  "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",", 2 {1 e) Q7 _! j: i# f2 m" ^
       "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}],
    ! h4 V& X: @0 f- V% Q( g  "}"}]], "Output",
    # y/ @  j) O- X. E6 f8 c! W/ D CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, - F0 n$ T/ N4 s
      3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9,
    7 |8 _2 ?3 S9 d5 r  3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9,
    5 I5 v% o6 @# }/ ~# q) u  3.578012268234375*^9}]
    + n0 X" h; K; n& n; C8 i2 K}, Open  ]],- R9 }) K* w& u) r& B$ V, s/ M

    7 j7 f& p* u, J4 ^9 E/ g( CCell[CellGroupData[{  t% C  v, h& L+ e* |

    ) Y/ j$ h1 Q( H' j& G4 hCell[BoxData[4 L; G: D$ E) e1 c# n
    RowBox[{"u9", "=",
    - ?5 o0 q9 b' p  RowBox[{0 c  z# \( L: T6 C" J
       RowBox[{"Exp", "[",
    ! J5 g* f# M. V, }    RowBox[{
    3 H* l* }) v% N1 S, Y) m     RowBox[{+ m/ w8 j1 l: c5 f0 |
          RowBox[{"-",
    9 ]+ u* Q  q0 H1 l+ e1 f* O       RowBox[{
    3 Y+ g5 U/ K3 v) k+ e        RowBox[{"(", ) E6 c7 [3 o! L3 T; x- g- E! n# ?
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ; B- k1 h' ~) z& S8 N4 L        RowBox[{"(", % `4 s2 S) q" P1 e  H: c1 q/ P
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    # y9 V3 ?5 h+ g. z7 x% a     "]"}], "/.", "DeltaX"}]}]], "Input",
    ( A. F' ?: f1 @. M& B6 }, m5 @ CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, 7 l3 _5 j) q' Y5 `) Z# I
      3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],3 P# r4 E0 e  d% X9 I

    2 ]" v' [' w. P: M4 v# MCell[BoxData[
    * t: }/ P6 S" p' ~ SuperscriptBox["\[ExponentialE]", + s0 Y* l3 q/ F1 l# v% a
      RowBox[{"3.141592653589793`", " ",
    + a6 r2 Q+ H- Q9 l2 b" g: q* Y   RowBox[{"(", " A4 r) Q+ q1 z$ z
        RowBox[{
    4 t2 l5 d3 m1 Z7 z8 y" L9 ]- ?% u     RowBox[{"-", 1 b" k' u) E# U6 u: q' k2 W' O; ?
          SuperscriptBox[1 v* L  {1 r4 I& k0 s- A: O& T
           RowBox[{"(",
    - M+ g3 a  W3 m        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-", 4 ]( M0 P( R9 t' t% ]6 A- m
         SuperscriptBox[
    1 w# u: o9 D8 B1 q/ x0 u      RowBox[{"(",
    4 M# }+ m2 R" S9 b# l+ J( P3 z       RowBox[{
      ^. q( y( z' c2 O; p        RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-",
    % J9 u- m% R# s2 V( C     SuperscriptBox[. }) T2 a/ ^" x6 M% q; }- v6 n
          RowBox[{"(", ' p/ C7 J8 r% S: |
           RowBox[{
    ; T% n8 R$ p# X# m) H' n        RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    3 o$ [7 h- X% J$ j7 z4 X& p6 q     SuperscriptBox[- M# C, ~( |7 p! F3 x3 f% i* H: R
          RowBox[{"(",
    ! b% J8 x3 _% ~       RowBox[{
    - b2 i# H7 t+ u5 G2 w+ k& p% T$ k9 D        RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-",
    ; ~* Q8 {' P6 E4 r) ~     SuperscriptBox[
    4 A5 P3 ?9 o' V4 \% b      RowBox[{"(", # @$ \  C) n! Q, d6 K9 c
           RowBox[{* u# D' M" z4 Y; G* @! z2 J
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", & w$ T/ Y1 {3 Q( ~
         SuperscriptBox[. V: A& z: i  f
          RowBox[{"(",
    8 L5 V9 ~* s- F/ u" ~3 ]       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    & V3 i2 N9 I; \, |     SuperscriptBox[
    : C' \  L4 t) [8 Y' q# f      RowBox[{"(",
    0 H$ ~: K  P& u       RowBox[{+ E' Z$ V, O7 V9 ~
            RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-", / `; N; ~7 k' t( r/ N
         SuperscriptBox[
    $ L1 r8 M- ~0 v% |      RowBox[{"(", 7 E. k3 ]0 {* {$ h2 v
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",   E5 f. I, F. I, W
         SuperscriptBox[3 G$ p) n: w7 Q1 z
          RowBox[{"(",
    8 N/ g! `- \  g# z       RowBox[{
      c$ c/ Q/ ~" X  m& m        RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], - X% b, F8 ^/ D# G$ t% L2 i
        ")"}]}]]], "Output"," l6 ?, T4 @- D$ F
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    & `; |3 o6 U8 s/ T3 \, W  3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9,
    & H' F6 {0 B0 T: p( h# o( J4 E, S  3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9,
    # d! A5 R- B* n2 o0 o  3.577961530421959*^9, 3.578012269125*^9}]
    - R7 f" B+ z( Y# F3 F}, Open  ]],3 [4 @/ y1 X6 h2 C/ K
    & Z3 S" Q% v5 r
    Cell[CellGroupData[{2 v" C0 l$ M5 q

    6 ^8 t2 K; Q; M& I2 zCell[BoxData[{
    * H& v6 v8 n& B9 W7 } RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]",
    ! t- U8 L) I* P RowBox[{"u10", "=",
    : g# R' O# k' ?  RowBox[{
    * h, a3 q9 i8 _6 a" m2 X( c   RowBox[{"Exp", "[",   o! H) c7 ^: G( ^3 l
        RowBox[{2 x$ d7 L% M5 Y0 |3 a2 t6 i/ t# A
         RowBox[{
    - ?$ S! L+ @1 O2 B+ k      RowBox[{"-", * }. j: p) X0 Z
           RowBox[{  t8 ]) @. y6 X3 r' Y
            RowBox[{"(",
    0 W8 F" I, Y( T/ D; k5 K6 a         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
      Z4 m7 C# n& s        RowBox[{"(", ( {7 U: q5 m. O, Z, p
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    0 s( Y/ f( Y/ n" \4 R7 }     "]"}], "/.", "DeltaX"}]}]}], "Input",
    " o& A3 ^/ z! o CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],
    6 H2 H0 z  a; ?5 u3 ?  Y
    ( ?7 F# C+ G- ]; n+ iCell[BoxData[" c/ E6 w/ ~5 D& q0 e( n! D
    RowBox[{"{",
    & D, N% X! I* g3 [  RowBox[{
    2 X& B& ?  t9 n  "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",",
    6 K# C7 t4 b5 S! E' p% }   "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",# e! s% l- Z- O! k+ X0 u9 I
    CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],
    ) E- m# ]3 L- W' Y$ e' U' C8 X4 h7 B+ @! r  i3 A7 X
    Cell[BoxData[; \! C, J  P4 G1 ~
    SuperscriptBox["\[ExponentialE]", 6 }  e. U. a6 E0 O) s
      RowBox[{"3.141592653589793`", " ", ' p) b- a$ h7 [+ @5 h
       RowBox[{"(", 8 o* `% D" m! @7 P7 E- ?" @
        RowBox[{
    0 \, u5 F5 C/ d8 B) U- s$ R     RowBox[{"-",
    ) g7 N2 @5 v& ~) d0 L! a2 f      SuperscriptBox[
    6 m. }% I- J" S       RowBox[{"(",
    0 Q0 L# b9 `4 _# v        RowBox[{+ A( v; Z$ v0 R3 J
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", + J7 t8 h) `" {* y8 ]6 A1 R  D  C+ a
         SuperscriptBox[& r/ M2 C) b! q: T# d
          RowBox[{"(",
    8 N' {9 u9 S+ ^1 }( c       RowBox[{
    4 u+ t4 i& n4 U* C0 i! M! _8 {        RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-", * q2 n' ?0 f' f. q( C
         SuperscriptBox[& @) m, Q  b2 _* @4 k- x1 X- x7 W
          RowBox[{"(",
    ( L. ]" f' h6 H       RowBox[{) w3 P8 j3 M& Y; ?  F' }" s# c
            RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    ) O- W/ e& d7 s     SuperscriptBox[
    ( I5 K3 J% Z. L$ f% r5 n      RowBox[{"(", # P0 M- U0 ^3 f
           RowBox[{6 U0 `* f: m5 k) Y2 F" f
            RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-",
    + M- o. ~! Z; V# }" y     SuperscriptBox[
    " u" A3 [8 u) B9 Q/ n# V      RowBox[{"(", 5 f7 d; G; V0 Y$ p5 f& Q4 Z& L
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", % o& h- s0 Z9 ^5 I' O1 k
         SuperscriptBox[& w) z: C4 K) M7 |, m
          RowBox[{"(", ) F  a' o' i$ J" b7 [: C2 r
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    # Z3 ^5 {1 q- [0 ^# {; l( K: k     SuperscriptBox[
    : e6 Y" S( o( c  g      RowBox[{"(", ) {2 J9 p5 {" o$ @4 q0 _
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    1 k4 I, c5 Z( _  }     SuperscriptBox[
    3 h9 s2 ^' q3 L- g9 w' |      RowBox[{"(",
    " C& Y0 X" f) y/ {       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 1 ]2 y& q9 P" n" i2 E
         SuperscriptBox[
    1 g8 D9 V9 Y! ]! k7 y" D      RowBox[{"(",
    : W8 v8 e8 o' b       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
      V" B* c6 s1 j, N# u2 m/ Z    ")"}]}]]], "Output",
    & _7 W- ]9 O/ {0 C CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]9 i4 w. Y5 p. {
    }, Open  ]],
    - o. j: _0 q7 @4 h1 V. t* L
    9 A2 r$ z  P  n5 X0 B9 A/ kCell[CellGroupData[{5 n2 ?: r) f" L; e. M: O3 W" M

    2 D7 u7 B1 z; o# ^3 D- rCell[BoxData[{
    # B8 n% v" K9 e0 E RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
    0 u% m1 s4 F) u RowBox[{"u11", "=", : X+ o3 v2 }# c. z, L+ M
      RowBox[{
    $ B1 S' g! e/ M9 N9 I$ q   RowBox[{"Exp", "[", / ?$ N1 l: o. h0 ?
        RowBox[{
    # M1 y% e* S9 d6 u# R% V3 O' m     RowBox[{* _2 V1 u2 W- g. ]# o" Z
          RowBox[{"-", , ]% ?7 Y: h; y
           RowBox[{
    ( Y! Z2 a. E1 w8 P8 X1 f/ l        RowBox[{"(", - R: m) B  }. C
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ( D2 @6 E% \5 h8 z
            RowBox[{"(", - C4 J- u' O1 g+ I
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
      L5 N% H  F% q% y4 m/ t9 w     "]"}], "/.", "DeltaX"}]}]}], "Input",
    * m) C7 l$ j4 a2 u- X CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {+ I- u/ k4 S6 Y: }' P4 P
      3.57796154237158*^9, 3.5779615434011817`*^9}}],
    * B: ]! o+ L8 D3 j8 R
    0 {/ A' r- }: k1 Q  JCell[BoxData[, a; z, e3 }. q6 L
    RowBox[{"{",
    / G- V1 g% u& b, O! @  RowBox[{
    $ N. Z7 c) \3 l4 m7 n) t- Y  "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",", # s1 F) f0 Y- l  T
       "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], : P- j; Q: H9 |( W( o" s1 e
      "}"}]], "Output",
    + a4 U0 S/ W! [1 Q0 V CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    - [5 h6 h. R3 Z( ^# m! M! D0 T  3.57801228203125*^9}],
    ) J6 X( s9 t, _; |- c+ i
    ) a- M" b& X! kCell[BoxData[
    5 j) K1 P1 k# C, b& q SuperscriptBox["\[ExponentialE]", 6 Q5 c  D2 E: \, L7 i
      RowBox[{"3.141592653589793`", " ",
    / ]$ }2 d3 T9 Y: m4 v- J" w   RowBox[{"(", " E9 b4 ~" J0 {
        RowBox[{7 ?; I2 f3 `' H0 d6 U! ?
         RowBox[{"-", 8 N) d5 a5 V" ]; U/ n- w. |3 b/ h  |7 P
          SuperscriptBox[
    4 @( m% _0 {4 f$ y: o0 y       RowBox[{"(",
    : E! A" s0 s% I3 ^* C3 b2 r        RowBox[{: x0 u4 i1 X- m- w
             RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-", / Z/ D/ y$ r- q9 R
         SuperscriptBox[
    : `4 y2 b$ @; J  a1 v; K/ ]- E      RowBox[{"(",
    ! T3 [3 A* V0 `5 a% Y       RowBox[{* u# h, u* \$ G
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-",
    8 {/ u; k$ S( ^6 {" m5 u# B     SuperscriptBox[
    5 C$ c4 e& k5 n( h$ B$ j      RowBox[{"(", + z1 S2 u9 k* A
           RowBox[{
    ( F" u) D$ h5 L" J% I# }        RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    . j9 p! R" {8 d     SuperscriptBox[! R% T8 I: C8 L. q
          RowBox[{"(", 5 m: j/ [# a  e8 V2 y" b
           RowBox[{
    2 e0 b6 S4 k" a* S        RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-",
    ; t, A" Q+ ~4 @# f9 p+ H     SuperscriptBox[2 O$ l! j4 y. t- l
          RowBox[{"(", * V$ E9 v( S3 F0 k3 t
           RowBox[{3 K1 G$ N9 p8 i# \- m3 P
            RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-",
    2 y8 ^; Q9 w( x8 d; P     SuperscriptBox[
    : ?+ x# w. }2 m      RowBox[{"(",
    ' s2 B! W; {: ?. c$ M       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", " E/ n" g4 t' B2 `
         SuperscriptBox[
    $ J" n4 W# c; F      RowBox[{"(",
    % D2 d* m) F2 f: j0 F! N( K8 l       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    % \! p+ P. q7 {8 f     SuperscriptBox[  }- Q: L. w4 O  N* p$ d
          RowBox[{"(", : _6 k8 V  {) `/ w; u+ F+ u0 e4 `6 \
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", ! |+ ]6 X( N. {. b+ C8 P2 d% }
         SuperscriptBox[4 i; G9 ?: j/ v; S1 e  w) X6 Y
          RowBox[{"(", $ _; X4 ?3 i8 P; g/ n) k
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ( c" Y  ]" p  j    ")"}]}]]], "Output",$ \  F! ^  s3 a' z; g& M+ u
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, - M% v; `2 |+ F6 x
      3.57801228203125*^9}]
    2 C+ `  |' ?5 \  i}, Open  ]],3 R$ \; ?9 E5 d* e' [; q# U7 \
    0 e6 n# w! H8 C! H1 W
    Cell[CellGroupData[{, L% e7 n+ Y- \* e8 h
      a3 D3 S' m  P- {2 F
    Cell[BoxData[{
    ! ?  M( S/ ^! \0 K$ ?: N  Q, O RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]", 8 N. U; |% K2 g- J
    RowBox[{"u12", "=", . e0 R; i+ _1 G5 M/ h- b# K
      RowBox[{
    * E/ i+ {, c0 J  e/ D" t) @   RowBox[{"Exp", "[",
      w% H) @$ ?% N3 G# a! k4 b    RowBox[{/ \! }6 _* ?$ h4 h
         RowBox[{2 Z1 ^! b; |7 T  ~) O* G' Q/ J% X
          RowBox[{"-",
    - W# W) O' Z: t: V9 P  j$ L       RowBox[{' e+ L5 l2 `; U; j9 t, \
            RowBox[{"(",
    5 r, H  r1 E9 [' D9 Y$ F# r/ D! i6 I         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 3 H4 q7 ~4 V+ {
            RowBox[{"(",
    5 W3 u; o% U2 e6 U" y( a         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    6 C. C, |: G3 t5 a, W; m     "]"}], "/.", "DeltaX"}]}]}], "Input",. q! P0 y/ [4 N, s$ |9 Y
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {7 c- M1 j9 J" L% d$ H
      3.57796154237158*^9, 3.5779615576284065`*^9}}],
    1 x; h* b7 F6 o$ v# T' L
    3 E0 B( X. g$ B$ {  |Cell[BoxData[
    & Z, k2 N; I' R/ `$ ~+ e RowBox[{"{", 7 Y5 U; Z, }  ~* ~# X
      RowBox[{
    + ?3 {) f; |. ~  G  "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",",
    , N" Q9 H& X( D8 b7 @/ `   "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}],
    : U" J+ q" U( @) E, J) H# [  "}"}]], "Output",. d: j" e4 ]! c
    CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}],
    4 _4 W" H4 j( M( @) E
    / F% m& B2 o0 b7 X; B" ?+ UCell[BoxData[
    1 S* |* g% F% |0 w% ^% }1 m: X3 c" M. }5 f SuperscriptBox["\[ExponentialE]", 2 N8 D0 [; g5 Q* j& b  c6 A2 L
      RowBox[{"3.141592653589793`", " ", / T2 O& k% h% @; v; F% N4 `/ L
       RowBox[{"(",
    0 c  g8 {5 @* M8 g- p    RowBox[{7 n$ \, n: o4 v" h/ s0 ^3 ]2 A( [: J
         RowBox[{"-", ! `, b. A4 F# @+ z# A( ^$ l' V
          SuperscriptBox[
    : ~' t/ L) t6 t) z       RowBox[{"(",
    & }& p. w/ j- Z        RowBox[{
    8 ^# c) i% ]5 P+ H2 \         RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-", " U0 ~: z$ O, q: i* |7 i1 U& |
         SuperscriptBox[
    . w. h* Q' X5 G2 N6 _: S2 L      RowBox[{"(",
    $ r' o& c* Y0 @- j0 y/ I       RowBox[{
    ( J/ b  h# v/ z: I6 l  Z1 }' U        RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-", 4 ^4 ], k3 K1 p' g0 @" V
         SuperscriptBox[
    8 Z7 W; Y0 w5 z$ x1 u8 K2 \      RowBox[{"(", 4 S3 a' x5 H3 m3 n. l: K
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-",
    + O# s' U- K* y) C' @     SuperscriptBox[3 o$ ]0 Z5 R8 ?$ D! |( Q
          RowBox[{"(",
    8 V+ e, W4 W: ?! U       RowBox[{; I: u) W9 A2 d% e; r
            RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-",
    5 o& z& f* G2 m     SuperscriptBox[
    9 u: n0 d- S) P      RowBox[{"(",
    ( s+ t9 g( ~2 u" [       RowBox[{
    ( _: m3 P& z: n" ]+ V, b        RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-", ! u; ?( q( r5 |! `# h/ a& P6 v5 s. d
         SuperscriptBox[
    + x5 f, m. m' }4 i      RowBox[{"(", 9 D2 P' z9 T3 X: \
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    ' Z6 s: k. c+ l* S" C     SuperscriptBox[* X  [& u8 w% P& t0 K# i
          RowBox[{"(",
    / N# I( m7 u1 _( U3 v1 i       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", " ~. x: f2 l/ z" y  _0 ?
         SuperscriptBox[; Z" C( s! P2 C) X
          RowBox[{"(",
    / R) z9 ^) \% \; d( A       RowBox[{
    2 m7 N+ d+ u) u' e. A        RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", # p1 u  P  o$ i* P4 x7 }. c6 W; S
         SuperscriptBox[! P; o% W" j# z+ v- i; }4 `; w- j
          RowBox[{"(",
    ; P+ W, `6 ^/ o) ?3 M9 x6 h       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    & [: q- r, t% `$ }! u3 U) M    ")"}]}]]], "Output",
    ) c% W. T% s7 }; S/ v; v" Y CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]
    3 U# M+ C$ a9 z* n" {0 [. E}, Open  ]],6 X8 d- Z/ k$ P: x! i3 U# A3 `
    % `8 G. U" s- q! Z8 z
    Cell[CellGroupData[{
    ! P" T. L' \1 I' d0 \$ p4 ~) `
    0 d( x- ]5 t8 aCell[BoxData[{
    " X. Z( Y- n- l% L RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]", ) Y' `! R: T; l4 a+ _  V1 ?' i
    RowBox[{"u13", "=",
    , D# m  q$ i; J% X9 U* B  RowBox[{
    0 s" u8 u6 S' Z8 \( J$ Z; Q0 c   RowBox[{"Exp", "[", # C- u! p: ^' ?; M2 c, l
        RowBox[{" ^% z7 p; s( [+ J! d. k! y
         RowBox[{% N! B- A) j$ Q* q2 W
          RowBox[{"-",
    5 G& C- N7 B  Y       RowBox[{2 a3 i2 y6 Q" r9 Y( p
            RowBox[{"(",
    4 K; @+ ~+ s' z5 c: v# O         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ' x2 ~4 A$ u( n  J4 r# q8 n& O: _
            RowBox[{"(", 9 i5 e0 N) y% Y7 ~  a6 x
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],# t8 f& C1 F# E8 @' e
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    ' t& \3 _6 ]3 l/ t; X' ~ CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    5 y( I$ _, M. u3 v! P+ R/ B# Z  3.57796154237158*^9, 3.5779615599684105`*^9}}],
    , ^! ]  r( x0 V' G4 Z& U) E* f7 ]1 g
    Cell[BoxData[
      u7 H. R* [8 b0 A& q2 y9 m RowBox[{"{",
    * y4 v1 l' Y, u2 I7 c  RowBox[{- C0 @+ _( {6 @6 {( @4 q; o1 p. o
      "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",",
    " F& _2 [4 C. o) l/ u& M   "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}], ( [: A0 s# r& u6 t
      "}"}]], "Output",3 {6 G! c1 e0 ?) B
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],
    9 N/ r0 _9 d9 T: I! T
    7 n- a4 S2 n; I* P# a6 {4 r. ?# ~$ xCell[BoxData[: Q1 M/ \. ?" [% a
    SuperscriptBox["\[ExponentialE]",
    ; k# q( e8 J0 ~" n) P  RowBox[{"3.141592653589793`", " ", 8 C1 F3 }3 C5 d( b6 y' S5 G
       RowBox[{"(",
    6 A4 d$ W* ~7 e5 b" ]3 w% m    RowBox[{
    : o7 k+ U. d' R5 _; E     RowBox[{"-",
    ; I7 X. u/ P4 x- c      SuperscriptBox[
    . Q2 W3 l% E& o( p- [- n       RowBox[{"(", " Y# V5 G+ [+ m
            RowBox[{
    ' i/ v7 n/ b7 P7 M9 b- F8 K+ `( E         RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-", 1 E9 w3 o0 `1 s4 e
         SuperscriptBox[
    " h, w0 C5 f; N, H3 h. V) y$ a      RowBox[{"(", , ]/ Q1 E& j0 U5 t4 }( a
           RowBox[{  w* e; D7 I% m- X+ m. c
            RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-",
    ! m9 `- O1 R7 S$ L+ z     SuperscriptBox[  S/ Q- I4 |9 q* t( u
          RowBox[{"(", 1 y- K& j# r! z
           RowBox[{
    . K- q! k: r* x1 T+ ]( E        RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-",
    0 U: z5 e( v1 [' `& z0 J+ c( i     SuperscriptBox[6 f3 P$ E0 f) P. X. S& C1 m5 s( z
          RowBox[{"(",
    ( o% q8 K) D1 B       RowBox[{
    2 h1 R! W6 W# e" h; e3 s        RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-",
    * k7 A9 q% w/ D; @+ _- U( D8 o2 ^     SuperscriptBox[& ^/ ^( U/ b+ ~+ @7 O5 h, W; D
          RowBox[{"(",
    $ Y0 c( R* U% i8 c5 r       RowBox[{
    . S# v9 L2 `" K' R# |. o* ^        RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-",
    0 M2 q" Q" D6 E: Z* g# m     SuperscriptBox[: m! b) \3 T0 l6 F$ P
          RowBox[{"(",
    9 \. ~% g) @  \4 X  c1 v* F       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 5 {0 {7 F" H; |* j5 M
         SuperscriptBox[
    : K! c2 _9 ~9 \+ I/ @      RowBox[{"(",
    7 L8 m) `! H* d6 H9 S+ `       RowBox[{3 B: J* L, W) P  f
            RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", 2 Z3 d1 z( _* Q! m" e! l( V& w
         SuperscriptBox[% I7 b- F5 B$ t; ?% i5 G, I
          RowBox[{"(",
    $ u0 p) \8 j6 a5 d8 ]5 f: j       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", + Z: B) E  u- b+ b5 T' _0 f$ F/ v" T
         SuperscriptBox[2 w& o0 |' E( I3 E* N2 d7 W  i5 y
          RowBox[{"(",
    . B, H! p2 [$ c9 a. |, m: [: o       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 8 p( O8 G7 P4 j! _
        ")"}]}]]], "Output",
      ?% _! l8 `( ~/ g' r CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]5 n5 O; ~0 G1 f! v& ]4 V; T
    }, Open  ]],
    # F5 t; S; G+ H3 m" G2 t3 l' L, C- O: S2 z
    Cell[CellGroupData[{
    1 v; ~& r' d  V$ K% V
    ) c' n) J. l1 H$ c! N$ pCell[BoxData[{. l. B9 g3 C% Z  Q% h' c5 ?" S
    RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]",
      Z$ s  L3 a, h; s3 J' a* S RowBox[{"u14", "=", . v) c! A7 I2 a+ F- d1 H( H2 s
      RowBox[{3 [% S# P8 y, P# U6 n2 b
       RowBox[{"Exp", "[",
    % G, U' {+ Z( [1 K1 d# p    RowBox[{; s+ O, T1 S. B7 t& x. |0 @
         RowBox[{
    3 ~+ [! C, o6 @      RowBox[{"-",
    & `. U  b5 U9 J( W( C, e       RowBox[{
    7 P4 p$ ^9 n1 Y; I+ o        RowBox[{"(", - K/ U/ [, B" `5 D% D" J& r
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", # L/ ^+ C  B+ E- |7 x% y' T1 T1 @" d! a
            RowBox[{"(",
    9 Y  ]  q; _3 D3 k         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    7 Q, `3 `; i& j! A% X     "]"}], "/.", "DeltaX"}]}]}], "Input",# s- ?5 a' W+ `. r+ q! s. K/ K
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {) @8 p9 M" b5 o) E1 @' b- W
      3.57796154237158*^9, 3.5779615663176217`*^9}}],8 D! C6 u; @; [$ C; S
    " r' j' H% O# Q
    Cell[BoxData[
    + L5 a2 ?1 _6 ]$ C% w6 u) | RowBox[{"{",
    " q1 _6 a7 D3 m, ?5 L  RowBox[{
    4 @4 C% x; N) ?  "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",",
    5 L# R* b& y8 \6 J. G& Q8 {9 x4 s/ W   "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    : D. [+ W; J5 }) K5 n! o) i  "}"}]], "Output",
    0 S1 q6 w: h4 j7 r+ F' c+ o, }5 i CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],/ j# K( F9 t. Q' w, l# a/ J

    1 n3 t, z& f1 m% O4 T" hCell[BoxData[
    6 _4 l3 O/ \* |6 N SuperscriptBox["\[ExponentialE]",
    ; W4 W4 F+ E$ n) {  RowBox[{"3.141592653589793`", " ", 4 u1 ?) @% a6 W2 C6 J, m' y
       RowBox[{"(",
    8 D  h# U: t: |    RowBox[{
    2 K$ |" Q& Z  K' G     RowBox[{"-",
    0 A! @  L. i- s; e, e) D. f      SuperscriptBox[
      _7 E* J, e* [4 I9 }( L& R4 G       RowBox[{"(",
    4 E0 L8 W' u8 c  N; L- j        RowBox[{( B& D7 |+ O- L: q5 r
             RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-", 9 W2 h+ ~' ~2 V( {- G* c
         SuperscriptBox[
    5 D0 I/ Z" }3 u: v5 v. u      RowBox[{"(",
    5 j6 _0 U8 y7 t% g# J       RowBox[{
    2 D+ S; c( A  a5 v- `( i# x        RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-",
    ) M! n/ p" {1 q' r: h+ y/ G     SuperscriptBox[
    & V6 v5 w$ V& R5 j) y9 u6 v      RowBox[{"(",
    % C( I8 i  C7 V/ c' Z; q       RowBox[{: w2 v) Z* d- y" K: L
            RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    ; ~, `5 ?0 ]) ~3 w9 T* \     SuperscriptBox[
    8 L0 q/ _* a2 \& ?& V! [- z      RowBox[{"(",
    ) _2 Z  r! Z7 \       RowBox[{2 z; O" ~5 @  d1 ?
            RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-", ; _# [2 C9 z9 O1 Y$ A
         SuperscriptBox[: o3 x: N; k* ]6 e
          RowBox[{"(",
    1 A  c7 F- t4 s9 {$ b5 {" r! L       RowBox[{
    ! j1 z4 }9 B9 i/ X+ n3 ~8 I$ _  [        RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-",
    ' ]- M; e6 o& E$ B, }& J     SuperscriptBox[8 _# q1 n/ V& p
          RowBox[{"(",
    : |( W* G# {3 ]) {       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    - w# e& M- T" c: S  n     SuperscriptBox[6 t- e$ Y" d7 t* z; o. o
          RowBox[{"(",
    . W: Z0 R2 S) l! C. ~; Q2 v! }% p       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
      [# T3 Y9 r: Q( B+ x     SuperscriptBox[0 A! K1 M/ i$ Y8 q, W6 T" i
          RowBox[{"(", / d% I5 [9 [! ^# y  r8 z( P
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", & ?: Q8 a8 X. _+ T# o$ O
         SuperscriptBox[
    ) M% x2 H! H2 |' @' e6 e      RowBox[{"(", 2 b) n8 r: b8 [- K8 g+ s
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], . {* I, ]9 _/ q: M9 H
        ")"}]}]]], "Output",2 e: F! G* B3 C% S7 f( j7 N9 x" A
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]
    6 }% y: W9 m: }- r- j" e* h9 k, X. U}, Open  ]],6 F0 ?5 G$ `6 _$ p
    2 O0 y. N5 y# O5 v" g
    Cell[CellGroupData[{
    , Z3 E* W3 k0 c4 A  f8 T6 t  S' `" Q
    Cell[BoxData[{
    " l0 M' `/ n* ~$ `2 _$ ^# B RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]", 2 @/ c5 D5 Y& L9 W
    RowBox[{"u15", "=", . F/ m" r& v( r# Z; E0 S
      RowBox[{- P) q7 [5 c, C7 J/ A6 v! L  x
       RowBox[{"Exp", "[",
    9 O8 t! J8 y3 z$ f% r* n    RowBox[{. }& y+ _# }7 s+ U9 W: O
         RowBox[{" n1 Z# ]6 B- ?6 k# G
          RowBox[{"-",
    4 L$ l# n& I1 Y& H7 C/ P       RowBox[{
    5 C( o& H1 a* X" K) E4 e3 Y! M        RowBox[{"(",
    % A; g6 d) Z& O! l2 H         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", * o- @) T% l: e8 L' N1 C& Y
            RowBox[{"(", ' h8 ^: P7 r; |. l& T+ u
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],5 D7 O' d3 }" N" {: Z
         "]"}], "/.", "DeltaX"}]}]}], "Input",- c7 V5 l: g' |2 ^! C& ^: [
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {/ G% T' l  L: l) @9 I- I+ k* c( j
      3.57796154237158*^9, 3.57796157098203*^9}}],
    9 b, C2 `% l. ~$ c/ k- d  ^7 W$ ^  D# ]
    Cell[BoxData[5 ]0 I- N- Z; `) K. F8 E
    RowBox[{"{", 3 Q' `8 W9 E3 W! Z' |$ ?4 U
      RowBox[{
    ; X1 o4 r, s4 D" Y0 B  "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",",
    , x* r/ s1 ^' d) A, o3 s2 a" H   "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],
    * G0 d3 W/ B, p1 C  "}"}]], "Output",
    0 t: m0 q8 p7 W) Y( u CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],
    9 R! L' ?5 u8 B- p0 f) P& I( v1 C+ f% Z/ {* S+ v0 U
    Cell[BoxData[9 ?7 n  ?6 J& D
    SuperscriptBox["\[ExponentialE]",
    # A7 |/ R% @# H3 m0 b9 ?1 n  RowBox[{"3.141592653589793`", " ",
    / \1 D0 x* {1 j5 v9 m# j1 u   RowBox[{"(",
    / |) Q/ [8 i  [' g    RowBox[{1 N3 f) }+ O9 W! H! F
         RowBox[{"-",
    % j9 y& H# K6 U' F/ W& U; h" ?. f      SuperscriptBox[
    / E# C; P9 n" u- \$ k       RowBox[{"(", : l* k' O. M/ c2 N% `
            RowBox[{
    3 D* N7 e+ S+ Y5 S: y         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-", - A5 w& J+ F3 l- K& W4 v: H
         SuperscriptBox[+ s% o0 }; Z* ^( N) @6 `
          RowBox[{"(",
    ' |7 L# n; B4 n' k" W- N: e( C) Z       RowBox[{2 T$ U9 @  G6 N7 I) U# }
            RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-", $ R5 v" g9 q9 b) R2 S4 |, y! d
         SuperscriptBox[
    ! }0 W5 K3 t. u1 r' l% |8 X      RowBox[{"(",
    5 S1 n0 b. Y5 r2 f, Q       RowBox[{
    . u5 z& a$ y- }        RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", : n+ b9 o+ B9 a' _( L* y8 O
         SuperscriptBox[
    * b! i# @! J' x" O( V; A      RowBox[{"(",
    8 ?+ c( K. J, q- T       RowBox[{1 A" h- o4 s8 j6 e+ R) k; g) n! k- a
            RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-",
    / \+ ]" y1 `0 k3 z1 ~     SuperscriptBox[' O2 n" A$ R. s9 z7 f0 z7 R
          RowBox[{"(", & t- o+ I' b% n
           RowBox[{
    5 d; Y) N* j# m# A, J) h# {6 `        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    " O$ X8 C6 ~3 U9 Z2 v     SuperscriptBox[8 h, z+ e3 f5 f: N# B
          RowBox[{"(", : q, q4 M0 k: f; ~, @& B7 G
           RowBox[{' J# N6 ?& W) Y& j% ?
            RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", + S5 K+ g4 k+ G3 }
         SuperscriptBox[
    & J/ [& u  j4 k# [# r      RowBox[{"(", 5 {" V9 }) y3 |' [
           RowBox[{- H% U. K& U8 J. C) f' C
            RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", / C6 _2 ?$ E8 o( b, L
         SuperscriptBox[5 o- y1 Y, N: T' d
          RowBox[{"(", 0 t) L7 a) b2 c
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ! l. o4 l* h. `# I9 Z7 h" G     SuperscriptBox[
    # Q2 _  A$ i: X. u      RowBox[{"(",
    8 k: @0 O% s5 s% X6 o       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], - T# y% ?  |- S: l" j* T* ~
        ")"}]}]]], "Output",
      \: g& r! l3 `& z5 L1 o CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]
    " e9 E2 t. b4 r% }, M8 a. _}, Open  ]],
    ! h8 {) E0 c8 @6 ^. U5 u- _+ O: \  Y% }% p0 a
    Cell[BoxData[
    9 d+ u2 A' V' R2 u" o0 | RowBox[{"For", "[",
    : C' Q& o8 Y# @5 D% {4 c  RowBox[{
    7 J* c1 O* q$ f; k" a   RowBox[{"i", "=", "1"}], ",",
    8 v3 o- x+ }& @1 q   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    & y$ F+ Y4 ~' L$ m) C   RowBox[{"i", "++"}], ",",
    7 l' J6 J7 ]1 n9 v6 r  G9 ^' y) A   RowBox[{8 O) t, b% h# c; m# ~
        RowBox[{"Ca", "[", 4 L. Q  v4 ?' m9 h6 v
         RowBox[{"[", "i", "]"}], "]"}], "=", $ q& U6 C- j6 t5 j
        RowBox[{"CM", "[",
    # S8 E7 ]. w# I6 w) W0 d" e1 t$ @     RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",
    ; e& d% U2 f. w CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],2 Y0 Z/ O  n9 G$ ]: I2 {/ v
    : f+ W( h8 w5 o6 j  J! u
    Cell[CellGroupData[{
    ! x( Z8 [6 n. h$ n7 |: Q! z: E0 `& W- I$ F8 \
    Cell[BoxData[{
    ' y. l  ]- Z1 q RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]", 3 U# ]) ^/ F; x% b; b5 k6 w
    RowBox[{"u16", "=",
    $ E9 W2 V+ c* c6 }/ `# v  RowBox[{
    3 v% l" q4 P+ [! k0 ?* ~/ Q   RowBox[{"Exp", "[",
    ! i* O, p2 b, F3 n# b' ^  U+ r    RowBox[{
    8 T/ J% V) s/ o5 s     RowBox[{4 x' @9 I4 N0 u0 m, R3 R
          RowBox[{"-",
    . P" |8 n" R/ w2 B" E       RowBox[{
    # L. O) B0 R5 B# A+ l' l        RowBox[{"(",
    2 _3 A2 ], l9 T6 B. p% o         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", + M8 p6 ^* _% D
            RowBox[{"(", / w7 q4 S2 G7 j2 D$ `2 {3 n
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ' c- P. P5 L2 o8 H     "]"}], "/.", "DeltaX"}]}]}], "Input",5 \6 m. n+ \8 F5 |* _& y# j; e6 T- @
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {( H6 ?- `. }' l$ J
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9, 6 k* z+ r2 h# U- ]
      3.5779615751004367`*^9}}],
    % }, A1 f) q& z+ X' t1 Y' T
    5 f; d: R- V# F6 O6 o* y* l4 x* sCell[BoxData[2 x  e2 [+ o* F
    RowBox[{"{", 1 c+ X3 C0 ~: x1 E4 x8 z
      RowBox[{
    4 S1 }6 ]8 h" t+ _  "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",",
    . }3 I( P7 r. i) p* m8 a   "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], 1 @* Z2 o% |' d& w7 Z( h
      "}"}]], "Output",
    % U1 a9 ?3 c5 y9 X; J/ ~ CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],
    / G1 ~2 a% h% ^0 X5 i" {+ }/ ~! V) a! g. M$ \/ x, A+ m9 v! k
    Cell[BoxData[4 F5 ^' }0 L  B
    SuperscriptBox["\[ExponentialE]", " Q7 m9 k# A( M  s( m
      RowBox[{"3.141592653589793`", " ",
    ' a3 c: _. g9 T$ Y: j5 c0 g   RowBox[{"(",
    & t% b, l0 J# ^% T3 X1 ]    RowBox[{
    * @! I( z% ^9 K     RowBox[{"-",
    6 L0 n" j" d$ k% r; Q* U/ A9 O4 P      SuperscriptBox[9 i8 B; ~/ U5 M1 N( X
           RowBox[{"(", $ C" L+ |: a7 q- a1 z; c/ F% A
            RowBox[{  o5 g: X2 M1 S! k) H' j3 v2 N
             RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-", , ]; V- Y8 r) H& w0 @) q/ p- r  f
         SuperscriptBox[
    - n$ J6 l5 l0 n( {. ~% Z7 u      RowBox[{"(",
    - V% i, P* m, M) }       RowBox[{. G: B/ m/ j3 v7 _. i. h' \9 w
            RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-", $ [1 z/ m$ S0 X. J
         SuperscriptBox[
    * D+ ^5 I+ H, B. n4 c7 M      RowBox[{"(", ( e# P. z8 Y% d" E
           RowBox[{
    4 ~  ?  s/ R3 Q' F- Y9 C. y4 ~        RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-",
    " X* u: K3 K3 Q0 \& V- Q     SuperscriptBox[
    : R/ W; B0 \2 {0 t      RowBox[{"(",
    " a2 O# V9 f! ?2 E; d' S' o3 ^' E( b: _       RowBox[{) a* c/ M0 x8 C! n5 m
            RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-",
    ; R8 ~1 U, ?" C! x# x& i  [     SuperscriptBox[2 s) P8 o0 S5 w3 o2 k4 h7 D
          RowBox[{"(", # u- W; a3 r5 V4 `2 p' v
           RowBox[{
    ; }; d2 |+ e; u2 I; |  ^4 A        RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-",
    ! R  Q$ [' D) s  m  Z$ w     SuperscriptBox[
    $ }8 F7 H; S; @( c      RowBox[{"(",
    ( `1 V( g* \* c$ X: E9 M6 o' Z' S% a       RowBox[{
      M. q+ H8 W& D( w7 T        RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", % m# P( r" h' l$ C! B
         SuperscriptBox[9 \1 D# q5 {  x# L' @
          RowBox[{"(",
    % L/ r, n: M, k- a9 t       RowBox[{
    / c3 ]  t& T8 B2 o5 @1 D        RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-",
    + C) h: R4 ?. q" }     SuperscriptBox[. P& q% ]  v+ s) `9 D, K$ w( e
          RowBox[{"(", $ n8 ^0 C8 b( g4 u1 L" ]- f& h
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    : n4 C2 e/ I( H7 S: k     SuperscriptBox[
    ; j1 X0 |4 q4 d5 ?( u  R      RowBox[{"(",
    # n  U2 K: H, o: ?" }$ R       RowBox[{6 P2 U  o; H5 K0 r1 w
            RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",% E2 D$ C2 v7 t% ]' R! E  T: i6 [: a
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    " V* n7 @2 _. K$ }: e}, Open  ]],/ T+ U  r( X4 [  [8 T3 W
    / \6 a2 m3 b$ q5 G2 D1 Y
    Cell[CellGroupData[{
    & h4 N) X- B( ~1 C9 p  J( u0 A. J
    Cell[BoxData[{
    4 n0 F0 s8 E0 w  b* d6 a" T" Q RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]",
    2 w' L4 v8 l' \  r/ v# ^8 }# `# p RowBox[{"u17", "=",
    4 V9 B4 v- S( l+ }" d# v& E/ Z  RowBox[{
    + b0 R3 J7 H- R% U   RowBox[{"Exp", "[", - T. k: {  q; \
        RowBox[{$ c/ ~% g( D' m1 ^# J
         RowBox[{- @- g# u; U+ I: }1 J
          RowBox[{"-",
    - a* e5 o2 u; P# p. g" {; b       RowBox[{! Z# H8 a, ?# |) g3 Z' ~7 N9 q
            RowBox[{"(",
    % C" }" y3 p4 w9 D         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", + A9 }" d- R% `3 o. J5 {
            RowBox[{"(", $ J/ M  I5 ~8 G; k  i. B$ u; T
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    7 C& v" O/ @9 m/ h1 U9 @     "]"}], "/.", "DeltaX"}]}]}], "Input",4 D* c1 k3 A) p, b: q7 z4 l7 W7 Y. l
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {7 Q4 B* f0 \1 [' [* n7 m) ^9 h! R
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9, $ h' O4 n, M* d: i
      3.577961578953644*^9}}],
    . C  b3 O: D9 e& f) g  j0 f
    + H) i) r1 }/ r6 m/ _* k4 t$ w) [Cell[BoxData[" b. }1 l$ `, R2 m. f5 E) m
    RowBox[{"{", 6 n4 _! R7 }9 Y% N6 s* G+ h' w/ m
      RowBox[{9 w8 [8 K  x7 [. @2 K
      "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", 7 C$ w( l% J/ \- L; ]; a
       "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}],
    * [  r( s* V7 }6 N" \7 S  "}"}]], "Output",
    . ]; R2 B6 ~5 l7 I8 v: j" w1 x CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],* e/ N2 O4 N5 Q5 I

    5 _; d0 }  E* N. U" pCell[BoxData[' K; Q0 y7 E" @2 @# i' b) v' n7 ~/ a
    SuperscriptBox["\[ExponentialE]",
    $ z; E# r  `3 m6 t* u$ ]9 f  RowBox[{"3.141592653589793`", " ",
    1 S9 T- b: Z  s2 T" t# q   RowBox[{"(",
    4 U! A9 G4 ~4 f9 a  x( H) |6 Y    RowBox[{$ E8 r5 ^# q. j4 Q: S# V3 `5 `
         RowBox[{"-",
      @1 f0 Z" \7 Z" a- f      SuperscriptBox[
    7 f5 U7 t# ^4 _- \( ?       RowBox[{"(", 3 f; t+ P" q/ H' I
            RowBox[{: e& k: p5 @, c* _  u0 t" }! X2 x
             RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-",
    5 t6 T* x- b* P9 }     SuperscriptBox[
      y% M8 `; {2 ]. I; f+ j      RowBox[{"(",
    # p+ |) b4 W4 J       RowBox[{
    8 \5 o' P; S2 O4 S  w  [' m* J        RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-", ; S' T7 e. N  v8 p  f- u3 B# L0 Q
         SuperscriptBox[+ j$ P( \* [, p2 {8 C( {
          RowBox[{"(", 4 H5 M# ?- ]7 n2 q$ {
           RowBox[{
    & H- c) ~! q/ H* l$ M+ y- P" ^        RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",   z/ S9 A# Z8 T, ~0 E+ }% [
         SuperscriptBox[
    1 [$ ]" u3 G. e/ R- L0 T      RowBox[{"(",
    1 @7 M% X" I3 Y# G! l8 `$ q3 F       RowBox[{
    . k  L) U3 |1 Q2 @1 y        RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-",
    , }( G5 G% v8 T6 Q# Z     SuperscriptBox[
    $ f* y/ ^) ]+ A      RowBox[{"(",
    : \4 ~2 r9 I1 z3 U3 V       RowBox[{; R0 F6 j4 C) H) \( {% s, Z9 k
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", ) u$ P: W- K- l$ n/ d
         SuperscriptBox[; [& d1 W7 J. V) R: L5 ^
          RowBox[{"(",
    7 y- H  k8 l+ ]6 i" N) P       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",   h/ ?" k# ]7 e+ m$ n  k' U
         SuperscriptBox[" G& _4 O/ `3 ~
          RowBox[{"(", + X1 x. d  m7 f9 b. v: a
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ' F% @1 V9 g& f4 p6 r     SuperscriptBox[
    + y4 U& g  K- p8 W, W+ c      RowBox[{"(",
    % q6 c# K7 I& t+ _       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", + I! M$ ^% H" K8 j. L( j  P
         SuperscriptBox[
    , s' S8 l1 ~  {, \1 ?      RowBox[{"(",
    5 j% i4 E" t1 ~       RowBox[{! M$ ^# {0 A1 H; H
            RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], 4 |; r+ A* I- ~- O% S8 @/ g
        ")"}]}]]], "Output",
    5 l% B3 W$ k; i CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]. \  t$ l2 r* d; h( a
    }, Open  ]],
    / ]5 `4 }; D( J9 K+ k, {# \: J  ?5 e8 U
    Cell[CellGroupData[{! g6 v2 q. T6 {% D3 U

    9 V$ E. J5 K* X/ Z2 qCell[BoxData[{# j, b4 s6 Q- o" _7 k- b+ s" X( v
    RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]",
    1 Q0 h6 M2 x  M' W3 [ RowBox[{"u18", "=", 3 b7 j0 a8 J) d. D" |) L% g
      RowBox[{
    5 ?0 r5 r7 l3 w/ c   RowBox[{"Exp", "[",
    % Z" ]( B, {7 h% Z4 a5 J  e/ r    RowBox[{
    1 Z/ J; r& S, W; B, P. C     RowBox[{
    # c$ j2 N" p3 ?: {' ]      RowBox[{"-", 2 B2 n3 @& ^5 [/ P0 S
           RowBox[{
    . q% x2 n/ T7 r- o. p5 c: c6 h. C% W        RowBox[{"(", - V9 r9 j6 M# J
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", - M3 K! C& I7 J' v' ^
            RowBox[{"(",
    + A# R- Y4 J: r4 t  n+ v  F         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],/ I' L# V# Z0 h* b
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    6 F' C9 O8 X$ W0 D) D CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    4 d6 h2 F. ?& _5 w. m% q  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9, / w. L- [3 a% s2 K( D: z
      3.5779615828848505`*^9}}],
    3 m, U$ f- ~, r+ }
    6 U0 {0 G- C; y: v$ v, fCell[BoxData[
    0 ^$ I. n1 M0 W RowBox[{"{",
    0 q% x' g0 X) j& e7 s' [: d& X4 T  RowBox[{1 M9 J7 k$ ~, _1 i0 y4 i+ d
      "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",",
    / I& @1 Y3 J/ X# t5 E   "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 2 W0 ]) _7 o+ I4 F) v8 m
      "}"}]], "Output",
    ; h# g6 i1 a  _3 G' K$ H3 r CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],
    ! B" O& o0 m' {( }4 g% J# w
    4 T" u; j( F' `1 oCell[BoxData[7 _" b) K' O) s2 p# h, r" P
    SuperscriptBox["\[ExponentialE]",
    , R% f  `3 E/ ^  RowBox[{"3.141592653589793`", " ",
    . @( q! o4 v2 b* H7 Q; p   RowBox[{"(",
    . {0 w9 a4 R- Z. {. o! M2 \    RowBox[{
    ! @& q# j" d6 p5 [0 S2 I     RowBox[{"-",
    1 G& ^! D0 B. ~. V      SuperscriptBox[" W  E8 h4 }( X  w
           RowBox[{"(", ( c" i. m7 U  _+ D$ G
            RowBox[{
    ' y' X; W; l+ T( s% q0 h         RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-", $ R. K' ^7 q( S. a0 b
         SuperscriptBox[( z/ A: P% @, H4 m
          RowBox[{"(", ! |) }$ k6 b" }+ z% b, D3 K
           RowBox[{
    0 _" d7 {. j; {        RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-", : J2 O" e% }+ |0 v( {9 R/ E
         SuperscriptBox[
    : z# X- }1 I1 u4 z; p. f2 h      RowBox[{"(",
    0 H# o, Y; t5 }5 l* y4 z       RowBox[{9 w' h! |9 S) y, K" P! Q! B
            RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-",   R. @( r* @; ^, r/ r
         SuperscriptBox[% F. W) {+ `$ @. B6 q/ ~$ Q5 {
          RowBox[{"(", ) Q# R2 U: P+ s! l4 h
           RowBox[{/ s1 g& X3 P4 _7 o$ V
            RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-",
    9 E6 z3 O1 {6 D/ P0 {. P( D     SuperscriptBox[6 }% `3 a8 m- x" W$ K2 w) g
          RowBox[{"(",
    1 e* i* O+ ~. Q       RowBox[{
    3 u) N4 w1 w7 _1 B7 C4 ^        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    # C( @% {7 e" Y3 i6 w- |     SuperscriptBox[
      t' D( r: p3 c      RowBox[{"(", / e7 K3 C. q0 ?
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 9 S. W+ e8 F6 U1 ^! h
         SuperscriptBox[
    # [3 P& E$ G5 K      RowBox[{"(", : N4 s2 }) k  z2 N3 C
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    # {+ \( d& l% q  g     SuperscriptBox[6 P' |; }8 ], O& T& ^( ~- I5 D8 u
          RowBox[{"(",
    & C7 o, N  s% H3 T( ^       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",   A) }7 `# h2 L+ h- b$ q" j
         SuperscriptBox[
    0 F) s. Q4 w6 R) U. n' ?) r      RowBox[{"(", 0 ]0 j! j: Z) |
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    1 O. b' a- v. v    ")"}]}]]], "Output",
    & t! s2 i7 D8 e; G% L: z" c CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]
    4 z" O: v7 \2 e) _: J$ Q3 O- _}, Open  ]]," g5 j- e; d. J; x  f5 P
    & G7 U& z9 X$ b8 d0 ?6 O' S( A( x
    Cell[CellGroupData[{
    : ?0 U8 @3 ]& m3 e/ V: r3 ?) _, g# y" ^4 ?5 `. D
    Cell[BoxData[{
      B0 j1 }( h, K7 d1 I* p RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]", # O/ _) k* \  y8 |" t, D) @
    RowBox[{"u19", "=", - J, [3 t0 E5 _" @; X
      RowBox[{
    # g* D9 Q3 M0 L6 o7 K% \% b$ P   RowBox[{"Exp", "[", + T! m" H1 K9 ~# ]/ }% E' V" k
        RowBox[{8 n8 T# z; E+ c' B; q, s7 {" h
         RowBox[{
    5 Q3 Q. W  ^. c# l      RowBox[{"-",
    + c! k" G  J2 J( R9 a0 H2 u- [       RowBox[{
    ! B  @2 a  Y$ i( U0 ]! @3 y5 c        RowBox[{"(",
      e1 C' Q6 B% I) O( l5 }" d( q% H         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    $ P* n; k6 r9 L4 l/ d- F        RowBox[{"(", ) M) D. Q7 }7 _; I3 M4 U
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    # C; @/ e: m; F3 n) M2 v8 Z     "]"}], "/.", "DeltaX"}]}]}], "Input",
    1 Z* z' ]" X% N+ q CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    " t1 Z9 `4 O7 ]* q  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9, * f3 I5 K/ v" _
      3.577961588890861*^9}}],, y1 E! z$ `. P" s! Z
    7 F1 h1 H* f$ Q! H4 ?
    Cell[BoxData[4 Z6 ~& l5 x  M1 s. [, ~
    RowBox[{"{", 6 j9 ]* T  S; x- p
      RowBox[{9 }! S3 j" h/ w
      "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",",
      l$ D9 c0 w( A- {* f7 W6 m4 A( Q   "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}],
    4 X- c9 O5 F# i: `' {, P: e  "}"}]], "Output",  Q" B, c/ `# a$ \9 c
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],
    % h. `8 b) X1 U. _% d
    5 @9 X3 [. Q) I, y# O7 ]7 N5 FCell[BoxData[6 ]& m1 q7 x' g5 H& G
    SuperscriptBox["\[ExponentialE]", # G  ]& m* k' S
      RowBox[{"3.141592653589793`", " ", " F# Q: [1 S8 j6 @1 q# H4 K" U2 X. y
       RowBox[{"(", ! h. _2 ^! K$ X2 X
        RowBox[{
    ; D% Z: k: h0 b+ W2 l     RowBox[{"-", ! Z; N2 l5 q6 J/ g
          SuperscriptBox[
    , T( y2 t5 y7 K8 t! o* ]3 V       RowBox[{"(",
    % F# u% [! B/ _  `, e8 s5 c        RowBox[{
    : t% |2 x$ s  L" J' d         RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-", 3 w/ ^3 f, Z, w7 {+ v8 B
         SuperscriptBox[
    ; y$ ^4 v+ C  a7 t2 x      RowBox[{"(", 2 b+ d7 H5 K5 o  [; L' R/ F6 h9 R4 k; x
           RowBox[{" P7 D( s! q# B0 E# E* H8 s2 F! N
            RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-",
    # T4 W5 B4 D- Z4 m3 f  J     SuperscriptBox[* X' V" l' N. k! g
          RowBox[{"(", ' y  H% i6 I, ?
           RowBox[{# Y- x* p% x1 X( [! t
            RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    * [) f& C1 B9 r. w2 G- G2 ~& o     SuperscriptBox[
    2 i1 h' ?6 Z  ]+ N8 d$ ?! \# G      RowBox[{"(", ; J9 P% F: o8 O* {$ [
           RowBox[{9 k& S+ d. h: ?4 V# @9 a
            RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-", 4 ]* v: e' \  E
         SuperscriptBox[( Q6 A  Q6 ~0 k- F2 {7 L0 `- _
          RowBox[{"(", 2 Y' t, L/ p( r5 {* j' Y) F4 m
           RowBox[{' g7 u2 `3 R" ?+ O# b  s
            RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-", 4 k9 z3 ?! k% r& N
         SuperscriptBox[8 i  T) y' |7 U5 _
          RowBox[{"(", ! m) q; k! A3 p! i4 q( d
           RowBox[{
    " C8 H  e7 U& h; l9 Z, h* W        RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", 1 @" e) D! v- }0 @- Q$ W. z
         SuperscriptBox[
    8 d0 h8 ]0 H6 S% [. E      RowBox[{"(",
    % B. h5 i; E: b( E) p# I* o" `       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
    ( K; N9 P- |/ m- |$ \4 v. C     SuperscriptBox[
    & L7 r% X0 W$ ~8 \      RowBox[{"(", / p; N" O" H! {5 ^5 @9 }- ^# E
           RowBox[{
    7 E4 s8 Q( w* q- I! X4 R! M        RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    * M' ~- d, G% A# x1 v     SuperscriptBox[
    3 Y+ p* F6 M* [, k      RowBox[{"(", " g) S, |3 }4 K5 K
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    3 B, d% r7 _0 N3 k    ")"}]}]]], "Output",# f* R/ C9 @! |, [$ d4 Y! E
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]
    1 J! S5 y1 P5 l6 e! e% t}, Open  ]],
    ) _" [% R# X5 W& I" x  F
    , u" a2 o8 q% x1 Z5 }4 a/ HCell[CellGroupData[{4 K' [8 _1 i' w5 K7 d6 a" E
    + A: c. J5 v- r% W5 \
    Cell[BoxData[{
      b' h) m( \2 S; V$ g% ` RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]",
    5 J! }& w* g/ x' ]$ p RowBox[{"u20", "=", / U9 j3 a* a! g4 V( [
      RowBox[{
    2 S' n' |, M4 y$ J5 h, X" U   RowBox[{"Exp", "[",
    . |9 q, z4 |. P" J' }    RowBox[{/ u; _' M  z+ u9 y
         RowBox[{
    ( F' U1 |; j, e$ d; x" l      RowBox[{"-",
    6 }, H7 \% k3 a& P. t1 M       RowBox[{
    % A. b! k( W! u$ _        RowBox[{"(", - e  C/ u$ A7 M5 w! w
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", . v5 o: m6 B9 X4 U
            RowBox[{"(",
    6 I5 c5 l( R# b( A         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
      k) U2 u. S1 L- F9 O     "]"}], "/.", "DeltaX"}]}]}], "Input",
    5 E6 h. N! ~$ L" ^3 w  P CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    ( d; W. s8 [0 ?: L4 U. C6 F( _: a1 G  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9, ( z* g3 t( M" R; @
      3.57796159382047*^9}}],3 ]" h8 @3 m4 Y0 b6 [

    1 Z. r5 a  b6 `- R6 Y* `& |Cell[BoxData[. a- |+ D1 H0 Z' \
    RowBox[{"{", 3 t* F( g( y! B0 s3 k1 L6 v6 C
      RowBox[{/ k/ U* f4 N4 p7 E& h8 Y
      "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",", # p8 V8 H( B" a0 K
       "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}],
    ! I/ V( l7 M1 o8 p" ~6 v4 e, A  "}"}]], "Output",
    9 r6 e- U! o: t0 ~$ n, i CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],5 N0 z; `' g/ y8 T
    # ~  U' Y1 J; l! Q! a6 }- L+ W$ |7 Y
    Cell[BoxData[: N9 p8 L4 b* ~9 u% @# p3 K& {. v9 {8 W/ I
    SuperscriptBox["\[ExponentialE]", # ]! f( A- ~3 F: r- y# T& y+ [
      RowBox[{"3.141592653589793`", " ",
    , e" L+ @% F+ s8 G1 Y% }5 }8 y& ]/ j   RowBox[{"(",
    # t1 w& E, x2 f. A0 p8 {, w" }    RowBox[{
    6 _5 F+ l$ e8 I- O) C& t     RowBox[{"-", 7 l6 i9 Q2 Z+ P+ b, Z
          SuperscriptBox[+ y, L3 f9 o' ~5 V
           RowBox[{"(", % N/ \% {7 v" B( n; a+ T
            RowBox[{! c" F! z' f: N* W: Q
             RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-",
    & y+ P# j) Q- Z/ ?6 u     SuperscriptBox[
    * N7 t% w! E5 @+ J4 U$ U      RowBox[{"(",
    8 ?% `1 W8 w, k9 T4 F  A6 ^" O       RowBox[{
    + o( G2 _( Y3 H! U1 A        RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-", 1 w, f7 w) j+ q( z* `  X- B
         SuperscriptBox[' e& p' x7 D; l- ^2 ?1 m
          RowBox[{"(",
    ) U( c% e/ N5 L       RowBox[{- W# M! |: A. V
            RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-",
      N4 Z) O" A6 q8 s8 j     SuperscriptBox[4 ^" N6 r9 j$ v* y& k1 L4 z1 i0 H5 V
          RowBox[{"(", 4 [$ M7 M2 ^7 H5 d6 P5 d
           RowBox[{
    6 [( J0 m1 }# J        RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-",
    ( j* p0 M: |9 y: J1 X     SuperscriptBox[, [: Q5 Q+ c5 {0 w+ d
          RowBox[{"(",
    4 p$ T- W. k/ ~- L2 t: f8 d       RowBox[{; X, H0 H+ K% A0 r7 v8 t* H
            RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-", ! o- F1 X# p* ~
         SuperscriptBox[
    9 {  I* Y# \$ u: `* o3 n      RowBox[{"(", - x3 i' N* z* E2 |% d4 d
           RowBox[{
    . q7 t. y" Q& k7 b: n        RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",   f! J% D: b. ~( O+ N
         SuperscriptBox[; i7 f: O" [$ @. b% ?
          RowBox[{"(", / }5 `! V2 N$ c9 k0 R) m
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", / D2 j- G: _7 H$ Y3 Y$ j
         SuperscriptBox[+ ^1 _% r9 C) F
          RowBox[{"(", 2 n" E( o; V/ S$ h
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", * t, Z/ V2 Y+ J
         SuperscriptBox[
    8 [& v  m+ A6 b      RowBox[{"(",
    3 L) S# k1 e  N/ e: t       RowBox[{
      S/ ?  p0 V8 k0 H0 `4 ?8 o+ T        RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], % ]+ M/ q( k- P0 z+ R
        ")"}]}]]], "Output",
    " y+ N  \. _+ X$ O  q( ?6 _9 T CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]
    ) ]/ N: S9 K  _4 |* C" J}, Open  ]],- _  _  z! ?8 z/ u+ h2 W. L

    3 D, h* [! `; P1 c2 `* e& iCell[CellGroupData[{
    ) N. ~$ O& {: B3 V, _0 g" |
    1 o1 U$ t# Y! w5 C& E$ e4 D5 ?: o7 DCell[BoxData[{
    " \# M' d2 ]/ h; |1 D6 _4 b* R/ P RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]",
    1 P% T% y; L! }/ F' o3 {, D RowBox[{"u21", "=",
    5 v  x! ~$ u) X& q1 @: e  F5 K  RowBox[{
    / \; n3 q& o: p5 W! D( M   RowBox[{"Exp", "[",
      O: |' q% ~5 G% R    RowBox[{, w8 N& e. W9 h
         RowBox[{3 [/ n5 z1 Q4 V& ~. u# R% Y
          RowBox[{"-", 9 H% V" B! l6 L: X; ]7 T# A4 S
           RowBox[{" b' g  S% _5 c8 f* ?; Q
            RowBox[{"(",
    ' g/ c0 F4 s0 X4 G; O9 L( B0 l         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 6 _" ~6 T4 N4 N, T# w( \
            RowBox[{"(", & W0 Y- I6 i4 z6 R! _1 ~. e
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    - Q  l7 s  s) X7 I* V9 a     "]"}], "/.", "DeltaX"}]}]}], "Input",8 o2 t' W8 g* f* F
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    # x, Y; T# g- M$ F" a  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9, . \1 G3 _9 ^- U
      3.5779615991556787`*^9}}],
    , X* O: H& c) H: I/ x  g9 F! n/ A" e  z9 g% ?# R
    Cell[BoxData[# R6 s4 x3 x. B. l" s
    RowBox[{"{", 8 m& v/ B8 n& h- v- |
      RowBox[{' R; T& [/ j- U: [
      "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",",
    7 l: W) b/ [: N: {   "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}],
    - J6 V! x& T- V$ S  "}"}]], "Output",
    % L4 {9 q: [' v CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],4 f  P+ `' ?2 ^5 w8 s% \

    1 \% X) Y* \1 l- l) [: Z& cCell[BoxData[  s( Q' F+ D% o  W6 c  V
    SuperscriptBox["\[ExponentialE]",
    % B" o- z2 h+ }  RowBox[{"3.141592653589793`", " ",
    4 v8 O8 l# V, E+ o8 u( k   RowBox[{"(", 2 c. R0 b% ]& S7 n
        RowBox[{9 l7 W0 q6 K: P& V
         RowBox[{"-", , O3 E; R. ^" ~
          SuperscriptBox[
    ( f- d# ^, Z; {) n; N" U       RowBox[{"(", $ D: W4 n4 G( l( O& [
            RowBox[{0 t! m4 k$ J' ~: s
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ( l( x( S% I8 x9 |# e3 }     SuperscriptBox[# G& F! o2 h" B* I& h. Q" ~
          RowBox[{"(", 1 d. u! J! z0 }9 T5 _
           RowBox[{
    " S+ i7 y" B& j1 i9 ?% |        RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-", ) s5 Q2 A) L% D
         SuperscriptBox[
    , O- }; j7 P7 z1 ?2 p8 I- `      RowBox[{"(", 4 F7 C, v. c+ G2 m+ m7 G5 {9 ?
           RowBox[{
    # _% W! Z& A' B9 D        RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-",
    ' \  J' `( B% b( n4 f$ ?     SuperscriptBox[+ j2 M7 k6 S$ S1 O7 O' w4 q) s
          RowBox[{"(", : a1 Q$ t4 F5 g6 l7 C& X
           RowBox[{3 J  L3 o; Q- ^: K. g& Y
            RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-", ! Y$ W; l0 P/ e1 h5 y* v7 U1 C
         SuperscriptBox[
      }7 Q, @6 v" t/ ?      RowBox[{"(",
    / Z- Y+ C6 k& Z/ X       RowBox[{
    1 B0 [3 I9 K6 J: ]4 M        RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-", & {; r/ f* Q  ]; s  E1 I" z
         SuperscriptBox[, d- i# s4 X3 a* T9 X
          RowBox[{"(",
    5 |: v; f! u1 x( d       RowBox[{: ~, W7 H& c9 l9 D6 Z5 ~, I( J1 p
            RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    / M% o9 F5 Q" u( m* b' d7 D     SuperscriptBox[( \/ p5 r. Z$ ^9 z
          RowBox[{"(", 1 y- S0 p5 C2 s. C. ]( w
           RowBox[{) A) ^1 @7 [# S, L  X( ?
            RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-", 4 u7 M9 U$ a; t% T/ ]) P
         SuperscriptBox[3 D+ @% o/ V" f2 H) `! D$ {
          RowBox[{"(",   w& F$ p0 |5 c' w- d
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    6 Z" B4 s. V7 L# c% n+ t2 N+ }+ i( D     SuperscriptBox[: K7 Z2 P$ g5 ~5 i
          RowBox[{"(", 2 G4 b8 K  |" `$ j
           RowBox[{+ H2 V) A$ e6 r$ e8 j( M
            RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}],
    + x4 Z; d- H! A3 x% Q3 o, {- k    ")"}]}]]], "Output",
    * o' W% i6 m( T* U0 x6 [ CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]1 O4 Q, e' X+ j  m$ G9 F1 ]
    }, Open  ]],
    ; @" e( L6 q7 R' i% C; C$ j1 J* v8 M' K0 f/ z5 k8 C
    Cell[BoxData["\:62df\:5408wi"], "Input",* b- B+ i& C- T5 T
    CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],6 p4 S3 `$ d2 |% y, H7 u4 V2 V

    ; Q$ O4 o) \, s8 WCell[CellGroupData[{
    ( R$ ]3 Q: c) v. h  o" j7 X5 Q% Y; F5 P/ K
    Cell[BoxData[
    ( e& x& U) R1 w% y: o1 n RowBox[{"y1a", "=", # {; T/ _! {9 @9 a6 E
      RowBox[{"Table", "[", / P7 c: P/ T& O$ n$ I! |2 I, d( C2 W
       RowBox[{"x", ",", ( u) p$ Q& H8 b, [6 l4 o
        RowBox[{"{", $ [6 w0 P6 ]2 n' e9 R6 q8 A- t
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",& k3 `+ _: _6 E" m
    CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {
    $ y' l# E5 t* }% k* M- D7 g4 a  3.5779226649375*^9, 3.5779226810625*^9}}],$ d2 G' T9 ]6 i3 O6 s( r
    ! Z" n2 g% P6 }3 ~# i' w& y8 o
    Cell[BoxData[# v6 z0 Y" e" k: Z4 x
    RowBox[{"{",
    7 }  H# L" x  T  RowBox[{
    / V( N3 C/ Q/ }1 Z  A  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 T! \9 w% ~+ Q3 z   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    2 {' W: B% Z$ c0 Y  U! f    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", ' b( S" ^0 s; W3 K2 w. x; L
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", " m9 Z: y0 ~. j1 e
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", - ]; v4 @1 H, N# z7 d& c6 T
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    " q5 P& S; g. ~+ b( |   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    : R, S) O0 q) I2 r# V, u. N   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", " W$ n! T; N( B" E% R* D0 j
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}], - H% r9 H  d2 v
      "}"}]], "Output",
    / k. C6 ?/ l/ Q6 d CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9,
    ( S  V8 O/ {( _  3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]
    ( u# X$ p" q' @9 W3 `8 j/ o}, Open  ]],0 F* z1 s8 W# n  I4 v4 Y, Y4 u
    5 B# d8 j4 g; Y
    Cell[CellGroupData[{: k3 g0 \9 n6 m# Y) m

    9 w0 E' h) \6 }& V/ B( RCell[BoxData[& q! W, z( J8 O' u9 P/ C
    RowBox[{"Data", "[",
    : |' M8 u# `3 B* Y) d  RowBox[{"[", $ ]0 Q/ d1 D: v7 \' _" k
       RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",! B  J% z2 o4 L8 b
    CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {
    ' n# S; y7 ~! o% m# o   3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],4 @6 N# L& T, J- l$ f. B+ Y! L  B
    5 M9 N- G! e3 Y5 h* P- `" [; Z. J
    Cell[BoxData["0.899882`"], "Output",
    $ i7 ]! f6 P; ?7 k/ o CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9},
    0 M4 I$ `+ Y( S$ I+ N+ n   3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9,
      O: Y) F" \3 m' b7 Z   3.577961929080654*^9, 3.5780123419375*^9}]: K+ ^5 O0 @# r8 @
    }, Open  ]],1 p" m- A9 Z* x) c
    4 D) x) w- g- W0 c- W: u* f
    Cell[BoxData[3 c3 r6 J8 z2 s
    RowBox[{"For", "[",
    # K, I1 l. R* {) z( w' }  RowBox[{: _  r$ m4 h  {
       RowBox[{"i", "=", "1"}], ",", ; `% `* ?3 I, [  ~
       RowBox[{"i", "\[LessEqual]", "60"}], ",", 4 p+ O+ j$ y6 H  t+ a$ ~% L
       RowBox[{"i", "++"}], ",", $ Z0 S3 ^( J8 i0 W6 Y+ a
       RowBox[{
    7 a( Q+ e& U( X! J+ F5 A) V, I    RowBox[{"y1a", "[", 5 d4 Q; y0 ?, F
         RowBox[{"[", "i", "]"}], "]"}], "=",
    . O9 y/ ^- }. F4 O4 N9 o% h3 f  q    RowBox[{"Data", "[",
    ( ]5 w4 ^: {% O! T) @& j     RowBox[{"[",
    8 A! h; t1 h! `( n2 N* x8 a; ?; E      RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",' K( I; J* q8 X2 w1 G, A
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    2 o( f. d, Z0 h7 ~, R0 L   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    / @2 A0 O& `9 _3 w' A   3.577922923203125*^9}, 3.5779588839702806`*^9}],( m6 J8 p* J+ e0 n5 v3 ]' D

    ( E4 V3 I; E3 V: i4 vCell[CellGroupData[{
    ; ]( v+ X0 g" v1 y# j
    - k' I/ u/ M: {  GCell[BoxData["y1a"], "Input",
    ! r  m+ k" U8 ?' P/ ^0 r# H CellChangeTimes->{{3.57792293078125*^9, 3.577922931484375*^9}}],
    / v7 p6 k' V: ?. G1 U- j+ P3 e/ q6 p: R; s
    Cell[BoxData[" `( K; g5 C7 V4 r
    RowBox[{"{", 1 g- p# {9 |3 ]( i  x* j
      RowBox[{
    % a  R# c6 b0 Z+ H& J7 q( }  "0.277091`", ",", "0.220259`", ",", "0.899882`", ",", "0.265607`", ",", - G2 L. i( N+ V" i' a! D. _
       "0.642226`", ",", "0.306243`", ",", "0.186985`", ",", "0.175501`", ",", 8 m9 I  e) U' U6 y1 X
       "0.147821`", ",", "0.352768`", ",", "0.23881`", ",", "0.095701`", ",", % Y2 @1 k6 j. t) q7 H% a
       "0.162839`", ",", "0.335395`", ",", "0.160483`", ",", "0.398115`", ",",
    ' e8 w9 W) |: N) ?: W0 i   "0.157833`", ",", "0.315665`", ",", "0.492344`", ",", "0.638398`", ",",
    6 ~# c  _5 N' h* o- T0 \   "0.392521`", ",", "0.362191`", ",", "0.114252`", ",", "0.401355`", ",", $ W2 u* ^" q9 g: J8 m$ L$ ?9 a
       "0.827444`", ",", "0.676973`", ",", "0.331272`", ",", "0.845701`", ",", & ?( D3 j3 A0 ~2 i- z" E3 M
       "0.287102`", ",", "0.`", ",", "0.050059`", ",", "0.254122`", ",",
    / T7 Z* g/ B$ H9 V" @! y9 S0 s0 `   "0.086867`", ",", "0.659894`", ",", "0.317138`", ",", "0.605124`", ",", 3 _9 d4 [% C$ r2 s
       "0.32126`", ",", "0.595406`", ",", "0.555359`", ",", "0.333333`", ",", + k% x' r4 B, R4 P- l3 n% t
       "0.149588`", ",", "0.493522`", ",", "0.224676`", ",", "0.410188`", ",", : R, l6 w' D. W/ l! \
       "0.668139`", ",", "0.102179`", ",", "0.380742`", ",", "0.319494`", ",",
    - }- p' K1 b* K3 J   "0.031508`", ",", "0.292108`", ",", "0.329505`", ",", "0.337456`", ",", 3 |, o  z/ n% F/ g  u/ v" ^
       "0.766784`", ",", "0.676678`", ",", "0.541519`", ",", "0.064488`", ",", ' a; c) V) f  @6 c5 X
       "0.463192`", ",", "0.388398`", ",", "0.262367`", ",", "0.290931`"}], 0 x+ ~  z0 D" t2 t3 W
      "}"}]], "Output",5 ?* K3 z; i) ~" |, }' K3 q
    CellChangeTimes->{3.57792293246875*^9, 3.577957577756765*^9, 9 H! h) T8 w& ~  V8 K+ ^8 Q
      3.577958888806289*^9, 3.5779619425902777`*^9, 3.5780123438125*^9}]: j* x' T$ n. b, }
    }, Open  ]],7 T/ L* Y2 j7 d' o
    * W) w; o7 l  M# @+ K8 g
    Cell[CellGroupData[{
    $ [6 J" E6 B' t! M+ v, V$ B0 X" b4 T8 w9 Q( j/ |8 l  z* {3 L
    Cell[BoxData[
    * W3 l" k3 y/ I( m RowBox[{"m60n21", "=", 9 q, _. Y. v$ `) m& h8 Z1 T
      RowBox[{"Table", "[",
    * t4 l! A. D. s/ o4 Z& E1 c   RowBox[{
    - A# R" M8 y% S6 }  P    RowBox[{"Table", "[",
    , J9 K7 m( o2 M8 W7 ^     RowBox[{"y", ",",
    " v. @; o0 e" T; p3 b: J* a      RowBox[{"{",   O" c  Z& Y- W" A6 g/ Y% h+ D# j
           RowBox[{"y", ",", "1", ",", "21"}], "}"}]}], "]"}], ",",
    7 L" w- b/ y0 R- B9 z    RowBox[{"{", 2 i, L0 M# [- ]% t. Q  g9 I
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    ( x8 ?6 N2 f: A CellChangeTimes->{{3.5779239260625*^9, 3.577924021765625*^9}, {- [, ~4 ^* _; y
      3.577924052828125*^9, 3.577924101671875*^9}, {3.5779619669419203`*^9,
    1 c- g/ l# k# m( F  3.5779619706547265`*^9}}],/ W& K9 l# F- O/ ?

    8 Y9 D+ m/ r2 w+ j9 oCell[BoxData[: h7 A- _; Y7 Y! |$ b) l  _! a
    RowBox[{"{", ' R% z9 J* \; H3 [
      RowBox[{9 C* D6 m1 |- R: `
       RowBox[{"{", ' J  I& N8 D, d: F
        RowBox[{5 x/ G% q% R+ h) N0 A; N9 z+ D
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"," ]0 a2 L+ c) Y, Z
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / C7 G' N$ ^* ~* t4 ~, D
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],1 l0 b2 J" R$ `, n9 k9 F! b7 _
         "}"}], ",",
    , W# G( Q, v/ i   RowBox[{"{", ( I- e% |8 P3 K5 A( Y
        RowBox[{, V4 L/ ^8 w# X- h
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! ~, b" z% |) v
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 ]7 G; [5 l: }
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],  k/ P( z6 g8 ]% F( V; W
         "}"}], ",",
    ) F' W' C& i$ j& x2 R* v   RowBox[{"{",
    9 h" Y( O! g! G9 t6 N% g    RowBox[{
    - Z/ I# b9 z, w. G! L' z    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ L3 _+ o7 J/ c      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    6 D4 s9 `& S" c6 E* m$ G     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],+ Y" Q/ d( v; i4 u% a* G  s
         "}"}], ",",
    3 L( o8 @% Y+ ^2 z0 H5 j/ C5 ]   RowBox[{"{", 0 ~1 |5 Q, a/ U1 r( E; i+ {
        RowBox[{/ B# [1 ?! ~4 b
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* p8 `/ P0 N" ?! k$ L3 z$ x. F
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 D/ `& \1 y8 f1 C" J     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / s/ {; B. O7 G; x     "}"}], ",", ; L; V- r: \- S- |) _
       RowBox[{"{", ! h$ R3 A: H3 t  |
        RowBox[{
      o2 H' Y) L! N/ x- p    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # X/ b; V3 i+ X! L9 t0 c, i( `  |      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + Z  f, n! }3 d
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],0 O6 p: L- y  M
         "}"}], ",", + {. j& A( T9 ~4 V
       RowBox[{"{",
    1 }6 f# m4 G1 [0 Y* A    RowBox[{
    ( G0 X$ B9 f! h    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",' m/ C8 H  E7 D& ?
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + {7 X  k1 `5 W3 L% y
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," p) R. {' V/ N/ l2 z
         "}"}], ",", . j  g" H# ~0 q4 z: t% T
       RowBox[{"{", 8 x( j! }. P3 f* F7 e
        RowBox[{
    $ u. F# u( a& n6 p) Z# N! W    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    3 c$ w' b. t, y) j      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 B3 ~1 D" z4 ]: E: {+ D     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    % T3 k5 z% b- L+ Q" S     "}"}], ",",
    : ^9 G0 B2 t: k) M0 e' B   RowBox[{"{",
    & C# e+ t# {1 _( y+ f. b$ Y/ E    RowBox[{
    ( g- c$ L7 d( d$ h  I    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. f( X) e: X. K8 e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 2 h$ |6 q1 G& @  t9 Q7 P* b
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 I4 F: O( `4 D
         "}"}], ",",
      E& K6 c' ]" ]& v6 b1 }1 X   RowBox[{"{",
    9 i, f% `8 b7 P( y3 `    RowBox[{
    . I' u) r0 ~4 [6 f8 \& a# ]: u    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",0 a9 {3 l' d) x4 ?7 Y+ Z
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 w$ A% h9 J8 t" {" C# {     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    7 N9 @) X+ b0 F0 G     "}"}], ",",
    $ A" O% x1 L/ u9 m1 ^7 l' v: }   RowBox[{"{", ' Z9 a& V) a. T
        RowBox[{1 T" U7 ?- C. I" L  {( n2 N3 x
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! o- Z/ @# S: L! [6 g* k0 Y8 s
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , j8 S( q* I9 [7 d# v7 r1 B     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; i. G. N' S* ^& |' x8 K7 u6 g
         "}"}], ",",
    3 i$ _: P( i. ?6 m8 _: Y   RowBox[{"{", " P( a3 F9 w/ p) R3 g& G
        RowBox[{' a& D- \  \4 [' _/ u
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    0 W( }3 Y6 Q! K& A      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' {: n) N/ N2 v: B
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    & b* M5 m$ Q  P5 ~* @- l9 s% L     "}"}], ",", 1 g: J3 w( k  w7 j$ i
       RowBox[{"{",
    0 T* ^3 B4 V6 @$ @    RowBox[{
    * k' X. q3 R2 [5 u0 w6 F  _7 P    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 a# _  b# ^# l8 s& u) S7 m
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - P  A! G# h. s5 Z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( R, r4 \6 U  h- a8 R, u& N
         "}"}], ",", ; H* I( d8 G8 _. Z/ v
       RowBox[{"{",
    8 m8 x) q' |7 T$ f8 P8 F4 Z    RowBox[{, O% m" }% P% S" w0 I
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    - R( y3 n$ p% f' F- F      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ) j6 `9 J' j$ O8 o$ e     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 N# w% V# P" @" q, |7 s) Z
         "}"}], ",",
    : S% m+ P# M4 C' ^+ k   RowBox[{"{", : q" L/ g. B; u5 o, D: V; `
        RowBox[{+ B9 t( [" h, \# _" i. `
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . e6 b  D* \$ k      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; }# s  Y6 t0 l* S& K! x' m3 Z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],0 }  A+ R( [( a, j  \/ W
         "}"}], ",", $ @; H: P1 n  y7 P
       RowBox[{"{", 6 ~2 c& u" X! o8 X) o9 G& V
        RowBox[{
    : r3 {1 R1 K3 a: {& G" E; i    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",( l5 h8 W& s4 e
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / t- g. _/ V3 f. |     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],& P5 l" S0 N5 r% l+ R; J
         "}"}], ",", 5 h2 w! H, F. I
       RowBox[{"{",
    ; g0 p* q% W4 @/ j% j/ C; T3 G    RowBox[{
    2 r7 K$ h4 W% K4 X3 G" L    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",. G" c8 v8 I$ i* J- V" t2 n* b( o
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", / g# u. P- W/ _6 x- j' f
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],9 U9 _: q0 S) t; C# A
         "}"}], ",",
    9 s0 |" F) G6 a/ Y* b% y   RowBox[{"{",
    / s- I7 Y3 A( e3 J8 x    RowBox[{' g3 v) u, u! e3 @
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # f0 A7 [) r* R4 O      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , z' c# p' C+ f$ I     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 g$ |/ f# z# f: U0 J- R4 ]     "}"}], ",", $ F$ {5 r% j4 E) k9 o. A: n( b
       RowBox[{"{",
    $ O# ?3 R8 E! b0 v5 l& d1 S    RowBox[{
    1 }) Y3 [1 J' V% n6 W    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    # b1 M; K) c# J2 X* ]$ x( G      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 L9 A% V+ N8 h" w1 P- l     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],& G( A. l. t) B5 C$ G# m
         "}"}], ",", 3 k8 U' U3 J/ G) Q/ Q6 K) `& L$ P
       RowBox[{"{", $ I+ n& S$ [# K
        RowBox[{9 z4 E5 [, c! J8 p2 `* k! I
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",& l. s! }4 I  b( H
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' E9 L  _5 ^# t9 n5 d+ P
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],' I3 Q3 S* n$ \, t
         "}"}], ",", * \$ R0 j2 [/ W0 \0 E+ g
       RowBox[{"{", ! T4 p! X9 h7 z- r$ Z7 ^' _1 M
        RowBox[{
    6 Z) D! y; j6 r( A% G5 q  ?) f2 [4 R    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",2 C2 u8 t3 R/ o
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . L$ O! P2 Y& X% G
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 G9 t5 l- a& a4 K9 M$ V! O! k     "}"}], ",",
    : i- q: b/ a% k) W   RowBox[{"{",
    3 l# B0 C5 a8 j' u2 H: B" a) I; \; E    RowBox[{
    " ?" ?7 O2 H* n& @' ^( Q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    + m( a# _# ~5 P% C6 d- Y) w& ^+ k      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / t2 \+ P+ Q2 M4 ^, Y" }4 L     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, T" ]. e* ?* L+ ]" I
         "}"}], ",", % H( n) E: F8 n1 _' m2 m. g
       RowBox[{"{",
    + F6 n+ q7 ?/ X  Y    RowBox[{1 m+ j  `+ F7 e3 {+ [2 f
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    6 k( v, i$ G- c! N! J      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 ^3 B! f& j# ^3 ^. v1 Y% Q     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * @! B' Q- z& w" ?: d     "}"}], ",", ( w4 a- U# r4 L+ [) u* t
       RowBox[{"{",
    + G6 A1 y! F) G( K    RowBox[{
    3 ]$ \) P( ]4 j1 K3 ?; x1 _6 n    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 P! Q' F6 d0 r* N& s      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    $ }4 p1 v; b/ V; d" Z# Z     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],7 L1 T. d) j; S5 @& d
         "}"}], ",", ' a( C3 u0 r9 [2 T6 R% ~* o1 Q
       RowBox[{"{", $ B: Y5 o" @7 e" _9 C3 s( X' x
        RowBox[{. J  d( {  m! h- s
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",( d  q( g' F/ m; e+ Q2 {7 u
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : i* b4 ^) o" z7 T+ S! v5 y% v+ c" E9 \     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],) F& ]+ y7 X5 y' t' Y( o2 i& g
         "}"}], ",",
    * b8 T2 s1 ^$ e& _1 H+ {9 {   RowBox[{"{", / h2 U1 m2 J' H" Y4 s
        RowBox[{& C2 M" |; |7 T# [( g% x# ~
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 L2 B2 l3 o* f$ k      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ( l% U$ D6 H  B3 q$ h
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 S, r6 k: S6 |5 k5 B5 j, l
         "}"}], ",",
    : l  }3 \) R$ D: M3 h/ b5 v# U5 g  G   RowBox[{"{",
      B1 e9 R8 R# v3 T6 T5 }+ V8 J    RowBox[{
    5 a. c% ^" V) L+ D* H/ j* I    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    ! `  Y7 c4 M4 i1 U, A% u4 U1 S      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", + O% z+ U7 u/ q. G: ]6 Y4 R, F
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, U6 w9 [+ ^" G0 Y) [
         "}"}], ",", 1 t' X- G  f5 `) d: ?5 S- q6 p% b
       RowBox[{"{",
    ( k8 T7 N+ F$ ?8 h  A0 z    RowBox[{) d/ |. B0 [/ c6 O" t" q" f" [5 t
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 y7 W4 M2 X- G8 p" J      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    + U2 ]. I4 C6 b4 e% @% a% {     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 e& i# x& G( ^; G& F  k
         "}"}], ",",
    * y( f% g: H9 m7 n9 r! L. g  q   RowBox[{"{", . G" N6 B! ^/ S- U" {; }
        RowBox[{
    ! I; Y: D4 `% R    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",4 w7 N6 d( {( N( n
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) ?, Y' d4 J1 D" l
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    1 X. X' K4 C* s* o- \9 f: Q     "}"}], ",",
    6 d$ z6 g& T, U5 c" C, }   RowBox[{"{", " s% ~" p% C$ _2 F1 h: S+ t6 Q9 H, h
        RowBox[{  R& D0 f) B. z8 q1 c
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",3 S6 a$ o. y7 x2 |+ j; w
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ! ~6 O4 v# H  @! l3 V6 A
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],4 x5 M; J( K$ ^, N
         "}"}], ",",
    $ q# F% u& l) k6 A1 r   RowBox[{"{",
    ! e* C! s. Y. A( U    RowBox[{8 `0 h! }# g' r/ u; l; U
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 L) x9 ?1 g& j3 k# y4 @      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - u$ m- l3 |3 f) \- k: s; {
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 A& l# Z; p9 D8 ^2 E     "}"}], ",", 4 o7 [# X% D1 h, q' Q, D/ `
       RowBox[{"{",
    # p( H$ I; a5 ?' `9 Z# T, \0 |) V    RowBox[{
    2 Z7 {, X& t$ n8 s5 W    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    1 [; N  }6 n- F- a: r  n      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' Y/ X3 e7 E6 f! _9 C1 X6 D
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    # }8 J  Z3 H+ `5 r3 F& E# B! r     "}"}], ",",
    ) p, v2 \8 o) ]; j$ P! W9 u* z% u   RowBox[{"{", 0 E4 |* [8 C; A1 f
        RowBox[{
    7 B; S  ]% K2 B$ F$ L2 S    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ ^/ o4 D; A2 e# `+ O4 S+ b* k
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    , U/ c4 I0 x1 m: c* V, ?" o     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],- y3 f- U: g+ x# w4 f* ]& T
         "}"}], ",",
    ; b- g( ~& H8 q: M; _" g! k   RowBox[{"{", + H: Y) B! e5 A* Y
        RowBox[{
    # q& f' q6 Z- f) _    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    % c# l, x3 ]6 G/ P      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) a; ?4 t0 u" J. J) Z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    : M5 h1 Q' ?/ f# J     "}"}], ",", : {( T+ i! G- K# |- i
       RowBox[{"{",
    : o0 Q& b2 |6 V; Q    RowBox[{
    ( r; h& G& s( M    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    , |) m% n0 j$ x6 B4 }8 }4 n, P      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 5 e  @/ I$ \% s% D
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, s1 y6 J' E4 w$ I
         "}"}], ",",
    ' E+ G/ J- F% H' V+ S+ s1 m   RowBox[{"{", % e0 r3 E, s( |, S5 x) `' d
        RowBox[{$ Q3 K3 @2 N- s4 z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : `$ L) j8 b5 U+ B" g) f2 Q4 ^      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    - i. t+ P2 x, s+ y2 E     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],  U: P- g) f% d; W1 w
         "}"}], ",",
    ) K8 [3 h/ y5 h4 C0 x2 P6 O& ?   RowBox[{"{",
    ; m2 Q2 x$ {# ^    RowBox[{# R7 ^- m" c( z% j3 R  K* o5 h
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & x9 z5 m( {! U8 r( ~9 t6 q      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; X8 R) T$ F% F- N2 t" T7 s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    $ y+ z; Z0 A7 ]$ P     "}"}], ",", " ]2 O* X  n! H0 S, B4 f
       RowBox[{"{",
    - V5 F3 z; K7 P" E" q1 I: y; D    RowBox[{
    / f2 Z5 ]+ _+ ~. h2 G    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",* B/ |9 F( U. r8 t" r: ]  w: Y
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", . Z5 E* k8 l5 x. I0 y4 c- z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    , y/ }5 f$ B, M8 X     "}"}], ",", 1 S; D: S' M  P9 ]5 E: a* e
       RowBox[{"{",
    $ y0 }5 L8 x& J: _1 E+ M6 Y    RowBox[{' f3 l; l: T8 }
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",; l) ?# B+ H; L2 P# V
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    7 R! D1 t2 a$ V5 ?5 ]( y     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * {4 I( z+ r& g2 o0 M     "}"}], ",",
    1 y0 |' L4 y7 t! X+ _   RowBox[{"{", ' `# c: j4 D* r
        RowBox[{
    , a! y; x2 z3 L/ X& S8 e    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ j3 z) A# L' C* \
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    2 v( Y7 D  C1 O     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    - g) q" `, S% o     "}"}], ",",
    % M9 B( g- I  e" v) j   RowBox[{"{", 2 J0 r9 e& v" A% K, U2 x$ X
        RowBox[{' t: x( B8 A8 ^3 l# S( y, U, @
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 U6 n, ~4 d+ u
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ' x$ u  w( ^+ O
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    $ y8 ]5 ^( h1 {$ D$ M- i$ R     "}"}], ",", 0 C4 z* {2 T" t1 y3 \
       RowBox[{"{",
    1 d/ Z; B7 R2 K/ L8 j1 w' }    RowBox[{9 u* X1 m$ v, [1 n* O! c
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",8 D$ k+ W( _7 v* K7 T1 t7 K7 ^
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ) M" C% F: Q  O/ w5 m" q: o
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 b" J5 }1 l( n: q3 _7 c6 m
         "}"}], ",",
    ' J! P) S3 X, A: S* r   RowBox[{"{",
    % a* W" v2 C* S  o7 u    RowBox[{" i* V9 B, W; s5 }
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    8 p5 b* u& s5 ~! _( ?: F- ~3 v      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 2 C/ T2 Y, K" d9 I9 Q) \* f  a9 G
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    $ E7 ?8 }+ a5 I3 ~9 |% g& z     "}"}], ",",
    8 W) x- n" b, q& R) A+ b6 k) S   RowBox[{"{", ! G3 c9 \$ _+ {* J5 S* d: B
        RowBox[{* M. B& y1 Z+ ]2 }: D- P! F1 I- M1 u
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ o  X4 k! k6 w* ?: A5 \
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " c# s( ?& y) o$ T
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    / G' t: D; H5 S8 l     "}"}], ",",
    1 X! T  p$ }/ l3 X- @: R5 q   RowBox[{"{",
    # e9 _2 z: E6 M7 ^    RowBox[{1 B- G7 b1 r- X% v9 z
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",5 @: A# r# d& t: i
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    : ]; t+ m: Z6 t8 f' j  v; t6 v     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],, f2 Q8 C6 e7 A: R! |
         "}"}], ",",
    2 ]  T% D2 j$ D, ?7 g   RowBox[{"{",
    5 O" X  E: @0 Y$ v5 A. o4 q    RowBox[{! F- s* R' v$ N. @) U
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",( q+ s8 V- h$ `
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " d) V* _* E0 |6 P: r5 Z# h     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    * ]2 J3 H! l+ P* z* O     "}"}], ",", ) j. D2 `) z  T/ T  X1 V$ I# `3 Y) I
       RowBox[{"{", ' H4 e: {8 y. v5 M# v
        RowBox[{
    2 d9 {# u: ~6 r# h1 D" i2 E7 Q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",1 N- m3 \6 S( ?( H1 N7 C' ^; A
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % }, H6 A4 W/ |- ^- ^$ m# S     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],; s8 B' @, j! H8 s$ ?% b0 b9 a: K
         "}"}], ",", . {6 A( B$ |3 l5 x) [7 Y6 ^
       RowBox[{"{",
    . W' a& l4 e* v    RowBox[{
      o, K& L4 a( `- z$ z+ T    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    * M: N6 k2 C' K* b0 I# X      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    ( b4 L3 f' a" j. g) F     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ) q1 r( ]! z2 T* N( F; e) i8 e; T     "}"}], ",", / @1 b" u0 T% u4 U6 U! a
       RowBox[{"{",
    5 d5 T6 X$ O! M* C; F    RowBox[{
    # I' v- }) N- k/ L) s* Q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ c& h8 }6 w! @4 c      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", ; C+ V8 n$ N) r; Q1 ?. e9 U9 H
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],# r& e3 F  e! H6 V& p- s
         "}"}], ",", 6 z6 ^' |5 i7 Y" N5 ~
       RowBox[{"{", # @" d2 e2 s4 k- V
        RowBox[{
    ) d- f  i' e0 Y( ?    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",/ Q" z7 m( ]+ ]
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 9 U( b7 Q8 u! ?9 h; I3 [2 y
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    ! B  V1 V# O0 p8 l. [     "}"}], ",", 0 t$ V$ T  t( q# R- w% R7 {9 d
       RowBox[{"{",
    / b4 e* t6 c0 R5 }7 _! h    RowBox[{
    " T# A7 z. \+ {  }5 y9 n  h    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    5 G5 \5 M, ^( {( w  P! L      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 7 o) J3 J3 E6 }) X4 ?
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    2 E! K# R; E8 r2 W) E4 V  U7 W     "}"}], ",",
    5 U/ Z1 P- c" P   RowBox[{"{",
    4 }& a0 {* v2 P6 {; F; ?/ G    RowBox[{
    / U/ o) j. Z/ M% q5 q    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",+ {2 C+ b8 t2 p1 g, g/ J0 p$ M
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    % G8 L2 {1 J+ Z$ T; b. b     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],( o9 _" n+ t+ F+ ^( A$ q5 Q
         "}"}], ",", 9 M% B: r/ I  U7 g5 F8 [* a
       RowBox[{"{",
    $ ]1 i& @' a* L! T# R% h/ {, Z  |    RowBox[{, ?! ]) @& k' K- W+ b* i; _
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",6 o$ J, M" q5 e# O8 D7 ?( F
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 2 X, D, B0 _* a, }3 Y. R) m4 k( m' J
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],6 c, k) u, z4 }; G! r6 p0 L3 m6 `
         "}"}], ",", , Q" z" c" P2 {' [
       RowBox[{"{",
    + `6 ~" [& p" a) a    RowBox[{
    7 A1 u3 ?% T, d    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    4 f/ N4 D: x* S4 }      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 8 b1 Q( ~* B& `$ G  f
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    5 l& Y1 u; I  l     "}"}], ",",
    $ V0 I% U3 [$ a& H   RowBox[{"{", & J$ C; P6 l0 s# U' S4 U# d
        RowBox[{7 l$ c/ @' y  G
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",$ V" b! U9 ~$ K* K' r9 x
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    " K: y$ b6 r9 V9 @4 P( g     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    + J$ S* x. Y$ ~' @  u4 z     "}"}], ",", ( M9 p1 D0 h' u+ N" @& D8 v
       RowBox[{"{", 6 v5 i8 A$ \# i9 i$ V0 O
        RowBox[{
    0 I5 L  T6 Z& M' ]: o    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . F# U) g- r! v; B" `      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & z9 w6 r# g  [     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],5 p* ~0 o0 M$ }( X# P9 P( k) N9 L
         "}"}], ",",
    1 ?1 m2 F+ }! p# b' W   RowBox[{"{", - H" u) y- c: \+ c; ]% u
        RowBox[{0 i1 v; P9 _1 @- }& v; |7 U  m2 M" `. P
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    : V# |( Y* i0 P6 W  I7 X      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 0 k! M4 j0 L5 s
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],% _% d7 z! M# L. V# M! ?, r
         "}"}], ",",
    : g% z$ J3 K1 l   RowBox[{"{", ' ~, [. u# ~$ U% p! ~; N- O
        RowBox[{
    9 I4 D8 p) z  F2 X: [- p    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",! O6 c; ]8 a- @* c' ?
          ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 3 f0 w) K+ C+ ~. z
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    6 N; k3 i7 o% o/ @) I& d     "}"}], ",", 7 o; X% Y+ ]: J
       RowBox[{"{", ' T0 s* A0 ^9 l! p
        RowBox[{- h! j  @% M8 q2 U" ~* K" ^
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ {  ]+ F6 l& ?: O6 \0 X5 u      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    / u& i. j  c# j" L8 X# e" f$ ?% O     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    9 }( ]5 m0 O8 E: _! @/ J- ?" @) {% ^     "}"}], ",",
    $ ?" r6 n% _+ n! z/ H5 q   RowBox[{"{",
    / q/ [1 g' ~! b2 d6 ~    RowBox[{
    ' O# ?' X* X+ \# V" U$ |& i    "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . R( A- b* l8 U9 i      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    & M3 B/ s. P! P* H     "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}]," g6 Z: m, G: t0 N9 ^& e
         "}"}], ",", ! a1 S+ w& p8 F% Q6 ~3 F0 A' x+ s
       RowBox[{"{", ' _9 {' R6 Z+ Z" X+ F7 A* f
        RowBox[{% d- s, G1 R) W
        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    9 H* k; w3 x, W) R" D( E: a      ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 9 R( H+ k  S  v4 K. U
         "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21"}],
    . I( _1 j3 W: A3 @, R4 ^9 ]- D     "}"}]}], "}"}]], "Output",  C6 D0 M3 C' [
    CellChangeTimes->{
    # J: X' z) ?3 q1 V0 y* Y3 Z  3.577924022828125*^9, {3.577924056171875*^9, 3.577924103265625*^9}, - M! R) u. v" M1 y5 p0 F5 ], d6 L' u
       3.577957579987569*^9, 3.577958891536294*^9, {3.5779619459910836`*^9, 4 c9 Z$ S, j( C
       3.5779619748823338`*^9}, 3.578012345453125*^9}]  q: V/ T9 L3 S* Y: V! i; ?
    }, Open  ]],
    4 [: i. V0 c1 `/ A- E$ b7 n2 J/ o! Q8 F
    Cell[BoxData[
    ; F9 e$ f5 S: q( Y. E RowBox[{"For", "[", 8 [1 i/ q' K1 k- _# U) R( n
      RowBox[{
    ( B! Z% u3 `! }- J   RowBox[{"i", "=", "1"}], ",",
    4 ~9 V4 w! h7 f5 w" ~& `8 u2 [   RowBox[{"i", "\[LessEqual]", "60"}], ",",
    4 ?1 l7 D( w" h! ^) D9 u1 q  h   RowBox[{"i", "++"}], ",",
    ! O- _! \& x$ Y   RowBox[{"{", "\[IndentingNewLine]",
    % c6 z, a: w1 _& c    RowBox[{+ F2 g. t" q4 m1 n" f# v
         RowBox[{5 u7 T6 x/ Z$ |4 U! F9 y8 C7 r3 o
          RowBox[{"m60n21", "[", / s3 A/ K" c9 ~
           RowBox[{"[",
    5 b! x) W/ ?/ o& |        RowBox[{"i", ",", "1"}], "]"}], "]"}], "=", * O/ m; F( p7 Z* u8 W
          RowBox[{"u1", "/.",
    9 V8 d; ?; t# y" i: u8 H       RowBox[{"{",
    # u8 m) f+ @' E: \& L& w0 S        RowBox[{
    $ P+ e8 h1 e0 Y# T% U         RowBox[{"x1", "->", 6 E/ `; M$ T; s8 n/ W0 F4 Q
              RowBox[{"Data", "[", . L. y# d! G0 R) j7 N9 c
               RowBox[{"[", 3 o4 n, \" u& D0 c3 Z
                RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",", ! I! k9 c, B1 H3 L% T" w0 T
             RowBox[{"x2", "->", 4 N* G9 Q0 p" N
              RowBox[{"Data", "[",
    ( j, D" H; b0 q6 A0 J, A  X           RowBox[{"[", ' ~' |: ?8 G; N. B% H. p: ~2 l2 T9 ?
                RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",
    5 A+ V4 K3 Q8 S8 n5 t. c2 L, R         RowBox[{"x3", "->", 9 F8 q8 n- z" v
              RowBox[{"Data", "[", # t6 j/ L: H$ |, U0 s7 r6 H$ k$ K
               RowBox[{"[", : C4 Q6 m( k$ K2 R: n) v
                RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",", $ ~) B8 J. e( G: z  b  U' K
             RowBox[{"x4", "->", 8 ~" I3 Z5 ]; g) g6 I& j
              RowBox[{"Data", "[",
    . z1 m* K0 a1 f# }* c# F* F, q           RowBox[{"[",
    8 _/ d9 `7 q, a% z- g: c            RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    9 R" @% S0 y/ T7 D1 y* r; [         RowBox[{"x5", "->", 2 i) _' u7 o% ^' g% h
              RowBox[{"Data", "[",
    / u% a4 n2 S, E: l& o- E           RowBox[{"[", - a* g& a% c, @4 a2 i6 ?
                RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    3 V' z% p( ?0 D* G  U' m         RowBox[{"x6", "->",
    ' f6 J# J3 `; V) I# y          RowBox[{"Data", "[", 4 g  b' p8 H" N  W
               RowBox[{"[", ' j$ H% k5 H# y- n
                RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    5 a" k, `& _6 G: I. y' V$ c         RowBox[{"x7", "->",
    2 w& A4 N- t9 f. I9 p# d. R# S/ c          RowBox[{"Data", "[",
    6 J/ n3 F; ]4 n7 u) ]           RowBox[{"[",
    1 c" P& a3 E3 G- [; h- X            RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    7 ]- K! h- J  G- @! a         RowBox[{"x8", "->", / p7 U$ e; K5 {( s3 r( O
              RowBox[{"Data", "[",   U- _, l0 f- J6 b5 D' `+ U
               RowBox[{"[",
    ( ]# {$ E* \" l1 B" E            RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    ' o! a/ u  l& B8 W         RowBox[{"x9", "->",
    + R* a$ \! t& f& R& K          RowBox[{"Data", "[",
    # H( U7 K$ a* N) k  G           RowBox[{"[", # w8 w" j5 C4 Z7 e* x
                RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";",
    3 g% K2 W2 y( L     "\[IndentingNewLine]",
    * T* z: h" b8 t4 \  D9 v     RowBox[{: V% L& v& w% @
          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
    1 [9 [" F6 {3 Y, P神经网络系数？有这种系数吗？可不可以具体一点儿，给出原问题或更具体点呗
    2 r- ~9 M6 h% e
    (* Content-type: application/mathematica *)6 J* z* X& o4 j+ z
    / _" Z! d! w8 V5 c) g# m
    (*** Wolfram Notebook File ***)
    2 x1 i& F6 N: [2 K+ C(* http://www.wolfram.com/nb *)9 o9 t. R3 E7 k% g
    8 F4 l! u7 ]# Z5 N# n
    (* CreatedBy='Mathematica 7.0' *)5 W: `: Y7 R$ O) w  S* O! ?$ C( R

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

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

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

    ! O5 `7 Q. _) w# SCell[CellGroupData[{' q  H+ B( l$ y4 M  a; J4 ~
    " [' h3 k& N8 v' F3 ^( Q
    Cell[BoxData[{
    6 i! z" p  N4 U4 ]9 S+ R4 {7 [" f RowBox[{"r0", "=", "0.2"}], "\[IndentingNewLine]", ( ^; a( C+ q- d7 C* f
    RowBox[{"M1", "=", "1"}]}], "Input",! K- g  i9 i4 }  `
    CellChangeTimes->{{3.577844361578125*^9, 3.57784436678125*^9}, {$ r5 X# z- f5 `" m$ S
       3.5778457908125*^9, 3.57784580253125*^9}, {3.57784602534375*^9, % Q: L3 G+ {; O. p+ V
       3.577846109453125*^9}, {3.57784617128125*^9, 3.57784619321875*^9}, {
    * t$ S3 M( p! ?/ V6 C0 L8 W& w0 U   3.577846583984375*^9, 3.577846620984375*^9}, {3.577846653203125*^9,
    ' S* J+ k5 {* c5 A7 u# y% i   3.577846691984375*^9}, {3.577846779953125*^9, 3.577846794921875*^9}, {
    * a8 L: @4 o* x5 y( D# V- [& I( d   3.5778470791875*^9, 3.577847088921875*^9}, 3.577847409671875*^9, {& _2 C3 a* m" ?2 S
       3.577847477203125*^9, 3.577847523203125*^9}, {3.577847586484375*^9, $ X& p5 I7 \" N0 ^; z( b& d
       3.577847600640625*^9}, {3.577847649140625*^9, 3.57784770196875*^9}, {
      F- ?& Q; v: X* w* I' u" a) t2 e   3.57784774896875*^9, 3.57784776490625*^9}, 3.577847981546875*^9, {7 F. O/ ]3 x+ S6 j* T. k. u
       3.577913312890625*^9, 3.577913360109375*^9}, {3.577919262828125*^9,
    9 _& \5 P0 ]7 w% c/ i   3.5779193133125*^9}, 3.577919388484375*^9, 3.5779605095479155`*^9}],
    / ?" R+ r* e; G7 w# c
    ' D& g8 ?7 u5 z$ KCell[BoxData["0.2`"], "Output",
    3 q0 y: n" }+ Z$ f7 L CellChangeTimes->{
    5 H1 L. M) W2 h( i  3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9, % G8 H" h8 I& f. [0 p. z) [. l
       3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {
    ) m7 y! {+ ~" @# o   3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9,
    ) Z1 J1 m* }. q, l' S5 t# G   3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {  _9 Y. a! Q: v1 ~
       3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9, * N$ n! k0 ?' Y* p+ D1 N
       3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {
    " A5 D# u, w. b( N6 Q   3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9, ( x7 ^1 C% _1 k- ~# \
       3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {) p5 ^( U" @: {4 ^6 t
       3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,
    ) q0 j" z. f2 ~; v   3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    0 g# L% E" F3 D/ G# v# s   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9,
    ! S6 G3 J% `0 T& T* u   3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, ) @& b* |  v; J% D4 q. L, G8 D" M
       3.577960510686717*^9, 3.578012149296875*^9}],
    2 B1 e2 Z* ~! o. y. Q" `5 c$ P
    0 q+ A* h( K" d; ?: JCell[BoxData["1"], "Output",, ]5 J& [4 \# B8 v0 N! b, o
    CellChangeTimes->{, Q5 e8 X' Q: t1 _$ r
      3.57784436821875*^9, 3.577845806375*^9, {3.57784603053125*^9,
    4 s. k4 o+ O5 z  B. R   3.57784611128125*^9}, {3.577846174328125*^9, 3.57784619575*^9}, {; \7 H" V# L8 o9 Y% n( o
       3.577846575515625*^9, 3.57784662446875*^9}, {3.577846655421875*^9, 7 C) G- a* b3 R; U3 c$ Y" w4 `
       3.577846694828125*^9}, {3.577846773609375*^9, 3.577846802171875*^9}, {
    2 ]( q/ @# P7 i   3.577847068765625*^9, 3.577847134203125*^9}, {3.577847398859375*^9,
    9 ]7 M2 t4 E" n' S   3.5778475331875*^9}, {3.577847581359375*^9, 3.577847611953125*^9}, {- X+ j0 b4 \" a+ o1 }3 l4 X6 D1 ~
       3.57784767515625*^9, 3.57784770903125*^9}, {3.577847751453125*^9,
    % b8 q: b% i; R9 b& G- `9 y   3.5778477734375*^9}, {3.577847849671875*^9, 3.577847869046875*^9}, {
    % ]5 c; d. }3 I3 ]: j9 [; O   3.57784795690625*^9, 3.57784798321875*^9}, {3.5779132940625*^9,   C. C6 z1 ]4 V/ H) Y6 A8 K: c
       3.57791340575*^9}, 3.5779134450625*^9, {3.577919266859375*^9,
    6 Y3 D8 `* Z1 h: U   3.5779193165*^9}, 3.577919391265625*^9, 3.577919455125*^9, . U) A2 P5 U2 K1 |2 [
       3.577920297984375*^9, 3.5779570945615225`*^9, 3.5779588145501595`*^9, 4 Q7 A' V! f& R, J' Y+ T7 t
       3.577960510686717*^9, 3.578012149296875*^9}]
    ' `2 g+ P( ^7 w3 _5 }" P. k}, Open  ]],7 }/ z$ A( m' r7 i
    0 N8 u/ ^! |9 J/ {
    Cell[BoxData[
    . T4 I$ {0 c6 @* O  G. V* m, V) H RowBox[{"For", "[",
    7 _' @& |& ~+ ~$ ^  F+ S" a( g  RowBox[{, e2 x; p5 G; `8 B; d9 {8 s4 w" a
       RowBox[{"k", "=", "2"}], ",",
    . M* c! \9 K- D, i   RowBox[{"k", "\[LessEqual]", "60"}], ",",
    1 G/ R& ^$ d7 K" U- j1 }: B$ M   RowBox[{"k", "++"}], ",",
    4 I4 D7 ^) x/ p# a   RowBox[{"{", "\[IndentingNewLine]", 2 X, n2 p) J# K( `/ A0 }
        RowBox[{! Y. J; p- C. x: M" a
         RowBox[{"rmin", "=", "0.0"}], ";", "\[IndentingNewLine]", $ e7 r, C( \2 J3 H
         RowBox[{"For", "[",
    - ]5 D# R, Z2 s% N- i      RowBox[{
    ! Z: z) h2 N2 s5 `/ a% v' n       RowBox[{"j", "=", "1"}], ",", 1 p: o  }- S$ v! W5 e0 {
           RowBox[{"j", "\[LessEqual]",
    , O% m* d+ Q( o. N        RowBox[{"k", "-", "1"}]}], ",",
    . J3 x4 P* d: N1 y/ S       RowBox[{"j", "++"}], ",",
    1 V' Z/ C# G6 `2 Y0 H$ A/ p       RowBox[{"{", "\[IndentingNewLine]", / o5 L& M$ a* Q3 u! M5 G
            RowBox[{
    7 w  i5 P/ j! r- C$ \         RowBox[{"r1", "=", "0.0"}], ";", "\[IndentingNewLine]",
    ) R0 c& S0 M  h$ R2 T8 U8 ^         RowBox[{"For", "[",
    1 g0 }* ]' S2 b- B          RowBox[{
    0 {1 Y! x, e0 {# v9 b1 d* O0 O3 o* b           RowBox[{"i", "=", "1"}], ",", 4 z9 N3 `9 j' @$ F
               RowBox[{"i", "\[LessEqual]", "9"}], ",",
    / n* o( b# A* B, g) N% P           RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", * x/ b. v! {& ^, P2 O* [% l2 d4 c
               RowBox[{
    5 a. D& [. Q/ Q, {            RowBox[{"r1", "+=", 4 J7 G, E& g: L3 k1 D8 E
                 RowBox[{- w$ C/ ?6 t1 }" [7 m
                  RowBox[{"(", ! W5 d! n" `) B5 ~
                   RowBox[{! p0 C8 u% [$ f
                    RowBox[{"CM", "[", , }( t7 c/ g% t# T) @9 Z& D
                     RowBox[{"j", ",", "i"}], "]"}], "-", * M$ J" ~( C0 Q- p4 j
                    RowBox[{"Data", "[", . Q: t+ q  X/ N5 c( b$ [& F6 x
                     RowBox[{"[",
    2 [; P, n* V+ ]5 s# |                  RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}], "*",
    ' o* D& r9 M% r3 o              RowBox[{"(",
    ! o4 @- Z) r3 z( s; s; h               RowBox[{, P, h. R9 L: f# i7 H6 c9 \
                    RowBox[{"CM", "[", ( o) Z% h- H6 v& G
                     RowBox[{"j", ",", "i"}], "]"}], "-", ( w* [% C3 k5 A4 S0 F: L
                    RowBox[{"Data", "[",
    2 z$ K3 A* S$ M( d4 z2 \: R                 RowBox[{"[", ; b1 N5 ^: z. z2 Q( V9 P
                      RowBox[{"k", ",", "i"}], "]"}], "]"}]}], ")"}]}]}], ";"}]}],
    " k7 b: z4 J" {/ s* w! h# j3 Q           "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", - K: ]; X! x. h) @& i9 r7 s2 E
             RowBox[{"r1", "=",
    $ G0 W/ ~5 Y) ]* `3 s          RowBox[{"Sqrt", "[", ! G2 R! }- L9 F6 }" a
               RowBox[{"r1", "/", "8"}], "]"}]}], ";", "\[IndentingNewLine]",
    7 L2 H) Q* h+ V: b* x3 r" I         RowBox[{"If", "[", " ",
    ' C6 i. @! l  ~          RowBox[{7 V% w: H. q8 t
               RowBox[{"j", "\[Equal]", "1"}], ",", $ l1 ^' ?3 O6 {
               RowBox[{"rmin", "=", "r1"}], ",",
    . c4 O1 M, b/ l+ f           RowBox[{"If", "[",
    % E; i" j; ^8 }  D* a( W8 C# F            RowBox[{
    # Q0 d% h2 [2 K. |7 J+ O             RowBox[{"r1", "<", "rmin"}], ",", , `! K! f2 ^- T, Z
                 RowBox[{"rmin", "=", "r1"}], ",",   `1 b# F: N7 v
                 RowBox[{"i", "=", "i"}]}], "]"}]}], "]"}], ";"}], 6 \8 {$ ?  P. @7 m5 `
            "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";",
    * `( k! `9 c' O6 E1 U0 O     "\[IndentingNewLine]",
    6 l3 X4 e0 u0 x3 E( \! Z" K2 V     RowBox[{"If", "[", ' v' h' k% d* i$ E$ c6 `9 w  I
          RowBox[{
    / @7 E! J9 u# s7 O: T; a* T- K       RowBox[{"rmin", ">", "r0"}], ",",
    8 K2 [8 [/ X% [( ^8 s  e       RowBox[{"{", "\[IndentingNewLine]",
    : e$ V; q, Y: v( @# Y3 u, K( L; S* n        RowBox[{
    3 S  ]4 [" f6 ]6 f) F         RowBox[{"M1", "++"}], ";", "\[IndentingNewLine]", ' u. W5 o  B# `1 J7 c" [
             RowBox[{"For", "[", / g! M# l# `* J) u; _
              RowBox[{
    6 N5 B+ ?: z0 V: r1 P           RowBox[{"i1", "=", "1"}], ",", 7 Y% i) Z; o/ R8 T+ ?, u4 E2 ]
               RowBox[{"i1", "\[LessEqual]", "9"}], ",", ; e6 N% d' {7 k% q; `! F/ k
               RowBox[{"i1", "++"}], ",", "\[IndentingNewLine]",
    ; o3 b7 k; p$ Y- Z  R           RowBox[{: z1 Y. M, L: b3 r
                RowBox[{0 Z! P+ |+ O; t
                 RowBox[{"CM", "[",   ^( ?" Z8 Z" M* W
                  RowBox[{"M1", ",", "i1"}], "]"}], "=", 7 {' e6 w8 U2 R- J
                 RowBox[{"Data", "[",
    ' j9 G7 n( R! t1 p  N              RowBox[{"[",
    6 T+ l+ M* D* j8 G  w               RowBox[{"k", ",", "i1"}], "]"}], "]"}]}], ";"}]}], ; h; ]- Y5 v' I. d( d9 ?
              "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",",
    . `, T7 D2 `% R* g. b       RowBox[{"i", "=", "i"}]}], "\[IndentingNewLine]", "]"}]}],
    . ?; P  e' c6 \% \& |$ f    "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input",- D' k5 `' H* b0 e
    CellChangeTimes->{{3.577844030515625*^9, 3.577844093140625*^9}, {/ T0 b: x1 B+ S
       3.577844374484375*^9, 3.577844448265625*^9}, {3.57784448490625*^9,
    ! {& U; W3 V/ ?* t* v   3.577844518609375*^9}, {3.577844553671875*^9, 3.577844611984375*^9}, {
    $ m# {  V( k2 w" Z2 D   3.57784478278125*^9, 3.5778448395*^9}, {3.57784493659375*^9,
    2 O8 t9 v8 e. O1 X6 P% A   3.577844964765625*^9}, {3.577845100328125*^9, 3.577845101921875*^9}, {4 O  a: Q" V% i
       3.577845269609375*^9, 3.577845304125*^9}, {3.577845421203125*^9, , Q6 ~9 T7 b% k: B# c+ q0 p/ w" r( f& `
       3.57784542309375*^9}, {3.577845475359375*^9, 3.57784575834375*^9}, {( y& O. K7 X. `( Z) I6 \1 t
       3.5778458119375*^9, 3.57784582953125*^9}, {3.5778458803125*^9,
    7 a5 m  G  M) G; q   3.57784594859375*^9}, {3.577845984984375*^9, 3.57784598753125*^9}, {
    5 {8 ~9 S3 E% z* G# @1 @   3.577846034546875*^9, 3.577846038390625*^9}, {3.577846303984375*^9, ; ~! e. k7 N- R* N5 {! o( T$ o
       3.577846311921875*^9}, {3.57784637396875*^9, 3.57784644271875*^9}, {
    ; Y; h" s  I6 N   3.57784649071875*^9, 3.577846495203125*^9}, {3.577846525859375*^9, - ^& I! \& H6 t, Q0 ?1 F" ?, h
       3.57784654409375*^9}, {3.577846732234375*^9, 3.577846764765625*^9}, {
    ( l2 ~. r  t) m' D; i1 c   3.577847031171875*^9, 3.577847033453125*^9}, {3.577847388296875*^9, ) ^! F8 d+ Q# B+ R$ Q" k
       3.57784739490625*^9}, {3.5778475661875*^9, 3.577847571375*^9}, {% o: y- k& q  w8 |
       3.577847651921875*^9, 3.577847669046875*^9}, {3.57784793653125*^9, ! _1 e4 L+ R1 X. g, e
       3.5778479520625*^9}, 3.577920065921875*^9, {3.5779588175765653`*^9, 5 V, H6 t. h8 r" B# W& M
       3.577958821991373*^9}}],
    # G/ E# G' ^! h: K, H/ i
    ) U$ k! W" Z7 @$ l! s3 t! f1 P$ Q+ Q5 zCell[CellGroupData[{
    ' ?8 m- w# W1 T( C' b0 o) a/ }2 Q0 e+ D
    " w! q6 N* p9 n; g/ f1 OCell[BoxData["M1"], "Input",, q9 T- T( ~# d
    CellChangeTimes->{3.57784599821875*^9, 3.57784767159375*^9}],
    0 D+ u$ R0 f/ `* e7 `- h4 o$ y2 C& h* C/ H1 b# h; n; N
    Cell[BoxData["21"], "Output",
    - O; Q% m* D) \9 v6 h$ v0 {4 D" ], ~ CellChangeTimes->{
    1 `2 v8 l5 }+ P: Q# n  3.577845999015625*^9, {3.577846043078125*^9, 3.577846114078125*^9}, {+ ~3 o) r- s. C( P! Q
       3.57784617665625*^9, 3.577846198859375*^9}, {3.577846578203125*^9, / ^9 ?- b0 d4 C
       3.57784669890625*^9}, {3.5778467768125*^9, 3.577846804546875*^9}, {0 _. B* {; y3 A" [: M6 n6 m$ S# F
       3.577847071859375*^9, 3.577847137234375*^9}, {3.577847401296875*^9,
    ' [, `$ p6 a( {3 E' d3 p   3.57784753571875*^9}, {3.577847583625*^9, 3.577847614734375*^9}, {
    $ Q) f) I: n; d( l- b7 k   3.5778476783125*^9, 3.577847711390625*^9}, {3.5778477535*^9,
    , e, A/ ?2 U+ q7 X   3.577847775859375*^9}, {3.577847852734375*^9, 3.57784787165625*^9}, {
    7 l& P: L9 H# H# V% `; H3 n   3.577847966390625*^9, 3.577847986703125*^9}, {3.577913298203125*^9,
    ! q. Q% u3 s. W. |3 ]* `. r+ R9 X   3.577913408046875*^9}, 3.577913447296875*^9, {3.5779192700625*^9,
      N% X) z% x7 y   3.57791931975*^9}, 3.577919394140625*^9, 3.577919458796875*^9, 7 M# D0 _/ a7 Q
       3.577920302703125*^9, 3.5779570980247283`*^9, 3.5779588282469835`*^9,
    $ X. L7 x# g. p& E   3.577960515600726*^9, 3.5780121541875*^9}]
    $ h! x8 R3 Y1 \/ {8 r}, Open  ]],( Q2 m$ T+ v6 C0 z! w" q
    5 r& p, G) j+ \- r4 o
    Cell[BoxData[
    " y+ c" ~/ D9 h* I4 a0 w6 Z RowBox[{
    9 M5 U2 U& v  J& \/ S* @  RowBox[{"\:4ece21\:4e2a\:805a\:7c7b\:4e2d\:5fc3CM", "[", & x: ~; E# A+ w- e; d
       RowBox[{"1", ",", "i"}], "]"}], 8 j' D, b( r+ \1 _
      RowBox[{"\:5230CM", "[", : C' B/ _2 y! O9 q9 l0 D4 G# H
       RowBox[{"21", ",", "i"}], "]"}], 6 |2 j  D# w0 z( Y/ g  p( M- Z- z
      "\:8fd0\:884c\:4e0b\:9762\:7a0b\:5e8f\:ff0c\:5f97\:5230\:9ad8\:65af\:6838\8 h/ k, j9 d" x( e
    \:51fd\:6570u1\:5230u21"}]], "Input",
    8 S' P6 I/ i1 D CellChangeTimes->{{3.57792097971875*^9, 3.57792107725*^9}, {2 ?1 k/ G3 L/ |2 e2 z
      3.5779212193125*^9, 3.577921224546875*^9}, {3.5779605210919356`*^9, : d% n6 s& f, |7 J9 `
      3.577960526583145*^9}}],
    - n5 H  s3 B5 B/ l2 X( a4 ]/ K2 z) U
    & U+ U" u. `4 y0 T+ u3 GCell[BoxData[$ `: G& j2 {. W1 Q
    RowBox[{"Clear", "[", "Delta", "]"}]], "Input",6 X% |" d) i# q7 |. v
    CellChangeTimes->{{3.57791779953125*^9, 3.57791780503125*^9}}],% m6 q" x% r$ A- c( F6 p' h
    ' Y% ]# x) _) b: |$ q
    Cell[CellGroupData[{
    2 p& D$ Q3 J, g( O. i8 ~9 v9 i% Q
    ; e- c" R! _, M7 eCell[BoxData[
    " m$ t; l/ g, L0 x" L" d; w- {  X RowBox[{"Xa", "=",
    - Z' L" V5 H6 P! r( o1 U  RowBox[{"{",
    1 z* x6 B8 p" O& A$ s' O& c   RowBox[{
    8 {3 Q+ S4 f3 S; Y5 B1 u   "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7",
    ' f$ L- J" y* y8 k    ",", "x8", ",", "x9"}], "}"}]}]], "Input",: N' h, ^9 E9 ]$ e. E  @. j! R
    CellChangeTimes->{{3.577915885125*^9, 3.577915917671875*^9}}],
    4 P. m+ ]/ Y" _0 ~$ h" j
    & j, ~' s# a# |9 e- X7 O0 OCell[BoxData[2 H6 ~' _) b! V* ~
    RowBox[{"{", ' C2 P4 ^. h( c" J  K
      RowBox[{4 {) s4 r1 A, U0 G" O
      "x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5", ",", "x6", ",", "x7", ",",
    8 q( t7 L( L8 t) s& A    "x8", ",", "x9"}], "}"}]], "Output",
    ! v1 ~6 l$ L6 j! M7 N CellChangeTimes->{
    8 ?$ m9 c) U: {+ f7 V8 Y1 M! t  3.577915921125*^9, 3.5779202114375*^9, 3.577920516515625*^9,
    3 o9 X7 V, ]: s# R9 l   3.577920662203125*^9, 3.57792077490625*^9, 3.57792090509375*^9,   c( S( a" i; r6 o+ I/ f
       3.577921145078125*^9, 3.577921329484375*^9, 3.577921423265625*^9,
    % C: O) l9 J+ O- I3 f0 h; O4 K   3.577957103968339*^9, 3.5779572906382647`*^9, {3.577957337563146*^9, . e# n2 g8 U" z$ |9 G7 w
       3.5779573648007936`*^9}, 3.5779573998384547`*^9, 3.5779574405545254`*^9, {# m  L/ P' u  D# S0 @
       3.5779574803345947`*^9, 3.5779575349346905`*^9}, 3.577958833036192*^9,
    . u' z2 ^0 H8 Q$ E   3.577960538064765*^9, {3.5779607232682877`*^9, 3.5779608705013447`*^9}, 4 S+ t" j2 P. s8 h1 [3 P
       3.577960901170998*^9, 3.577961447695015*^9, 3.5779616069712925`*^9, {
    6 Y; H% a% ]- n+ _   3.577961638124547*^9, 3.5779616672029977`*^9}, 3.577961702599459*^9, {
    9 z) [- F9 i; a' M0 E   3.5779617344391146`*^9, 3.5779617594615583`*^9}, {3.5779617927208166`*^9,
    - |  W! O  j! S3 G   3.577961846057309*^9}, {3.5779618785053663`*^9, 3.5779619036214094`*^9}, / S  g  z- v  J) G3 {" T1 @
       3.57801215725*^9}]& J: \7 n5 F; H% R  D; J# i
    }, Open  ]],$ r/ @4 `7 f1 g/ d" }
    4 S0 j" F0 z/ t# I% K- B9 @
    Cell[CellGroupData[{
    , Q. }' Z/ W# z$ B3 L4 i6 e
    4 i$ K- k6 O) `5 i- C& @Cell[BoxData[
    / I2 J3 }6 f6 \6 D RowBox[{"Ca", "=", ; F' `6 w( `1 g! q
      RowBox[{"{",
    8 V# o6 u7 r4 E+ q7 C9 i, o: v   RowBox[{
    ( k: K1 U2 F- j3 Y% H8 a! K   "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", , @3 g0 \! k6 e; ?% Z( }% m
        ",", "c8", ",", "c9"}], "}"}]}]], "Input",+ Z: i& c; ]/ @. o% S$ r/ a* ?, `
    CellChangeTimes->{{3.577915931921875*^9, 3.577915967953125*^9}}],
    ) L! V# @: n8 {9 q4 V, V7 [. }4 |) C5 z$ G9 @8 r
    Cell[BoxData[
      M5 z( i% k  U  T+ e% M( y RowBox[{"{",
    5 i! e. d4 k, O" ~  RowBox[{
    1 d/ _+ ]9 C; l, ^0 A  "c1", ",", "c2", ",", "c3", ",", "c4", ",", "c5", ",", "c6", ",", "c7", ",",& X" e4 {. I4 \- i! @6 _+ p* Y
        "c8", ",", "c9"}], "}"}]], "Output",
    + ~9 Z7 T8 A! w0 A4 Q5 T9 Z! r& v( m CellChangeTimes->{
    3 c: x# C) |# s) y8 O  3.577915976625*^9, 3.577920215953125*^9, 3.577920310953125*^9, / T! {8 T+ _# |& [
       3.577920517265625*^9, 3.577920663078125*^9, 3.577920775703125*^9,
    3 J8 [& D. n, ~* J   3.577920905765625*^9, 3.57792114575*^9, 3.577921330125*^9, / c4 a/ t; f: I2 A/ h) o
       3.57792142384375*^9, 3.577957106386343*^9, 3.5779572916366663`*^9, {1 L; B8 ^8 U- Y. z( O5 ]- t
       3.577957338327547*^9, 3.577957365424795*^9}, 3.577957400743256*^9, , R3 S% j0 k& \7 F) Z8 Y( P2 J9 r
       3.577957441303327*^9, {3.577957481020996*^9, 3.577957535979892*^9}, 0 g. P7 A  d; Y4 w$ S% r# S  ?, t
       3.5779588343153944`*^9, 3.577960599544472*^9, {3.577960723892289*^9,
    5 G! c9 y6 j7 M1 I   3.577960871172146*^9}, 3.5779609019665995`*^9, 3.577961448365816*^9,
    + O0 L/ t, \" O% F9 ~2 E   3.577961607517294*^9, {3.577961638935748*^9, 3.5779616678269987`*^9}, 9 c: z; W8 p% ?
       3.577961703566661*^9, {3.577961735063116*^9, 3.5779617600699596`*^9}, {
    9 G& S% e$ S0 r   3.577961793391618*^9, 3.5779618468841105`*^9}, {3.5779618793477674`*^9, $ T2 ^: w$ X6 o% t% Q: o  O
       3.577961904604212*^9}, 3.578012158671875*^9}]# r' F3 t6 G1 P3 A5 y! p
    }, Open  ]],, Z6 j; o7 ]4 j% X. l! d$ r
    3 R. F0 |/ s: L% Y7 I8 t
    Cell[BoxData[6 l5 Y( v9 e+ m0 b0 [" J
    RowBox[{"For", "[", * L5 ?( h" E# i2 t9 w
      RowBox[{
    5 u( [- O- K! ^: h& d6 h1 w   RowBox[{"i", "=", "1"}], ",",
    - `+ R4 Y. X' ?& o4 v7 s2 _   RowBox[{"i", "\[LessEqual]", "9"}], ",", ( I* V( l! m, i, x% i, h
       RowBox[{"i", "++"}], ",",
    # W  J: [* ?8 h# A2 L   RowBox[{3 n9 s+ L5 T9 ~, \/ D8 m- b
        RowBox[{"Ca", "[",
    1 p5 V0 |5 J* Q. ~     RowBox[{"[", "i", "]"}], "]"}], "=", / }: c5 s9 ^8 c( n" X; N
        RowBox[{"CM", "[", ! X( Y, ]0 Z: p- J& H' f
         RowBox[{"1", ",", "i"}], "]"}]}]}], "]"}]], "Input",) X& I( Z9 q6 D+ R
    CellChangeTimes->{{3.577915983546875*^9, 3.577916019953125*^9}, 2 O; b1 n% Y$ z! u% O/ I  U
       3.57792022403125*^9, 3.57792052028125*^9, 3.5779206656875*^9,
    - e" R9 k/ g' L$ i: ]0 P& o   3.577920778296875*^9, 3.577920907875*^9, 3.577921140296875*^9, # M$ {5 D8 s: X0 J2 Z
       3.577921332234375*^9, 3.57792142584375*^9, 3.577957226662553*^9, ! }% s9 }* f4 F2 k- E  ]
       3.5779572941638703`*^9, 3.577957335176342*^9, 3.577957367405998*^9,
    % @1 O2 S. z' a% Y1 Y( O  c   3.5779574034576607`*^9, 3.577957444064532*^9, {3.5779574828929996`*^9, 3 O5 `7 i7 X/ U5 d
       3.577957538663097*^9}, 3.5779606027268777`*^9, {3.577960726232293*^9, 7 m, ]* J% Z, F7 A. _
       3.577960872778949*^9}, 3.577960904415804*^9, {3.5779614517042217`*^9,
    4 y* s' a* `1 d3 _& t* ]" E1 W1 |   3.5779614520474224`*^9}, 3.577961505836316*^9, {3.5779616092020965`*^9,
    0 E. w  ^% c, E) ]0 ]# R   3.5779616093892965`*^9}, {3.577961640604951*^9, 3.5779616696366014`*^9},
    ' Z2 ]3 r: ]/ I# R; h   3.577961705345064*^9, {3.5779617369975195`*^9, 3.577961762113563*^9}, {+ B' r" o& v. m$ R7 Z+ A" X& \% x8 A
       3.5779617950764203`*^9, 3.577961851064918*^9}, {3.5779618822649727`*^9,
    * w4 J, V% E0 A   3.577961906897415*^9}, 3.578012176296875*^9}],
    ) I# b, H0 k' Q9 J% K5 p8 h; b* o- A- c
    Cell[CellGroupData[{+ {( S7 z  {' u* A9 S' H( B- Y

    , R8 Q! w6 }2 I8 d( O( LCell[BoxData[8 \( F8 }; C! M
    RowBox[{
    ' _- {1 s! a4 [2 g. n# n  RowBox[{"(",   e& E/ R+ o* R$ c
       RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ; M2 R) E1 c/ ~/ Q
      RowBox[{"(", , Q& [: y- F2 O( l& j
       RowBox[{"Xa", "-", "Ca"}], ")"}]}]], "Input"],
    & ]3 A8 n* j" [: Y& ?5 M5 M" ]4 E3 L: A0 d3 \
    Cell[BoxData[9 X% D  g. o# w: ~# `, W1 F# f
    RowBox[{
    . j2 r+ e$ T1 ?4 m  Q4 e  SuperscriptBox[
    # n7 E% v" E2 |4 C   RowBox[{"(",
    * O3 p: J! o7 K, v$ Z, q4 \2 Q- f, f    RowBox[{
    ) P$ J" ~. y: s0 f     RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"], "+",
    * e) W( ~' }. U* M7 J  SuperscriptBox[; A4 P/ J  L! S3 v' S
       RowBox[{"(",
    $ g$ U0 Y1 }* P5 n: T  _% R    RowBox[{
    # j2 L7 q& @+ a) }     RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "+", 3 ^- ?. d. C: V$ O/ p8 [6 h
      SuperscriptBox[  Y% Q. ~: g2 C+ r( _
       RowBox[{"(", * X5 i; {+ s0 G- C5 a+ i' T, o2 s5 g
        RowBox[{
    . z! G+ ^" \& r     RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "+", + r5 E5 d; B/ X: m8 \; S/ c
      SuperscriptBox[3 n7 c1 a  l! x8 l; ?
       RowBox[{"(", & R% L; ]$ Z$ `( j, O0 a
        RowBox[{
    2 ?! }5 U9 X* N4 }; T% a     RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "+", $ W. C1 ~) B0 A3 S, \# n
      SuperscriptBox[
    0 f1 h" |3 M9 r- X; Z/ [   RowBox[{"(", 0 y0 }/ |- A/ M+ D! M) p: Q' V4 H, D; @
        RowBox[{
    " y& h; Q7 J: ^  u, n, w     RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "+",
    7 M9 I/ r9 r3 _4 L$ K# G/ w  SuperscriptBox[' n7 [- x0 F5 }6 P6 f
       RowBox[{"(",
    , [( w1 E* Q3 b5 \1 G" [* U    RowBox[{
    0 u  m1 }0 {. B8 d- K; X, s     RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "+",
    # Q4 G. F  V4 o' L$ @& `  SuperscriptBox[! e5 H! [/ Y7 g) G, X* S
       RowBox[{"(",
    , x- |) u* T1 o8 ^    RowBox[{6 Z. r& i( I; E6 c) V
         RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "+", 7 ^9 w+ Z, g# {  A
      SuperscriptBox[
    $ l* Z& \# U+ H   RowBox[{"(",
    " }3 H  o5 Z! {( R6 b    RowBox[{
    9 [# l4 V8 y4 T$ _! t     RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "+",
    4 l7 d6 W  k2 R% u  SuperscriptBox[+ Z+ S5 J4 \& v- D2 F6 Q8 d
       RowBox[{"(",
    : x7 K7 [% }2 m" C# N. G    RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}]], "Output",
    # s. i- D. y; V* M7 K% Y4 B+ Q+ j CellChangeTimes->{, j5 U" G4 z2 V" m7 G+ Q
      3.577920239578125*^9, {3.577920313765625*^9, 3.577920337375*^9},
    0 i% Y/ [( x- ^# @  Y* f+ a+ ~, G+ x   3.577920523875*^9, 3.57792066971875*^9, 3.577920780875*^9,
    4 e2 w- U1 X( S1 H   3.577920912375*^9, 3.577921147703125*^9, 3.5779213341875*^9, 7 ^7 z8 ~6 z. b# E$ v
       3.577921427984375*^9, 3.5779571106607504`*^9, 3.5779572305781593`*^9,
    " Q& P* r- l. U0 Q& {2 l   3.577957296800275*^9, {3.577957340215151*^9, 3.577957369621202*^9}, 5 n" ~% S2 c. O$ g7 J  d  L
       3.5779574064528666`*^9, 3.5779574463577356`*^9, {3.577957484733803*^9,
    ) a; h0 r: s( ?% h% J! f  @   3.5779575407691*^9}, 3.5779588373105993`*^9, 3.577960607391286*^9, {: q) g, p4 t) ~/ r. n
       3.577960728775098*^9, 3.5779608753061533`*^9}, 3.577960906849408*^9,
    ! L& F. P/ U2 C* l   3.5779614551050277`*^9, 3.577961509346322*^9, 3.5779616115109005`*^9, {+ w; e" Q% o) E/ ?; k# ^: t% M
       3.5779616432101555`*^9, 3.5779616717114058`*^9}, 3.577961707607068*^9, {2 P$ l. Q6 S. H9 Z. [8 v$ O. {
       3.5779617396339235`*^9, 3.5779617643131666`*^9}, {3.5779617971824245`*^9, ( O8 R, a3 E9 H5 e; ~3 d# z
       3.5779618537169228`*^9}, {3.5779618846049767`*^9,
    ) j* U" ]6 \. `. x) ?   3.5779619094246197`*^9}, {3.578012161203125*^9, 3.57801217953125*^9}}]
    ' Q! y1 G' k* w0 o/ N}, Open  ]],9 V2 \2 a' R  K/ v" o, M) L% B

    # ?8 H0 n" m$ A; L- OCell[CellGroupData[{
    ) f' A" }4 m1 y6 f& s- z3 c! S
    - P: y  ]2 a, P& }9 }- ^  F* u! o* yCell[BoxData[0 k5 y! d. p9 B8 s' b/ L/ N% x
    RowBox[{( e8 ~4 H# |) W% O/ a7 E" q& q
      RowBox[{"Ca", "[", ) _" W+ ]* v+ M3 [8 s/ G( c' Y: s
       RowBox[{"[", "3", "]"}], "]"}], "=", "0"}]], "Input",
    / \; ?4 |1 j- M CellChangeTimes->{3.5779574142996798`*^9, 3.577961516116734*^9,
    * @& [: M" A; ?  3.5779616465173616`*^9}],) j/ C; P' E7 k- V, j

    + T* Q; i0 w% o+ p$ f2 Q: e; ^Cell[BoxData["0"], "Output",
    * ]6 ?! _; x! g( F4 M9 S CellChangeTimes->{3.5779574163276834`*^9, 3.5779615176611366`*^9, ) ?5 s9 F5 X. M; C. g/ c; a0 q; ~
      3.5779616484049644`*^9}]; w( ^! x$ n$ R  L: [6 E# Y7 q
    }, Open  ]],' i8 v8 B0 N) Z* t- @

    # e! _+ Q- k& Q& HCell[CellGroupData[{8 P7 s; [! o. l1 v! P2 ?0 n) f
    * C- l3 [  @+ E
    Cell[BoxData[4 {. N. i0 g" m! ~
    RowBox[{. V  d: @/ e  S, \
      RowBox[{"Ca", "[",
    9 X) I+ O0 k4 n* U8 {   RowBox[{"[", "5", "]"}], "]"}], "=", "0"}]], "Input",
    2 r1 r1 I0 |/ S' _) C8 t- Y2 W CellChangeTimes->{3.577957376235614*^9}],3 |" t' b; K6 L
    ! R& M5 j0 _2 J- C
    Cell[BoxData["0"], "Output",
    & P5 S5 `- R- O2 r0 ^( c& H% J% L1 r CellChangeTimes->{3.5779573779048166`*^9, 3.5779614600346365`*^9}]
    & T! O. K4 t# L}, Open  ]],
    . [. j/ i5 O$ Z9 t5 f. k. x1 I
    ( \0 C3 h& E- n3 _Cell[CellGroupData[{
    / L" B/ I# g+ {. M! h7 z3 f: q* c) J- M9 e5 K8 ~/ N
    Cell[BoxData[
    2 ]" h9 p* T8 R& Q( m RowBox[{
    1 N$ X' u- f5 W% n: A% |2 J6 ?$ P  RowBox[{"Ca", "[",
    5 ?) b9 z$ F: u0 F  z   RowBox[{"[", "6", "]"}], "]"}], "=", "0"}]], "Input",7 ^* ]. x6 D! |( J% K1 L) R
    CellChangeTimes->{3.5779573112927003`*^9}],
    ! F3 @2 V7 [' l- G8 z6 W1 z: V; q" W% y: x6 \  E
    Cell[BoxData["0"], "Output",
    . Q7 }9 g  G6 o! l% V- p CellChangeTimes->{
    * m. p6 b# H, D; Y4 M( J- q  3.5779573131491036`*^9, 3.5779573438343573`*^9, 3.5779573794336195`*^9, ( W9 l5 ?: t" u' C
       3.5779574208204913`*^9, 3.5779574530345473`*^9, 3.5779575154814568`*^9, 1 T$ L5 y8 d6 K' C
       3.57796080484083*^9, {3.5779608543709164`*^9, 3.5779608784573584`*^9},
    ' x4 x* v6 ]" `' B8 x8 @. }" O   3.577960912044217*^9, 3.5779614619378395`*^9, 3.577961522372345*^9, ; O6 \0 F) E: f6 J: W/ W
       3.57796161703331*^9, {3.577961650978969*^9, 3.5779616775146155`*^9},
    % s6 _+ K4 F& R) ?. A- _- Y2 H   3.5779617114602747`*^9, {3.577961801144831*^9, 3.5779618299268813`*^9}}]+ @4 R8 U$ n' {9 [0 Q7 V
    }, Open  ]],) u. P5 Q- ~( `  L6 d$ w

    ) C* O; H) i" V* V/ BCell[CellGroupData[{3 [2 N9 n- Y0 J5 G6 c; x2 I7 G+ j& u

    * L6 P+ x  d: \, A5 rCell[BoxData[
    / k6 |& _* Y/ }9 q RowBox[{8 n. N: a2 a+ v0 o# B7 d0 i( P" s0 P
      RowBox[{"Ca", "[", : O$ d- P3 x( Z* s) D# k
       RowBox[{"[", "7", "]"}], "]"}], "=", "0"}]], "Input",
    6 B# [# i, d( o/ U% ] CellChangeTimes->{3.577921461734375*^9}],
    / R! D" c$ P$ a2 P+ U3 B
    9 C7 k% n. @4 }& ~0 bCell[BoxData["0"], "Output",) c7 W; o% x0 N; a8 U
    CellChangeTimes->{
    6 d, Z% m- E8 g( e. n- F; ]  3.57792149215625*^9, 3.5779571133283553`*^9, 3.5779573808844213`*^9,
    , c) W6 E. |- ^( E$ h   3.5779574235192957`*^9, {3.577957489351411*^9, 3.5779575470715113`*^9}, $ Z* S$ G1 K! f2 U3 ~4 A- S9 Y
       3.5779588406958055`*^9, 3.577960732409904*^9, 3.577960778851185*^9,
    ! H9 _" y0 o! j5 S* V8 {+ `   3.5779614640906434`*^9, 3.577961617641711*^9, 3.5779616533033733`*^9, ; H! h( `+ L1 }
       3.5779617130982776`*^9, {3.5779618019560328`*^9, 3.577961888005782*^9}}]; s1 P4 L8 m, w  ]. u) s1 H
    }, Open  ]]," x4 ^, m' j& J8 V. d0 ]! f  r

    % ?% T# C- k  uCell[CellGroupData[{
    : l7 O0 O1 Y- d1 Y6 i+ C- A: U# B2 U% K. n% Z& b# [; E
    Cell[BoxData[
    / j2 X: A+ i% z2 N0 u. y/ |5 y RowBox[{
    - o. F6 S- i* \& W) \# v  I  RowBox[{"Ca", "[", * U+ w' W# T1 T
       RowBox[{"[", "8", "]"}], "]"}], "=", "0"}]], "Input",; [* y6 V# K7 z- \' s
    CellChangeTimes->{3.577957303118286*^9}],# o* S; A$ q4 A5 E# e0 b3 s5 \
    ) ^& Z) v( s% J6 V& P/ l& E' }9 t
    Cell[BoxData["0"], "Output",( H1 p& f% c. e. G
    CellChangeTimes->{
    4 J5 t/ {& I+ ?$ E" t# d  3.5779573073770933`*^9, 3.577957382647225*^9, 3.5779574565133533`*^9, {
    % V9 F1 c+ |/ v  m- ^, `   3.5779574910986137`*^9, 3.5779575189290624`*^9}, {3.577960756371546*^9,
    - B9 O! R7 }: L   3.5779608308772755`*^9}, 3.577960881717764*^9, 3.577960915320223*^9, 5 d0 ~+ [. _1 k- M+ o; b
       3.5779614659002466`*^9, 3.5779615232459464`*^9, 3.577961618671313*^9,
    & c' u/ c4 t- r8 B! Z" X  Z   3.5779616809778214`*^9, 3.5779617145334797`*^9, {3.5779617456243343`*^9,
    9 y& {2 K8 |; d# D& k- ^! ^   3.5779617686187744`*^9}, {3.577961803796836*^9, 3.5779618329844866`*^9}, {! E: Q: o5 j4 p9 y
       3.577961889378585*^9, 3.577961912965826*^9}}]
    : l2 |! o" s! I1 o" V5 F}, Open  ]],  d) P. ^# c# r  M" A( w
    ; n; x5 H3 `+ j0 P! p. X
    Cell[CellGroupData[{
    1 y5 Z. D+ O  F5 j" y4 U$ O4 g! `1 ]+ t4 d
    Cell[BoxData[
    6 x, g9 f3 ^/ R% z( d1 U4 ` RowBox[{3 f3 P$ V- t% v4 f
      RowBox[{"Ca", "[",
    ! P$ C6 k. p& Q" P" a   RowBox[{"[", "9", "]"}], "]"}], "=", "0"}]], "Input",/ t" R7 F9 Z, X; d
    CellChangeTimes->{{3.577916107859375*^9, 3.577916113453125*^9}, {
    ' ]- `) t9 U$ c. h2 v  3.577920324765625*^9, 3.577920332875*^9}, {3.5779205288125*^9, - h; R8 W6 c( d  N
      3.577920534375*^9}, {3.57792067859375*^9, 3.577920688875*^9}, {2 A5 ~: }6 `6 w$ Z) u: }4 X
      3.57792078446875*^9, 3.577920797171875*^9}, {3.57792091940625*^9, 7 \) f' L3 z0 p1 x6 R, e8 x
      3.577920923875*^9}, {3.577921154453125*^9, 3.577921160328125*^9}, {
    / v8 A3 }" [+ ]9 h  3.577921339734375*^9, 3.577921348109375*^9}, {3.577921432890625*^9, 2 Z/ b$ }6 i0 C# p: Z# i( h
      3.577921435703125*^9}}],  d: H* v* w/ Y1 \

    6 ~; {% U) k5 JCell[BoxData["0"], "Output",/ h8 Q# g: f4 R( }8 z$ s
    CellChangeTimes->{. E( |' l4 u3 r
      3.57791611621875*^9, {3.57792032565625*^9, 3.57792033440625*^9}, {
    ; ^+ x5 N" Z1 x, O# D   3.577920530328125*^9, 3.577920535140625*^9}, {3.577920676546875*^9, ; S- I: X/ V# E; Z6 h
       3.57792069140625*^9}, {3.577920785734375*^9, 3.577920798453125*^9}, {
    9 T% u& `" U1 K( E$ a   3.57792091690625*^9, 3.57792092634375*^9}, {3.57792115590625*^9, 6 X- s7 a9 @! J& v: t
       3.577921160984375*^9}, {3.577921341484375*^9, 3.577921348890625*^9}, {
    + Y* c4 d6 H4 P/ L( J) o   3.577921433703125*^9, 3.577921437140625*^9}, 3.577957114155156*^9,
    ; ^+ i: K5 |  v% n7 t1 A   3.5779572385809736`*^9, 3.577957346314761*^9, 3.5779573843164277`*^9, 5 ]; u, D) Q0 L1 j9 r4 f) d
       3.5779574262025003`*^9, 3.577957459134158*^9, 3.5779574929862175`*^9,
    4 c+ i4 A  Z8 I) I2 s, ]1 C7 Y   3.5779575497079163`*^9, 3.5779588425366087`*^9, 3.5779606144112983`*^9, {
    1 E7 A7 @0 w; ~& c) u3 f7 J   3.5779607339075065`*^9, 3.577960757759948*^9}, {3.5779608577717223`*^9, 7 I% E( J' j. Q8 a# y( w
       3.577960883308967*^9}, 3.577961466820648*^9, 3.577961619373314*^9, {  P# T% w" B6 H3 K/ [' K1 L
       3.5779616551441765`*^9, 3.577961682569024*^9}, 3.577961716046683*^9, 0 y+ D# L( A% b% V7 [) u
       3.5779617465759363`*^9, {3.577961834419689*^9, 3.5779618634045396`*^9}}]
    4 h- d: l: {4 s; `. D  A7 T}, Open  ]],
    . W* s* A) g7 d- y& V" F- ]' J' _8 X9 d7 W' w  G: P, a9 h% g* F' r* |4 ~) m# g
    Cell[CellGroupData[{
    , q9 |9 E2 q5 ~* D+ b) I/ P- V2 B! c/ W( c, @' }7 @8 c
    Cell[BoxData[
    * Q& v1 C9 \2 Y' I5 z; k RowBox[{"Delta1", "=", : L5 ~. Q# |" w. ^
      RowBox[{
    ' P: }9 ^' s5 n, W$ U: m0 D8 ^+ ]   SubsuperscriptBox["\[Integral]", 5 x7 l2 D0 p4 O
        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 3 X0 g4 J1 B; u4 a9 `  [
       RowBox[{- v& ~, ?: i, J
        SubsuperscriptBox["\[Integral]",
    / Y) }$ u" ], d0 J9 j2 D     RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 8 m7 L- ?5 C5 H( o& W& a
        RowBox[{
    : K$ ?2 y6 s3 k     SubsuperscriptBox["\[Integral]", 9 s* D3 {  m$ z5 s9 ]5 S. k
          RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    " w- {! z9 D' `) J4 m6 D     RowBox[{
    4 a- P) I% a3 G! z  n6 T      SubsuperscriptBox["\[Integral]",
    ! e" }4 d7 d0 N( T2 ~5 {2 c' _       RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], 6 ?; ^# \& y. d8 A. A
          RowBox[{/ z& b" U, H1 W, D7 L' i
           SubsuperscriptBox["\[Integral]",
    # B3 O. a6 K8 y& }        RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    6 w7 |6 R2 j& v$ z+ c. A7 O       RowBox[{
    9 Q2 ?" L8 K& @        SubsuperscriptBox["\[Integral]",
    . y$ ~$ w( T* T/ t* l% B         RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    + N% t4 X! u6 z2 F        RowBox[{
    6 [( B, P- n  B7 r6 r         SubsuperscriptBox["\[Integral]", & Q, E) Z0 `" u5 H
              RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    3 y  A# b& B, \. h9 P6 u         RowBox[{) K$ R0 M4 _% l* |2 T
              SubsuperscriptBox["\[Integral]",
    ' T; {. O, L+ Z3 a0 D) _           RowBox[{"-", "\[Infinity]"}], "\[Infinity]"],
    7 T. L  `& y1 p          RowBox[{
    ' t9 o8 v+ k% x& ^$ u# |           SubsuperscriptBox["\[Integral]", ' L( I2 |* `" [9 S: Z: r
                RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], : Q3 k6 T) |1 C" f3 R
               RowBox[{" D: U1 n) M3 ^! Q# @
                RowBox[{"Exp", "[", 7 f7 n9 b: `/ ]- \' Y0 v
                 RowBox[{5 l# {& H' D9 u* M5 F. J0 x
                  RowBox[{
    5 P2 }  Z3 {& b' Q) t2 @               RowBox[{"-", + n7 Z) {! b- S$ l8 P1 Y
                    RowBox[{& b# t6 _$ ~  B% {* D
                     RowBox[{"(", ) E, z. D0 T9 `1 v
                      RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ' K; S8 K, @2 t7 U( C4 z: Y& m! N                 RowBox[{"(", # i  a3 q% l: c8 ^$ k3 f  j
                      RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", ; H4 b3 Z$ X1 Y/ d' f+ Q
                  "Delta"}], "]"}], ' m  V! U- y4 u! @/ [1 }! o9 {
                RowBox[{"\[DifferentialD]", "x1"}],
    . m: x; \1 u  ], U            RowBox[{"\[DifferentialD]", "x2"}], 7 E0 T3 T/ y6 k9 B7 e
                RowBox[{"\[DifferentialD]", "x3"}], , H- t: |' `% v
                RowBox[{"\[DifferentialD]", "x4"}], * h, |7 W( L! T' {" L
                RowBox[{"\[DifferentialD]", "x5"}],
    * t+ R7 Z+ E- T            RowBox[{"\[DifferentialD]", "x6"}],
    ! s) }4 Z( k- ^% z, I! O            RowBox[{"\[DifferentialD]", "x7"}], 1 F, ~5 Y" Q- b+ O
                RowBox[{"\[DifferentialD]", "x8"}],
    3 x  r9 K/ H+ A: A( V0 Z            RowBox[{"\[DifferentialD]", "x9"}]}]}]}]}]}]}]}]}]}]}]}]], "Input",
    7 h/ k3 o4 _' Z9 j" n% k CellChangeTimes->{{3.5779153084375*^9, 3.57791531240625*^9}, {8 s$ C* T) @! p5 f* ?( X" N: M
       3.5779153614375*^9, 3.57791536246875*^9}, {3.57791678490625*^9,
    : [0 b" C9 z! x. `   3.5779168805625*^9}, 3.577917071640625*^9, 3.57791718425*^9, {% I* D2 `0 y2 o+ h& c! I
       3.57791733884375*^9, 3.57791734359375*^9}, {3.577917406875*^9,
    / w4 E' z5 U4 Q. |   3.577917409*^9}, {3.577917781921875*^9, 3.577917795890625*^9}, {3 T* X/ M. ]8 t4 m% I+ e
       3.57791886146875*^9, 3.57791887259375*^9}, {3.57791891146875*^9, - I0 s& P; m: {
       3.577918964453125*^9}}],' _7 j0 q4 S  @! a: j
    + d5 g. U' U( i; F- p0 i; v
    Cell[BoxData[
    / `# w8 @1 {, B1 |3 l4 W/ ` RowBox[{"97.40909103400237`", " ",
    / p' q4 O! o: l# w  r4 y& `; V  SuperscriptBox["Delta", "8"], " ",
      A7 k# g/ a  h+ B  M+ f1 V- H  T  RowBox[{"If", "[",
    0 H& I. o  p  ]/ [7 e; h  _8 K6 g   RowBox[{. O8 T0 w9 v: ]" D" V. R; x
        RowBox[{
    / G! |9 `9 Y) V: I     RowBox[{"Re", "[",
    6 n3 ~$ Y. H0 t: z9 H      SuperscriptBox["Delta", "2"], "]"}], ">", "0"}], ",", ) {$ K1 p9 T1 u* {% a# ?# G
        FractionBox[
    2 t4 |- P4 i: i9 U8 P     RowBox[{"1.7724538509055159`", " ",
    ; _' x' Y0 |9 [0 `5 v      SuperscriptBox["\[ExponentialE]", 5 J, u. \' U: X! @% ~. N* F
           FractionBox["1.1102230246251565`*^-16", ; S- B( P6 n1 l3 S# r- g* E. k# `
            SuperscriptBox["Delta", "2"]]]}], . D. L5 D- K% i6 H; _  t
         SqrtBox[
    4 l) w0 H6 |9 o! ~      FractionBox["1",
    ! i' L0 W+ |& Z% y6 `9 q/ L6 U& i, @       SuperscriptBox["Delta", "2"]]]], ",", ! ^* D/ t. `/ w# i
        RowBox[{"Integrate", "[", & k6 w4 I; l1 d  t- U  t# Z
         RowBox[{
    5 C$ k7 E. u+ O# K* O      SuperscriptBox["\[ExponentialE]", $ m& @- f" c  I* T8 F
           FractionBox[
    ) R; A/ r$ r$ K7 C6 @$ F4 \% }+ ^        RowBox[{"1.1102230246251565`*^-16", "-", $ w4 ?4 L4 h/ k( `! y: F
             RowBox[{"1.`", " ", 4 @) z4 ~6 {  \9 Q( A/ P( {
              SuperscriptBox["x9", "2"]}]}],
    - q/ |# |$ @* c. \        SuperscriptBox["Delta", "2"]]], ",", 7 {% ?% F! I" d  y9 o8 |7 @; Q
          RowBox[{"{", , x# X' K3 l3 c! |, i) B2 I
           RowBox[{"x9", ",", # w, i6 k' k. O$ x8 {' u
            RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",",
    $ }: Q6 P- q* I$ J8 q      RowBox[{"Assumptions", "\[Rule]", $ [" a0 O6 y( }4 E9 H
           RowBox[{
    ) T$ G+ J, V0 p        RowBox[{"Re", "[",
    ! |2 e' z* z2 R% u9 n* a         SuperscriptBox["Delta", "2"], "]"}], "\[LessEqual]", "0"}]}]}],
    0 J  y. X. F  V6 k+ V* e. Z8 B! K& m     "]"}]}], "]"}]}]], "Output",
    ) r2 S0 k" ?% ~6 s, r7 \) Y, A CellChangeTimes->{3.577915314703125*^9, 3.57791536890625*^9, $ ?* s. N$ W4 |9 n6 T
      3.57791688871875*^9, 3.5779170798125*^9, 3.57791719340625*^9, / b4 s  \0 H9 t) t: i& }
      3.5779173640625*^9, 3.5779174255*^9, 3.57791786128125*^9,
    - v/ Y( n7 @3 `4 W% y  3.577918058328125*^9, 3.577918134703125*^9, 3.577919019796875*^9,
    3 i# S( ]( ?2 T& i# h6 w) q3 o  3.577920388796875*^9, 3.5779205859375*^9, 3.577920727078125*^9,   i3 S! F5 s# d1 H
      3.57792083884375*^9, 3.577920979015625*^9, 3.5779212189375*^9,
    ) {5 U! L% R2 k  3.57792139025*^9, 3.577921489421875*^9, 3.5779606695417943`*^9}]1 E+ t5 I& s- }% n5 Y, U
    }, Open  ]],
    " Q% `( y$ P) G: R) v% v) \8 Q( G4 l8 w4 V# E2 g  i
    Cell[CellGroupData[{
    3 |8 y+ b- l) M+ i. [4 e) {" k. g, U5 x  [$ e$ ^( `
    Cell[BoxData[
    0 e' ~9 w5 Y- p8 t" ?- P; j RowBox[{"Delta1", "=",
    ) V6 N  Y6 k& [7 o1 b  StyleBox[; r/ o6 t  Z" [+ Z# W/ u, \
       RowBox[{"97.40909103400237`", " ",
    ( k. \# P* {! V9 S* s: G    SuperscriptBox["Delta", "8"], "  ",
    1 {& F4 F- k9 X- y- F5 g    FractionBox[
    0 J; d4 d* K, u! r( n3 y- |     RowBox[{"1.7724538509055159`", " ", ; A/ ]0 t- J* l- d/ H
          SuperscriptBox["\[ExponentialE]",
    " O" ^3 _! D" T3 I8 R) h       FractionBox["1.1102230246251565`*^-16", , c- L/ I  ]7 t; l3 ~
            SuperscriptBox["Delta", "2"]]]}], * t8 V9 Y/ u2 P: t8 W( f
         SqrtBox[7 V6 b8 F) S) P
          FractionBox["1", 6 I& f" A, Z! u2 o+ e( [9 m" M
           SuperscriptBox["Delta", "2"]]]]}],! s: M0 m* z) X- Z
       FontWeight->"Plain"]}]], "Input",
    3 D* q  }8 Q- x$ m5 k" F CellChangeTimes->{{3.577919054890625*^9, 3.577919076328125*^9}, {
    ! i8 J. @1 G* i; H   3.577920422671875*^9, 3.57792044959375*^9}, {3.577920594890625*^9, 4 A* f# e0 ]5 ^  J2 J
       3.5779205978125*^9}, {3.5779207405*^9, 3.57792074359375*^9}, {
    . F# X2 R2 z9 B6 W$ |   3.577920846078125*^9, 3.57792084959375*^9}, 3.577921100453125*^9, ) F' Y* }! s- g* k* Y1 {4 g
       3.577921302609375*^9, {3.577921396640625*^9, 3.57792140075*^9}, - A2 z% e$ W4 I4 U0 H1 [$ r" ^. [
       3.577921500234375*^9, {3.5779606881994267`*^9, 3.5779606915378323`*^9}}],
    / r2 c5 Y* I, R9 t* P
    ! y! j( Q$ _! B, X, @. ]% W3 iCell[BoxData[/ {1 M- o( r% M: [
    FractionBox[- [1 X& |6 p0 h9 K( L
      RowBox[{"172.65311851642346`", " ", * W) v# L- b6 }; m. @; o* B2 n
       SuperscriptBox["Delta", "8"], " ", ( o+ l- }6 H% u& V7 e2 q9 c: y
       SuperscriptBox["\[ExponentialE]", $ K2 N/ c  d" s
        FractionBox["1.1102230246251565`*^-16",
    5 U' `4 n. d" |5 L! ?9 k0 a+ X     SuperscriptBox["Delta", "2"]]]}], ) Y' T. ?, w/ `5 Y
      SqrtBox[
    ! M. a7 m% `# B+ S   FractionBox["1", - {# n6 ^3 |" S  W, y
        SuperscriptBox["Delta", "2"]]]]], "Output",- w5 X0 I( U. r# o
    CellChangeTimes->{9 h2 A4 I  k! T0 F+ @. Q- r% H9 H$ t* K
      3.577957275022637*^9, 3.57795735116637*^9, 3.577957388263234*^9,
    ; {: }& j4 h7 f: S- ~( T, N   3.577957429759307*^9, 3.5779574644225674`*^9, {3.577957495341821*^9, * c0 M# V) Z/ h0 e# x! a" R* H0 i8 ]
       3.577957524966273*^9}, 3.577957555479926*^9, 3.5779606933318357`*^9, 5 x4 D" _; u: p2 z
       3.578012166234375*^9}]
    ; s# L! h3 I' Y3 a}, Open  ]],
    . t8 O3 D! C. U
    ) p- h9 j6 K4 ~9 ICell[CellGroupData[{# O, d3 k: n4 _# D

    ) A' {9 Y. V+ O+ c$ R0 B1 rCell[BoxData[/ e0 n" r( `  _3 c" M2 h
    RowBox[{"DeltaX", "=", / E6 P2 C- O  e% O
      RowBox[{"FindRoot", "[",
    $ G$ T$ e. m, d! P2 I5 I9 T0 w, a2 Z7 j: P   RowBox[{
    & C6 q8 l% n8 q# H" u8 B% c    RowBox[{"Delta1", "\[Equal]", "1"}], ",",
    ; ^" D+ o, `9 H1 K: w" P    RowBox[{"{", 2 c; \5 O! ^* u8 p; @) h
         RowBox[{"Delta", ",", "0.1"}], "}"}]}], "]"}]}]], "Input",
    8 |' R8 ]8 `. L4 g+ p CellChangeTimes->{{3.577917987171875*^9, 3.577918019109375*^9}, {; F& n$ U5 l4 K3 I, P7 x/ B
       3.57791809359375*^9, 3.57791809525*^9}, {3.577918142421875*^9, 0 p& H2 V) s# y% e
       3.57791816790625*^9}, 3.57791913871875*^9, {3.577919206734375*^9,   \$ Q) I; G/ P* U; S. A+ O
       3.57791921584375*^9}}],$ J' M4 x* h  l- l  ]3 {. T
    ( g; ~$ E5 o! q/ Y$ p, e, N% \
    Cell[BoxData[
    * h$ o" Z% g( ]( Y, n: v( ` RowBox[{"{",
    . F' u4 K# f. W* Q, l  RowBox[{"Delta", "\[Rule]", "0.5641895835477563`"}], "}"}]], "Output",
    4 Y. u3 a: ], c) |1 R- L- E CellChangeTimes->{( [+ K- }# M- T
      3.577918020859375*^9, {3.577918138328125*^9, 3.5779181693125*^9}, - k3 D- f2 ?/ N2 ~6 F4 K. |
       3.57791914315625*^9, 3.5779192174375*^9, 3.577920459234375*^9,
    4 n/ A8 D! H  l0 m3 G   3.577920625578125*^9, 3.577920748296875*^9, 3.577920852515625*^9, 7 Z) I! w4 m, v4 d
       3.577921108140625*^9, 3.577921305546875*^9, 3.577921403703125*^9,
    8 |- t+ t; z. u6 F! U, T   3.577921503515625*^9, {3.5779572551794024`*^9, 3.57795727691024*^9}, {
    ! d$ t1 i4 L. K* d6 O6 S* M* _   3.5779573234295216`*^9, 3.577957352414372*^9}, 3.577957389792037*^9, * |2 r. p7 y! D  m
       3.5779574309761086`*^9, 3.5779574661853704`*^9, {3.577957497042224*^9,
    9 U$ [- @) M/ z5 b& X' u   3.5779575262922754`*^9}, 3.577957557071129*^9, 3.577958853019827*^9, ; [  [/ |- S& A: X) l/ x
       3.57796070150625*^9, 3.578012167703125*^9}]
    5 n; ^) k, e# [0 E' z}, Open  ]],6 h  `( H, l7 q, e) `; R
    # K+ f3 H7 F6 v1 M, y+ w
    Cell[BoxData["\:805a\:7c7b\:4e2d\:5fc3C1\:5230C21\:3001\:9ad8\:65af\:6838\+ t! j; }8 r; p' K- x$ Y' d; {" _
    \:51fd\:6570u1\:5230u21\:5982\:4e0b\:ff1a"], "Input",
    $ U2 Y: C, D& L  x CellChangeTimes->{{3.57792124640625*^9, 3.577921284203125*^9}, {. v& N( s9 ^0 T; E2 k0 K5 b1 G3 A
      3.577960705312657*^9, 3.577960707621461*^9}}],
    # v7 H. n& n- \0 V& l$ ?2 W/ Y6 x% Q& q  ?3 T) [
    Cell[CellGroupData[{
    , E; t  C( Y$ |$ Z  w( u! Z- J$ U& L/ B- C% b
    Cell[BoxData[/ V! D& ]6 Z" Y2 O/ ~: A2 `- W
    RowBox[{"C1", "=", "Ca"}]], "Input",
    - ?+ K6 v2 i1 u$ | CellChangeTimes->{{3.577920010125*^9, 3.5779200415*^9}}],
    9 l% {- j2 ^! h) f% R+ l
    1 ^7 j( k  r( j( `3 V7 I* j1 oCell[BoxData[2 C  i. v6 Q4 l. A9 Y
    RowBox[{"{", % T% {* u$ a" P% _' f
      RowBox[{8 }9 z9 w- j; ^
      "0.304348`", ",", "0.552818`", ",", "0.33037`", ",", "0.025823`", ",",
    . o4 _  B8 R, @  ]2 ~" d   "0.538462`", ",", "0.752072`", ",", "0.408943`", ",", "0.504532`", ",", 1 N2 l; D* D7 m$ T4 i
       "0.`"}], "}"}]], "Output",
    / m  V, {+ P4 x5 f) }& [4 E CellChangeTimes->{3.5779200429375*^9, 3.577957279796245*^9, 4 v; o+ L9 a8 r
      3.577960710273465*^9, 3.5780121855*^9}]7 ^/ h0 V5 n' o
    }, Open  ]],
    * Q* U) `& S) O( o: r/ `9 x# u* p6 e: E* W* N
    Cell[CellGroupData[{
    - ~5 n. O; F, v; u  W) p7 R  K) u
    # A& A: V7 Z3 G+ @7 ]8 H: B- l$ KCell[BoxData[/ V5 ]6 f8 l7 _2 F
    RowBox[{"u1", "=",
    8 @( V$ P4 G" p% h- L* X  RowBox[{, h* \1 ~% F% I/ t: \) }2 K+ ]
       RowBox[{"Exp", "[",
      `" K! g' J0 O    RowBox[{- `6 T& o0 t0 x4 X3 X8 V
         RowBox[{/ c0 U3 P% Z: p+ ]- z& B# m+ L
          RowBox[{"-", , [0 N0 A4 {) e
           RowBox[{& |+ W5 I3 V; p% \
            RowBox[{"(", 1 @6 [4 K+ u+ D2 d5 v
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ( V: l5 L" R" H& x1 o
            RowBox[{"(",
    & v3 O" z& m! Y5 n( ]3 l7 Y         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],& E$ a+ Y- W6 J
         "]"}], "/.", "DeltaX"}]}]], "Input",
    7 v- H/ ?6 l+ \: [$ g CellChangeTimes->{{3.577915830328125*^9, 3.57791584871875*^9}, {: i& |& x. `$ j) F% b
       3.57791608375*^9, 3.57791613809375*^9}, 3.577917047203125*^9, {: F/ |3 L1 l+ Y# c( W
       3.577919193484375*^9, 3.5779192326875*^9}}],
    ( v  v' t# L4 a2 B: W6 }, i+ R+ m' m( q/ [5 ]
    Cell[BoxData[# A" u8 E2 b% c( K
    SuperscriptBox["\[ExponentialE]",
    * G+ e# V) N7 c- E  b. b( v; k  RowBox[{"3.141592653589793`", " ",
    & `. `% ?5 F/ I8 a8 C- Q3 R   RowBox[{"(",
    % L! z% s' d4 c    RowBox[{
    5 K2 x" U+ h# z$ A4 q     RowBox[{"-", # {+ j# a# A6 x" S" U" w3 s, c
          SuperscriptBox[
    1 z6 v9 c5 \  ]2 q       RowBox[{"(",
    1 @0 ~! V- p! l. y) V9 s- i; H: Q        RowBox[{
      q5 l6 O- c+ P4 {# q         RowBox[{"-", "0.304348`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ' \! [. s* O0 O6 d: g* I& X) J     SuperscriptBox[
    ) g! Y0 s3 s/ T! ^2 x* k$ D6 s      RowBox[{"(", , Y9 a/ o4 V4 d. R3 i. p
           RowBox[{
    ' h- Y; ~6 e/ G( y# R/ ~8 s/ \) K        RowBox[{"-", "0.552818`"}], "+", "x2"}], ")"}], "2"], "-", 6 U+ E) j: [/ |5 w5 p' n6 b
         SuperscriptBox[
    2 f0 w* |4 P% n) ]2 P      RowBox[{"(", 6 E8 S9 F  c- T9 u* @
           RowBox[{
    3 _( ~5 J: Q5 o        RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-", # U, J* I2 _& U$ X3 s2 m$ Q
         SuperscriptBox[
    7 g2 d& ~  }2 X( t3 c      RowBox[{"(", ' y7 I, G: M3 l7 k5 e, k- i4 Q
           RowBox[{  k0 ~8 j! K, r1 ~
            RowBox[{"-", "0.025823`"}], "+", "x4"}], ")"}], "2"], "-",
    % r9 e1 L+ q, @8 U( ]+ ^     SuperscriptBox[9 d. O& u, r$ [# G2 r: d
          RowBox[{"(",
    2 g+ u2 S1 ]2 O) O) y( Q3 m; ^       RowBox[{
    0 V+ P/ g& \2 f8 m        RowBox[{"-", "0.538462`"}], "+", "x5"}], ")"}], "2"], "-",
    0 J# i0 u7 G+ K! H0 q* u     SuperscriptBox[6 m; Z# P& H0 h3 d( S
          RowBox[{"(", " z! ]/ r" U& o+ q: [( f& N+ C6 e8 v/ d
           RowBox[{
    # v  v# z  f& h" b        RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-", , @, u6 w" g# C5 V3 S: j
         SuperscriptBox[
    / ?& z8 F0 X1 r2 ~! m% a5 j      RowBox[{"(",
      u7 O& S6 y6 X, h' q0 H  v       RowBox[{1 l/ h, F. H8 e% e
            RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-",
    2 g, Z+ z) x: `# W& ~6 C* M     SuperscriptBox[1 m2 `! E7 X; `! d8 o! b2 X1 J
          RowBox[{"(", 7 i* |! G. E# |5 I( Q- w$ G, j/ y
           RowBox[{
    # W; V% c, |: _4 _: W$ d- [        RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    7 h+ r# J9 U' p& U7 Z     SuperscriptBox[
    / |& O% {8 e$ Z  a0 ^+ n      RowBox[{"(", " w$ J3 Z7 n) o5 i$ ^6 Q; c/ B5 R
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],   i9 T. y+ d9 ]
        ")"}]}]]], "Output",
    " x5 J/ ?. H" [ CellChangeTimes->{3.57791618121875*^9, 3.577917049421875*^9, , ?; d0 p& @% |* n( d' A7 p8 u
      3.577919237265625*^9, 3.577957283197051*^9, 3.577960712457469*^9, ' m0 i1 q6 q: d7 k$ d9 ^/ ]
      3.578012187078125*^9}]
    ; e1 K& V* T( S}, Open  ]],. ?3 l3 v* I' k$ t
    , K8 Y! R- V. H) r# I+ R% M
    Cell[CellGroupData[{
    0 \( a2 J8 J8 l$ _1 c! r: w- G5 ^5 u( v3 t, C
    Cell[BoxData[& e. j6 Z" M( b3 B8 w
    RowBox[{"C2", "=", "Ca"}]], "Input",
    0 T! n. \6 [8 f5 {! T) v CellChangeTimes->{3.57792047321875*^9}],
    " @- t6 D5 t, D* k3 Q4 h0 D. v) T2 {. ~4 c
    Cell[BoxData[) Z+ |+ h" m1 P8 L
    RowBox[{"{", 0 o" w: X) _! E1 u
      RowBox[{+ Q+ R' z5 e9 R' V+ ]- |" f
      "0.608696`", ",", "0.339186`", ",", "0.4943`", ",", "0.099338`", ",",
    3 w+ B8 l+ K/ h$ g: V3 I4 C& c   "0.321678`", ",", "0.375283`", ",", "0.`", ",", "0.505539`", ",", "0.`"}], 0 l+ Z/ U: ~8 E9 X$ P% \. \. \
      "}"}]], "Output",9 d; q7 V6 G* q; w5 {1 R' w
    CellChangeTimes->{3.577920475421875*^9, 3.5779573274855285`*^9, , c/ U' [( J( p
      3.5779607401163173`*^9, 3.578012204671875*^9}]/ L. E' G6 e; X5 b* B5 c
    }, Open  ]],
    * T# B) E% W1 l  ~" I' {4 t* C# B2 X8 a9 A3 D: \
    Cell[CellGroupData[{5 @7 K: j9 G; r

    # I0 S9 A* l. c% eCell[BoxData[# t7 ]7 q, ~5 g/ N4 i# O/ P3 b; R; m
    RowBox[{"u2", "=",
    + j# }* P  q# }0 o  RowBox[{
    * R4 A: e5 E: _, v3 ?% C* W$ p" [; I# p   RowBox[{"Exp", "[", & Q: w1 r! T$ s5 e) _
        RowBox[{
    # j2 G; h4 `1 L  S2 i     RowBox[{9 H3 K7 S# ^# Q5 W) j, F6 J9 v
          RowBox[{"-",
    ' v2 f  F/ a. S1 f: K! K       RowBox[{( C" j2 G) d. O" z; x
            RowBox[{"(",
    3 [" C# ]- B+ C6 y  ?2 y         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    / b# Z3 `- s9 q& v$ @; |  _' |        RowBox[{"(",
    / V! f  F3 L# o         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],; F! ?* j. A6 O. r4 u
         "]"}], "/.", "DeltaX"}]}]], "Input",
    5 i/ ]2 v" C( M" }  w CellChangeTimes->{3.577920484109375*^9}],) c* B: [  x0 {0 `6 I5 K% D9 U
    / \7 n' [2 U( D% D4 t
    Cell[BoxData[
    4 d) G1 X, y/ S- }3 ]3 _ SuperscriptBox["\[ExponentialE]", # O! Z! k' ?/ H; j/ ^7 v
      RowBox[{"3.141592653589793`", " ",
    - `! [# J& V9 p7 s! J0 T8 c   RowBox[{"(", - z  {% T% r4 J1 I
        RowBox[{
    ! X, D8 S( Y6 v2 ~& B( d8 O     RowBox[{"-",
    , A$ w, w7 X' S- W" i8 P      SuperscriptBox[
    % u4 w+ z1 C; K9 N       RowBox[{"(", % i. m" @2 F7 P9 ~0 b% x
            RowBox[{3 d# o& y/ d( ~, Q
             RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    7 c! z5 F4 Y7 }+ U- x( l     SuperscriptBox[  m6 S- y$ c3 n5 ?: ?  e5 O* @
          RowBox[{"(",
    . }# X* W, G6 |: T       RowBox[{
    # Q9 a6 j! d% x, ]        RowBox[{"-", "0.339186`"}], "+", "x2"}], ")"}], "2"], "-", 3 N; u  @8 r2 o) H# Z+ q5 d5 J4 E. k5 {
         SuperscriptBox[2 y8 u6 W% Y: u" p
          RowBox[{"(",
    6 p( T0 Y: r/ ]) x, q1 C4 s       RowBox[{! ~9 ], e! U$ \7 c- X7 u5 u+ s
            RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-",
    8 d# i  e$ X. l& ~  U9 w5 k$ h4 T     SuperscriptBox[- C& Q* I& V( ?; o
          RowBox[{"(",
    0 e, t' g3 a" B6 T1 ]9 n5 V       RowBox[{8 Q3 k1 r9 f. |% Q1 A+ ?
            RowBox[{"-", "0.099338`"}], "+", "x4"}], ")"}], "2"], "-",
    5 C$ k4 l8 d0 x6 }5 H2 [/ ?1 q     SuperscriptBox[0 g8 q+ ?: t, C1 z+ _7 b; T6 \
          RowBox[{"(", ) E9 ?: J: M( X0 F  D) ^! n, l3 a
           RowBox[{- K  E2 z8 s# H8 L$ C7 t; k3 [$ |
            RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
      T* w' K/ m7 N# ~: @+ O/ z  d     SuperscriptBox[
    . l1 V: r  o* s* s. z; E      RowBox[{"(",
    . H$ N( n, u! W- E       RowBox[{
    3 q* I! C8 b1 C& U& |8 V! Y6 P        RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",   L8 e/ m) Y1 I+ S+ P
         SuperscriptBox[
    ) @6 z4 [1 O4 r      RowBox[{"(",
    ; d6 Q" P1 Y  u5 W. w- _/ `       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", # t7 j; k1 a1 r5 e
         SuperscriptBox[
    : F8 s3 L2 f5 F( ]- K: H      RowBox[{"(", / _1 E6 g, B$ K6 s% n, q
           RowBox[{9 |1 O; o5 T6 Y& l: Y5 b1 d
            RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    6 `$ B$ c1 C5 |! j7 f     SuperscriptBox[% [; R% A: x) ~; g
          RowBox[{"(", % ]/ |6 c1 r  W
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    " c$ i4 l3 [7 F3 r$ t    ")"}]}]]], "Output",
    9 d8 O) x. S" }, h CellChangeTimes->{3.57792048809375*^9, 3.577957329482332*^9, 3 D6 N; u2 g( _
      3.5779607413955193`*^9, 3.578012205484375*^9}]
    % m, W# o; ]7 `$ W) _}, Open  ]],
    8 w& D! p# P: F  F" V9 l* s* D# F/ E) f" ]6 c; T3 {4 n, F9 V
    Cell[CellGroupData[{+ v0 C' g! D3 _# ?6 }
    1 ?$ K  j: C! y! S, L' |2 g6 w/ K
    Cell[BoxData[4 e( p; s6 D0 v4 z
    RowBox[{"C3", "=", "Ca"}]], "Input",
    ; G: q; p: `9 @" g* F2 ` CellChangeTimes->{3.57792064125*^9}],1 {; `$ L: v/ @$ @6 ^1 h7 B: g
    % o( N# c3 C0 C: w
    Cell[BoxData[
    $ f+ _6 V3 ?- X- a. c+ n RowBox[{"{", : D3 |1 n; S+ F2 L3 w1 M7 b$ _0 L9 m
      RowBox[{+ M! b3 {6 x5 T! [9 k
      "0.521739`", ",", "0.334022`", ",", "0.3555`", ",", "0.025156`", ",", 6 u& a9 J, {4 g5 n
       "0.48951`", ",", "0.37679`", ",", "0.411382`", ",", "0.`", ",", "0.`"}],
    ! l5 n8 q# L* n  "}"}]], "Output",
    & h9 b- ]7 I5 M! f7 p CellChangeTimes->{3.5779206423125*^9, 3.5779573552067766`*^9,
      S# z/ {8 M) j/ i8 l4 y  3.5779607642027593`*^9, 3.5780122103125*^9}]
    1 z6 l) a2 [' D. e: O0 T- V# t}, Open  ]],) _' ^* s, }- v* d5 n

    8 B3 B1 j2 X0 w8 [0 b! h: X5 ^! rCell[CellGroupData[{
    4 B# A- P1 F- {8 \& I6 M, g. M5 ]7 T8 h" J
    Cell[BoxData[
    1 ^# f% ?1 n. ~7 B RowBox[{"u3", "=", 3 q8 b9 a$ T% J1 z5 B
      RowBox[{8 I5 f0 f0 v/ l$ E
       RowBox[{"Exp", "[", 9 F5 W% H; |1 j8 m! k5 ?% W
        RowBox[{, p5 Z, x1 @. x- ?
         RowBox[{
    * J$ F" d% u4 m8 f6 Q2 S9 Y# S      RowBox[{"-",
    ( R( W- L9 u5 r) f6 u' N6 J9 w% Z       RowBox[{( L: h9 O7 o6 I- @& ?8 h
            RowBox[{"(", ( }/ C! w$ @$ ^" e
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ! ^  I- C- o# p6 t
            RowBox[{"(",
    4 R8 ?; w( b2 R         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    + j7 Q9 {$ S6 C5 h5 u! ?     "]"}], "/.", "DeltaX"}]}]], "Input",
    2 [& I% G# |8 @- C5 l* I' f  Z3 f CellChangeTimes->{3.57792064921875*^9}],
    . r; x4 M* S, _9 h: A/ u3 k: a6 B  A1 P. H
    Cell[BoxData[
    ; F+ q2 W; o, r5 @" V SuperscriptBox["\[ExponentialE]",
    9 s6 E& {2 D7 K& M2 q  RowBox[{"3.141592653589793`", " ",   G( ?. m& p# \; `0 s! R) v
       RowBox[{"(",
    * L5 W) h8 w* H2 ~: P    RowBox[{
    4 v/ b7 J! c0 L# C" t7 s9 |     RowBox[{"-", % |# L( B0 R" D$ p' R
          SuperscriptBox[- L" E% ^; y! v5 @( |- J
           RowBox[{"(", 0 x7 ?1 f. t. ]6 d
            RowBox[{
    - v' o1 l) z+ ]! n! X/ o         RowBox[{"-", "0.521739`"}], "+", "x1"}], ")"}], "2"]}], "-", . d7 Y8 c) X0 e; k$ L
         SuperscriptBox[# R: L2 v0 [+ E. e
          RowBox[{"(",
    + R7 J% |# Y. P* o" V       RowBox[{
    - ?& A8 H1 H! j( B; p6 a: N        RowBox[{"-", "0.334022`"}], "+", "x2"}], ")"}], "2"], "-",
    * _" \+ f7 M: ?* E* f     SuperscriptBox[  E5 E, _+ w( W- q2 r
          RowBox[{"(",
    % p* m+ c" R! J7 I       RowBox[{
    / y2 ]" f2 q# ]% Z7 N, s) {7 n        RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", 1 M9 a6 a$ p7 r% p- H( |1 B
         SuperscriptBox[, b; |" f- \0 q: p9 V
          RowBox[{"(",
    5 s6 z+ H) Q  x9 M       RowBox[{
    2 x% o" @  A5 [  w3 I        RowBox[{"-", "0.025156`"}], "+", "x4"}], ")"}], "2"], "-", + P5 q3 b' m; t
         SuperscriptBox[* q5 ]9 {; ^0 d0 n& L' z$ Q9 [
          RowBox[{"(",
    : i' m3 A5 m6 u6 j. t       RowBox[{
    / D! J+ s9 ~3 l, k1 _        RowBox[{"-", "0.48951`"}], "+", "x5"}], ")"}], "2"], "-",
    1 z# b4 d7 s  _& q1 w' t5 |     SuperscriptBox[. X* r% M: j5 R6 P3 h
          RowBox[{"(", # J0 b5 E3 U* b: j( l+ J
           RowBox[{5 i" F/ p& H! t$ |$ S2 \9 S7 x" M" b+ q
            RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-", " F) `+ |: s4 ?% ?% x2 E$ g3 c
         SuperscriptBox[9 s/ x" f* @% L$ ]% T3 p+ O
          RowBox[{"(",   l7 @6 s- L- f# ^" g
           RowBox[{9 e: E6 p. C& y% }3 T
            RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    5 I. M$ t1 Z+ }! b& [# {& f4 }     SuperscriptBox[
    + h5 [4 V+ c, r+ W0 j  z3 X5 _      RowBox[{"(", 1 u, Z1 r; D' Y) t6 G; W2 l# W
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    8 p1 Y# C6 ^7 c     SuperscriptBox[
    . e! p, n2 V% ^6 V      RowBox[{"(",
    - Q) k% O" M( \$ K. s/ ~       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    * @0 Q8 h# t, ?1 N. Q1 `4 U( w    ")"}]}]]], "Output",2 Y6 c. O8 F( U6 p' H
    CellChangeTimes->{3.57792065059375*^9, 3.5779573573283806`*^9,
    9 _& ~! w& Z1 u+ F' V  3.5779607654819613`*^9, 3.578012211515625*^9}]1 ~$ W1 ~$ e2 |& e  ~# v/ B  h6 v
    }, Open  ]],& z3 p: z$ @# J0 [- Y9 f

    6 [1 A( Q- e" s5 t6 N0 J5 |7 g6 nCell[CellGroupData[{
    / R! |, A3 [* D
    0 l- r! E* y, E9 ACell[BoxData[
    7 g9 ]# U1 U" w RowBox[{"C4", "=", "Ca"}]], "Input",
    % {5 v& D0 ^8 r+ U8 h- i% p: D! F CellChangeTimes->{3.5779207559375*^9}],. ~; e, j/ H& A$ Q/ J% n

    3 C. n2 @- {+ c8 L- v& p& y+ _: E1 iCell[BoxData[
    # Q( \$ S; a* b RowBox[{"{", # x6 L7 Z8 B! E7 o# {
      RowBox[{
    / ^0 a' j3 E3 S* j& L6 l  "0.565217`", ",", "0.705518`", ",", "0.510223`", ",", "0.066892`", ",",
    5 w9 l* c) G8 _   "0.244755`", ",", "0.748304`", ",", "0.`", ",", "0.`", ",", "0.243032`"}],
    % o2 w# Z% H" |6 T5 D. E6 v6 [9 C; J  "}"}]], "Output",$ y/ T6 `9 k9 C/ d7 W
    CellChangeTimes->{3.577920757265625*^9, 3.5779573926780424`*^9, ( y+ v, E/ e( o  e9 b
      3.5779607861363974`*^9, 3.578012216171875*^9}]& ~/ Z) [2 C4 T4 E5 b" o
    }, Open  ]],$ d+ \2 C2 c& D" l1 D

    8 h5 d7 J! c" u8 K( p: R4 w: P% nCell[CellGroupData[{
    9 E% E5 M2 e0 f- u0 x: ~. B/ H8 w- L. A; X: F# R7 ~
    Cell[BoxData[; V" k3 O+ o# ^' Q) r5 s8 c
    RowBox[{"u4", "=", ; C* p1 ]* w' P8 f/ i) F1 H
      RowBox[{
    3 u7 @# R( A1 W- E1 O3 b6 o   RowBox[{"Exp", "[",
    + ?) P4 N; L9 T- i  t7 T7 R3 K2 w) H    RowBox[{/ R9 @7 O3 ]1 n2 R# S8 _
         RowBox[{
    7 Z9 Z0 q; ~4 x9 n- D$ L      RowBox[{"-", ' W  z; [+ k8 S
           RowBox[{: E% Q# v+ X( t3 K, s3 H4 J
            RowBox[{"(",
    9 R) j( s2 e, L" q1 w! i4 H- n         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    % @3 A! X9 N' J5 ]! |% ^1 G3 t        RowBox[{"(",
    ! }) a  ~( B. S( [# h         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
      y# ]$ b; |# ^% y  v     "]"}], "/.", "DeltaX"}]}]], "Input",
    3 k, |4 K; p! c  P' H: ? CellChangeTimes->{3.57792076325*^9}],
    % w- u6 i2 w3 t+ E" P8 B% G' Y8 o
    2 [8 P* Z& w- P6 P+ \  wCell[BoxData[) N# J8 e5 R/ [7 a- A' L" u
    SuperscriptBox["\[ExponentialE]", 7 T' ?* Q2 o8 C7 U
      RowBox[{"3.141592653589793`", " ", $ a( L$ g" e% f9 ]
       RowBox[{"(", 4 h9 }' t$ [2 @
        RowBox[{0 T: I/ i+ j. ]; ?
         RowBox[{"-",
    ' I; N' y: e+ L* c8 V      SuperscriptBox[
    ' E( @8 m7 x; ~: ]. h       RowBox[{"(", + z0 X7 V5 O4 U
            RowBox[{
    ) d  N3 C- ]1 G) j( |( \) s3 R/ B         RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    & ?) ]4 E* w1 O, j. R1 ~# [     SuperscriptBox[
    6 U' m- a/ M7 F" d) d      RowBox[{"(",
    + k, T) D1 _, r. z+ o       RowBox[{
    0 m: c' x1 j  Z; K  {# j( u3 G9 w        RowBox[{"-", "0.705518`"}], "+", "x2"}], ")"}], "2"], "-",
    ! Z6 |) t/ W* S# ~+ ]     SuperscriptBox[3 l; O0 ~8 \. D& y* q0 S( ?
          RowBox[{"(", 8 f; Y& O2 z* _8 V! G$ n1 i8 d  F# `
           RowBox[{/ I& `7 F* Z( Z- g- L
            RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-",
    & x$ N' d1 B9 g; V% u& N     SuperscriptBox[
    . [6 k, ?3 L. i2 L% Q9 @      RowBox[{"(",
    - J2 P' d: s! G4 N! X- `       RowBox[{2 k  W( p" ^% E' H0 i" E
            RowBox[{"-", "0.066892`"}], "+", "x4"}], ")"}], "2"], "-", % J" e$ u- A- X0 @
         SuperscriptBox[
    7 B9 S6 ]6 p2 s4 f      RowBox[{"(", 0 I* X& j( n0 W* N7 p! ^: G
           RowBox[{
    $ N$ b7 Y& T# j3 }3 g, T4 ~2 o        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-", % G) k" z1 k# w8 K8 _+ _& P2 I
         SuperscriptBox[" E. Y$ E) y, |& i
          RowBox[{"(",
    , T5 R4 d4 i  ]. m5 \       RowBox[{  @6 m5 S6 j6 d) O5 ]0 q: S
            RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    7 c) B$ t( ~) v8 e% X+ g, i) |/ m     SuperscriptBox[+ r  F1 k% v, K
          RowBox[{"(",
    ' A0 ~0 k8 Q8 x+ M) ?0 W. q/ y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", , g! x9 O% a) G( @4 ?2 [
         SuperscriptBox[. A( x) g* J5 t, A# ^$ G
          RowBox[{"(",
    8 ~1 l& Y7 n7 J" C       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", , f5 n5 ~/ H- p) C, j
         SuperscriptBox[
    : v6 y, t0 C, ^& q      RowBox[{"(",
    ! i3 C- j/ B/ I, N& E  i       RowBox[{
      Y$ l+ z7 e7 d3 r        RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], * A* a& f( \( s
        ")"}]}]]], "Output",6 }8 `0 p/ n( D
    CellChangeTimes->{3.577920764625*^9, 3.577957394799646*^9, : a( l6 K. V  {: a' f, {
      3.5779607873531995`*^9, 3.5780122169375*^9}]
    7 e5 t0 q" V0 }. q}, Open  ]],
    $ q1 N4 D# O" Q) t, Q
    ) H& Z% w% G3 ^# p; U' ^- uCell[CellGroupData[{9 W; @( F( j$ s8 b

    7 l1 j7 F0 H1 F1 v- {6 E! Z' A# {Cell[BoxData[
    + I' D' ?: o8 W8 b4 \ RowBox[{"C5", "=", "Ca"}]], "Input",
    / ^, d+ i" ]; C+ l, U; B CellChangeTimes->{3.577920860671875*^9}],
    0 U9 Z% B1 `( f& }- i4 c
    ' C7 _8 {) v4 A5 TCell[BoxData[
    7 e/ x, U2 j% k) i RowBox[{"{",
    1 S! T8 F( l0 J- I2 _  W. |  RowBox[{
    - I: c& r9 K$ C; x3 A. n. S  "0.565217`", ",", "0.71046`", ",", "0.64973`", ",", "0.119897`", ",", ) I( [* U. s8 l2 J# t4 t6 L
       "0.468531`", ",", "0.`", ",", "0.636585`", ",", "0.`", ",", "0.766748`"}],
    ! R; i, r3 S# z3 I% T6 L$ }  "}"}]], "Output",# s( V5 l3 q/ w8 S5 a0 ~! B
    CellChangeTimes->{3.5779208614375*^9, 3.5779574339713144`*^9, 6 ~* V$ t0 t  `, _' H" d
      3.5779608137328453`*^9, 3.5780122209375*^9}]  {1 t1 m) h1 \4 S$ m; R6 k
    }, Open  ]],
    - n% G. g2 P; g6 H7 U- k: j. ^- H: n/ b  }' B9 I1 S- N& A
    Cell[CellGroupData[{4 C2 F% N3 b/ a  y$ b

    $ p# b  a9 a, Q: p0 NCell[BoxData[4 U* a/ H/ m" A) @8 n, U% I* z
    RowBox[{"u5", "=", 5 [7 N/ ~7 P% E5 n% @/ q7 F0 p- M
      RowBox[{" O8 D+ ~# v  B
       RowBox[{"Exp", "[",
    6 k! l2 q8 |& Q! r- f    RowBox[{1 V* X: v! y+ b2 k- o# G: l
         RowBox[{: _) R& a6 Y( Z+ U: b$ H4 q
          RowBox[{"-",   Q1 T+ K  O  Z; }  S
           RowBox[{
    # b! o( m- w- R; \/ q/ {        RowBox[{"(", & E; c# F4 F2 o3 O1 G8 s" Q9 P$ {+ d
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    0 H+ u6 L; {  U! J: \0 a        RowBox[{"(", $ H) g! z6 z9 c) T9 e
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    : c( U* G4 t% P     "]"}], "/.", "DeltaX"}]}]], "Input",
    & p6 |* t9 |, h3 x4 J CellChangeTimes->{3.577920869375*^9}],
    ' {3 ~9 ?1 N; F# m0 ]( M0 q) `  g8 |* y
    Cell[BoxData[
    : [  C5 C+ H* |8 C( [# x5 y SuperscriptBox["\[ExponentialE]", % G/ j  c2 Z5 h6 m; m- z$ t- V; }! v
      RowBox[{"3.141592653589793`", " ", 1 c' l  m6 l4 G" T, C* `4 y" o
       RowBox[{"(", 9 l* r. a4 x' G# T2 y1 p
        RowBox[{
    6 L& Z6 M+ Z, S( T0 s- k  A- h     RowBox[{"-",
    & x3 n) ^) h6 ~+ q      SuperscriptBox[
    ! X& v/ [# g  i# g" R& V       RowBox[{"(",
    , Q# F. N+ ]6 [3 U* R+ y; g2 x        RowBox[{" U% x( Y0 C2 B& s8 v" G
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-", ( y) L8 T7 f2 d" i$ l( \
         SuperscriptBox[
    ( P0 z: u. j9 {/ I& B! B      RowBox[{"(",
    $ f5 W" H+ |! U       RowBox[{
    + G/ U* @: {1 H( H$ Z" P( }4 `$ B1 a9 P        RowBox[{"-", "0.71046`"}], "+", "x2"}], ")"}], "2"], "-", # {9 ~) ]# }5 L. ~9 k  T
         SuperscriptBox[
    $ F) P% {; e) b4 r      RowBox[{"(", , v) J/ r% I9 q7 b# }
           RowBox[{$ |& }$ N% S2 q  E% p
            RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    6 v8 |+ e( p, {6 b5 |6 {     SuperscriptBox[
    - F7 _8 @! Y3 p, A      RowBox[{"(", & j) b  ^6 w, b9 ?6 K+ [4 K
           RowBox[{+ w0 e' x8 {& L1 \/ L$ Z
            RowBox[{"-", "0.119897`"}], "+", "x4"}], ")"}], "2"], "-",
    " E; O  ]; `* k: b4 s: b     SuperscriptBox[* W: P7 ~& m; a  N: ~
          RowBox[{"(",
    / {% h$ m4 x5 s! I0 R       RowBox[{' U8 A6 L: P# z/ ?5 _% z9 c* \# g
            RowBox[{"-", "0.468531`"}], "+", "x5"}], ")"}], "2"], "-", ) _& |8 D1 K, l* q# U
         SuperscriptBox[
    $ x; `5 Q/ O, [" C      RowBox[{"(", 8 Q5 F, ^( g+ B
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 6 J. _- J& {3 L
         SuperscriptBox[
    ; q4 d5 z& g1 g0 k$ K. L      RowBox[{"(",
    0 E1 C' ~- t. L( u7 S* M$ N       RowBox[{
    ! b2 @8 V5 B0 \        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", : l% C& X7 t9 m4 d6 @3 s6 E
         SuperscriptBox[: }$ T" d9 {% Y
          RowBox[{"(",
    + T- i' d; V% G& ]& k       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 6 {% w( O% O) s0 |% ?, r6 ~) i
         SuperscriptBox[
    ) A. @- q* o1 z1 G8 w      RowBox[{"(",
    " {) L8 u2 i4 H; k/ @       RowBox[{
    9 h/ K- H4 m, o4 Y        RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}],
    - l0 K: x' m9 Z) _* f1 @) p/ U    ")"}]}]]], "Output"," C0 j" J6 K$ X
    CellChangeTimes->{3.57792087128125*^9, 3.577957435188116*^9,
    0 M& x& \2 Z; _4 P. E: R  3.577960815043248*^9, 3.578012221953125*^9}]6 L% K. @  J$ h: n
    }, Open  ]],
    + v' U5 f) V* `4 y/ f& r2 T! W4 u8 Y. ?2 D+ s; M% ^7 i) E% o
    Cell[CellGroupData[{
    ) l7 {8 Y' v  X9 D: W
    ! @: \6 x. k/ d5 r8 D$ zCell[BoxData[
    1 k, N# x6 M1 \. H$ k1 ` RowBox[{"C6", "=", "Ca"}]], "Input",, D. v( v7 e' z
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9}],' r- ?% L3 O" I7 }9 s7 y
    ) P; z0 k# ?9 V9 s, B0 r3 g1 i) D# B
    Cell[BoxData[
    3 [; W- L& {# C RowBox[{"{", 1 q8 h4 J% p7 M
      RowBox[{# T2 g  Y, M( N8 K
      "0.130435`", ",", "0.682724`", ",", "0.258697`", ",", "0.019299`", ",", 4 y! K4 f7 j) v7 Z
       "0.51049`", ",", "0.420497`", ",", "0.535772`", ",", "0.`", ",", - \3 _) g) M% E" `- t5 G
       "0.494866`"}], "}"}]], "Output",
    ) x9 J  c7 w7 N5 a- J. m% a CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.5779574726281815`*^9,
    9 {$ p' k6 Y) G6 w! ]& e) Z8 q   3.5779608373044868`*^9, 3.578012227359375*^9}]
    " t$ Z# _! B8 y}, Open  ]],
    6 I& K" m: k1 _2 {7 R# Q
    % W. u6 }4 `  ^6 l' K% }6 F9 v4 eCell[CellGroupData[{( s' N2 B1 k( X1 O
    3 x' D, h) r5 t7 w
    Cell[BoxData[
    7 l, X7 R: h( `  j2 W" h+ W RowBox[{"u6", "=",
    9 y5 D' B, Q8 }9 K  RowBox[{' g) P% ^/ M1 @, I4 _1 K
       RowBox[{"Exp", "[",
    0 ^) |4 l: H# D; Q5 [$ ]& e    RowBox[{
    7 T3 d1 B1 g& t8 [2 Y& Y% H     RowBox[{
    1 e& C+ P; w5 y1 t( ^      RowBox[{"-",
    1 E; E( o$ W, `& m  p  H       RowBox[{
    $ E9 k4 K9 z7 d$ e! x% E1 D        RowBox[{"(", / W) Y9 u9 {% V6 A  w; H1 E$ t
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    & s% {0 c9 Z* p# H+ k        RowBox[{"(",
    & k1 \" _9 _( K         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    % \0 Y& g. E$ u% t     "]"}], "/.", "DeltaX"}]}]], "Input",2 c  [2 l4 {8 l0 s- X! n
    CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9}],( ?4 W9 |% }. `, w. r

    $ e! o: b5 y" L  J* A( z, mCell[BoxData[
    0 M  L6 M. K& l, C SuperscriptBox["\[ExponentialE]", 7 i% ~' U/ b: @$ \# g, G- @
      RowBox[{"3.141592653589793`", " ",
    ( d/ m$ t4 h' n: d4 n   RowBox[{"(", + i. @+ O! U9 i2 N) S
        RowBox[{7 Y" H; S. t6 E
         RowBox[{"-",
    6 t+ x+ l/ q/ H; S      SuperscriptBox[
    & ^( b- ]4 L# ~7 F0 u0 v       RowBox[{"(", & t$ v+ f9 I/ U, I2 p
            RowBox[{
    ) J5 Z" r* o# x; B' c  Z3 B         RowBox[{"-", "0.130435`"}], "+", "x1"}], ")"}], "2"]}], "-", . V' ~8 i% f, d6 P! \7 |9 V
         SuperscriptBox[
    % R, [+ j9 t, u" I2 G      RowBox[{"(",
    - Z0 a/ a5 N  Y$ O- _' _/ U( d  [       RowBox[{
    & Z, ?! @7 ?0 Q  @        RowBox[{"-", "0.682724`"}], "+", "x2"}], ")"}], "2"], "-",
    : M! \& d, B" a     SuperscriptBox[
    ; e# p6 u$ a5 X* x! W4 D7 w      RowBox[{"(",   N$ N2 m  O$ }8 k, J" A
           RowBox[{7 E& A9 W# x/ q# ]5 R
            RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",   C* F" `5 Y2 O6 z/ H
         SuperscriptBox[9 U7 [9 Q/ F/ l9 J
          RowBox[{"(", ; ~* k4 G  I& \3 ~5 {9 R2 W
           RowBox[{" c( O: a7 o; s8 j
            RowBox[{"-", "0.019299`"}], "+", "x4"}], ")"}], "2"], "-", 4 d( S4 ^0 h2 D7 f! v
         SuperscriptBox[
    & H3 w  x) o% U1 Z; q      RowBox[{"(", , P# L6 ]% h( O: O9 ^7 V
           RowBox[{1 o3 b+ R3 V) W, s" M
            RowBox[{"-", "0.51049`"}], "+", "x5"}], ")"}], "2"], "-", . d. o1 w: O7 J
         SuperscriptBox[
    , E8 z- E+ c- m% I3 y0 x      RowBox[{"(", ; i$ Q6 e! z: a' d9 j: [
           RowBox[{4 _8 u' {, i8 u) x  W! {7 c0 t
            RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", : y6 z( q2 w- H" q1 ?, l& H
         SuperscriptBox[2 J0 T# d+ B( E1 b
          RowBox[{"(",
    * O7 e2 u2 O& Z' b0 P       RowBox[{
    , y6 _' y* G0 o/ {& C! U9 z1 ]        RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", + l) y/ C- v# l6 [% ~6 K; G, l
         SuperscriptBox[/ J5 o. A- u( Z
          RowBox[{"(", - q' S" R, G) ?  X! |, H1 d
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", # M3 I( Z" z8 o# G9 {- D' ?
         SuperscriptBox[
    ' G; M# z4 H) w1 J, ?      RowBox[{"(",
    9 O: C2 C- N/ i+ Z       RowBox[{
    ' @- F. u" h7 U5 F- {2 g- G        RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}],
      a, Y) f3 K7 ~+ I; F1 u5 K) N    ")"}]}]]], "Output",6 l! L0 V" }; K1 x$ \  _! O
    CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    1 K" h7 |. r3 g. V! W: w6 p9 W  3.5779574736733837`*^9, 3.5779608382560883`*^9, 3.57801223009375*^9}]
    : p' f- n: N) J" |' H$ ~}, Open  ]],4 t8 D6 y2 c. x* x( P( \- G

    ' [! D* X7 H5 F% V% ~5 ]1 q7 \Cell[CellGroupData[{' h5 Y; P9 H, {$ ]
    : I  D3 L4 \" U/ V$ }) l
    Cell[BoxData[
    % E- s: o! a: ]" C( ? RowBox[{"C7", "=", "Ca"}]], "Input",  V) }2 I. A2 V. P) U
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9,
    : ^4 n7 L/ K# V' `7 a7 y  3.577921316125*^9}],
    7 p: q' Q6 c$ L/ a; ^2 R+ P- J2 X6 [$ S& T# Q
    Cell[BoxData[. N$ L# A: ]+ c& z' F: i- M
    RowBox[{"{",
      {& s' g* I% N" A& w  RowBox[{- U5 q& w! P) `9 ]/ N9 L* g- v
      "0.695652`", ",", "0.71828`", ",", "0.33973`", ",", "0.110285`", ",",
    % `' R/ P4 H/ q. k: f   "0.335664`", ",", "0.`", ",", "0.636585`", ",", "0.780463`", ",", "0.`"}], & D6 ]/ S4 C- P
      "}"}]], "Output",
    2 M- R* A3 b# O# E CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9,
    ' Z" P7 \2 S# E! u* y& M. S! D  3.57795750042743*^9, 3.5779608630913315`*^9, 3.578012250234375*^9}]- s0 o2 O  N, y/ a$ N/ |
    }, Open  ]],1 j7 n2 x% g1 n2 R: Z: D: A
    ! ^4 m8 z. e0 o9 q  s; k4 ~4 a
    Cell[CellGroupData[{
    6 E. [1 ^; C' I. Y6 M& ~' h
    5 n+ c: r4 Q8 h! \/ b8 mCell[BoxData[) M7 _; Y6 A2 V; E2 q+ v$ J/ K
    RowBox[{"u7", "=", # m8 O( V! A7 P$ ?
      RowBox[{
    9 d7 o$ s; x( k5 U7 Y$ Z! w& V   RowBox[{"Exp", "[", % r" P( v& D; @/ i( F, D
        RowBox[{
    ) E4 Z$ s+ r+ k1 {     RowBox[{( s2 d( k$ P! R
          RowBox[{"-", / z5 s" N$ G/ n0 `, \; h
           RowBox[{
    ) t" ^  J: r) }( _6 V8 N/ i        RowBox[{"(", . L# F; w- H: X
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    ' ?, [# @% }9 f  d- }2 B: g$ ?        RowBox[{"(",
    ; [& n. J" F6 |2 b- g: r         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],- B( u( y# s% i
         "]"}], "/.", "DeltaX"}]}]], "Input",
    # D3 {* f& c4 n CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, . x% g0 |$ V( H0 a8 w
      3.57792132028125*^9}],  Z1 H4 E6 p; t- e  T

    & \9 l9 g' a+ F" |& [1 \/ d1 dCell[BoxData[
    ; e2 S$ f. Q5 G1 N5 T, ~# y: ^  t SuperscriptBox["\[ExponentialE]", ' M/ ~. Q7 [4 D4 ^) u- t0 p
      RowBox[{"3.141592653589793`", " ",
    4 l1 Y: A2 o1 L   RowBox[{"(",
    # x/ G, F" N' ^9 W) }    RowBox[{3 `  c, E: n, t6 H; I1 ?8 a% Z
         RowBox[{"-", & c8 J) v. G3 d6 R+ z) [
          SuperscriptBox[
    . o1 m2 l- o, r  z$ n' U       RowBox[{"(", , {# J6 U; M& X1 T
            RowBox[{
    5 `- W6 Q: b0 f1 a: Y) g8 x         RowBox[{"-", "0.695652`"}], "+", "x1"}], ")"}], "2"]}], "-",
    , W1 O- @, u, ^( F7 v     SuperscriptBox[: N& Y# d8 S2 C, D3 z6 R
          RowBox[{"(",
    8 B) A$ R2 \! R3 y4 C' P2 _# J& Y       RowBox[{4 S" |$ G- r9 x5 o
            RowBox[{"-", "0.71828`"}], "+", "x2"}], ")"}], "2"], "-",
    3 O. X; B. a6 u- c1 N     SuperscriptBox[
    5 F0 H* X: p5 P# s      RowBox[{"(",
    5 K. b6 e6 R- _% v) [       RowBox[{- S  N& t$ y/ {, Y
            RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-", + x4 O/ C$ a% m# e4 P- k
         SuperscriptBox[
    9 C, h  f6 ?2 R      RowBox[{"(",
    1 t4 l$ \! c" v1 w       RowBox[{
    $ u: c7 F+ X, K1 @6 S0 S        RowBox[{"-", "0.110285`"}], "+", "x4"}], ")"}], "2"], "-",
    4 R4 |- F5 E; z0 |* y9 o: B     SuperscriptBox[+ Y# Q1 Z# d: j
          RowBox[{"(", * S2 Z  h: w- }; V  M1 D' X' \
           RowBox[{
    ) @) }; J! I8 K7 u, k. I6 l+ q0 v        RowBox[{"-", "0.335664`"}], "+", "x5"}], ")"}], "2"], "-", - T/ s; K  O  x5 R/ r1 K
         SuperscriptBox[
      N7 h# p, R" t1 ]' J% I$ x      RowBox[{"(", + L# D4 w6 Y0 v' q% U1 k' e8 M
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", & G7 T! G+ q" a
         SuperscriptBox[
    * W8 Z, d# K/ r4 {      RowBox[{"(", . |- o7 q$ y5 F$ r
           RowBox[{
    ) t1 `; |; g. a* x* q3 \" `        RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 5 k, C- h. D$ q4 _8 b" w
         SuperscriptBox[
      u. n0 V& H( @/ I/ C* r      RowBox[{"(",
    - O. o8 M  o& \. e+ q4 J8 I3 [       RowBox[{' ^9 }% R. K5 w9 U; _" ]& z* D. L
            RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    ) a5 M) z! p) p1 Y     SuperscriptBox[
    ( r! k# ?9 f$ e2 |/ l      RowBox[{"(", " m* I  w: G6 c' t
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 0 P7 E/ y7 ?: o! a" \8 y# p# j' o+ o
        ")"}]}]]], "Output",
    2 ~; V; E4 L8 t! V CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,
    + N0 B" E, c% p) B! d5 y  3.5779213213125*^9, 3.577957502221433*^9, 3.5779608640897336`*^9,
    ) P9 X0 F% n6 h; L8 e; i6 K( k  3.578012251359375*^9}]
    ) j, w% s4 r2 F7 [; I" x- g}, Open  ]],
    # F: v; s2 \* ?* o
    ( S2 q) n- ?8 e) m4 @, W7 q) zCell[CellGroupData[{) M; U% L! g$ a9 a5 u) f) L
      r" G5 J& `% t( F4 J$ ~
    Cell[BoxData[0 Q, ?# m3 t; `2 Y1 K
    RowBox[{"C8", "=", "Ca"}]], "Input",4 R2 A" j4 j" J5 g& Q
    CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, ( a0 M+ B1 `9 e2 ]1 q9 f& k8 W
      3.577921316125*^9, 3.57792141421875*^9}],; [2 O" }' f  f1 z( j" C  \

    2 I8 \1 h) K7 D, e. M, Q% ?Cell[BoxData[) D, M, ~7 L" D; e3 I8 ?
    RowBox[{"{", ! _* f' A$ E- F4 ?
      RowBox[{
    + t6 a2 l0 ?; ^& T# B, I/ o- X$ ]3 e! v  "0.652174`", ",", "0.569711`", ",", "0.414297`", ",", "0.175398`", ",", + c1 V+ r& T. i
       "0.167832`", ",", "0.`", ",", "0.544715`", ",", "0.`", ",", "0.`"}], ) f( j6 q' q6 l* x1 {
      "}"}]], "Output",! j1 b8 s% f: m7 {
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, 9 `/ k5 w+ o7 K5 H# U
      3.577921415375*^9, 3.5779575288038797`*^9, 3.577960893433385*^9,
    3 U5 Q8 `3 f, `( v$ |; _  3.578012260515625*^9}]+ x. o8 d) i! Y, j2 c, f. T
    }, Open  ]],
    # ]- U( r) `7 z: D
    / Z8 B$ Q0 t; ^Cell[CellGroupData[{
    . {" g% @4 n! Y( A& h# O  O+ S& p8 H. z6 P1 ~9 _
    Cell[BoxData[% @8 A. _- ~) u' q' g( H5 t1 U
    RowBox[{"u8", "=", 0 v; B- B! |, X" t$ Y
      RowBox[{
    $ v+ Y, h. {" y  ^7 Z6 E   RowBox[{"Exp", "[",
    + N$ w  j) V5 g    RowBox[{9 Y  k; J2 C- }7 O, |
         RowBox[{
    4 q$ i" s1 T# Q+ M, @      RowBox[{"-",
    9 _! G5 m, W. K% |$ q5 `4 ~       RowBox[{7 V! N& s1 |4 s6 `/ l
            RowBox[{"(",
    2 E+ a" {# ^- l. H. N, a. Z# z         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    7 f! l) g9 f( I        RowBox[{"(", ! f7 o: y4 v+ T# \6 {1 _' |/ J7 q
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    - J5 Q; G# Y! @! C! \4 U1 k! R     "]"}], "/.", "DeltaX"}]}]], "Input",
    : T/ Z6 t4 u2 }4 T( O8 H CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9,   B$ a- M$ S2 }5 M, A4 f: t
      3.57792132028125*^9, 3.577921416921875*^9}],7 Y3 q, J* j2 W1 `
    ! Q$ D0 X9 I) G0 f
    Cell[BoxData[& s8 q2 g( S" Z  d# l
    SuperscriptBox["\[ExponentialE]",
    # ~! k$ Y7 o0 M0 i' C9 W' C  RowBox[{"3.141592653589793`", " ",
    - q+ C; |" O. d+ Y8 ^" ^" l   RowBox[{"(", / w) k1 Y3 ^( y7 n4 @9 _% s
        RowBox[{
    5 L8 k  C8 i$ Z# I7 T2 `     RowBox[{"-", ) B0 }! c: H- }0 f/ D
          SuperscriptBox[
    / x* ^9 s5 u1 o' D* ]       RowBox[{"(", / e# R5 Y9 U  ?! l$ G& y
            RowBox[{
      r8 W; X+ F5 F8 X- f) D$ j         RowBox[{"-", "0.652174`"}], "+", "x1"}], ")"}], "2"]}], "-", ' z3 y  t3 R! n- Q1 ~
         SuperscriptBox[
    # H* M- \+ {% w5 Z  b' {, b: e      RowBox[{"(", 8 z! B5 u! t* T- C1 @+ j
           RowBox[{5 \" G! |* X4 c/ p- z
            RowBox[{"-", "0.569711`"}], "+", "x2"}], ")"}], "2"], "-", + u. o4 _, c5 V$ d( b
         SuperscriptBox[  u& F/ z4 i  ]1 M3 l( G) q
          RowBox[{"(", ; t' w+ `3 ]- Z# I6 }0 u& z
           RowBox[{9 ~& [; u& j: w( a% N! v3 ?
            RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", 4 @* B  H. z2 M. Y
         SuperscriptBox[+ b5 ?$ f0 M% ^# [- n
          RowBox[{"(",
    " y, _5 a: w! D, a* X       RowBox[{, G) \+ D0 c4 H* s' B* r
            RowBox[{"-", "0.175398`"}], "+", "x4"}], ")"}], "2"], "-", # g! p  T" T) k
         SuperscriptBox[
    ' Z) f" m1 x+ M: Z3 b" j+ q  S      RowBox[{"(",
    * \% ^6 W6 N6 M! x  F+ [       RowBox[{
    ( Y: }5 q1 _# h+ h        RowBox[{"-", "0.167832`"}], "+", "x5"}], ")"}], "2"], "-", 7 Z- v- ^8 i8 A+ K# l
         SuperscriptBox[, k* s6 |+ w: M4 h1 [7 y5 ]: c
          RowBox[{"(",
    8 c; q3 h8 e* R* l7 N# g. X. X       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", $ D+ e1 [  m6 Y$ x- k/ y# k$ w: X
         SuperscriptBox[+ q$ X- _! X' _4 f# F- V2 v( g/ v
          RowBox[{"(", . s6 B% Z7 B  t
           RowBox[{8 f6 X  R4 b8 B
            RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-", / w) @' O$ M6 X) i) K
         SuperscriptBox[
    & [0 k' _8 M; y7 k6 y0 ]      RowBox[{"(", 3 [+ T* p7 u! {: Y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 3 t. k, S. {, Z2 q
         SuperscriptBox[
      Q* L" [" E: }( M0 x" [      RowBox[{"(",
    9 I0 I9 X2 k  J( b' p- `       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    ) L+ r6 U$ z/ V4 R4 ?    ")"}]}]]], "Output",
      ^1 c& m8 ^# X$ S. |/ _0 z7 y CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9,   `9 U$ p3 e5 h4 H% J
      3.5779213213125*^9, 3.577921418765625*^9, 3.577957530145482*^9,
    . p2 G3 U6 B0 d+ z) {2 a  3.5779608945565863`*^9, 3.57801226165625*^9}]
    2 t3 H) }) J, H/ C* V, A}, Open  ]],
    5 J) s! @4 G! b* ^7 y" p- G2 r2 `* D
    Cell[CellGroupData[{6 Q9 c! o0 g4 W) p9 e7 ~' P
    ! k/ R: J' X7 r/ Y
    Cell[BoxData[2 R3 U' t' W" I# z. b3 }( m0 `: W# S
    RowBox[{"C9", "=", "Ca"}]], "Input",
    # P9 c  c0 ~% ^4 \8 z CellChangeTimes->{3.577920860671875*^9, 3.5779211201875*^9, % J& T9 G4 V5 c9 i+ x/ T
      3.577921316125*^9, 3.57792141421875*^9, 3.577921513890625*^9}],
    1 g+ T9 u1 K& N3 ~" }  Q& ^( Y; P& k7 J& |# p2 M$ S' F4 v7 L
    Cell[BoxData[+ }+ [9 l/ G5 n
    RowBox[{"{", ; c8 [" L( b$ t
      RowBox[{" h- X2 }0 J! ~( K. _' }& |
      "0.`", ",", "0.395544`", ",", "0.027011`", ",", "0.048087`", ",",
    : T3 ^# U4 u; U( z$ v; h   "0.496503`", ",", "0.`", ",", "0.452033`", ",", "0.`", ",", "0.278729`"}], ! e* Y& M6 h# I
      "}"}]], "Output",0 M3 X7 |8 y/ Q3 I
    CellChangeTimes->{3.5779208614375*^9, 3.577921121*^9, 3.57792131765625*^9, 5 G+ O( p# D5 X, R1 O8 @6 p+ n4 q# J
      3.577921415375*^9, 3.577921514890625*^9, 3.577957560674735*^9,
    + k: X* x) a# c- K4 D  3.5779588670442514`*^9, 3.577961429021782*^9, 3.5779615287839565`*^9, , k" V$ E6 p- X
      3.578012268234375*^9}]
    . N3 I1 l- d! Z3 b+ B}, Open  ]],
    - F( W3 o2 L+ j% ]; y, q4 Z* `  N+ p2 J( a
    Cell[CellGroupData[{
    6 p( b; {, z/ |# X5 N; P8 F
    - K. t! J! U+ S' S7 m/ N1 M# I9 }$ XCell[BoxData[
    9 p* l8 n& P2 D/ b- H1 }% ~3 W  X RowBox[{"u9", "=", 5 C1 `2 g" j. [$ r8 C1 ]
      RowBox[{
    " ^% v& c% M+ F5 a7 k* a  Z   RowBox[{"Exp", "[", 0 x5 Q- G- V7 W! O
        RowBox[{
    ! w4 x. L/ c, m* s4 c. w     RowBox[{; R8 M3 x: I& J/ _/ g
          RowBox[{"-",
    / x( W$ ?" O" m4 s; e( n0 Q  k' d" P       RowBox[{
    + {  }  A5 U, r7 y* u  h% P" }' p$ r% f& p        RowBox[{"(",
    ! u4 T7 N* W0 ~6 X3 _         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 8 L1 Z+ I( v( G
            RowBox[{"(",
    & g+ m7 y3 d4 z) k, Y" L" @         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    0 @3 m+ L# @% W; Z( E! P7 G     "]"}], "/.", "DeltaX"}]}]], "Input",
    1 u7 i5 W$ G( s CellChangeTimes->{3.577920869375*^9, 3.57792112309375*^9, + p$ B/ d7 n, g- ?, A
      3.57792132028125*^9, 3.577921416921875*^9, 3.577921516859375*^9}],
    % `# Q! J  m; U  [
    - ?- }2 {6 f- E0 n# {+ M9 tCell[BoxData[3 B6 g' {5 R% Q( f1 S+ t: P6 h
    SuperscriptBox["\[ExponentialE]", : ?% w& f; B' \9 z( j" c" }
      RowBox[{"3.141592653589793`", " ",
    ( K4 w. I$ o% s* r8 y   RowBox[{"(", & f, i/ m" V" K5 P2 R. l" H
        RowBox[{
    8 e( r2 Q# K3 t. P0 |; C, j     RowBox[{"-", 1 H, C4 q9 W: o- y9 n) M4 t  L
          SuperscriptBox[& g7 A  Q6 Q& f( R0 ^' @+ V* a
           RowBox[{"(",
    7 U- J; \8 c. b2 A2 ]* P        RowBox[{"0.`", "\[InvisibleSpace]", "+", "x1"}], ")"}], "2"]}], "-",
    ! C4 E! G! \3 q     SuperscriptBox[0 d6 x2 @+ n- E, V+ c. V4 |
          RowBox[{"(",
    , V. V  i# m! S8 o: C3 v8 |       RowBox[{
    ( V& k9 d# `- [( P. N& c" |1 ?        RowBox[{"-", "0.395544`"}], "+", "x2"}], ")"}], "2"], "-",
    ! q+ E, c, m# F3 R) S     SuperscriptBox[
    % i& I4 @9 [( o8 d" X- c      RowBox[{"(",
    7 V, q7 \  y, ^& d! Z       RowBox[{
    ) d3 \  _3 E. x- j% k5 G  D: n        RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", # F7 w  w' r; L! L
         SuperscriptBox[9 F- M1 m, W7 k4 h
          RowBox[{"(",
    1 q( e3 P- [  U) S% I( w# `; j       RowBox[{
    ' |4 y: T7 y1 m/ p  P        RowBox[{"-", "0.048087`"}], "+", "x4"}], ")"}], "2"], "-", % r& V6 O8 I, E( S1 J9 i* q
         SuperscriptBox[
    5 J8 `; f2 b5 @; \) ?      RowBox[{"(", 8 n4 ~0 u# h$ n) b: b, w; C3 g
           RowBox[{2 B( U; f3 d& A  Y: E8 w' a2 D
            RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-", : v1 D8 v# z( I- L
         SuperscriptBox[
    5 }5 v9 ~9 j+ F) k      RowBox[{"(",
    - h/ F: Y6 }( y! m8 A       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 9 i8 T% [6 l$ o8 f
         SuperscriptBox[
    : P" H# L5 a* T- w      RowBox[{"(", 2 j2 U( u+ t0 l3 Q, @3 z* D
           RowBox[{
    1 q  V7 E) W/ y! O: f) ~& `% W        RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-", . C# |. p( |4 B$ N8 c; w* T
         SuperscriptBox[7 n# j$ x1 h8 h7 e0 G( t$ B- V
          RowBox[{"(", $ z1 F# D! W: J; x
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", % o/ L% d+ e7 y% q8 ?' o
         SuperscriptBox[
    # ~9 {: G8 l, i8 P* ~      RowBox[{"(", " W4 x$ J9 N5 l# E# e2 y: I
           RowBox[{
    . T7 N6 N5 ?7 U' R# m9 W        RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], 5 d  q' \. F) G% l" |0 h
        ")"}]}]]], "Output",
    ( H* c: H/ ]$ W7 t6 f( p, W3 P9 D CellChangeTimes->{3.57792087128125*^9, 3.577921124328125*^9, 4 w6 c+ d( r" |+ a' ]4 f4 b/ l
      3.5779213213125*^9, 3.577921418765625*^9, 3.577921518078125*^9,
    : N5 A% B" l* C3 B  3.5779575617355366`*^9, 3.5779588687914543`*^9, 3.5779614354177933`*^9, . K/ U. a' v' p0 z" u# F
      3.577961530421959*^9, 3.578012269125*^9}]
    " H! O% K# H& G9 F}, Open  ]],' E- Z' E" }9 u4 o3 \8 `, B+ v
    4 R- `3 s8 k  ^3 @$ L/ w( l+ U  F6 f
    Cell[CellGroupData[{
    6 H. F& @) e5 J3 n* c4 \- X9 n5 l5 x9 K
    Cell[BoxData[{& C% n% O% m$ s( F" W* E  H' f& _
    RowBox[{"C10", "=", "Ca"}], "\[IndentingNewLine]",
      Q4 K+ x; \$ F: t6 L0 v RowBox[{"u10", "=",
    , d& K+ S% L! P6 e  RowBox[{
    0 j* P' r& v) c( U; r' \% [   RowBox[{"Exp", "[", - J- O7 R& j1 e' G- z6 w4 `; T
        RowBox[{" \1 J+ f+ L$ |! y
         RowBox[{2 Q* j6 g; F$ o4 q# ?, K6 d
          RowBox[{"-", ( C" d% A( I6 ?( H$ X
           RowBox[{
    7 g* u  r, ]& X3 _        RowBox[{"(", 3 q' u8 Z( b) J: ?- ^
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    . J' r& S2 E7 I* a4 r  H6 _        RowBox[{"(",
    2 q' C  y; P$ y$ O5 P" ]1 p         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],! h- [6 U6 I. a
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    $ F' G7 ~# T5 `* y$ ^* i CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}}],
    + U2 B4 N' `# Z  ~/ l
    ! a2 d3 O2 U3 i1 h. Q5 A0 ECell[BoxData[
    $ h# _9 M* H( u' @' I& R RowBox[{"{", 8 o6 L1 ?+ G) O7 w  d
      RowBox[{1 H8 T, D1 M1 }& V
      "0.565217`", ",", "0.572293`", ",", "0.655012`", ",", "0.281852`", ",",
    1 i6 Q, i5 F: L% I5 Q& F   "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output",
    3 D# y5 K8 {* u7 v9 l: d! d CellChangeTimes->{3.5779614955246983`*^9, 3.57801227703125*^9}],
    & v4 h+ @/ |( u. ^$ f+ M% Y# r/ B6 a% B+ g$ H2 D7 S$ r, j$ ]
    Cell[BoxData[' \0 N; j/ f0 t! P$ }
    SuperscriptBox["\[ExponentialE]", - \4 P# P1 o9 E& t  L1 O! \/ s2 M7 K9 n
      RowBox[{"3.141592653589793`", " ", , \& [1 a' ~/ [( f; P% d$ `
       RowBox[{"(", 0 c. n4 f# y/ K# V+ M, u2 {
        RowBox[{
    : t" C$ J% l; P5 T2 j     RowBox[{"-", & D3 D) W" J/ r  J
          SuperscriptBox[' s5 @) r& }) v$ x1 o- b* I
           RowBox[{"(",
    & s2 r  C$ G5 v5 R6 P% U5 I) u3 R        RowBox[{/ I" p; U/ H  e+ l. _* S
             RowBox[{"-", "0.565217`"}], "+", "x1"}], ")"}], "2"]}], "-",
    . w2 w+ O- d- a/ b( b     SuperscriptBox[
    2 l: s4 C: l7 U) d; J. X      RowBox[{"(", ' J6 d, ]8 M4 X( X! R7 I% q
           RowBox[{
    & r2 K# |1 H7 N9 W' x        RowBox[{"-", "0.572293`"}], "+", "x2"}], ")"}], "2"], "-",
    ( u4 j; G+ G/ {2 X, a4 {9 o8 K     SuperscriptBox[
    + ]. v, p5 P1 x2 W# J      RowBox[{"(", & @9 ]1 ?4 Q, C- u! A; h# O* {
           RowBox[{# j2 J4 y- t! W# I5 L) [* l" b# p4 Q
            RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", : d& C: V- c' Z" a7 k; i
         SuperscriptBox[4 Y% [* q6 E7 B8 g) S
          RowBox[{"(",
    " v# u  ?& c7 d8 c+ Y       RowBox[{
    . ~- P. _: ], x7 z! a. \2 Z        RowBox[{"-", "0.281852`"}], "+", "x4"}], ")"}], "2"], "-", 0 P9 v# J# d' v- [( U2 X3 k* s
         SuperscriptBox[# t& i$ X8 q! N# u
          RowBox[{"(", : d( W8 `3 s. @5 G* p
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x5"}], ")"}], "2"], "-", 7 C) B" _8 ?7 u6 {! F% y* Z" V0 w
         SuperscriptBox[
    * o# Q0 d/ h: S! F4 G      RowBox[{"(",
    ; U# G$ F" S* S7 u9 I% p9 Z       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", & R4 G" r3 x) I, h: B& ]+ x
         SuperscriptBox[9 N2 c! t: l3 p  e. Z. k: s# y. v- O) L
          RowBox[{"(",
    / [5 V0 z% G7 e" X) S2 N       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ! v+ x! Z  E+ R9 H1 Y4 e6 l+ [+ c
         SuperscriptBox[
      E- L( Q" m% N; Z3 x      RowBox[{"(",
    + N/ o1 F' v* j% }2 Y- O7 h1 M       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", % [0 ~0 c! x% ?4 u( g: z
         SuperscriptBox[
    ( O- L- z5 ?  w/ J8 t( {; U, E      RowBox[{"(", % z3 M, G  d3 U% J
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], " g% a/ Y0 Z$ y4 F$ q  h
        ")"}]}]]], "Output",
    * R% e7 }1 D# L5 [( d, A% J% R9 k' U CellChangeTimes->{3.5779614955246983`*^9, 3.578012277046875*^9}]6 P3 c/ ~; F' P1 f; D6 [
    }, Open  ]],
    3 a% ]! F% L  N: }8 v- }* `1 C: b- v, {3 `4 X$ |
    Cell[CellGroupData[{0 u" s& A: `- X

    & @$ [  X1 P+ G- `" R' S( [Cell[BoxData[{* a9 M0 M; e1 ~) N
    RowBox[{"C11", "=", "Ca"}], "\[IndentingNewLine]",
    3 P  ?& \" M- G' R; y: A5 P, } RowBox[{"u11", "=",
    , G  \+ r  m% g& F' K5 {  RowBox[{5 }8 _) r, A8 L. k, P
       RowBox[{"Exp", "[", : Y$ P, [! p' F" z
        RowBox[{
    ! T5 ~5 W# t, W6 f     RowBox[{' s( N) r, ~! b* s7 |
          RowBox[{"-",
    3 p2 x5 g9 V, T5 g# b  F       RowBox[{
    + t* {9 N( h2 u1 L, Q8 y/ m        RowBox[{"(", & q8 F: f, y4 a% H8 A. `
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    5 D7 @9 k  K& a# d: v2 ~        RowBox[{"(", # S. ?7 p4 N0 S& T7 s& ^
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ! e5 |" F7 v0 t. h: Y; Q     "]"}], "/.", "DeltaX"}]}]}], "Input",! m# P8 E+ o+ s, ]
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {- }7 @) V$ r8 a( m4 s
      3.57796154237158*^9, 3.5779615434011817`*^9}}],
    - A) w! |1 k' v5 m  F
    ( x; R. j4 E# O/ A7 \6 LCell[BoxData[9 u% e2 }: L" L+ |0 {
    RowBox[{"{", 8 z" P, E0 f9 I6 i% P+ j
      RowBox[{- S/ i  C/ m! q! m
      "0.717391`", ",", "0.736205`", ",", "0.267704`", ",", "0.036152`", ",",
    ) l- X% [1 f5 Y1 r  K   "0.307692`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}],
    0 K8 D' a. s! o# Q8 N( p  "}"}]], "Output",) G) l& }; b1 X" ?' B2 E
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9,
    7 h5 M# N& T7 P0 K2 @: Y; r  M  3.57801228203125*^9}],7 q$ \! w: ]2 }
    7 |9 i  ?* Q0 g
    Cell[BoxData[
    3 c, t0 O: ^) o8 C+ H: h! G SuperscriptBox["\[ExponentialE]",
    6 E. V% g! V& X* H! L  RowBox[{"3.141592653589793`", " ", + D- ?. }& M6 Y
       RowBox[{"(",
    : r) Q" R' s6 v* d    RowBox[{; h) H: l  `+ ~! A. S4 G
         RowBox[{"-", 4 G- f+ \( M; ]/ e  V- Q0 j" L
          SuperscriptBox[
    0 h+ q( E" z- w! K1 D4 u+ b& T       RowBox[{"(",
    ! o+ K4 Y3 y7 e+ Q3 |5 U        RowBox[{
    ! z# X# y3 x9 f  @/ T( K         RowBox[{"-", "0.717391`"}], "+", "x1"}], ")"}], "2"]}], "-", . g* V$ X: J2 b4 W2 e1 y. n. N7 L" @
         SuperscriptBox[
    : e- I1 G0 |0 c1 S/ Q      RowBox[{"(",
    : U7 [; ^. j  o% a       RowBox[{4 x4 |. X$ R6 D7 d! M. T6 }
            RowBox[{"-", "0.736205`"}], "+", "x2"}], ")"}], "2"], "-", 2 N2 c. ]" f# N% y- ^& E" q
         SuperscriptBox[
    ) g: v( h! [; w( V3 C      RowBox[{"(", , n$ D5 b' T: X! j! _
           RowBox[{
    4 O; N0 s% o3 d7 @. ~# A+ M2 I        RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    . y) }0 b4 H" D     SuperscriptBox[- F4 R8 |( C. m' v
          RowBox[{"(", $ ~4 N1 `5 c) e1 c8 H- ~% `3 K
           RowBox[{
    $ S6 C: L: ^8 i        RowBox[{"-", "0.036152`"}], "+", "x4"}], ")"}], "2"], "-",
    / `2 i8 i: Z# k3 Q7 v+ \     SuperscriptBox[5 u& f* t4 A3 O
          RowBox[{"(",
    6 t3 b( V, z# x" ]) M* q       RowBox[{
    : Q$ P7 J3 [4 P+ U        RowBox[{"-", "0.307692`"}], "+", "x5"}], ")"}], "2"], "-", & j' C# [  Y1 A$ i6 @3 m  D# N
         SuperscriptBox[0 X4 ]  g& k( P% h! T
          RowBox[{"(",
    5 ?2 B3 |) Y8 T, X       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    . I, @" ^6 V9 s+ p     SuperscriptBox[, d9 I! _+ x% a% l0 C# J- P
          RowBox[{"(",
    + h: P* m7 E6 D       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", ) p+ G3 C8 k$ [" K& u6 Y) t3 E: s. W' l& ~2 T
         SuperscriptBox[
    6 W" K) ?3 l: y  y4 K" m6 r; f9 v      RowBox[{"(",
    # W6 U8 [' H* w, A0 h# X       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 8 F4 t! v7 W: [9 h4 ?& |
         SuperscriptBox[2 M! }9 H# @# a& @! \
          RowBox[{"(",
    , w  ?( w( C/ s! R" y" f/ Z$ T       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],   r2 k/ r) w0 A; @
        ")"}]}]]], "Output",2 @5 w' J5 B; z" Y2 Y
    CellChangeTimes->{3.5779614955246983`*^9, 3.5779616282029295`*^9, 2 V" z6 ?- P0 o. b+ ~8 b! k% S
      3.57801228203125*^9}]  J" E/ Y' v0 ?$ W* u. j
    }, Open  ]],3 N; k5 K) M3 x7 G/ |+ v

    ) v; G1 @( O5 E8 ~2 ^3 o. \- \; sCell[CellGroupData[{
    + g6 y8 B! {. e# D% \/ T5 y3 B, Q6 Q: ~
    Cell[BoxData[{
    8 n+ D  a5 N' w$ G1 c; c) m$ u2 g RowBox[{"C12", "=", "Ca"}], "\[IndentingNewLine]", 4 _; F3 x0 }# p" F( s( T7 m4 X
    RowBox[{"u12", "=",
    / }; c' h; S  w! v* D  RowBox[{
    ; O2 {' u; T0 I4 Z   RowBox[{"Exp", "[", 9 O. P! f: Z! F$ i
        RowBox[{& A1 m8 l0 A3 r7 N9 R1 y) g
         RowBox[{
    2 ?; z% E; k! C, f; P2 N& O      RowBox[{"-",
    - b0 G# Z8 \5 a0 g       RowBox[{4 O% s3 J6 l) b7 c# [
            RowBox[{"(",
    ! f6 Z% C8 |4 e. x/ m8 y- L         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    / W. q8 U4 a6 Z3 e        RowBox[{"(",
    ( U2 ^& p2 t5 e6 M         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    9 v5 B! N1 W* q! ^; }1 _( D4 z/ c6 }, n7 Q     "]"}], "/.", "DeltaX"}]}]}], "Input",# \. g' Z8 e+ p: q& R1 L- i: w
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {  m; {6 A( q: l% e
      3.57796154237158*^9, 3.5779615576284065`*^9}}],
    , c0 q" Z) o" [7 S$ U1 H% {% w' h/ L/ W' r0 B" |" D9 P
    Cell[BoxData[
    6 p" |" C' `; D9 {' V RowBox[{"{", $ e9 D! E# x. E& S6 P. u. G" z+ E* k
      RowBox[{1 l( V" b% t! w! H8 a& O
      "0.913043`", ",", "0.170478`", ",", "0.`", ",", "0.012973`", ",",
    6 }/ M/ Z7 g( }& H; X- }   "0.293706`", ",", "0.`", ",", "0.`", ",", "0.672709`", ",", "0.`"}], : Y. ?4 p/ ?6 y2 j7 @
      "}"}]], "Output",
    4 ~! [8 Z9 t& U% |2 t CellChangeTimes->{3.5779616594029837`*^9, 3.57801228759375*^9}],
    8 d0 c# Y3 K6 [2 B5 v3 `# o8 i- n* L% p  H( w
    Cell[BoxData[
    + ]. [# _% @# N$ l- K9 b& M) U6 t SuperscriptBox["\[ExponentialE]",
    + V' ^4 ]9 G2 w8 M0 G$ h  RowBox[{"3.141592653589793`", " ", ' w8 x$ |$ f* V$ c7 i! L
       RowBox[{"(",
    # L; g% i' ~/ B) p1 s$ ?  C# g    RowBox[{3 w. b8 |! Y3 s- f; t. M
         RowBox[{"-", & q/ V. R- d( I1 }$ y# O
          SuperscriptBox[. n" o- q* Q, L" w1 p% H
           RowBox[{"(",   E. S2 X1 o  N! e; V
            RowBox[{& v7 {5 A0 i0 k1 t: o
             RowBox[{"-", "0.913043`"}], "+", "x1"}], ")"}], "2"]}], "-", % @( j  p+ t( }) z& [% l6 X+ b
         SuperscriptBox[
    # x# O+ \7 x5 a$ D- M$ `- q      RowBox[{"(",
    0 T* h  z( I6 A+ S1 V2 }& Q       RowBox[{
    9 H! S& g& b0 y6 i        RowBox[{"-", "0.170478`"}], "+", "x2"}], ")"}], "2"], "-",
    : O% D% Q! y- z, V; E     SuperscriptBox[
    1 f' b/ y. y* |      RowBox[{"(",
    ! S5 ?: @% j. `       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x3"}], ")"}], "2"], "-",
    . a% N: _) b0 o" Z! u     SuperscriptBox[
    % P" \5 ]/ s5 S* |/ V5 d! w, l      RowBox[{"(",
    ; G3 u4 B6 i( G' h: }       RowBox[{
    # [7 {5 r1 \" [% R( K        RowBox[{"-", "0.012973`"}], "+", "x4"}], ")"}], "2"], "-",
    / S5 s3 V9 ]: l  c+ e     SuperscriptBox[! J% O8 {* F6 a: V
          RowBox[{"(",
    . [! d  a  G$ {; k5 o+ ^+ N       RowBox[{9 Y: X, S8 |* P! q( I
            RowBox[{"-", "0.293706`"}], "+", "x5"}], ")"}], "2"], "-", 6 n, a* k+ C: S/ z) `. D5 g
         SuperscriptBox[
      ?3 T( o) ^+ i3 p6 W) @      RowBox[{"(",
    . H, }  \- ]! l5 ?       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", " h$ G0 X( ?( a% c! O9 W- J* ^2 w9 l
         SuperscriptBox[
    # r6 w5 Y! S5 f2 @      RowBox[{"(",
    ' a/ Z  A2 @1 S% `       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", - J7 V+ N. M: Q% y/ ]$ T7 ^2 U; t$ b
         SuperscriptBox[
    # k: w& x) z- U$ n0 Q2 s      RowBox[{"(", + c9 w% {8 ^' U+ L. F* D4 t
           RowBox[{/ i7 L" t9 }. d4 W* b5 t% v  O' Z
            RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
    & z# L1 o; d+ K7 |* Y+ S: u7 v, U/ l     SuperscriptBox[
    , h( e! y8 w0 P      RowBox[{"(", 1 F* O* R2 f* ^7 L  W
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 2 m6 _: M, ]9 [5 s: C* w1 n5 R& J
        ")"}]}]]], "Output",9 B9 W) x8 }9 e9 Z
    CellChangeTimes->{3.5779616594029837`*^9, 3.578012287609375*^9}]
    ) d3 y& M) i. S; u- A' \3 ~}, Open  ]],
    , x8 j5 i3 X( ]- c$ B4 ^/ C6 u, X7 i2 p5 M
    Cell[CellGroupData[{
    2 v3 x- _( F2 {, a
    9 ~/ @; U/ ~2 ~$ i. g# o# DCell[BoxData[{; W1 I' Z5 @- _1 J" |1 V
    RowBox[{"C13", "=", "Ca"}], "\[IndentingNewLine]", % f6 Q( h: O) B; K9 a6 A, @
    RowBox[{"u13", "=",
    : W8 N* B- t0 ~* R7 s1 _  RowBox[{
    9 ?3 C- M$ s" h1 M" X1 ]# w   RowBox[{"Exp", "[", 6 |9 v% L, \% [9 y9 w
        RowBox[{3 I" i3 T2 q: E9 R/ G4 H5 A, e8 L# S
         RowBox[{
    5 C# H8 S, C* F7 I2 G, w# X- E      RowBox[{"-",
    / c9 J& f9 j9 L: D# J+ M% e       RowBox[{0 U% x! ~4 t. b" a/ j4 h
            RowBox[{"(",
    6 C; p) a* l/ Q0 Y' [1 H# L         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    - V* G/ j+ I6 a; \1 J. F* p' h        RowBox[{"(", : v, ]1 e. c, S9 A% b) D1 `2 b
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    6 B" x% N- R7 j( b" P7 y     "]"}], "/.", "DeltaX"}]}]}], "Input",
    8 U) _5 o5 e* ~$ G* I' c$ B CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {/ A5 i+ O' f+ P2 ~  s. D- A
      3.57796154237158*^9, 3.5779615599684105`*^9}}],
    6 n. F- S3 V1 ]$ T- Y7 H7 z
    ) I+ B. c" ]. j% h% wCell[BoxData[
    3 j# L  A& a7 R- M/ y& K RowBox[{"{",
    , w( m% I: N& L' _: t; ~  RowBox[{
    % s8 {, z( q: J$ E  "0.73913`", ",", "0.193199`", ",", "0.160584`", ",", "0.037907`", ",",
    ; u9 j8 w8 d  x! ]7 x; Q   "0.461538`", ",", "0.`", ",", "0.684553`", ",", "0.`", ",", "0.`"}],
    , L" _1 \% N% c1 D' }! \) ?  "}"}]], "Output",& e. ?3 B7 w) i: Q! q/ z4 e
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}],9 f/ a3 E' r( x& R; h! c' H! s

    " n# c; Z3 M8 V8 ~Cell[BoxData[6 ]# K4 D5 `8 P9 H
    SuperscriptBox["\[ExponentialE]",
    + B, d9 J6 h0 |( V5 t$ i; C  RowBox[{"3.141592653589793`", " ",
    8 `  F- {' q) c+ i+ {( j   RowBox[{"(", 0 M8 B' {( X+ M: [
        RowBox[{) D" \* ^9 l9 I7 e2 ~7 T
         RowBox[{"-",
    ; P# }2 j( B* t. ^* u' @8 o: e      SuperscriptBox[9 N* x  N2 j' N6 y$ M
           RowBox[{"(", / F$ x/ R. t1 k" Q$ w; d5 f6 w
            RowBox[{
    * m9 N% F: J8 W* D         RowBox[{"-", "0.73913`"}], "+", "x1"}], ")"}], "2"]}], "-", $ ]0 \2 o% P+ q$ t
         SuperscriptBox[; X  w5 V, m3 a: O
          RowBox[{"(", 4 s8 I$ X6 M2 ^" e0 h) `4 M5 @  K  h
           RowBox[{
    , ?8 K! K  q* v! D+ ]9 Q        RowBox[{"-", "0.193199`"}], "+", "x2"}], ")"}], "2"], "-",
    5 K1 j9 j& o, ], T8 y" b8 F. V/ ^     SuperscriptBox[
    . N, ]" n) T1 G' m% H. v. {) \9 y$ m      RowBox[{"(",
    2 A  F& m# D6 r" I* Q6 E; ]       RowBox[{  s4 F; b$ X/ v) X* ~# m
            RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", + b$ q) h5 |  U1 w* L  N
         SuperscriptBox[
    6 Q3 O$ w  b+ p) k. Y* x4 t* B& q      RowBox[{"(",
      L3 Z1 ]& C; g9 R0 n       RowBox[{
    , O4 W+ @# |) {0 U        RowBox[{"-", "0.037907`"}], "+", "x4"}], ")"}], "2"], "-", 3 N5 a" a. J* r: [
         SuperscriptBox[) J3 t( z! A; [$ z! c
          RowBox[{"(", . B% E0 A& p! I% u
           RowBox[{$ ?  P4 i% }7 G3 S
            RowBox[{"-", "0.461538`"}], "+", "x5"}], ")"}], "2"], "-",
    , z0 @7 ]7 z7 d- _     SuperscriptBox[6 K% j- |# s" q* S6 d
          RowBox[{"(", $ v7 k* e" c3 |: C- ]
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-",
    3 a3 b# ]0 K. ~7 f     SuperscriptBox[, I9 e3 m% ]0 M' @
          RowBox[{"(", : u9 u' f6 w  C; T0 }0 L
           RowBox[{5 H' A+ u+ K& H$ q) D; |
            RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", & \* g; u  _% G% @6 }5 c" |
         SuperscriptBox[
    " ^" H; `/ l/ c8 v7 Z$ d4 ]      RowBox[{"(", ' U( f& p, l; Q, {, z
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    / B" |: A5 L: R2 o     SuperscriptBox[
    , G  m- H' x" _0 R      RowBox[{"(", ! K" [% N! V) s6 {' {7 [3 s9 x/ C
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], 8 K) ]' r& t1 ?: g8 K* @# ^, ~/ q
        ")"}]}]]], "Output",6 r1 ~' J' A5 A* N; u6 J/ V% U/ h5 y. |
    CellChangeTimes->{3.5779616928806424`*^9, 3.578012300078125*^9}]; g! t. j5 G# h
    }, Open  ]],
    ; J- S; s1 b$ @# b- I, t) p# l4 _  \6 N" g! y
    Cell[CellGroupData[{
    0 u8 f4 q+ h7 {% P9 q: z) d+ \8 S4 q+ q) V9 c
    Cell[BoxData[{! @. ?7 b. T, o: i. h2 ?  }) R
    RowBox[{"C14", "=", "Ca"}], "\[IndentingNewLine]", # v( y& `! x0 Z+ x2 j
    RowBox[{"u14", "=", # R: L0 I# o3 C- M
      RowBox[{, R/ d2 f9 O: R' ?* v% P- O, _
       RowBox[{"Exp", "[",
    ' t" |: n! X' v% S    RowBox[{
    ( J7 u5 X# ]+ g5 X: Y     RowBox[{
    # L5 y. r( l- X" \/ d8 J# f! t      RowBox[{"-",
    " H5 N  v) }0 N" [6 O       RowBox[{
    1 f' ?* J* F3 t2 ^3 H        RowBox[{"(",
    , f4 |8 Z! S9 n/ c$ w+ r4 {         RowBox[{"Xa", "-", "Ca"}], ")"}], ".", ; J! d& Z: L& U- [
            RowBox[{"(", 3 O" `' C5 ?+ D1 a: p
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}]," F8 v& N7 B. s% c  t( Z! d
         "]"}], "/.", "DeltaX"}]}]}], "Input",, ?* P% s/ J' R
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    + ]+ l7 ^( ~& Q& [4 ?+ |  3.57796154237158*^9, 3.5779615663176217`*^9}}],5 Y) E1 w5 x7 j5 W: I# e: U
    ; k& F% k/ k. {% J4 m
    Cell[BoxData[' m2 ~& L; b3 w2 P9 [' T, K
    RowBox[{"{",
    ; X# j" f" j7 s" `# h+ n! S  RowBox[{" p6 P: W% e/ r% J! K& N% O5 h1 R
      "0.826087`", ",", "0.203969`", ",", "0.234619`", ",", "0.27224`", ",", + q1 |  |5 C9 f9 D! l9 R0 j
       "0.265734`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], & w, H8 C: ?2 G4 R+ |
      "}"}]], "Output",
    $ A. {) s) |, S. K CellChangeTimes->{3.5779617235034957`*^9, 3.57801230559375*^9}],6 j/ ~9 T" P% r8 k2 j" t
    6 _- y- e; C+ \
    Cell[BoxData[
    1 u( L  I3 {4 x+ O5 R  j1 k; l0 b SuperscriptBox["\[ExponentialE]",
    ) T! ~, E4 {0 i' M+ k  RowBox[{"3.141592653589793`", " ", * Z% s/ x' E- M
       RowBox[{"(",
    1 R% l& h9 s2 A: b) L7 X: H    RowBox[{+ L0 k  B4 L- b* l
         RowBox[{"-", 5 c1 P' W6 o: L9 Q4 U2 `
          SuperscriptBox[
    . ?) |  K6 q+ A       RowBox[{"(",
    $ x% |- Y8 |- |  L& c        RowBox[{1 o6 V2 o: f) D) w! l) s
             RowBox[{"-", "0.826087`"}], "+", "x1"}], ")"}], "2"]}], "-",
    1 d! `1 F6 D: r, K# O     SuperscriptBox[
      c- G6 {6 @% s! T4 |% d      RowBox[{"(", 7 F- A" d, r! o" F! S
           RowBox[{
    6 t! E+ X9 v; X- u# M        RowBox[{"-", "0.203969`"}], "+", "x2"}], ")"}], "2"], "-",
    / o! p" R8 O' ], |8 ~+ M! Q3 m     SuperscriptBox[8 [3 p/ a1 m0 }/ B
          RowBox[{"(",
    ; v8 G6 `7 P3 y6 M( S  P       RowBox[{
    " f# @2 ?  d. B3 X8 w0 L* U        RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    4 M9 V* q: U4 T6 @  B     SuperscriptBox[& s1 v0 X: I; l5 e( j
          RowBox[{"(", + w9 j0 \# T$ ~1 u% {. F, Z4 K
           RowBox[{
    + R- D2 Y2 w! |. [        RowBox[{"-", "0.27224`"}], "+", "x4"}], ")"}], "2"], "-",
    . ~, v5 y( y: w% g     SuperscriptBox[
    0 C! k2 }% o, R. ?. p8 Q7 X; V      RowBox[{"(", 7 m4 q/ `0 A0 q8 X" J, b% r( Q
           RowBox[{
    * d: X3 `& p4 ?( J/ X* \2 g% L        RowBox[{"-", "0.265734`"}], "+", "x5"}], ")"}], "2"], "-",
    & S1 ~% Y# w& L+ k9 @9 w     SuperscriptBox[7 l4 B3 e+ I& [
          RowBox[{"(", . D5 P) Y6 J$ e1 e
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", 3 m5 Y8 r7 [# {& Q) u6 \+ Z, P! r
         SuperscriptBox[9 [% f& e/ X9 ?; ?
          RowBox[{"(",
    * K; H1 }1 W& L4 K       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", / R; H/ ^( p4 Z: C
         SuperscriptBox[5 L: z: d. X. n
          RowBox[{"(", : l+ u. J: @/ y' _( d, `
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 8 K8 z$ B6 G3 ~( l  H
         SuperscriptBox[
    # ^1 b0 b+ p0 I      RowBox[{"(",
    6 Y- ?- S4 p" C/ c& Y, A       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    9 N1 h" r5 n4 d- k0 X9 s    ")"}]}]]], "Output",. G2 J) M8 V5 T6 h
    CellChangeTimes->{3.5779617235034957`*^9, 3.578012305609375*^9}]
    5 Q1 k# @7 _2 Q. n& D, i& M* H}, Open  ]],
    - ~$ i' W7 ]1 ]5 m8 ~) ?5 U+ b1 @& e& Y; z8 k+ Z1 n
    Cell[CellGroupData[{
    ) M7 j+ Z; x& c2 I* v$ v# P! r6 S5 \3 L; `1 @
    Cell[BoxData[{
    3 ^. L: \- r# E- ], B RowBox[{"C15", "=", "Ca"}], "\[IndentingNewLine]", $ u: U9 A# ~5 ?& ]6 u
    RowBox[{"u15", "=", 9 ^4 {- Z8 }: [
      RowBox[{
    # c, n0 R0 X- F   RowBox[{"Exp", "[",
    - Y2 y# @' G, R/ G5 H0 Y    RowBox[{
    4 ?: h% J( b3 J0 \7 }     RowBox[{
    # w$ \4 y2 A) }" [( d4 S/ w; s      RowBox[{"-",
    2 n: S( V7 }% K; T1 \9 J+ H( b       RowBox[{
    1 I% v7 o* t' F& b, h, h        RowBox[{"(",
    * P; E) U1 G% [: m         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    1 T4 V& H% D# g        RowBox[{"(",
    * o) x5 A$ N, e         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],* j4 ~6 x& d% R  M/ R4 Y
         "]"}], "/.", "DeltaX"}]}]}], "Input",9 c  }6 u, E; ^7 X3 t
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {* U& X  r' N% J; v  c4 t  ^: Y
      3.57796154237158*^9, 3.57796157098203*^9}}],
    4 `# N* ^: ^9 V: j1 b
    9 R* c/ {5 W# @8 p- wCell[BoxData[
    5 C$ {; f, v; i' ?9 p RowBox[{"{", 8 \5 |- m% l) W9 H1 U4 O$ ?
      RowBox[{6 ^4 `- C# k2 D0 r  D5 @
      "0.413043`", ",", "0.551859`", ",", "0.544826`", ",", "0.230503`", ",", / ^: W1 U, N) _
       "0.244755`", ",", "0.53052`", ",", "0.819512`", ",", "0.`", ",", "0.`"}],
    5 l& \/ H. v! ~3 j/ X  "}"}]], "Output",
      c2 f! P1 d& O( C- {0 ? CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}],& x3 U2 u0 T7 q: s
    " `: w8 W5 X$ s; m) X0 O# o6 r$ M% T
    Cell[BoxData[: f+ z0 |) |, N5 |; a( P
    SuperscriptBox["\[ExponentialE]",
    ! e4 v: d- ~  M! J1 \/ }  RowBox[{"3.141592653589793`", " ",
    8 T0 u. }& o2 a  j) o( y/ R, L   RowBox[{"(",
    + S% x  W  D1 V  l7 l. Z, c    RowBox[{9 ]! b; U/ O4 b+ T/ J5 L; ^
         RowBox[{"-",
    2 K# C" Q  H# w      SuperscriptBox[
    4 n, `" J6 V0 Z# z3 A       RowBox[{"(", $ t6 h9 o; `# g$ t  @2 g* u! a: [) C
            RowBox[{
    3 ?* a5 a8 i1 r( @, ]0 v% u         RowBox[{"-", "0.413043`"}], "+", "x1"}], ")"}], "2"]}], "-", 4 M& v; p* v) w* j  O
         SuperscriptBox[  ^* N4 U" h, D2 e6 E: ]
          RowBox[{"(",
    ! B; e+ N% p4 q+ a       RowBox[{! b2 i, U% @/ R) \/ x, @
            RowBox[{"-", "0.551859`"}], "+", "x2"}], ")"}], "2"], "-", 0 l; A& Y! B# F% h6 e2 O
         SuperscriptBox[& h9 W- W0 s  U+ r0 N- o
          RowBox[{"(", : V2 S1 t3 i( T& y
           RowBox[{
    4 q4 o( {) N7 U( {: r/ [        RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", 8 `+ K  L) \) j7 m3 V8 \& Y5 H5 `7 l
         SuperscriptBox[
    $ [: C- y7 T/ S) T6 U0 c& n      RowBox[{"(",
    # [. X9 b$ a8 y. u, V" T  i       RowBox[{
    ! X0 G2 _$ Z2 x* @( k$ V1 `        RowBox[{"-", "0.230503`"}], "+", "x4"}], ")"}], "2"], "-",
    ' u, o$ m7 Z; ^. [; ]4 \     SuperscriptBox[% |( Y/ i4 Y  r: X$ M
          RowBox[{"(",
    4 X7 Z7 j5 p, X       RowBox[{
    ' V: X0 {) ^0 R        RowBox[{"-", "0.244755`"}], "+", "x5"}], ")"}], "2"], "-",
    , T* R! n1 D! N- E     SuperscriptBox[
    , w! z9 i1 Y, g8 Y# ]      RowBox[{"(",
    8 [3 \/ |, w8 ^       RowBox[{
    , N2 b- e! q6 O$ q" c$ v        RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-",
    9 @3 w9 V; R- Z0 [: L& k6 }     SuperscriptBox[% a; r! L6 U) G4 ~
          RowBox[{"(", " C$ P+ a8 l  o! F' c0 B
           RowBox[{
    . m3 S, p9 d$ m$ ~* m! ]3 a% S$ x        RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-", ) y  r2 r% }0 g# y3 m
         SuperscriptBox[  ^- P1 x) P: E
          RowBox[{"(", & u  R3 a/ T) F; W  {, |
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", & g& L) d7 V: ?
         SuperscriptBox[# z4 G- G% o8 N( v
          RowBox[{"(", * ~/ t9 |" O# S
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], . T; O: E1 P$ }, C  u& e/ M4 S: N8 L6 Z
        ")"}]}]]], "Output",0 r- x6 b' Z) D' {- O
    CellChangeTimes->{3.577961751599145*^9, 3.57801231003125*^9}]
    ( e2 I2 F+ p$ e" w  G* J6 P/ {2 _1 G}, Open  ]],
    + u) {# N) ]( e4 F8 c
    - e- V; M( e; ACell[BoxData[
    ; k0 c5 [8 G  V RowBox[{"For", "[",
    0 z& M5 t5 ~* x$ `, z  RowBox[{$ Q5 K4 \; ^) R+ I$ p" E0 w+ S
       RowBox[{"i", "=", "1"}], ",",
    2 `2 h. Z7 ]% y/ {   RowBox[{"i", "\[LessEqual]", "9"}], ",",
    ; n! U* z2 ]! u( N/ J) `$ \# g; p+ M   RowBox[{"i", "++"}], ",", : \- }& T! V3 p' c* p& |$ ^
       RowBox[{( B+ W' A, O& `9 C
        RowBox[{"Ca", "[",
    6 g: V9 r+ c0 O, d     RowBox[{"[", "i", "]"}], "]"}], "=", . ]1 R0 S4 F, C- X" U1 H
        RowBox[{"CM", "[",
    : j9 z4 m) m# H4 z7 v     RowBox[{"21", ",", "i"}], "]"}]}]}], "]"}]], "Input",( h# Y9 B8 U5 }: b& R' K
    CellChangeTimes->{{3.578012202078125*^9, 3.5780123368125*^9}}],
    + k& F" f% T. |7 m
    / p9 b; f% e& h, m. N' Q# t. OCell[CellGroupData[{
    & l6 S9 g! A; s( B1 e1 c2 V- W1 W' _6 z7 ]" ?0 A
    Cell[BoxData[{
    2 N- ~7 H1 b& h4 J& v RowBox[{"C16", "=", "Ca"}], "\[IndentingNewLine]",
    . N! i' m. p; S8 u RowBox[{"u16", "=",
    + M+ h0 _8 O. a* z9 Y/ G5 l  RowBox[{+ s& O3 F3 U$ j* v1 j4 @% b, h5 T% V8 V
       RowBox[{"Exp", "[", / C2 x( E: v; B& V9 E1 V
        RowBox[{- c6 d: m* K( ]" g
         RowBox[{( ^: G( S5 v  O) M) v( c4 K
          RowBox[{"-", 0 m' g4 q2 K% F3 |; y
           RowBox[{, p4 p2 z$ c! q- |7 @5 L
            RowBox[{"(",
    5 q; N5 J' l* n& r9 T+ w5 ^- `         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    0 W+ x! n8 F3 F" b6 R! L- Y0 v        RowBox[{"(", 4 C! L  ^8 ]6 t7 G1 s" {! \7 i
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],: b/ k, X) b- B4 y( g5 l- Q( Y% O8 o4 p
         "]"}], "/.", "DeltaX"}]}]}], "Input",
    ( C3 F% L: G& Q" i8 V CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    & ?& b. W$ u( S# d  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615741020355`*^9,
    ) t! O3 H6 D  j! N  \1 X; b  3.5779615751004367`*^9}}],
    ) L. y3 b3 S  U9 a& N) N! ?& e
    8 Z9 p1 H- Y: ~6 }1 Z! ?Cell[BoxData[9 z' u0 A4 n+ e* U( ?
    RowBox[{"{",
    , |& O' S( ]1 \% q$ C  RowBox[{, F7 b: X' c" Z9 Y: F, I9 U
      "0.434783`", ",", "0.551785`", ",", "0.530346`", ",", "0.151651`", ",",
    5 m7 f4 g( s8 t; A  _3 t( \& j% q   "0.79021`", ",", "0.529013`", ",", "0.409756`", ",", "0.`", ",", "1.`"}], 0 u5 N7 I# n& r& g
      "}"}]], "Output",* C; Q- l9 r7 f: N# I/ `/ L4 j* \# V
    CellChangeTimes->{3.5779617754359865`*^9, 3.578012314984375*^9}],
    ) g" _3 c1 @: ]1 I2 F# k4 K8 x: N% N. [" r
    Cell[BoxData[. C$ d% M. I! h5 ?
    SuperscriptBox["\[ExponentialE]", 4 [* W4 a) {+ U5 s8 u
      RowBox[{"3.141592653589793`", " ",
    " h/ I( G. x/ F: D6 T; m: J- e   RowBox[{"(", ( l' Z+ P. m2 j6 l
        RowBox[{! S, b- _( x8 X, N* v. v
         RowBox[{"-", - z2 P( X7 e# q, p% U
          SuperscriptBox[
      m6 m' ?& W/ H) p       RowBox[{"(", 4 ~/ I/ l, X1 H. b
            RowBox[{! J1 g$ M* B( p4 @/ K
             RowBox[{"-", "0.434783`"}], "+", "x1"}], ")"}], "2"]}], "-",
    8 m3 @# q6 ]0 T5 O* @6 G( o- B     SuperscriptBox[
    7 I9 A- S2 B$ ?# T  E# E* \9 h      RowBox[{"(",
    # i4 ?8 Z1 }4 O* N; ?. X       RowBox[{. O' X9 B4 m1 d4 b3 u4 R5 B9 Y
            RowBox[{"-", "0.551785`"}], "+", "x2"}], ")"}], "2"], "-",
    0 d. t6 i2 c) B5 v6 o" L     SuperscriptBox[
    4 y2 _! d6 A8 H4 f- d4 N      RowBox[{"(", 6 Z/ |4 l& U: T4 F. x9 I. y( T6 n
           RowBox[{. w, N% t4 q% W) X$ E
            RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", + D" m/ C2 G; ]4 A4 _# _
         SuperscriptBox[+ S) s8 }9 O/ T8 H
          RowBox[{"(", 5 K/ w; ~% \8 c1 O% b2 N
           RowBox[{' V$ Z. m/ j  T5 p
            RowBox[{"-", "0.151651`"}], "+", "x4"}], ")"}], "2"], "-", ; M8 R& U, i& \; P9 c
         SuperscriptBox[& b( i& P1 h+ ^8 d$ ~2 B
          RowBox[{"(", * L" c  J  j8 s0 r# w/ k/ [
           RowBox[{
    ; F( w1 r+ U2 Q7 H. P! ]        RowBox[{"-", "0.79021`"}], "+", "x5"}], ")"}], "2"], "-",
    - `% L! G; C5 _% K/ t     SuperscriptBox[
    ' t' Z' u! _8 d1 ]  V  y      RowBox[{"(",
    " |$ |, T/ k; Q( R       RowBox[{
    ' F% z1 ]5 e; v: K" ~& n        RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    ; k/ P3 R& }9 k! O/ L6 o     SuperscriptBox[: E$ h; s# i5 o
          RowBox[{"(",
      ~# p0 A) v; I. a; x       RowBox[{
    0 k" |/ Z: @, }! g1 ]8 o        RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", ! ]' |& `% C+ g
         SuperscriptBox[
    4 o' |6 a% W7 y: x+ u  l4 ]      RowBox[{"(",
    4 N  R" ?1 f8 a       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    # I, r! @: L& ~# ]0 @$ i     SuperscriptBox[. `; @! F7 L! W
          RowBox[{"(",
    9 [/ ]$ P3 ^# y' g9 ?       RowBox[{
    ! f9 r' J) t& m* A& D6 H8 m/ J# n( ?        RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]], "Output",
    $ |. J$ {  B% R7 _ CellChangeTimes->{3.5779617754359865`*^9, 3.578012315*^9}]
    2 X& G& n! W: T9 j. V, M}, Open  ]],
    , `# R7 I$ v4 C: E3 c/ P3 f! K: y9 Z" a9 W9 t- w% v2 G5 [; ?
    Cell[CellGroupData[{
    ' }/ X% A2 ~% U
    1 t/ s; Z, j9 ~! A! M9 jCell[BoxData[{
    2 q/ I+ ~4 [3 |0 [* k7 C5 B RowBox[{"C17", "=", "Ca"}], "\[IndentingNewLine]",
    * b, I. \$ L0 _8 J RowBox[{"u17", "=",
    5 v# v/ ?) k7 W3 W+ |  RowBox[{
    9 l% H" f5 ~/ i+ z* a9 |   RowBox[{"Exp", "[", 9 v  r) U/ ?8 @9 z
        RowBox[{, {% _9 Z* N) _4 I! s7 k1 J
         RowBox[{$ T7 s: Q# r! C. i
          RowBox[{"-", ' w7 t2 F8 X2 A3 T6 K
           RowBox[{
    7 n; [+ t2 F/ n/ p. `, m        RowBox[{"(", $ V6 C) k, t( d4 v& {0 f
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", " `, q$ f5 ]! M' o5 K" u
            RowBox[{"(",
    0 B- M3 [; r* n$ v         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],0 }; U2 Q1 _5 z* E% _% M
         "]"}], "/.", "DeltaX"}]}]}], "Input",/ d. e) G  x1 B* i
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    2 L) I) C- a1 }' u# I  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615779084415`*^9, " V: H; }3 i, `/ D5 Q/ A
      3.577961578953644*^9}}],
    " F& X8 i  o& R5 n3 x# Z6 z6 S2 T7 o4 D" W% z
    Cell[BoxData[
    : z" P4 i  t$ C9 A  A! n' V7 | RowBox[{"{",
    ) c' ]+ Q% E2 e  }# u  RowBox[{* w7 G) a: U8 q3 _$ w
      "0.347826`", ",", "0.705444`", ",", "0.109343`", ",", "0.072008`", ",", 8 r* Q* W/ ]2 ~% l& l! e( r
       "0.496503`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.752567`"}], ' [/ r* c4 ?6 G1 y5 a
      "}"}]], "Output",# \4 t: Y+ a* `- x/ C7 s: L
    CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}],
    * {0 R+ M& \( p- W2 `9 @7 u
    ! H. X8 J9 O! }" Y! w; K9 `4 CCell[BoxData[
    ) V+ N# Z) y( h. |2 A7 K& z SuperscriptBox["\[ExponentialE]",
    ' b. ?' n* K# S( I* m1 B4 d9 n  RowBox[{"3.141592653589793`", " ",
    ; V9 z& A3 D/ R! }& p   RowBox[{"(",
      t4 N  j+ y4 q. \8 G7 m! n    RowBox[{
    ) g2 C  E8 ~4 N% G, A. k1 j. X  m     RowBox[{"-", % k7 `* {1 V& }( M, O
          SuperscriptBox[
    7 o2 p; J& v7 T9 K       RowBox[{"(", $ p/ L( w2 ^* X( q
            RowBox[{9 Z! R1 ^0 w- j5 [6 a1 ]+ N/ W
             RowBox[{"-", "0.347826`"}], "+", "x1"}], ")"}], "2"]}], "-", 5 R# K/ K+ R9 X: W$ a
         SuperscriptBox[
    4 ?! ]+ E6 V6 E4 B$ ]      RowBox[{"(", 6 `' ^' D& c+ k2 ]4 k
           RowBox[{
    & v6 [  C, C+ y% L        RowBox[{"-", "0.705444`"}], "+", "x2"}], ")"}], "2"], "-", 1 V- G- _" Q- v5 m: U8 s
         SuperscriptBox[  G9 @8 }" v. g) ~! ?" X! X: }
          RowBox[{"(", 8 q/ ~- s5 x: H" q! E
           RowBox[{
    % e0 w  q9 D( L. k/ Y        RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",
    5 k+ d% r% c' }/ B- |( p     SuperscriptBox[
    ; e0 w% l, ]8 P  }- z      RowBox[{"(", / f0 \+ }. V$ C" T. H6 u5 J7 t
           RowBox[{6 h% G# N1 L$ c7 I; \
            RowBox[{"-", "0.072008`"}], "+", "x4"}], ")"}], "2"], "-", . g+ }- M% `) v3 ?* Q/ i9 u
         SuperscriptBox[, Z4 `3 ^7 o! B
          RowBox[{"(", . Z: b1 A$ P; {
           RowBox[{
    & C! p' b% J. `3 K4 \/ S        RowBox[{"-", "0.496503`"}], "+", "x5"}], ")"}], "2"], "-",
    & _* }' ^# S" t6 A     SuperscriptBox[* V% z# C1 S  [5 W% y, A
          RowBox[{"(",
    - S- y+ ^, P, a6 b+ y4 n; L' }! Y       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", : `$ ~* L8 Y3 G5 r( Q
         SuperscriptBox[9 X1 J7 }: X7 A
          RowBox[{"(",   A- X' ?" ~" \+ b( M0 ?8 L
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-",
      X) b( u# ]6 X7 K4 o$ z     SuperscriptBox[
    ( i8 B( N8 _- P9 T7 w, C: L2 e      RowBox[{"(", 7 L3 n3 F; |# @6 l0 R5 D
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    ) V7 F, Y% H- J5 \* B     SuperscriptBox[; `8 m" ~0 s9 R$ d# O; }" H
          RowBox[{"(", ; q: ^% e' f6 o' I
           RowBox[{
    9 w& O9 W5 v5 K+ \& e: y8 Y        RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}],
    ! ^9 h3 `- O- Z1 J- G. T    ")"}]}]]], "Output",; m( i* @# ]# w9 Y! d& E
    CellChangeTimes->{3.57796181215845*^9, 3.578012319296875*^9}]
    # N$ |# f3 S3 T( ^2 u: O}, Open  ]],
    2 q! `0 Y" m- |  \) m
    3 n9 W4 B. B2 M  I3 w. FCell[CellGroupData[{: i; T! _* f& I4 A5 q1 v

    - F) {6 [$ w, V6 ]1 |9 c1 jCell[BoxData[{' S/ q/ \5 w- x8 I
    RowBox[{"C18", "=", "Ca"}], "\[IndentingNewLine]", ) x! _' I: q# J0 Y, t( G5 X- |
    RowBox[{"u18", "=", 0 r% N2 ~( c9 n. z8 `
      RowBox[{4 H# m2 j& I: V. f3 I  z
       RowBox[{"Exp", "[",
    ( @- e3 f$ E& A    RowBox[{
    ; T. [% l- A( a, q4 J0 I8 `6 B) u     RowBox[{
    9 [$ f: E3 J( f# k7 v" L5 C      RowBox[{"-", 5 V% T7 w* U* {" i; ~
           RowBox[{
    / [4 q% @) f" Y* R5 Z        RowBox[{"(", ! U# J4 N/ u% P1 T
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    . T& X) p; J" _        RowBox[{"(",
    8 B5 V/ }* ~* c/ D6 P3 _         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ; c, ~5 w5 L+ v3 c# J/ m0 p: e9 S) _+ R     "]"}], "/.", "DeltaX"}]}]}], "Input",
    5 l# N) Q" m1 f6 K2 [ CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    , l) B' A, l- w- W3 k; X, v  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961581886449*^9, , q' L' o+ O1 Z" D& y$ I, G
      3.5779615828848505`*^9}}],: Q8 Y8 j' A- k

    - s, Q% w7 K  X9 O6 b6 m; s, U6 ICell[BoxData[
    * z6 U& u' ^- ]& R  P RowBox[{"{",
    ( E5 L3 C. ~5 h' N5 k( y  RowBox[{7 X6 X0 \8 Y% x  O# F% a
      "0.173913`", ",", "0.984656`", ",", "0.420753`", ",", "0.137022`", ",",
    + A9 |7 {8 @3 f. j7 {4 e   "0.321678`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 7 T! F# L. }# D- ?" [0 ^
      "}"}]], "Output",
    3 M/ s: p, ]' C9 ` CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}],
    $ W5 G6 V% d) S) ]/ F) I% n: Z& ]3 F3 U$ Y$ l1 H9 N7 B$ E8 v3 y
    Cell[BoxData[! {0 x$ E+ h; j  }9 \
    SuperscriptBox["\[ExponentialE]",
    ( ~: j4 g3 x6 l1 u  RowBox[{"3.141592653589793`", " ", - m) \' b& X& m5 F0 v1 Y0 ^) Q8 f7 o
       RowBox[{"(",
    1 S# W% W0 _) {/ M3 t+ e* a    RowBox[{4 H) G+ r5 ]; z1 w+ ?& {
         RowBox[{"-", 0 u/ ~: L- w- V  ]0 ?  ~
          SuperscriptBox[  T- l/ o0 ^/ m; J1 ~( f
           RowBox[{"(", ; @' a% b' N6 r9 G0 y0 I- k
            RowBox[{
    ( U" {2 x* `3 C! O/ T$ ~- w         RowBox[{"-", "0.173913`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ( R" o2 K, N3 ?) T: l( L     SuperscriptBox[
    + |' D4 R" ^8 B8 }& ~      RowBox[{"(",
    % ~( e1 ~3 E7 W+ G& g; o       RowBox[{
    - k' e+ m: o  N0 G6 Q        RowBox[{"-", "0.984656`"}], "+", "x2"}], ")"}], "2"], "-",
    ) r- T  T" K. s     SuperscriptBox[+ }  Y* |; _$ k( J
          RowBox[{"(", 8 b  x; v7 b$ ^( j9 `
           RowBox[{2 @/ k, u! ?9 E, t& z
            RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-",   \3 h7 q1 c% O3 a# z& z- V
         SuperscriptBox[
    # V) ~: z, H4 _2 |& `: W5 v5 G4 o      RowBox[{"(", $ L; Z; a2 S- g+ H1 O- }3 u% s
           RowBox[{
    " r. X) y$ B! ~) X8 n        RowBox[{"-", "0.137022`"}], "+", "x4"}], ")"}], "2"], "-",
    , }5 }$ x. u" @  p* q! r& x     SuperscriptBox[8 A* v$ p3 G" u) j/ H
          RowBox[{"(",
    5 _0 Z% e2 H! W) I( X2 Q& E       RowBox[{
    / _4 w8 J$ p9 y1 d5 }) b& ^, v        RowBox[{"-", "0.321678`"}], "+", "x5"}], ")"}], "2"], "-",
    + w& A( @7 A  a/ M$ L' m5 Y     SuperscriptBox[/ w. g% J- z8 B5 S
          RowBox[{"(", . h# Y% D6 y; F$ }( ]
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x6"}], ")"}], "2"], "-", ; }" A6 U3 S# y2 P9 B- s
         SuperscriptBox[- i' D7 s/ o2 q! R7 N/ N+ o
          RowBox[{"(", " C" B0 P6 T6 k3 A
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 2 B$ A  v; s1 j* A, v  N
         SuperscriptBox[& i3 r* d# T3 D! u
          RowBox[{"(", 4 U2 U' }1 G( E6 _, p9 }! Z0 y
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", 8 p: g+ S  p: }7 ]
         SuperscriptBox[: M: t4 C( l4 E" [
          RowBox[{"(",
    ) U3 J4 B/ W! P- ]4 B- t" z       RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}], , \$ L' _, {7 I/ {% F! ~3 ]' P5 V" Z4 a
        ")"}]}]]], "Output",4 J; ]3 ^$ m/ L
    CellChangeTimes->{3.577961839926499*^9, 3.57801232378125*^9}]
    5 U) i# T5 K6 z  e3 U8 D}, Open  ]],; ?' l1 R- Z. a
    / m( Y: D. X4 k2 z3 j$ M) z' i6 @
    Cell[CellGroupData[{# K( `# O9 w& q" K3 v4 _, a
    7 ?  X7 _+ ^; }  r7 `
    Cell[BoxData[{
    ; @$ V2 I0 w& X6 J1 {) O3 s. ]9 \ RowBox[{"C19", "=", "Ca"}], "\[IndentingNewLine]",
    9 g+ }- W0 q& P RowBox[{"u19", "=", 9 Z7 y# x8 W$ M5 {2 c" E
      RowBox[{; b) `+ y6 ~! A9 _3 s9 G
       RowBox[{"Exp", "[", ! w# l- ]6 z& g# M( E! H- W) a! b
        RowBox[{0 S& ~' [8 W+ M( n
         RowBox[{
    2 [0 _7 F) g$ i9 A) j. A) t2 U      RowBox[{"-", , @6 q* ?' x/ w1 U8 T. D
           RowBox[{. Q& X( G1 ^6 [
            RowBox[{"(",
      l" ?4 ~8 a( x: N* Y. b8 t         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    * I$ L) }0 W; l) }* R$ b        RowBox[{"(", * U  Z8 R* t2 E' W0 t! [6 X3 |
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
      k$ @/ I$ T: h     "]"}], "/.", "DeltaX"}]}]}], "Input",! B6 c& p3 [8 f8 M0 h6 q8 b$ w# E
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {
    . H8 J: C: A; u9 F7 [/ V  3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615879548593`*^9,
    . k3 a4 m5 p5 P2 n  3.577961588890861*^9}}],
    ' ~: v6 C0 y& h; j7 ^
    4 e8 k5 m/ Y" k% j5 pCell[BoxData[' |& L' I  U# h/ l; b
    RowBox[{"{", & m' v7 v3 o; Y+ N
      RowBox[{1 D6 D  \1 L4 S5 j1 M: B
      "0.391304`", ",", "1.`", ",", "0.452931`", ",", "0.150909`", ",",
    + }2 b/ m& }* Z: r: A9 r& P* a   "0.342657`", ",", "0.370761`", ",", "0.`", ",", "0.509567`", ",", "0.`"}],
    & Q, o! G* g  x& i" N2 w  "}"}]], "Output",
      A; S" s2 \6 E4 N, \ CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}],
    4 X% G  L0 w2 M& W6 f* }/ ?  c3 T$ u3 i4 @7 f& ^9 z
    Cell[BoxData[3 k" a3 R' ]6 R2 U: E7 e
    SuperscriptBox["\[ExponentialE]", * x" U; D; w4 j( N3 w" k
      RowBox[{"3.141592653589793`", " ",
    4 _6 I; a7 g& s. r   RowBox[{"(",
    - n  N% s! r# G# z1 t6 m5 L    RowBox[{
    " d* X* e& n9 N0 m, G: Y2 p     RowBox[{"-",
    $ I/ l0 z- h% \      SuperscriptBox[: s- `4 N& I; C" L. N' L  t% H
           RowBox[{"(", 9 x- X9 R8 j0 f% K! C/ N. t" d
            RowBox[{
    ; l' Z0 ], i8 a, d- g' b         RowBox[{"-", "0.391304`"}], "+", "x1"}], ")"}], "2"]}], "-",
    7 k- A7 _& I! j/ p& h     SuperscriptBox[
    0 @( v; D: p" R' }4 |      RowBox[{"(",
    % [; O0 {; \8 A5 n2 j       RowBox[{
    ( W0 W6 |- H; E4 o; E6 `8 t        RowBox[{"-", "1.`"}], "+", "x2"}], ")"}], "2"], "-", ! u: {4 h+ G) e+ l$ V7 u
         SuperscriptBox[; f! {% i7 n& U" \% u: n2 B+ D
          RowBox[{"(", ! {# D8 T, M/ w% E+ e
           RowBox[{0 Q6 k/ f  t# r, E2 v7 G+ `
            RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    3 l* x3 n( M/ p0 ?! L" h     SuperscriptBox[
    ' u% k6 e9 ^# Z+ p      RowBox[{"(", & |  b( U7 A  m  e0 A
           RowBox[{
    2 J- D* P  d% n6 i! D4 I        RowBox[{"-", "0.150909`"}], "+", "x4"}], ")"}], "2"], "-",
    + s" J  z% X+ P* |% `& y  v     SuperscriptBox[
    ) t+ k  t& {# B0 g: b      RowBox[{"(", " L2 u; @' F5 o- N1 j; {
           RowBox[{( W1 @6 d; ^$ _+ o
            RowBox[{"-", "0.342657`"}], "+", "x5"}], ")"}], "2"], "-", * u  p- N1 d. n
         SuperscriptBox[9 F' E& E$ w( D2 g" i/ m2 |; u
          RowBox[{"(",
    ; C% [, i4 _- n       RowBox[{! T/ ~: T: j4 ^. W9 @* r
            RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", ' q( D! r# p4 M8 p# }- U$ T
         SuperscriptBox[
    ) T/ j. |1 ~$ M$ K8 H! E, u      RowBox[{"(", $ T: M9 i. Y# o  j! D, X
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", + v$ t' J) a8 F' L+ [7 X7 `+ [
         SuperscriptBox[
    4 v) y% e) k+ c9 N. @, [0 t      RowBox[{"(",
    4 t4 q$ s" v3 |& Y1 l0 }- e       RowBox[{
    7 o+ p, T7 @  e4 k3 }& l        RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-", ) o! m+ |7 X; D
         SuperscriptBox[* ~# L" E4 i; b  U; P
          RowBox[{"(",   f4 q' U8 {+ E6 `' z, {& }) G
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x9"}], ")"}], "2"]}],
    - O; r' [; @1 c& ^* [- O' K$ ~2 h    ")"}]}]]], "Output",$ q+ ?0 z, R( @' b" r5 ~
    CellChangeTimes->{3.5779618714853535`*^9, 3.5780123283125*^9}]
    ( z) `5 a  d0 d! \}, Open  ]],5 e) [9 H# u8 F* Q3 p! ~7 ^6 \
    + M. V1 Z  {( F7 M
    Cell[CellGroupData[{
    ( h# K4 g3 j2 l5 ^# W, [# [" F! N0 x, a0 f
    Cell[BoxData[{$ c  B8 X: d* r/ @, [
    RowBox[{"C20", "=", "Ca"}], "\[IndentingNewLine]", 9 r9 s4 [: d# ?) }5 ?) c+ {! s! f' ~
    RowBox[{"u20", "=",
    6 t5 T" ?6 q$ F6 p3 B  RowBox[{
    " s) C5 P+ W8 ^; }/ J   RowBox[{"Exp", "[",
    # c& N. i" [2 }4 t- [/ u$ x/ ?    RowBox[{$ \/ T$ D- ?* P; o. s3 E
         RowBox[{
    9 G3 n$ @# r" \! k: D6 ~- x  J( z      RowBox[{"-", : Y. R& {! S5 B$ ^- ?
           RowBox[{
    1 S4 ?  A8 Q' d        RowBox[{"(", : L+ k$ w$ U5 `7 [- }1 c
             RowBox[{"Xa", "-", "Ca"}], ")"}], ".", 5 D+ W) E/ ?( {* D5 A! }: j3 @; H
            RowBox[{"(", 9 l) J* y5 o& w9 i1 D  y
             RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],
    ; |" ]1 `6 C6 w4 }8 ]     "]"}], "/.", "DeltaX"}]}]}], "Input",
    " k  o5 P2 d) v2 D8 ?9 ?6 w- x CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {6 q5 @" E0 B8 T
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.5779615923384666`*^9, - g0 j: B6 k4 P8 D, N  ]6 a8 n# L% m
      3.57796159382047*^9}}],) t: h! R! l. {9 u

      o7 z" n/ j/ w4 ~Cell[BoxData[; `3 W# ]  d( {  ~* d5 e
    RowBox[{"{",   G4 c  U% n6 k3 a
      RowBox[{
    0 R3 x  {7 K9 b' s8 {1 X% ?  "0.782609`", ",", "0.751623`", ",", "0.177646`", ",", "0.350845`", ",",
    & l* j5 i+ v& H2 z8 E   "0.412587`", ",", "0.502638`", ",", "0.`", ",", "0.`", ",", "0.178973`"}],
    ) s; A/ N7 q8 X3 R  "}"}]], "Output",
    ' V8 v. f/ q/ D' w CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}],( [- E# W* k; ?7 |: m$ R
    5 T) `' n1 R( }, N
    Cell[BoxData[0 y' t2 S+ G! y- e1 f. j0 o0 [
    SuperscriptBox["\[ExponentialE]", 6 Z" t5 J1 a$ F$ P: L
      RowBox[{"3.141592653589793`", " ", " h1 b) d3 t! p% L- j
       RowBox[{"(",
    ; d9 o4 p1 {0 V: N) O    RowBox[{
    " {! |" P- N" y" k5 O     RowBox[{"-",
    - B  O5 ?( E. F      SuperscriptBox[# ]: H! ^6 v. M
           RowBox[{"(",
    $ |6 g9 ?- L' _# ?        RowBox[{
    3 {2 k  K" n5 x         RowBox[{"-", "0.782609`"}], "+", "x1"}], ")"}], "2"]}], "-",
    + Q$ w7 Q: e% D1 n- u9 Y- B     SuperscriptBox[
    ( S) y8 b; ], @2 S3 x      RowBox[{"(", 4 ~5 R, B0 c/ i- d: @
           RowBox[{9 x2 G: z, N7 L: j% q1 J  Y9 `
            RowBox[{"-", "0.751623`"}], "+", "x2"}], ")"}], "2"], "-",
    1 k5 p# S/ f* t; d3 }' J     SuperscriptBox[
    1 E" L, R/ ^: N+ \3 N      RowBox[{"(", 6 |, r4 S* ]' d/ i6 e
           RowBox[{$ Q2 ~# F0 u! Q4 `
            RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", : Z: C; G8 b& n! {7 _
         SuperscriptBox[
    + A# V, L+ y" |5 a7 w      RowBox[{"(",
    " N/ ~' |% v7 w) o       RowBox[{
    ' V8 ]9 L  U5 `( z        RowBox[{"-", "0.350845`"}], "+", "x4"}], ")"}], "2"], "-", , p, y, V2 T) O- v
         SuperscriptBox[
    ) J3 H0 Q/ q3 ^" h: ^- g8 l# P7 p      RowBox[{"(", 3 F/ b& k' c8 S  v( Q0 V# Q" r$ q
           RowBox[{# w2 I  w& z+ i# k
            RowBox[{"-", "0.412587`"}], "+", "x5"}], ")"}], "2"], "-", , f2 v: a5 a: A( p3 H
         SuperscriptBox[: ]' r8 {- |  ~% N
          RowBox[{"(", / j7 T  |) ^8 I0 Y& F# D( q3 j- V
           RowBox[{4 p4 G6 i* h. V3 K6 ?' d
            RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
    + X% r- y. t! i4 F+ d     SuperscriptBox[$ A) z! n: O* a7 b1 {
          RowBox[{"(", $ L9 q+ U. m% M) O  U
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x7"}], ")"}], "2"], "-", 6 H( J8 E9 p" e; Q
         SuperscriptBox[9 l8 [2 K2 T. _0 J
          RowBox[{"(", 0 [- _( g% v# n. {3 g; P
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-",
    4 ?, x& o' y7 o  q     SuperscriptBox[( v* R& {. F7 v4 J. _3 z/ k
          RowBox[{"(", 1 s& G, I) o0 @7 @5 v: }- `
           RowBox[{+ e! V& c# e* q  z5 d/ e
            RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}],
    3 [  \9 I* k: a4 G8 D; i  d    ")"}]}]]], "Output",' n' _8 A8 w6 S& A2 M3 J
    CellChangeTimes->{3.5779618958681965`*^9, 3.5780123335625*^9}]
    0 B4 f  o0 t: Y* J" J1 w}, Open  ]],$ U5 e" z+ |4 E1 S5 z( |

    ' r0 W& v8 n- hCell[CellGroupData[{
    / s  x) t/ ~! [1 x/ D/ q- ^, k  Z. W) K
    Cell[BoxData[{) W: P: Z' `9 J: {" ^8 h+ Q& y
    RowBox[{"C21", "=", "Ca"}], "\[IndentingNewLine]", # b, N( Q: |, i6 v- ?1 x0 |5 G. _
    RowBox[{"u21", "=",
    ( v+ A3 B; |8 ^2 ?3 g$ U1 a! X  RowBox[{5 m1 H0 \% F% d0 ]1 T! Z, m0 s
       RowBox[{"Exp", "[", , a; h8 j  ~+ Q7 Y. A
        RowBox[{% Z) T. R! b: {5 T; H. T- l7 n
         RowBox[{. q5 F5 M- N- c* k" |, x- L
          RowBox[{"-", ' ^( z8 x  W; ?* ?# L
           RowBox[{+ n: o4 d$ X9 I
            RowBox[{"(",
    ) v0 o' I" G) ]6 ?/ t- x         RowBox[{"Xa", "-", "Ca"}], ")"}], ".",
    7 G/ e! y4 n$ F8 S$ [$ n$ s8 L        RowBox[{"(",
    5 j- `# }+ x( r+ i         RowBox[{"Xa", "-", "Ca"}], ")"}]}]}], "/", "Delta"}], "/", "Delta"}],. \! }! D: F0 y2 F2 \! Y- U! C3 N  p
         "]"}], "/.", "DeltaX"}]}]}], "Input",- l' f  H2 C( z( A( z
    CellChangeTimes->{{3.5779614893314877`*^9, 3.577961493964696*^9}, {( U, N5 S8 o2 q6 H
      3.57796154237158*^9, 3.5779615434011817`*^9}, {3.577961596971675*^9,
    $ G" B+ `4 k7 F2 |" f; k$ k( ]  3.5779615991556787`*^9}}],' b, g3 C; T% c% D
    ; c. X) o! M" N
    Cell[BoxData[! T) }1 P$ k3 _
    RowBox[{"{", 7 N8 j: @6 Q0 E6 g/ y! J0 s/ q8 `
      RowBox[{
    " K* I: p) `! I  "0.608696`", ",", "0.606152`", ",", "0.158058`", ",", "0.09017`", ",", ! N1 O3 M; w" d. q$ R5 c
       "1.`", ",", "0.166541`", ",", "0.278049`", ",", "0.`", ",", "0.236675`"}], + P2 F" [+ m* @" o4 @% c' a7 ^; y$ S
      "}"}]], "Output"," V' P3 o' c- f+ n2 H) b
    CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}],
    ' I6 R5 ~! p7 S; t" g+ f( c- n: t; O6 p) M, k) F* d9 K; q
    Cell[BoxData[
    * a7 w8 P# |8 d" c SuperscriptBox["\[ExponentialE]",
    4 }/ j* q' j# e  RowBox[{"3.141592653589793`", " ", % O: m; X5 k+ |2 K& Y
       RowBox[{"(",
    9 a  ^( F1 M* ^& j    RowBox[{# Q- |: z+ z" P2 c) V" l. H# h) k% X
         RowBox[{"-", ' x) n( p, J- O+ [: ^
          SuperscriptBox[
    ) d+ l2 e# s! l6 a( b       RowBox[{"(", $ ~1 o( Z8 D: v& y& H/ S
            RowBox[{
    : k" G) K' p$ k( }+ J1 r& p         RowBox[{"-", "0.608696`"}], "+", "x1"}], ")"}], "2"]}], "-",
    ) q, N& M) ?: ~     SuperscriptBox[
    % W' f# ~' F1 k2 J+ _# l      RowBox[{"(",
    . S$ s9 U+ n+ c4 ]       RowBox[{/ b$ M4 g9 _% {6 X. u5 D
            RowBox[{"-", "0.606152`"}], "+", "x2"}], ")"}], "2"], "-",
    " i3 j6 @" S& Y     SuperscriptBox[
    5 I) s2 Z' o, a5 ^, W$ Q' N6 V      RowBox[{"(",
    ) r' y' m( _+ h. t: s& s       RowBox[{) \8 R3 N+ o# {5 F
            RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-",   k. J6 y! J6 ~$ O! }1 x
         SuperscriptBox[
    2 q* Q" s( B! T5 X- d- g& x  F. g% k      RowBox[{"(",
    : ^7 k$ G& V2 Q4 I       RowBox[{  o; R" O0 n5 N& u# F8 o& {5 T+ E% A
            RowBox[{"-", "0.09017`"}], "+", "x4"}], ")"}], "2"], "-",
    ' O" m7 Z; |4 w9 J# z4 \' E     SuperscriptBox[6 O  s7 f% z) k4 R, W3 z5 D
          RowBox[{"(",
    ' \( P; i! b- E; p       RowBox[{
    & L" Z. ^3 D. ~        RowBox[{"-", "1.`"}], "+", "x5"}], ")"}], "2"], "-", 6 u6 L& k* u, G, H
         SuperscriptBox[% z0 x8 V( B/ E7 |  X
          RowBox[{"(",
    6 t) }+ b* e7 M4 H  s8 X) v       RowBox[{' [3 C& K! U1 J% l4 I
            RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-",
    + z9 l* |6 `% H% A5 h6 ~     SuperscriptBox[  A+ ]. Y; ^% ?  p' b4 E
          RowBox[{"(",
    ' m: O$ w- y$ _% B       RowBox[{
    ! Z( q* M3 M% M' r+ [+ F& [        RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",
    1 Y' b  o3 e: H! u4 \" x     SuperscriptBox[
    & E' i# q8 C: [0 O* c# w- ~      RowBox[{"(", 7 r! c" L6 \# ^7 m
           RowBox[{"0.`", "\[InvisibleSpace]", "+", "x8"}], ")"}], "2"], "-", # L2 |5 S* \+ F
         SuperscriptBox[, q0 }' n4 G- [. z. E7 \
          RowBox[{"(", * f2 E* ]6 }% k! `* l  ^3 x
           RowBox[{
    ( Y3 u0 r! L  h* x& o( z" o7 u        RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], + B2 r" }, m: @/ v7 K; a& ^
        ")"}]}]]], "Output",
    3 V7 @* A* o6 A% N( ~0 V/ E CellChangeTimes->{3.57796192085944*^9, 3.57801233915625*^9}]) v) z: [  C6 f( T/ {7 ~
    }, Open  ]],
    . U; z6 E2 c$ Q$ c/ z3 j9 r" c4 _; b( j; r
    Cell[BoxData["\:62df\:5408wi"], "Input",
    2 u3 B" r0 H7 f9 q& h4 ?2 R0 h CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9}}],
    0 p4 r; X2 @: ^% g2 Q. g& e& @( H4 _8 @" K+ S
    Cell[CellGroupData[{
    + ]8 a) W- |/ M" D9 M+ V. F4 m1 e$ U
      H7 y% G4 f# }  ]. }8 G2 k; n! XCell[BoxData[
    . Q2 ~) G4 m1 Y9 J' b RowBox[{"y1a", "=", 5 I  T% H/ S2 b  k3 }9 |. w
      RowBox[{"Table", "[",
    4 r# E1 j- V* `) `  S, w8 H   RowBox[{"x", ",", 8 O, ~. \( M; a2 U* y
        RowBox[{"{",
    ; l3 [# T$ l) r8 \4 @- g" T     RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",1 @! L0 G: |$ B; n, _8 d3 S/ N6 {# V
    CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {
    3 S( S* C8 l* ?) N9 [1 J+ U) z1 e1 u  3.5779226649375*^9, 3.5779226810625*^9}}],
    " i7 s* A$ }4 C* g! s+ r5 [- C. {0 \; T  u+ D! s: l
    Cell[BoxData[# O6 [8 Q. w: P
    RowBox[{"{",
    $ Y( r8 u6 r( V1 |' Y$ W  RowBox[{
    5 Z- s2 R" Z- N# d  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", / W3 U- P: w5 |/ `
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",2 o0 w2 a7 Z  q  h
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    + y; P% k* _( `6 f! o   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", / c7 k2 p3 J2 S, H; }
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", ( q+ a) [* K" u1 J, y: S+ x
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", : b1 T/ l) |9 n0 n+ m8 ~. w
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", 5 m4 v9 L  e  D( N. v( {; a
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", ' s" c6 x& D( z' G5 M( a
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    / D) g: C+ z! i( P; }3 e; [, \2 ~  "}"}]], "Output",
    4 F4 ~( G8 C. p6 ?3 h3 L1 F+ f CellChangeTimes->{3.577922682296875*^9, 3.5779575713607535`*^9, * x& F) Q" h# ^- X% R( [
      3.577958873908263*^9, 3.5779619268186502`*^9, 3.57801234115625*^9}]
    / _, K& p% Z8 x/ t}, Open  ]],
    ! T- T) M' d3 U8 ]& M& k
    7 i4 D0 l2 }( G5 iCell[CellGroupData[{
    * e4 ]0 a- F4 ^) p8 h
    # t( f0 M* K7 wCell[BoxData[# C9 p8 ~9 q3 s2 }% A2 @
    RowBox[{"Data", "[",
    3 {+ a  h% _5 a8 O: ^8 V. m  RowBox[{"[",
    + i* j% s2 m, B9 e8 P- e   RowBox[{"3", ",", "10"}], "]"}], "]"}]], "Input",5 M+ A2 f7 k3 G' G
    CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {# m, x3 h7 q1 f! Q2 E
       3.577922912015625*^9, 3.577922912171875*^9}, 3.577958877121869*^9}],- y, u$ z9 `) T, _

    ' q+ j: j- [) ~1 ~Cell[BoxData["0.899882`"], "Output",& r0 M& n2 V6 x0 I' ~: p& p6 V. z$ i
    CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9},
    4 W0 D7 F3 P7 Z- Y, X   3.577922913203125*^9, 3.577957573622758*^9, 3.5779588807410755`*^9, , B9 O& `2 I. h1 Y
       3.577961929080654*^9, 3.5780123419375*^9}]
    ( f4 r$ f- r3 l+ t6 y5 K: ~}, Open  ]],
    9 r9 T/ L5 b; |! F
    + ?" N6 f/ G7 b% BCell[BoxData[, j$ x7 h% ?& s2 U$ \  Z
    RowBox[{"For", "[", 0 T" i8 C9 M6 C) Q+ B
      RowBox[{
    ( u) _( r4 k4 T) J5 X   RowBox[{"i", "=", "1"}], ",", % E% V& _& `- t# S
       RowBox[{"i", "\[LessEqual]", "60"}], ",",
    3 i& |( o% _+ H, l6 p" O   RowBox[{"i", "++"}], ",",
    / z! n0 R1 `; N5 R   RowBox[{. A: h+ n" T% M) Q- f
        RowBox[{"y1a", "[",
    8 D- A( U# K5 l5 O3 T     RowBox[{"[", "i", "]"}], "]"}], "=",
    3 I) A. |0 b7 O' C    RowBox[{"Data", "[",   ?* ^; ~( a4 |" {! B3 P1 B" R; f% i
         RowBox[{"[",
    # l" T* g% u4 J1 ~' i) S      RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",& H% ?1 d% G9 b; ?' G2 M  s) F: {
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    4 j/ {1 f; B* w   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    % P* l, j& G$ s! r* M   3.577922923203125*^9}, 3.5779588839702806`*^9}],) C6 S( t4 L) u; m+ I" ~1 u
    ) r/ F! D& D6 x+ s% x: V1 M* w
    Cell[CellGroupData[{' h! z# i$ y, D8 F

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

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

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

    5 C  B4 Y: I+ [4 JCell[CellGroupData[{1 K3 f$ Z8 f2 z- d# i3 B
      }# X6 n/ X) W* h/ }
    Cell[BoxData[
    * Q5 |( z* m  q% v RowBox[{"y1fit", "=", 2 T. f  \' j& c
      RowBox[{"Table", "[",
    5 K7 C4 o& v5 S% F5 {+ s& K   RowBox[{"x", ",", ' y& G2 B. ]- _: _
        RowBox[{"{", 9 N5 {+ H# @5 M
         RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    / r% U' `' a5 R+ X5 b. u0 S CellChangeTimes->{{3.577924969375*^9, 3.577924979515625*^9}, {
    ( B! i$ }2 u9 ~, U/ @  3.5779252768125*^9, 3.577925277484375*^9}}],
    2 n5 ~6 n. D6 ?$ Z- y
    * }  Q5 M' n2 z; n! T4 @" L+ LCell[BoxData[% Z/ \) d! F# ~+ v" E0 ]( F* v; d7 a8 F
    RowBox[{"{", ! p  p( y* s9 F: L" M
      RowBox[{
    % F2 e* s: Q0 M+ G/ S) R. ?2 J4 K  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    * L( O. J) y8 l' p% k1 R) i   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",5 H2 k' t9 b$ P) @: m0 V2 ~' E! c
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    0 g6 n3 _5 D8 t* w  D9 n   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    , Z" X9 N! K' K0 M   ",", "29"}], "}"}]], "Output",
    1 S0 U- l) a4 _0 j CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9,
    + M( O/ S+ \4 F- l, e& d  3.577957594916795*^9, 3.5779589579612093`*^9, 3.5779621294942036`*^9,
    6 N" s* C" V. n% Q+ G0 i: `  3.57801235340625*^9}]
    ) L7 {/ `2 T; d1 k' i# o5 {4 j7 y}, Open  ]],
    6 }/ [! h/ h% t+ a! x
    ) b3 b( t4 Z. p2 t) |. uCell[BoxData[
    8 C& j$ r- D1 Z  f- D  d. v RowBox[{"For", "[", & E) R% z" H* k& j
      RowBox[{
    * g$ U# ~: T% p   RowBox[{"i", "=", "61"}], ",", 9 u  d! y/ Q9 N/ \, y2 |/ y
       RowBox[{"i", "\[LessEqual]", "89"}], ",", 2 z3 B+ O4 \) v5 v
       RowBox[{"i", "++"}], ",", "\[IndentingNewLine]",
    + S; \8 D4 k2 W1 |% R+ f5 L   RowBox[{2 u0 W) Z9 M4 i* N
        RowBox[{
    8 i1 v/ r# j' G" p5 w     RowBox[{"y1fit", "[", . A0 V% \2 Q$ z% x6 h& m/ ~
          RowBox[{"[",
    9 [! o9 m" M* D; ]       RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",
    # j. |/ U: b9 O/ w4 U     RowBox[{"y1", "/.", 1 S6 G7 |/ g5 B+ \. B# Y: y7 x+ j4 |
          RowBox[{"{",
    * X- S2 `2 b: |" z9 v: [       RowBox[{
    6 @3 M0 W1 k  ?/ \+ ^4 v/ x! U        RowBox[{"x1", "->",
    ' ]0 N3 H& P9 F7 s; m+ q         RowBox[{"Data", "[",
    8 l6 e, `& c; a5 E$ ]          RowBox[{"[", ' U% S: U, e  S3 C- {& O
               RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
      h6 L& B2 y( T& s9 i        RowBox[{"x2", "->",
    " J* g" b6 Y2 P- A5 x( L         RowBox[{"Data", "[",
    + k6 [# R+ }) Q          RowBox[{"[", 1 A6 a) j  i4 C0 p
               RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",",   y+ U( p- q9 r0 ?0 ?" B
            RowBox[{"x3", "->",
    + k, K& a/ K0 r0 [7 h' y( o' @         RowBox[{"Data", "[", 9 U) y2 b# y+ \% W. x4 L; Z0 b: |
              RowBox[{"[",
    4 p" U5 S$ A3 t# I           RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    1 `# g3 j) B; Y2 f0 ]        RowBox[{"x4", "->", + q! o; K6 Z2 B: b
             RowBox[{"Data", "[", # |8 A, D+ T" c
              RowBox[{"[", 7 H" r; k, W1 [% a0 H. B7 C
               RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",", # ~% G6 ~+ b) L+ `
            RowBox[{"x5", "->",
    1 n" X: Y* G' i+ p  W         RowBox[{"Data", "[", 0 V# d  C) u' R: D. r6 C  o. j
              RowBox[{"[",
    $ `$ c* }; L* Y6 j7 l           RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    4 F2 v! r2 {6 a5 K        RowBox[{"x6", "->", ) c2 [; l3 i0 K0 U
             RowBox[{"Data", "[",
    1 k* u, }3 T5 {9 `" Q6 W, U- i          RowBox[{"[",
    ; ^( e' [6 f1 J           RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",", ) f  ], x" L  i! k! X
            RowBox[{"x7", "->",
    ! _2 z6 Z! F: w         RowBox[{"Data", "[",
    ( G! @8 c& l  ]; B0 `: b: [. N7 w" H          RowBox[{"[",
    ) z% r: u1 A0 A; J' R3 Q: _/ E9 h           RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",", # {7 l2 _$ u/ [
            RowBox[{"x8", "->", 6 ?0 u/ q0 U. \6 f3 Z  n, H# k
             RowBox[{"Data", "[", : {& M0 v, ~) Z4 a. z7 o
              RowBox[{"[",
    . j# m: W! K5 u8 y5 C* b/ ~8 u           RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",   ?" b6 [' D# o8 d4 l
            RowBox[{"x9", "->", 4 x$ [. T5 w; I/ ^2 s  ~' K
             RowBox[{"Data", "[", 8 X  b  H- o$ r. c
              RowBox[{"[", # Y; W2 A, k2 s# U$ P
               RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}],
    % I3 L' ^, s. o2 B7 o  "\[IndentingNewLine]", "]"}]], "Input",+ T+ P" L4 ^8 v- F9 f# M
    CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {
    0 d' k# o* f7 ~4 j: q  3.577925286140625*^9, 3.577925306765625*^9}, {3.577958922517948*^9,
    ; E: L! d5 \5 f; t; o  3.577958922549148*^9}}],
    7 J$ Q2 h- ]* Z! g+ W0 \$ B: T; B9 Y' A6 S2 c6 p8 T' ]' C
    Cell[CellGroupData[{% p" [& M0 @, R! d; u, x

    5 ^/ p( ?) q; H+ {9 }1 s7 q# lCell[BoxData["y1fit"], "Input",
    6 u6 p6 r* |. J CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {
    & m+ c4 o" w$ f  3.577925040484375*^9, 3.5779250440625*^9}}],
    2 `! R; S. l4 ^  s& y3 R- }
    8 G) A/ q4 ~/ RCell[BoxData[1 \! C1 C& c8 g0 J) x( D' v
    RowBox[{"{", . D% h4 a3 P1 I3 ^1 d' c
      RowBox[{$ A8 d$ Z9 F' j: Z% i; R% U: M
      "0.43193416525930517`", ",", "0.4501634853493982`", ",", , {% O" }; D4 e& L- ^
       "0.33336034768525247`", ",", "0.4418609896858925`", ",",
    * c, x6 _7 u7 o1 E2 {! F, H2 s* D   "0.41030378932283024`", ",", "0.516814798191575`", ",",
    5 ^9 s8 j3 u/ a* v! o' n   "0.4476631213729994`", ",", "0.3016552978696669`", ",", $ L/ ?# I: q4 X6 k; k. O. F: J* B
       "0.378122167437847`", ",", "0.020339844919720733`", ",", 6 P. s2 j9 U9 _+ y1 H
       "0.018745375782087376`", ",", "0.2919925992695025`", ",", : \& |  m8 v; {4 V& R
       "0.2649067959681263`", ",", "0.16343444284525593`", ",", : z6 |0 H8 ?' H, a: J
       "0.4182466778551563`", ",", "0.27347752211364934`", ",", , |/ B+ W& b3 w
       "0.38554057386385654`", ",", "0.35253160453718047`", ",",
    3 y# e# I' A8 e! c) m   "0.2054745841100774`", ",", "0.45504377112716676`", ",", ) v+ \7 K$ O7 D0 ?8 t
       "0.1598805094678612`", ",", "0.18662509982279485`", ",",
    . A9 D; E6 M* l, W   "0.10684797493248213`", ",", "0.013349212673286828`", ",",
    3 s& \9 `) W2 ~1 y- S  w1 [& a   "0.08215836003004297`", ",", "0.2979041599362813`", ",", ( }/ ?8 D; V: A3 @+ L1 j+ S
       "0.05995976512343641`", ",", "0.3884793499104568`", ",", , m5 O$ u( Z7 H" e
       "0.5361889337034293`"}], "}"}]], "Output",, T  [( n% E" x  r) f4 u- i. O
    CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9,
    ' ]/ A% W* Q2 p8 N8 H8 f- ^  3.577925312375*^9, 3.5779575978808002`*^9, 3.5779589654960227`*^9,
    3 b1 _( W! q1 w& r; ]7 c- E  3.5779621416934247`*^9, 3.578012355546875*^9}]2 j; y. p5 Q5 ~# @1 V4 ?9 @
    }, Open  ]],
    9 I6 W# |, H# G6 S% p: p, U/ v, b7 Z* J0 y8 W* V$ L
    Cell[CellGroupData[{
    ! ~2 c4 ?0 K0 E+ ^- i0 t9 k1 ^6 w' h! ^
    Cell[BoxData[( v* E6 m7 q0 @9 _
    RowBox[{"y1fit", "=", 8 q- v! e( ]0 K: x
      RowBox[{"{",
    ! q6 Y4 H3 h0 B: h   RowBox[{
    " O) l) W; D0 t   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    / }( [- v: S: w/ r$ a6 w4 h0 A    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", - H- D1 W+ D3 g  N9 ]7 }. K
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ' a  h, a2 c0 z( i+ m% M% I0 E
        ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", 9 p. {' x2 Z0 [
        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34",
    5 ^7 H" |7 D/ G) Q    ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    " U  m8 s, |2 U9 r    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    7 m% g* N! O' b1 E2 N' K& l2 t    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    & {/ Z' H& x, S) V- g- t& g" h    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    9 N/ l% y( H$ o# H8 w    "0.4319341652593058", ",", "0.4319341652593058`", ",", 4 b: Q+ v' I) c7 p0 Z
        "0.45016348534939865`", ",", "0.3333603476852527`", ",", * F: D, Z- B& u% B9 Y
        "0.44186098968589294`", ",", "0.41030378932283074`", ",", 0 I) D& H8 Z# x8 [
        "0.5168147981915754`", ",", "0.4476631213729997`", ",",
    % F& L1 V7 s- I; f: w( N, R, U4 d+ a    "0.30165529786966755`", ",", "0.3781221674378473`", ",", . {6 R' c" U! p# w0 P: K
        "0.020339844919720775`", ",", "0.018745375782087393`", ",",
    6 b/ U! m. S3 A: c    "0.2919925992695026`", ",", "0.26490679596812655`", ",", - P+ f: c, A( i- K
        "0.16343444284525593`", ",", "0.4182466778551567`", ",",
    $ E- N, j8 S# Q1 ?$ n    "0.27347752211364945`", ",", "0.385540573863857`", ",",
    # g- [. b7 M* d8 T- e, A    "0.3525316045371807`", ",", "0.20547458411007796`", ",",
    , I& H. q1 A, C" v$ X; k    "0.4550437711271672`", ",", "0.1598805094678611`", ",", . L2 D! {( I/ Z. r) W6 \
        "0.18662509982279502`", ",", "0.10684797493248224`", ",",
    * ^  }. D1 C' V; Y. A1 i    "0.013349212673286806`", ",", "0.08215836003004302`", ",",
    3 W& p  @% k2 G0 ?) i& i    "0.2979041599362817`", ",", "0.05995976512343637`", ",",
    & g8 O: `: @# j# V2 i    "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]}]], "Input",' L- [5 c  g: J3 O7 G1 N
    CellChangeTimes->{{3.577959701349306*^9, 3.5779597161381316`*^9}, {- \5 ?. P) A: w# F
      3.5779621548286476`*^9, 3.5779621618642597`*^9}}],
    ! w$ m/ i9 y" M
    $ q" }  f6 ~( c4 n' m& r$ n! tCell[BoxData[
    ) C) J) R4 t9 E0 X2 N3 H% } RowBox[{"{",
    $ A/ ]4 z6 M+ p  RowBox[{
    . l% q) b# i3 S  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ o: M6 b& b3 Z1 O   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",+ s; M+ G+ Y  s8 j1 w3 v# m& v
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    1 M, S; @4 \) [/ b4 m   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 8 U& j/ ?5 ^; Z9 F
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", ' h: `& p$ s8 m/ ?& r' l- d% G- o
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",   @" x! p  ]9 w" _( p# a
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", " M# T7 g% t3 W' R; @. a9 g
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    % a7 V1 q: N0 _3 R' A  X   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", : B3 c1 s9 [7 ?0 m% b6 ^6 R. t
       "0.4319341652593058`", ",", "0.4319341652593058`", ",", % R/ q7 n% [: c: y* h9 X
       "0.45016348534939865`", ",", "0.3333603476852527`", ",", 1 N! F' D9 ^+ b
       "0.44186098968589294`", ",", "0.41030378932283074`", ",",
    ) w4 Y) X/ r9 m   "0.5168147981915754`", ",", "0.4476631213729997`", ",",
    : M. i( `, _  k   "0.30165529786966755`", ",", "0.3781221674378473`", ",", 8 Z/ S5 X" [5 X
       "0.020339844919720775`", ",", "0.018745375782087393`", ",",
    ! m% [5 U+ @) \9 r   "0.2919925992695026`", ",", "0.26490679596812655`", ",",
    4 p% j0 i# q! k* n4 v0 i   "0.16343444284525593`", ",", "0.4182466778551567`", ",", , J! _  Y# Y1 T- m/ l) E
       "0.27347752211364945`", ",", "0.385540573863857`", ",", " m# H4 H4 u/ W- ?4 V, R7 u
       "0.3525316045371807`", ",", "0.20547458411007796`", ",",
    * P' L- G* z$ ]. n0 z9 a" `   "0.4550437711271672`", ",", "0.1598805094678611`", ",", 8 M2 A  e' F. E3 W9 @! l/ R7 i
       "0.18662509982279502`", ",", "0.10684797493248224`", ",", - k7 n5 E3 Y" T
       "0.013349212673286806`", ",", "0.08215836003004302`", ",",
    4 K+ ?8 Z& m+ E- x   "0.2979041599362817`", ",", "0.05995976512343637`", ",", + y, D. j0 ?- ~, d; j# |
       "0.3884793499104571`", ",", "0.5361889337034297`"}], "}"}]], "Output",5 r9 k+ H5 m* n7 s, j8 a
    CellChangeTimes->{3.5779597200381384`*^9, 3.5779621650778656`*^9, : B! H- U% ?  o' `6 c$ @
      3.5780123569375*^9}]8 ?/ Q3 f0 |. ?7 H4 r) S( a8 f6 Z
    }, Open  ]],
    # P( m) T# `0 }; W; A2 o4 U" a( O3 @! Z; U# W" F7 l
    Cell[CellGroupData[{! @1 Z: r4 j) B5 f" z! K
    + G8 t+ F. w  @# p" |8 m
    Cell[BoxData[
    $ d% K, C7 d4 C2 C RowBox[{"y10", "=", , J& J8 h4 ]' r9 {5 N7 |
      RowBox[{"Table", "[", # d. k( t2 R+ e
       RowBox[{"x", ",",
    7 _0 v; f3 c# G! X4 `$ K# ~    RowBox[{"{", 8 o/ ^# i) A9 f7 ^6 M$ [: ]/ e. C
         RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    - A. j2 }9 ?7 d CellChangeTimes->{3.5779253628125*^9}],9 c2 G- R0 I8 O+ B2 ?

    % L: f1 }) q3 F* P+ e7 tCell[BoxData[
    ( y3 h6 S9 Y" [$ a; Y RowBox[{"{",
    + F' y2 p& G+ Y0 {, `: u, U  RowBox[{9 a; P9 i0 S& J
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ; w9 v" j6 d2 @  ]( B
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    8 T! v& Z% M/ \) n4 t6 P    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", ) G6 t: L1 Z5 T8 c9 z. S" U
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", / V, d, O! _! _3 k+ r
       ",", "29"}], "}"}]], "Output",
    6 ^9 X' U' `- }9 n( o1 w$ ^ CellChangeTimes->{3.57792536553125*^9, 3.577957599565603*^9,
    . ^  j2 q7 Q8 m  3.577958967383626*^9, 3.5779621678858705`*^9, 3.578012358609375*^9}]! k/ _* E, b% a
    }, Open  ]],( B% k1 `! A5 K- [0 r4 q. }

    - p5 J* I4 O! c9 p/ ~9 D! X4 _5 rCell[BoxData[, S! k0 ~0 x/ W7 ]: h. T
    RowBox[{"For", "[", : _% b2 h' h, }( Y. j! s
      RowBox[{
    # p0 w2 E* F3 B& p. }' t7 n1 _   RowBox[{"i", "=", "61"}], ",", & B2 k2 i9 D4 T  z: V1 T5 _- w
       RowBox[{"i", "\[LessEqual]", "89"}], ",", 4 x  q# I- f/ Y6 f
       RowBox[{"i", "++"}], ",", , ~% B& W; l' L) O8 A
       RowBox[{2 t" x6 v* L+ T! x) J! `0 h
        RowBox[{"y10", "[", " }0 a, P$ {& Z9 T
         RowBox[{"[", % ]  m' G" a% ~7 T; Z
          RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", 6 }+ w4 ^# q# N% A7 O' C
        RowBox[{"Data", "[", " ]/ Y3 J% U. y/ \
         RowBox[{"[",
    : n5 D; b( n& W) z+ c      RowBox[{"i", ",", "10"}], "]"}], "]"}]}]}], "]"}]], "Input",: }1 o/ T, r7 I- e& p8 ^
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    - p, w) l' N' _3 [, v8 E: M   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9,
    4 [- q+ A- V0 j1 m* b   3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, 5 h% T4 @4 J( X: r! N* W* s" Q) O
       3.577958922549148*^9}],
    , M; A8 ]3 }" \3 V0 b; c* c( u5 X" b8 a  Y/ t8 z- u2 k- S% }
    Cell[CellGroupData[{
    0 N. E- W0 l2 D3 }% l' K" E  D2 E. L% G; b: ^6 F) X. s/ W) A! s8 I! k
    Cell[BoxData["y10"], "Input",& c0 U, \4 A; z: ~0 G
    CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {
    5 R( v. c  ?% s2 Q0 k   3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9}],1 _+ K/ V. E  V

    5 [3 E' t5 K4 Y, ]$ YCell[BoxData[
    / T0 j% e; ~4 M7 G7 c0 d) r0 O RowBox[{"{", ' Q6 `8 K0 r5 Y% j
      RowBox[{
    & M' M# `  F/ e( ]0 W  U  "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`", ",",
    & G) D6 n3 Y* w   "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`", ",",
    - A( ^2 H& d% _# H9 S! j* F5 d   "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",",
    . n. I- v! y! ]2 Y   "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",", $ V2 Q4 m. l- Z' Q
       "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",", - e0 v# n4 Z. o  z* J( ^# ~1 n
       "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",", . g) F& C, t0 Z
       "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",",
    % U' e" L; G3 x* @  h9 a   "0.694935`"}], "}"}]], "Output",
    8 a* a2 ]* `, X1 s5 E3 O CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9,
    8 q" z0 ^9 O- L3 r. @" q1 A  3.577925393046875*^9, 3.5779576032628093`*^9, 3.577958971767234*^9,
    3 Z1 M; `0 H0 {  E+ y5 f8 C  3.5779621736734805`*^9, 3.57801236071875*^9}]) n+ n9 \" S7 X1 _$ a9 ?5 N
    }, Open  ]],4 {7 ~$ Q. y; Z7 A* t
    0 q8 N) O# {. I8 Y; ~8 C% w
    Cell[CellGroupData[{
    / F7 E1 `7 F9 |  V1 [$ |
    1 Q' f! I, ^# W' E: KCell[BoxData[
    8 a% m" k0 Q+ Z: E5 F RowBox[{"y10", "=",
    9 b* _9 x. h% Y: i( W! z2 B# F2 ~  RowBox[{"{",
    0 I! l2 N/ m! s8 a# k1 H   RowBox[{
    3 @0 @8 w, n5 Z   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 a% ]* k! D9 w2 }; ~7 c% X: c    ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", 2 I9 M9 V+ {2 u- u! x8 H4 x- {
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", 4 D  [! W6 C" [# _' u
        ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    & p. V/ P+ f* _1 w: Q    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34",
    0 w- f# C( ?( @    ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", 7 W- @! m9 r! h. F# E
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", " C7 q6 A# S- u* r8 L; n& c
        ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",",
    * P' t6 k: d& v2 g; `. _    "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",",
    6 c5 ~/ F) C1 R$ Y    "0.380742", ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",",
    : A) S: H4 A1 s9 e/ l! B    "0.448763`", ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", 5 V- R* _: k" f& j) m& t. i0 G) q
        "0.057715`", ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", " C! m. L/ R. D- X- Z
        "0.570966`", ",", "0.468198`", ",", "0.414016`", ",", "0.18669`", ",",
    6 r! V# e+ ?2 V3 \3 h    "0.442874`", ",", "0.68669`", ",", "0.244111`", ",", "1.`", ",", # \. L# ]/ t5 M# r5 x2 [! \- O) T
        "0.957892`", ",", "0.266784`", ",", "0.826855`", ",", "0.341873`", ",",
    7 Y6 S8 `0 l0 T7 V    "0.412544`", ",", "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", , e+ a' d0 U$ W5 `6 \! O
        "0.390754`", ",", "0.694935`"}], "}"}]}]], "Input",
    1 E1 ^; H9 K, z CellChangeTimes->{{3.577959733438562*^9, 3.57795974955339*^9}}],
    8 z% X* v) c% X4 X1 K, H$ O, U
    ; h; Z+ C2 x/ PCell[BoxData[
    : F8 ^1 A- ~. V1 z RowBox[{"{", # L4 c* R5 p' @+ [; ~
      RowBox[{: s. ~" ~4 P( k
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    2 k& u' q3 J8 t( Q- {* B. ]) m0 C   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    * H+ [, V+ m  o0 [    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    # O& c  z. |! P6 a. F   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 7 [6 H& y% D+ O. I9 B
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 6 G5 X% z, e8 c" Q1 h% A7 F
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41",
    ) X* t, u5 X8 n6 Y# b0 k* Y5 I   ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    ) H7 f9 K* L, p9 f7 o   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    # p4 Y: I, k& }; I   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.380742`",
    ( J, Q: p3 d6 k   ",", "0.380742`", ",", "0.429034`", ",", "0.193168`", ",", "0.448763`",
    7 c2 [& y4 C1 w6 \! `7 G   ",", "0.442285`", ",", "0.575383`", ",", "0.515607`", ",", "0.057715`",
    , r+ ]" |& Y% i. ^" T; ~   ",", "0.174617`", ",", "0.66755`", ",", "0.371025`", ",", "0.570966`", ",",
    - N" s/ K* R2 `& D% u    "0.468198`", ",", "0.414016`", ",", "0.18669`", ",", "0.442874`", ",", , \1 Q( q" ^0 R' L- \
       "0.68669`", ",", "0.244111`", ",", "1.`", ",", "0.957892`", ",", % R5 c! j* V) u" f  `
       "0.266784`", ",", "0.826855`", ",", "0.341873`", ",", "0.412544`", ",",   N* a& a! b' f8 ~8 F4 `
       "0.322144`", ",", "0.370436`", ",", "0.333039`", ",", "0.390754`", ",", . F* d$ S- H4 @% ~# N
       "0.694935`"}], "}"}]], "Output",0 L/ {  L  A: K/ T9 K2 u
    CellChangeTimes->{3.5779597517529936`*^9, 3.5779621844842997`*^9,
    - O# k; h2 J7 {: G& i  3.578012361734375*^9}]% y6 p" T2 _( U; }5 ^7 Q
    }, Open  ]],
    ( n9 r8 s. f) l( `) e( a2 V! m0 b' p
    Cell[CellGroupData[{
    ( B0 ], P4 ?  q. X
    / }7 o  C, \  R: T# tCell[BoxData[
    8 s# ]( `* ~" p5 g  e% w0 h- Q RowBox[{"p1a", "=",
    - R: Q! ]% i, @; `0 R" d  RowBox[{"ListPlot", "[",
    # g2 y, O" ?) M+ C1 }- O9 B   RowBox[{"y1fit", ",",
    - c- U5 }  z1 t  V. K" {5 ]6 r    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    2 L% p- _( n4 g( t8 ^    RowBox[{"PlotStyle", "\[Rule]",
    / w& o( q. x, F8 k% N$ q% d     RowBox[{"{",
    4 }% H; ~; c$ A( w/ }      RowBox[{"RGBColor", "[",
    $ K9 d" W/ T" q8 H. j  D. F  d       RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",",
    ! R, F& }2 H, G7 C    RowBox[{"PlotRange", "\[Rule]",
    ; x- W) q: u  M* E  j  J     RowBox[{"{", 3 t2 d* L4 I8 V7 a1 t2 X
          RowBox[{) z1 n$ D+ h5 i' y( {& V3 u
           RowBox[{"{", " q8 r; U6 J9 i8 F* O" v
            RowBox[{"61", ",", "89"}], "}"}], ",",
    5 U8 R5 f/ u  @: e' X! e       RowBox[{"{",
    * _- ]" h( S3 q, e7 \' S) x. g        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    - A9 e; _7 y6 j3 B" t( p7 ~    RowBox[{"AxesOrigin", "\[Rule]", ; g/ M- y" B6 v; B4 D
         RowBox[{"{",
    ) Q* Z9 Q* `+ \7 `3 U( \* {, w. W      RowBox[{"61", ",", "0"}], "}"}]}], ",", + d& M2 |* v& V, M9 S/ q
        RowBox[{"Frame", "\[Rule]", "True"}], ",", $ ]1 L% S0 W, s6 u- }- `
        RowBox[{"FrameLabel", "\[Rule]",
    5 |1 a$ f+ B6 R" V# Z6 i% ~     RowBox[{"{",
      @/ `9 {. d3 d& ~3 S, i1 Y      RowBox[{) [7 t7 l' J; g4 P- }+ T) u
          "\"\<\:7089\:6b21\>\"", ",",
    0 l* V* K) U! l8 ]' R: @       "\"\<\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\& x/ i' f4 f5 t$ z! Y
    \:ff09\>\""}], "}"}]}]}], "]"}]}]], "Input",
    3 `7 y* i5 g" P/ s% C+ f, e* r. A2 h CellChangeTimes->{, `% v& I+ e, V4 _8 y8 b
      3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {3 r- _3 d/ k, A- z0 Q
       3.5779576143076286`*^9, 3.5779576277548523`*^9}, 3.577959769006624*^9,
    ' y* Y) |( }/ ?( N   3.577960184458948*^9, {3.5779602338174343`*^9, 3.577960278745513*^9}, {
    ' x0 {* ?% Z' e8 u   3.577960347588433*^9, 3.5779603994429235`*^9}, 3.57801239140625*^9}],! n* A) [0 z. r$ e% a: z& x
    ( t) `, t9 b* I& O
    Cell[BoxData[
    : d! U& f. l( Z GraphicsBox[{{}, {}, $ d* {) t! P2 ^$ [3 r
       {RGBColor[0, 0, 0], LineBox[CompressedData["0 S/ R6 J  f/ l- t, s
    1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn- P) G1 Y) A4 X' r) o) ?1 N5 a
    8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq
    ; {% t0 ^3 ?9 }3 r( ]5 _+ H7 E+ }* ^D3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B
    + {5 |: @4 G2 o& b- C1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX
    6 e8 {1 C$ P2 b* {C1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN
    - T7 X* A3 d  ~2 O! R* w. Fa2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff" n+ O, v! E( L9 a
    yqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb
    6 }' n2 e3 X) D9 B: u) QwrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX59
    7 k( q, n0 |* @6 A7 f1 U( z/ nY6nGQ3sAieueIw==
    - _+ N+ D$ M# B# y9 q6 P     "]]}},# A, x: L/ x7 }% x$ [6 n* ~: Q1 ]0 u  D
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],: [) p3 J) q6 ?) Z' r# V
      Axes->True,
    : I/ |) T" P  J4 J" O/ f  AxesOrigin->{61, 0},
    2 g4 ~& {/ R3 A1 ]" `1 W& Y' [  Frame->True,4 [- L9 i1 N6 b
      FrameLabel->{
      m9 h9 ]3 c3 F    FormBox["\"\:7089\:6b21\"", TraditionalForm], / ^1 G/ F' ^* [  c; [
        FormBox[" z9 Q- F' y6 p2 Z, K& S
        "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\7 G  e( q$ p3 o3 I
    \:ff09\"", TraditionalForm]},: \" j$ h# D/ ^. X8 r& W  m
      PlotRange->{{61, 89}, {0, 1}},5 e( h0 `& S2 B
      PlotRangeClipping->True,* Q6 F* n  B" ]% f
      PlotRangePadding->{Automatic, Automatic}]], "Output",% a) D' e/ n8 S7 z& E
    CellChangeTimes->{8 }+ V+ S! o* b; N4 Z
      3.577925144625*^9, 3.577925396578125*^9, 3.577957630297656*^9, + V& I" v0 l' @! ]
       3.5779576933061666`*^9, 3.5779589732960367`*^9, 3.577959771908229*^9,
    7 Q" S  `' [% T. |   3.577960281756318*^9, {3.5779603518628407`*^9, 3.577960407664138*^9},
    : E0 u1 q, F/ l6 }0 ?' @   3.577962187510705*^9, 3.578012396921875*^9}]
    7 B& J4 A0 Q% O3 n+ f9 }}, Open  ]],
    6 q! ^  K& Y. W( K/ y% f1 M6 f$ t- J% @2 S
    Cell[CellGroupData[{
    4 Z* h, Y2 ^$ k; H/ \) m6 ?* A1 Z& Y5 x0 S2 e, u
    Cell[BoxData[
    9 b) _1 _9 O2 }5 t0 V, t RowBox[{"p1b", "=", " I9 [" ~9 v5 E3 H: B
      RowBox[{"ListPlot", "[", + V0 Q/ u& x. P6 d" z6 L
       RowBox[{"y10", ",",
    6 i- V/ r$ Y8 L- E2 }' W+ U    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    ) @2 j+ M  q, N8 g    RowBox[{"PlotStyle", "\[Rule]",
    / ^6 g& q- M; w) ]4 b     RowBox[{"{",
    , f% a2 s- ~6 B! C  m$ l$ c$ D4 C6 }3 E      RowBox[{
    ; _2 u$ w' B8 r. T+ [- l       RowBox[{"RGBColor", "[",
    - q# V' S  {) @$ @& D2 o' I        RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}],
    % N% S" l6 ?5 A1 K    ",",
    # d7 v+ y( m6 [: }4 N    RowBox[{"PlotRange", "\[Rule]",
    ' A4 X. t, C, `9 t     RowBox[{"{", % u9 i# N0 c9 E6 R: \: m
          RowBox[{
    8 }/ r0 w* [2 j4 R# Y5 [       RowBox[{"{",
    / q+ V$ J* p9 {; v! R        RowBox[{"61", ",", "89"}], "}"}], ",",   Z, k& G! ^6 ^8 q% f0 k" ~
           RowBox[{"{", ( i# m6 n8 Y" k/ e
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", / F" u! Z3 K9 v- K8 ^) g
        RowBox[{"AxesOrigin", "\[Rule]",
    , n: k0 `7 D8 N& n' B     RowBox[{"{",
    0 v- P: x" Y, S( h" Y      RowBox[{"61", ",", "0"}], "}"}]}], ",",
    7 p; {3 b7 X% |& L5 l" F* G* d: v    RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",
    7 h+ \; g9 G* g1 l, X CellChangeTimes->{3.5779253991875*^9, 3.5779576384564705`*^9,
      |0 J. g7 G3 y. I! G+ O9 l, D. q# P  3.5779597764166365`*^9, 3.578012409265625*^9}],
    ) Y5 N# B7 W0 T; G" T& q/ Y  q. i! A7 q+ O: P. Y) e* q5 K
    Cell[BoxData[
    1 @0 `4 p$ o6 s& K GraphicsBox[{{}, {},
    ( n" A; m) V7 ^* s   {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["
    , g$ m$ Q# Y. q  C8 J  L( Z1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ
    / Z& m2 [" [6 w1 f( e/B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy
    # D% X2 B  L" B/ b/ K# t( L6 xGwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy4 H" w" P  C# v5 ^
    GFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy; D; ~8 h( ?! U# e8 U; [; }
    7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/
    9 y& o9 t+ K* E/ r% K* p2 gQu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri
    ( X, l3 m/ C( q, r7 w3 {H+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV& e5 m0 A" k5 [$ b, A
    rQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T
    0 }! S: q6 z  K: q) ~8 QvA==
    8 j+ P( n# d: ~2 m( {4 E  F     "]]}},% [( d) `: {- F' i4 B' b1 u6 G9 `
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],, A8 {0 Y5 H! o/ ~9 }* j% d
      Axes->True,# m, g6 C7 q9 }; I) y
      AxesOrigin->{61, 0},1 U9 l  T; r+ w9 c
      Frame->True,
    * d3 Q  l+ J2 k( H  PlotRange->{{61, 89}, {0, 1}},; l3 f& e  @' I8 ?# g9 a2 p
      PlotRangeClipping->True,+ N- p7 Y4 f9 q/ r& q
      PlotRangePadding->{Automatic, Automatic}]], "Output",
    * v! }, U/ g; Q" t5 G CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9,
    , w. F; U: U6 k2 }% s) ~  3.577957640266074*^9, 3.5779576946009684`*^9, 3.5779589749964395`*^9, % j& p  d% k0 @2 @3 F
      3.5779597781950397`*^9, 3.577962189476308*^9, 3.578012410328125*^9}]  s+ f1 L  j0 l) U- U
    }, Open  ]],  e" n7 N6 |2 W& \4 o6 q

    % l; g! z/ d, O: OCell[CellGroupData[{, G' i( U4 e% X1 b2 B

    ! k2 |1 _8 o1 [$ z$ N; d, }5 ?Cell[BoxData[
    / z. T! G% ]. N3 W* b2 D5 d RowBox[{"Show", "[",
    ; W5 t* B% U" ?& a& \  RowBox[{"p1a", ",", "p1b"}], "]"}]], "Input"],
    - ]1 `! g5 r' d3 @! z4 G0 A/ v( ?% ]3 @2 }0 `
    Cell[BoxData[. ?# A- @! I( u$ ?6 d( u3 z& ]% @
    GraphicsBox[{{{}, {}, 2 c# [- r2 X2 m* }0 J2 z0 Y* u
        {RGBColor[0, 0, 0], LineBox[CompressedData["9 k  u5 G/ J  M
    1:eJxTTMoPSmViYGCQB2IQrbz/js6hf74ODGDwwR5C+zm8FykxOr/kNoTfgMZn! Q: F7 o$ f. J, ]% e6 L4 X, |
    8HfIK73dWHX+DlTe32HNjaOLj4VehcoHOHAIsAYWu0PlHQIcchxULmc53YKq
    2 p( M% W7 @, V. s4 _D3Bg8uYy2N/5AMI/EOCgxV5t0bwMqp4h0GH17wOsQX6XofoDHbYVHgpUN74B" d& W. c( m3 C' L1 F& X; C
    1R/owDX546Pvl6dA9Qc66O7be/+P4WSo/iCHU2FKuxg3XILqD3LY/dVrkfWX
    * D" N8 E0 j5 R; D5 O4 ^3 @) HC1D9QQ67drZXZr8+AtUf5BAnfXhb7xGo+xiCHW5eybq7vOEiVH+wQ9t6xvhN8 v+ h+ P4 X' s: v# W; {5 S
    a2D2Bzt4nBLa8aD/GlR/sMO33SV7//qcguoPcZALP/8iX/4uVH+IA1Po9tff' ]  W1 ]  c& O9 i0 k* P
    yqD2NYQ4dDHpngt5fByqP8TBaOqv3uSo3VD9oQ6/y+//uxLWDdUf6sDLldMb
      l( _3 w* @' ^7 ^9 XwrEVqj/UQcZIcM4dAWj4HAh1CLjff4d78zqo/jAHnahDtTfuQN3rEObQXX59! m  Z0 a. h7 [* d2 X! O( ?, C& l
    Y6nGQ3sAieueIw==
    2 j# `- {; P! x: h      "]]}}, {{}, {},
    ( e# m" \$ q3 l( f4 R    {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["6 L- V. T/ X* ^1 Z; ^/ e
    1:eJxTTMoPSmViYGCQB2IQzZemdm3pP18HBjD4YA+h/RzU1vRuFI67AeE3oPEZ, m$ `) f* [$ Y8 ~1 S
    /B2end/O6l16Gyrv78AgF7hw184TUPkAB46XmkUdO+5A+A4BDvK7FuxL9YPy2 a+ B" C7 C, g
    GwIccqZ8nd2Z+QjCPxDgkH4tyOFW/QOo/kAHNv1fXJd61kL1Bzr4r9OccDPy
    % [, v/ Z9 w0 h  `& PGFR/oMNZa7+LE2OeQvUHOpx8ar/k/r7rUP1BDrwSKrVRrlDzHYIc3sU27/vy! u. Q5 }2 L9 d# V* W# O& B
    7S5Uf5DD3mDG7zb1t6D6gxz0D9hZlT49DtUf7HDkVb8BTwTM/cEOPBv6/WJ/
    . u* W  D8 f' V0 z8 A4 bQu1rCHaoZD5Tw25/Hqo/GC38QhzKjBfL8y5/B9Uf4vBK9ZjRX6GLUP0hDvri
    ) q9 G3 q$ O- y* F2 |& D( _/ _. Z- hH+fOKH0F1R/i0LZqhpf9w6tQ/aEOFn5cn+XSoe5zCHVImah2j3HeFaj+UAeV! w2 a; {" S4 B4 i
    rQFGlluh/j0Q6sC1M+h8UwBMf5jD638bBWSZbkL1hzmUC1gHv7B5Zg8Ayg6T  b- A0 H1 Z# P$ Y. p% T
    vA==
    ' U5 c5 ~" d: C  ~) \      "]]}}},
    # c, u% g7 m& c- B" C! z0 x  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    + ~, o  r' G- c5 L3 [% N" z  Axes->True,0 D% J( g3 n5 G. R
      AxesOrigin->{61, 0},
    / q' \3 o; `6 a  Frame->True,$ O* J$ `5 A" {+ E" {6 Q0 ?
      FrameLabel->{
    : Z" c; s+ g/ ?! g    FormBox["\"\:7089\:6b21\"", TraditionalForm],
    5 P, B- a- {8 o* Y7 O* g    FormBox[
    ' X6 F! ]  ~" G, X2 Z% y    "\"\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf\:ff08\:5f52\:4e00\:5316\' j) ]$ T6 \+ s  x% u
    \:ff09\"", TraditionalForm]},
    1 |9 a& c3 _. Q  PlotRange->{{61, 89}, {0, 1}},
    , `, o* X- A3 i* Y2 D! I  PlotRangeClipping->True,* I. J- W" W; A
      PlotRangePadding->{Automatic, Automatic}]], "Output",5 h/ C5 A4 |1 \% j
    CellChangeTimes->{3.577962196683521*^9, 3.5780124119375*^9}]
    ; U% J# T) V$ I% e, G$ H3 e}, Open  ]],
    5 E. E  H5 e9 [  ~
    & N* m0 n; g; ICell[BoxData["\:62df\:5408wi1"], "Input",& g, i; `( A8 r/ @& L
    CellChangeTimes->{{3.5779225126875*^9, 3.577922521484375*^9},
    9 X$ y" K6 B5 j& S   3.577959662349238*^9}],8 Y% v( i5 @: T5 ?; R4 A* ?. i
    , Y# X/ H4 Z8 g3 m' [
    Cell[CellGroupData[{% U$ z  B1 c  n' g: \% O
    + j& S2 S6 e7 i3 w1 m
    Cell[BoxData[, u4 s6 H7 m  G; e: [
    RowBox[{"y1b", "=",
    3 K+ P* M, @  U) A9 e; R) i5 D, W  RowBox[{"Table", "[",   ^2 c$ A: C. C1 G9 H/ ]" b/ s
       RowBox[{"x", ",", 7 p% o/ E( x) N3 R% e
        RowBox[{"{", 7 F0 ]5 E5 G5 R9 D7 O
         RowBox[{"x", ",", "1", ",", "60"}], "}"}]}], "]"}]}]], "Input",
    0 C6 r* g7 p" ]# A0 U- ^ CellChangeTimes->{{3.57792262821875*^9, 3.577922633546875*^9}, {
    $ Q2 U5 L5 a! I; K; @2 r, c   3.5779226649375*^9, 3.5779226810625*^9}, 3.577958232403945*^9}],
    ! ?7 u5 o" }! Z5 v
    - q. G! L% Q* c% o: P( w. M" RCell[BoxData[
    * p1 v5 o5 I& N+ \  ?* q RowBox[{"{", 7 _& V0 E. j1 B. F% }' X# U; X
      RowBox[{$ i3 a# X6 d& x; ?- X
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    . Y1 P( F* L6 I, I   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",% ~  m% n: \6 c& M
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    # u6 g$ ]* E% q: ?( h) ?; f* X   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    ) Z* o. I2 A3 a1 @" |) o0 @2 x' \   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", - N: m. p1 ]/ T6 Q# e  p
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", 6 G2 L8 X8 h+ W
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", ; S3 v' [% y0 ]
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    9 n' Y2 L- z6 D   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "60"}],
    3 x! }, K% X/ K/ E  "}"}]], "Output",0 A  h3 u0 _' X! g8 h% y- e
    CellChangeTimes->{  J1 b" c( P) x; O
      3.577922682296875*^9, {3.5779582291435394`*^9, 3.5779582351339493`*^9}, % i8 ^3 G- V6 |' l1 u
       3.577958478041973*^9, 3.577959010205701*^9, 3.5779622225483656`*^9,
    : g# w8 J0 g$ k0 ~" ]6 e8 P" N   3.578012438953125*^9}]3 L% c" X+ @( V; U
    }, Open  ]],
    1 W8 c' @  ~/ k# U) Q. R$ ^, J) J  ^7 _# L
    Cell[CellGroupData[{
    ; g" O+ q0 {, b: t  ^
    8 z1 V8 T+ ~& j' X. uCell[BoxData[. r4 Z8 u6 h) M- k' A  H
    RowBox[{"Data", "[",
    ; B% F) @: k; x  RowBox[{"[",
    $ `4 \  ^3 W; d8 O/ C4 n; d   RowBox[{"3", ",", "11"}], "]"}], "]"}]], "Input",
    4 t1 s; o9 S* _ CellChangeTimes->{{3.577922711734375*^9, 3.577922728984375*^9}, {
    5 o/ J3 g4 K: e   3.577922912015625*^9, 3.577922912171875*^9}, 3.5779582414831605`*^9, {
    # P. P/ s# O+ x/ Y3 n  h: N4 {   3.577959014090108*^9, 3.577959016040111*^9}}],
    , b7 L! Z6 i& T$ @3 R2 Q  S  I$ h3 b) r- c0 V) U9 T: R
    Cell[BoxData["0.492958`"], "Output",
    9 A: `' i' M( w6 T7 E' l7 e CellChangeTimes->{{3.57792271875*^9, 3.577922729828125*^9}, 7 u( o9 {6 y) ~# S) @
       3.577922913203125*^9, 3.577958242809163*^9, 3.5779584790403748`*^9,
    6 X, R: k. y$ j1 f   3.5779590175689135`*^9, 3.5779622239523687`*^9, 3.578012439828125*^9}]! J& M# W2 g- `' a. x. B  z- W
    }, Open  ]],
    & D6 c" y6 [' r8 S/ _' S1 d6 @$ _1 \3 f) i1 B1 }+ s% {
    Cell[BoxData[  V+ u. Z, T9 d" Q- v
    RowBox[{"For", "[", ; D# W2 Q" Q4 d
      RowBox[{7 I2 f, l4 I# s8 F6 ?
       RowBox[{"i", "=", "1"}], ",", : j/ F" w3 q; `5 N  Q+ d1 P$ q5 Y
       RowBox[{"i", "\[LessEqual]", "60"}], ",",
    , L8 o& T; ?, v' _) B0 W; F$ b+ a   RowBox[{"i", "++"}], ",",
    8 H8 W+ T% l# K% Z6 P. w4 V6 g# B   RowBox[{
    7 f5 \2 o5 P3 A* V. T8 o. ~    RowBox[{"y1b", "[",
    ) w5 e% ?, G8 {9 I     RowBox[{"[", "i", "]"}], "]"}], "=", & }- Z% }2 v1 J. `3 Z% s
        RowBox[{"Data", "[", ! [. |3 B* G3 p7 U
         RowBox[{"[",
    0 x- p, c6 A! N: S' q: K7 O      RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",9 {. M; y) {5 E: M
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {
    . N( _% J7 R8 v   3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9, 0 ~7 }5 M0 O! ^$ ~) O0 E# T
       3.577922923203125*^9}, 3.577958246272369*^9, 3.5779584755771685`*^9, {+ V' G$ Z. D2 s# H% D  V
       3.57795902089172*^9, 3.5779590227793226`*^9}}],
    ; ?! O9 d* H6 R# k
    8 Y9 T* A/ `# N2 rCell[CellGroupData[{! q, o# w" F. T# e; m. P

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

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

    8 \4 G  w. _5 {+ F2 a1 q5 ^! F! T$ lCell[BoxData[: |' {: p1 c7 L
    RowBox[{"y2fit", "=", , ~1 \- ?9 W( I' ?" G
      RowBox[{"Table", "[",
    . ~- \5 J! I+ t* f/ e   RowBox[{"x", ",",
    & o8 f' J! r0 M. b8 ?7 x    RowBox[{"{",
    4 X8 {4 B9 n/ ?     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",
    6 P. V7 a1 z# w/ w  P3 f( L CellChangeTimes->{{3.577924969375*^9, 3.577924979515625*^9}, {- f' H$ d' q/ N- A- ?5 s) n. s
       3.5779252768125*^9, 3.577925277484375*^9}, 3.5779583246625056`*^9}],  x/ y& x2 z9 h; \1 T7 X" e1 m+ ~

    / u" Y! z! M; I0 ]Cell[BoxData[
      D3 e; @% a; L4 X" ?; n RowBox[{"{",
    2 a9 F0 \- B8 A) B" Z* g; t9 T- `& B  RowBox[{4 Q. {! _5 |1 z3 l: f/ r, x
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", , O+ c: x  b7 {1 g. f1 C4 |
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    5 u( p& j* Q5 j2 }3 m: g3 ^% o    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",", ( g, S2 v) H% C1 S% I0 {
       "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", " j- t) E# G# \! R: R& P+ y
       ",", "29"}], "}"}]], "Output",1 w6 _$ a# }- |4 w; ]
    CellChangeTimes->{3.57792498240625*^9, 3.5779252798125*^9, & p, A7 O) {1 r1 t- A4 C( Z1 G8 b7 q0 Z
      3.5779583268153095`*^9, 3.577958508118826*^9, 3.5779590470685654`*^9, 2 N( H( i, n% A: a" J9 m
      3.577962320173336*^9, 3.57801245028125*^9}]. k/ U# P- D3 W% v
    }, Open  ]],2 _1 \5 _0 |/ j+ @8 \, A+ z& Y

    % o! v2 x+ p: u, @Cell[BoxData[7 b; S8 A# m2 c( l! G
    RowBox[{"For", "[", 6 S& A, ?1 p9 k$ B2 k9 S  p( B
      RowBox[{$ _* K5 ?% j. S5 Z
       RowBox[{"i", "=", "61"}], ",", # H2 A, w  w; Z* o8 }
       RowBox[{"i", "\[LessEqual]", "89"}], ",",
    7 H1 R, p2 M0 {6 M" Y) g   RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", 9 Y# u. b$ o, u3 `
       RowBox[{! M. R# b# T9 O6 B. k0 N; i* P& _
        RowBox[{
      G( `; y3 V6 i  {! {9 B) X7 y8 P     RowBox[{"y2fit", "[", 2 @: }& t" `$ _
          RowBox[{"[", ; e/ U9 k0 z- P9 X  y
           RowBox[{"i", "-", "60"}], "]"}], "]"}], "=", 4 E0 u/ a2 f9 |/ P
         RowBox[{"y2", "/.",
    ; j$ f6 D: i0 u      RowBox[{"{", 4 b$ e+ j( L6 \4 g
           RowBox[{
    * i( X6 s$ T! q+ |        RowBox[{"x1", "->", 5 Q. P4 u: c- @
             RowBox[{"Data", "[",
    ! |8 Z( S( O: c. b          RowBox[{"[",
    6 [8 A; P$ K# `; Q  r           RowBox[{"i", ",", "1"}], "]"}], "]"}]}], ",",
    - }* q' Y: _3 A8 D8 R4 O! i& A, B        RowBox[{"x2", "->",
    . c! n. M$ k' Q8 `, H- ^         RowBox[{"Data", "[", 4 t9 s% ^9 D( s1 r* k/ X
              RowBox[{"[", % Y' d0 x; C8 F5 v* [
               RowBox[{"i", ",", "2"}], "]"}], "]"}]}], ",", . ~$ g' J! s+ y7 s0 s* A; }
            RowBox[{"x3", "->", " |1 d, ?1 U4 m/ s$ m) v; {- Q
             RowBox[{"Data", "[",
    3 e& b  b. g/ h/ R0 A3 h          RowBox[{"[", % d; }3 r- M- l$ o' O
               RowBox[{"i", ",", "3"}], "]"}], "]"}]}], ",",
    ' j; n) H! ~% [; p) ?1 ~        RowBox[{"x4", "->", , F( c' Z; P" ]$ H" t% |1 K
             RowBox[{"Data", "[", - ]- f0 w5 o; D$ h- l3 I: q
              RowBox[{"[",
    2 l3 f* P4 G& l, g0 E3 f# I- P8 a- u           RowBox[{"i", ",", "4"}], "]"}], "]"}]}], ",",
    & z7 g' w5 L8 b& {9 C        RowBox[{"x5", "->", - @1 _: h/ K* J* _# s
             RowBox[{"Data", "[",
      I: T# |! A& v2 O; K5 f' \/ H          RowBox[{"[",
    0 d9 @3 A( g) `& R% k           RowBox[{"i", ",", "5"}], "]"}], "]"}]}], ",",
    , R2 L- l( F" H8 Y        RowBox[{"x6", "->", : f: |: b8 b0 j, L) L2 E
             RowBox[{"Data", "[",
    % h/ k0 \$ S! c! m9 P          RowBox[{"[", , V* m) ^3 y0 s" K' h
               RowBox[{"i", ",", "6"}], "]"}], "]"}]}], ",",
    ) I3 X2 s: c( ^        RowBox[{"x7", "->", 2 B/ X4 Q3 o% m5 c
             RowBox[{"Data", "[", , t. a6 U4 [$ e3 r- B5 k2 V
              RowBox[{"[", 0 |& L7 u" _" I
               RowBox[{"i", ",", "7"}], "]"}], "]"}]}], ",",
    2 ?2 J# D3 p) y( e  Z1 ?$ {  @        RowBox[{"x8", "->", 7 X4 U2 G8 u3 O/ f9 p
             RowBox[{"Data", "[",
    . u" A0 a. W* z8 o% R! A          RowBox[{"[", 2 o. m2 |2 }& E- t! W. L8 X
               RowBox[{"i", ",", "8"}], "]"}], "]"}]}], ",",
    # y, K8 ~9 J1 X3 R+ M: ]# M        RowBox[{"x9", "->", " \9 d$ K; v* l* T
             RowBox[{"Data", "[",
    % N3 q3 t( ?0 p+ Z) i* s, R          RowBox[{"[", 3 B0 x' z' o' f) r& w: X0 G
               RowBox[{"i", ",", "9"}], "]"}], "]"}]}]}], "}"}]}]}], ";"}]}], 3 m% q1 ^+ K2 t
      "\[IndentingNewLine]", "]"}]], "Input",
    % \0 ^. O& Y& l! S$ E7 o# [ CellChangeTimes->{{3.577925003234375*^9, 3.577925028578125*^9}, {
    ' o* T4 d. f/ s  3.577925286140625*^9, 3.577925306765625*^9}, {3.577958329919715*^9,
      L0 y% r0 n" [) g0 j  3.5779583326341195`*^9}, {3.57795892351635*^9, 3.57795892354755*^9}}],
    1 J9 z6 i1 l; J: w7 H% |2 l5 ?( a% \! L7 \% f
    Cell[CellGroupData[{
    9 L, i3 C0 G% _' U: \* o' w
    " m' m  X$ y) T5 X' L9 s5 S& OCell[BoxData["y2fit"], "Input",
    - B& x- I: n( f; A( i% U# s CellChangeTimes->{{3.57783581246875*^9, 3.5778358135*^9}, {
    ! T$ h7 P0 l6 i6 U2 c. \   3.577925040484375*^9, 3.5779250440625*^9}, 3.5779583419785357`*^9}],
    7 u  Y# p+ |0 L3 q% m
    + a, [4 [& S. {Cell[BoxData[- {* [5 i+ ^  P8 @4 O
    RowBox[{"{",
    9 r2 q  n" q/ D* m+ X  RowBox[{
    # {$ j9 T* L% V/ W$ o  "0.4853171132859182`", ",", "0.4508635216665074`", ",",
    " `$ o2 l# V9 q" T4 a, o   "0.3642119241752518`", ",", "0.42852077425595436`", ",", / {. B* B4 c& X! `
       "0.4712694272667798`", ",", "0.5257533056184774`", ",",
    ( D0 O& @2 }" W) Y6 r0 X" z   "0.48620658140716133`", ",", "0.41106838915591876`", ",", 1 k+ l: A% d+ ]$ ?
       "0.5486894206610674`", ",", "0.007731168540073459`", ",", ; P; h- o/ c2 ~$ {
       "0.013872406140339109`", ",", "0.3956995051659558`", ",",
    " M/ u5 J+ S( y! Y: d* `$ Q! [   "0.3663118256142708`", ",", "0.29094217358055163`", ",", * H/ X1 n! Q1 X2 \7 S7 x* \
       "0.5453093690736555`", ",", "0.44138898880777927`", ",",
    8 g; f6 H( M* v6 W   "0.42944922031163496`", ",", "0.43092890556748836`", ",", $ d4 Y. t+ S! T2 l3 b
       "0.5942402821739969`", ",", "0.330046090785457`", ",",
    + X# A$ [+ [5 a& i) f9 g4 b   "0.18938658036630585`", ",", "0.4263720292858679`", ",", / i9 @! u3 G) K* R0 }
       "0.23377136184738775`", ",", "0.02232858193309988`", ",", " x2 V2 A" x- J8 q9 z$ e. O3 e# u
       "0.244364200084268`", ",", "0.5562383565309971`", ",",
    " b: }/ n2 X4 K' i2 q% [4 B   "0.13114103402954333`", ",", "0.5815052048989465`", ",", % B, N1 F, R1 `* q
       "0.4253455966293501`"}], "}"}]], "Output",  S, n% }+ o# M  J$ |  O2 o
    CellChangeTimes->{3.577835814609375*^9, 3.57792504521875*^9,
    . S% R! d' J" v( @. k  3.577925312375*^9, 3.577958343257738*^9, 3.577958511784832*^9,
    ; |$ h; [& l. h' f% Y8 f( J( g3 X  @: v  3.5779590518421736`*^9, 3.5779623249157443`*^9, 3.578012452421875*^9}]
    % E" }. r3 X4 L  M3 F9 K}, Open  ]],) ^: {, F8 e# A1 \. d. o2 A# g

    0 A/ R# S0 ]0 M5 E" [, fCell[CellGroupData[{
    5 M9 S& ~$ ]) X9 Z# p, w" X9 E0 O. F, G% s1 y3 \
    Cell[BoxData[# j( T+ J5 n+ z* m
    RowBox[{"y2fit", "=", 2 F+ T9 ?' [, _6 h- c) t
      RowBox[{"{", - w- k3 r( L' C" I$ Z/ z% p
       RowBox[{8 K3 F8 O# K4 M0 A( m+ z
       "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", % ~' x: U7 q: ?
        ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
    * F* Z4 b2 `+ a$ Z5 f    "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    ' Y, j1 R+ A- H9 Q    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    3 e. W( v) y& y. |. T    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34",
    : X4 z. \& T$ e* d, l  T    ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",",
    , t+ n/ e/ Z! q    "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    * c7 x6 T% }: Q    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", , g# _6 r' O6 S* R
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", ' N* y# d6 P# Y$ P5 I/ p' e
        "0.48531711328591953", ",", "0.48531711328591953`", ",",
    ( i+ e2 ~' L* l9 J+ o    "0.45086352166650845`", ",", "0.36421192417525217`", ",",
    ! s0 j& Q4 F  q( Z- K/ v- v/ A    "0.4285207742559556`", ",", "0.4712694272667811`", ",", ; a1 m3 r8 d6 f& R9 V9 ~/ v+ |
        "0.5257533056184786`", ",", "0.4862065814071623`", ",", . {& Z& o% `0 ~( u
        "0.41106838915592014`", ",", "0.5486894206610683`", ",",
    / D5 @* z6 |- d& |+ V, w8 |8 \2 t    "0.007731168540073532`", ",", "0.013872406140339166`", ",",
    ( z5 a% O. z& y* B* J    "0.3956995051659565`", ",", "0.3663118256142717`", ",",
    6 Q6 L/ U( M4 ~& Q+ m, e8 Z    "0.29094217358055185`", ",", "0.5453093690736568`", ",",
    # h+ G0 S+ s; V& _    "0.4413889888077799`", ",", "0.42944922031163585`", ",",
    ' e* m6 c9 s. o* u; C  x    "0.4309289055674891`", ",", "0.5942402821739983`", ",", ! }! R% E! F( o. E! Z' J* y- r
        "0.33004609078545805`", ",", "0.18938658036630632`", ",",
    6 B" j# r8 M% Y$ ?2 t    "0.4263720292858688`", ",", "0.23377136184738778`", ",",
    ' E0 i" [: Q9 V) I4 U9 v3 Z$ s$ E    "0.022328581933099827`", ",", "0.24436420008426807`", ",", 5 a6 G* z: N8 |* V5 C
        "0.5562383565309981`", ",", "0.13114103402954314`", ",", 4 L3 b2 M" r& O9 |8 H
        "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]}]], "Input",
    ) c  p  j: B$ S7 _4 l CellChangeTimes->{{3.577959355746303*^9, 3.5779593854019547`*^9}, {% Z& P5 F6 v6 @, Y6 Q; I2 u
      3.5779594223272195`*^9, 3.577959425104024*^9}, {3.57796233399496*^9, * N3 v4 B9 d8 Z# t+ U. f
      3.57796233957977*^9}}],
    0 f7 N; d* U; c: H: J! _4 P$ O7 c$ k) Z2 d7 a! b' j" J
    Cell[BoxData[+ f  g/ L, y3 ]+ D& }4 m
    RowBox[{"{",
    - w7 ?1 o2 Q1 w. \9 m: i5 B1 A  RowBox[{
    & r. F8 j) a2 s7 f* ~) z  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", + H) p: h3 L; @- s4 v9 Z
       ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
    & }, k$ C4 q' c2 u: H3 ~2 F! z    ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    6 k  y; @  G7 Q5 N7 P9 w% {   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    # m- ]$ |2 c8 ]" [   ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",", 7 X, q, s1 X2 i
       "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", 0 W, \# O3 W9 z8 I5 |% \+ s
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",",
    + t/ K) d) s  O  D$ T   "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54",
    0 t, n; G+ ]/ u: [9 F+ Z   ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", 4 H; r" a4 b: ~6 z1 L0 |8 v0 p1 e
       "0.48531711328591953`", ",", "0.48531711328591953`", ",",
    - ]5 z% D# H$ g8 c   "0.45086352166650845`", ",", "0.36421192417525217`", ",",
    5 N, ?2 I  s) s$ l, @" j   "0.4285207742559556`", ",", "0.4712694272667811`", ",",
    2 S& E; ?! f2 `0 [   "0.5257533056184786`", ",", "0.4862065814071623`", ",", : L5 ]1 D$ K3 x+ d
       "0.41106838915592014`", ",", "0.5486894206610683`", ",", 8 u7 l7 @9 W+ y5 O7 l5 f
       "0.007731168540073532`", ",", "0.013872406140339166`", ",",
    $ v8 w1 t" D$ p" J$ f   "0.3956995051659565`", ",", "0.3663118256142717`", ",", 5 K# @- X9 V5 h; R% L. k6 F, m
       "0.29094217358055185`", ",", "0.5453093690736568`", ",",
    $ s7 y9 B, |% C' i; G, n( I   "0.4413889888077799`", ",", "0.42944922031163585`", ",", ! l/ @# o) z( Y1 C
       "0.4309289055674891`", ",", "0.5942402821739983`", ",",
    7 |" G7 y8 l$ w" v+ _6 f; D   "0.33004609078545805`", ",", "0.18938658036630632`", ",", % u) `, z4 ~: `0 g* k& Y, S
       "0.4263720292858688`", ",", "0.23377136184738778`", ",", 5 W4 N# l. B( d$ K2 V
       "0.022328581933099827`", ",", "0.24436420008426807`", ",", ' b6 \0 ]0 H# p7 Z
       "0.5562383565309981`", ",", "0.13114103402954314`", ",",
    . R. ?3 M6 z8 p0 o( J/ [) |   "0.5815052048989473`", ",", "0.42534559662935123`"}], "}"}]], "Output",
    1 R) J, |: v1 {# ^3 D CellChangeTimes->{3.5779593961191735`*^9, 3.5779594268512273`*^9,
      j6 d2 S" t0 l5 u8 g' @  3.577962342060174*^9, 3.57801245340625*^9}]
    ; N  _; j; z$ _* \! I, g% u+ v}, Open  ]],  y; B1 M# \2 u4 O# I

    2 N& `* |# u& D4 G3 GCell[CellGroupData[{
    8 z% M- Q3 P% c1 B4 m3 M# ^9 S- c
    Cell[BoxData[
    " C: k! I5 K3 _& m& i+ Y! C RowBox[{"y20", "=",
    2 @3 U& X- \0 ]: t  k6 \+ R$ y3 R  RowBox[{"Table", "[",
    5 b4 _9 o" P( I5 [/ N" ]   RowBox[{"x", ",",
    0 a% b( }( ?9 O& {( g2 N3 K    RowBox[{"{",
    , r8 e7 G: j  L* G" |! A     RowBox[{"x", ",", "1", ",", "29"}], "}"}]}], "]"}]}]], "Input",* M7 g9 M) S( j( O
    CellChangeTimes->{3.5779253628125*^9, 3.577958351198152*^9}],9 Z- @: _- L- ?
    * o8 M4 p8 }. c
    Cell[BoxData[
    9 `" X( t; @5 r) P. O4 _ RowBox[{"{",
    3 |8 o/ X1 s$ N4 u# ]1 {7 T9 N  RowBox[{' f# R) t: W' ^$ W( }# B2 Q$ f
      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    $ J) @( K, x, C, n   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",9 K2 s! z, R. O2 z+ ?
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    $ p9 d1 c8 k4 X+ {8 B6 \% S; Z7 a2 ~   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28",
    : J8 w: o! Z/ Q. G! i   ",", "29"}], "}"}]], "Output",: I8 X- n& C4 f6 f; H+ j$ |, `
    CellChangeTimes->{3.57792536553125*^9, 3.5779583535225563`*^9, ( `2 q: j) K: D6 s6 j( b  {0 v
      3.577958515653639*^9, 3.577959053714177*^9, 3.5779623443065777`*^9, 6 {1 Z2 E$ I3 x
      3.578012454875*^9}]
    3 x. I" [$ h4 d# g}, Open  ]],
    ) f; `- s7 ^' g7 o  S& g) d  j
    ) {( V' U1 ?* Q9 NCell[BoxData[: a+ _0 P9 T/ H7 b/ ^! K, M
    RowBox[{"For", "[", - W1 L9 c1 G. A: @6 u, I! [8 \$ [
      RowBox[{
    2 v1 d$ P6 v# \4 h' w# L   RowBox[{"i", "=", "61"}], ",", 2 b6 @0 j1 Z# k# d, x. c
       RowBox[{"i", "\[LessEqual]", "89"}], ",", / {, ~9 ?7 R- l- ]5 T' U% K
       RowBox[{"i", "++"}], ",",
    & n0 ]) ~1 t: M& i  D   RowBox[{9 f0 B' i# U# I1 \
        RowBox[{"y20", "[",
    2 J/ P8 J  C8 |% B; l: y     RowBox[{"[", 1 G  h8 @& D/ o, w
          RowBox[{"i", "-", "60"}], "]"}], "]"}], "=",
    ( O' l; M1 a' X. N8 \' f0 u    RowBox[{"Data", "[",
    5 V/ R8 V. Y$ C0 B     RowBox[{"[",
    5 o% c8 P& e* M8 k; w6 N      RowBox[{"i", ",", "11"}], "]"}], "]"}]}]}], "]"}]], "Input",2 M! ^5 J% @$ s0 C; }9 W4 W
    CellChangeTimes->{{3.57792259890625*^9, 3.577922624859375*^9}, {  k: v2 L. @2 M3 Q% ~- `- i! r7 J" a
      3.577922687234375*^9, 3.577922702859375*^9}, {3.577922917453125*^9, 9 r3 r2 i1 d9 \; O9 q/ j- O& |1 S3 L
      3.577922923203125*^9}, {3.577925372296875*^9, 3.57792538503125*^9}, {
    " X9 B- S- }7 R5 s; F  3.5779583574225626`*^9, 3.5779583606673684`*^9}, {3.577959056849782*^9,
    , {: P  N5 C8 \  p1 A( p3 K% j+ E  D7 E  3.577959058690585*^9}}],) X. g) D! |: s$ ~$ C1 R' i

    9 j6 D5 ~8 s, N2 h6 V3 ZCell[CellGroupData[{
      ]5 ^1 c, f8 z2 p, k+ O2 K
    5 q8 ?# c8 X0 c- JCell[BoxData["y20"], "Input",8 g8 z. w: }9 H
    CellChangeTimes->{{3.57783581975*^9, 3.57783582009375*^9}, {
    . J! D& Q: f, i- l  N; [6 z   3.57792504965625*^9, 3.577925050125*^9}, 3.57792539146875*^9,
    / W4 H& L% C4 \, n4 ~   3.5779583657841773`*^9}],5 D# |% O1 z$ @2 X) Z9 \& W

    1 [( I3 @& d6 S8 X3 [$ m' D4 U$ \Cell[BoxData[( F; C% [' a7 ?" R
    RowBox[{"{",
    " b; _% @8 v. G1 s& T  C/ T' R5 ~4 D  RowBox[{  @+ N, O! ~* T" y7 a7 D+ O
      "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`", ",",
    8 K6 {* f$ L8 C& \' k& K( C   "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",", " b6 Z6 B$ n  t$ |, C
       "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",",
    , {/ t) L7 y, ~) P, l   "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",", & m6 r& g7 n. j8 G( n
       "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",", 8 E! `0 S8 V; G
       "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",", 5 I& `# O- r' W
       "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",", " q% O# q! X' F4 [! x
       "0.323944`"}], "}"}]], "Output",9 b; `( t4 Q, r* Z# F+ Y/ O
    CellChangeTimes->{3.577835820984375*^9, 3.57792505125*^9,   ~# a5 q* Q; ^  [3 \( ~
      3.577925393046875*^9, 3.5779583678277807`*^9, 3.577958517946843*^9,
    / x8 o. p% E. v2 I! U  X  3.5779590634017935`*^9, 3.577962347629384*^9, 3.578012456484375*^9}]  G% k  t6 Q9 h, x: Q0 }7 w
    }, Open  ]],
    ) ~- J2 R8 i0 c3 u  P7 f5 c, t  a! a% l8 n
    Cell[CellGroupData[{
    ; v7 ~; c4 L) D; r% `3 U" M& v" O! `0 p3 T% C4 {
    Cell[BoxData[
    8 |* s, \( Z# g, w/ i5 c$ s RowBox[{"y20", "=", / {, l6 ]9 p) T* J% J; p) Y) |4 i
      RowBox[{"{", 2 K* n; N# E) A% e
       RowBox[{
    ( ]& ]; n$ t6 r4 ]   "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", 9 ]3 L& q6 C  a; R0 X  K; l9 k
        ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", " D) @3 r; j8 _& C( S3 h9 |* q$ ]
        "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21",
    + e* T: d( |8 o5 h" Z& x    ",", "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",",
    " ?9 _: ]2 ~8 {6 d/ f" f    "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 9 ~1 c% a; n1 B2 @2 ~" _' P
        ",", "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", : ]7 M0 z; v, H2 \
        "41", ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47",
    ' z( R9 j' e& s4 N    ",", "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", ) H& `4 `4 W! }0 K0 t. d
        "54", ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", 5 Q$ j% g/ \+ V2 ]! g
        "0.507042", ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", 1 e; d4 C; F6 e$ X/ l
        "0.338028`", ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",",
    . Y( x( J# M: }    "0.408451`", ",", "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", 3 ^& O' M8 P3 H: S( _5 o
        "0.746479`", ",", "0.887324`", ",", "0.84507`", ",", "0.704225`", ",",
    9 i' E6 {  x% s3 J+ v2 K3 c/ `  C    "0.760563`", ",", "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", 8 D1 x0 a; h9 U# Q% M+ H! d  f- P
        "0.295775`", ",", "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", 9 x4 {. @. l5 g' C
        "0.732394`", ",", "0.802817`", ",", "0.746479`", ",", "0.380282`", ",",
    % w  s4 x* H$ g) A  r! W    "0.56338`", ",", "0.323944`"}], "}"}]}]], "Input",
    1 j* g) c/ q6 r/ _ CellChangeTimes->{{3.577959534959416*^9, 3.5779595573142548`*^9}}],
    7 w# `6 j! d. G7 h  F/ P# B% r/ l2 l5 B2 r* N
    Cell[BoxData[/ X. w$ O* m" u1 h
    RowBox[{"{", 5 w1 Q2 X2 f# Q' J
      RowBox[{
    & Q: h0 T" E9 X; Z( u3 ~: G2 `* S: A  "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
    & l0 y" H, X& G2 \   ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",5 y# e" N. Y7 m; k3 n! \: @
        ",", "16", ",", "17", ",", "18", ",", "19", ",", "20", ",", "21", ",",
    ( m5 n* h, e* h   "22", ",", "23", ",", "24", ",", "25", ",", "26", ",", "27", ",", "28", 9 M) N) P7 q# s& f# m
       ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", ",",
    / d7 g7 |8 a" e3 k( L   "35", ",", "36", ",", "37", ",", "38", ",", "39", ",", "40", ",", "41", 9 J& O8 ?1 i4 j
       ",", "42", ",", "43", ",", "44", ",", "45", ",", "46", ",", "47", ",", ; ~+ Y( A/ d* f4 O+ e7 C
       "48", ",", "49", ",", "50", ",", "51", ",", "52", ",", "53", ",", "54", 0 O: U/ _% v" E
       ",", "55", ",", "56", ",", "57", ",", "58", ",", "59", ",", "0.507042`",
    0 P7 x( f6 Z: y/ }" r   ",", "0.507042`", ",", "0.239437`", ",", "0.394366`", ",", "0.338028`",
    : o/ u) g( Z$ c- M( J   ",", "0.394366`", ",", "0.15493`", ",", "0.591549`", ",", "0.408451`", ",",. n( k& z" a! E5 L7 P8 I
        "0.295775`", ",", "0.661972`", ",", "0.774648`", ",", "0.746479`", ",",
    $ K- ]* o$ H, c& l! s1 q( ~   "0.887324`", ",", "0.84507`", ",", "0.704225`", ",", "0.760563`", ",",
    . E) C. \- s8 o   "0.43662`", ",", "0.633803`", ",", "0.422535`", ",", "0.295775`", ",", 8 X: z7 l- P; J5 L8 }
       "0.309859`", ",", "0.408451`", ",", "0.197183`", ",", "0.732394`", ",",
    , R; J' R0 [+ j' y2 n; L   "0.802817`", ",", "0.746479`", ",", "0.380282`", ",", "0.56338`", ",",
    * a' [0 _5 L9 A' t; W/ T" \   "0.323944`"}], "}"}]], "Output",( `: ?$ a% M; o" Y3 t
    CellChangeTimes->{3.5779595594514585`*^9, 3.577962351778991*^9,
    + q" }+ E$ J8 J  3.578012457234375*^9}]
    ; X" h. Z0 S3 G7 N$ `: z4 }8 M9 v1 V}, Open  ]],
    ( X( B' ^' S9 s/ _0 }: D* K- |: ]4 a
    Cell[CellGroupData[{; W7 D1 S+ D' u- X

    " l# ?0 P5 B- F4 a4 J$ f" `Cell[BoxData[
    3 |) ~) f; A. [" ?* A RowBox[{"p2a", "=", 4 N7 M' n, y8 M! p  j
      RowBox[{"ListPlot", "[",
    $ j0 \$ P- G0 o0 ~4 ^1 i6 g$ _   RowBox[{"y2fit", ",",
    * w- [3 w& t; [    RowBox[{"PlotJoined", "\[Rule]", "True"}], ",", . b3 {$ [5 ?1 l9 t, {8 F; \& r
        RowBox[{"PlotStyle", "\[Rule]",
    8 C$ g$ ~2 g- ~6 j+ y     RowBox[{"{",
    , F% ^0 o) ?4 P5 C$ r  \3 H      RowBox[{"RGBColor", "[",
    , [7 }/ Y! {8 ]- }' c) e       RowBox[{"0", ",", "0", ",", "0"}], "]"}], "}"}]}], ",", " O- _9 l7 Z& z7 I1 F0 f2 M
        RowBox[{"PlotRange", "\[Rule]",
    0 Q0 B9 t! g* o) u8 c/ |     RowBox[{"{", 6 E4 r9 y" k% Z
          RowBox[{8 z+ b: n# U0 [5 h- ?2 z' b3 S  k
           RowBox[{"{",
      p' w+ u4 y8 v8 v5 A- U; P1 u+ g1 z        RowBox[{"61", ",", "89"}], "}"}], ",", $ G% Y6 R" i" }
           RowBox[{"{", ) T, c) g& u1 y& s) o2 [% S
            RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",",
    ) c' t$ p$ f( ~    RowBox[{"AxesOrigin", "\[Rule]",
    # z4 V9 e9 Z- X' u5 h     RowBox[{"{",
    " N7 E  b  R# K+ L& ]& s6 z      RowBox[{"61", ",", "0"}], "}"}]}], ",",
    6 R/ F% Q" k$ T% [: r    RowBox[{"Frame", "\[Rule]", "True"}], ",", 2 G: q- B1 H7 E+ C$ m* E# y
        RowBox[{"FrameLabel", "\[Rule]",
    8 `/ x: r0 a, m/ `4 s  U* x     RowBox[{"{",
    ! s7 h" a( d. P) E) @. D      RowBox[{
      L' Q6 _; a7 k2 e1 Z      "\"\<\:7089\:6b21\>\"", ",", ; F" l- w4 n' e  [+ P
           "\"\<\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\
    . ^  |1 ], t, H( o' r- }/ e\>\""}], "}"}]}]}], "]"}]}]], "Input",
      {) a; M- ^% ?9 ^! l: Z CellChangeTimes->{, M/ o5 M  ?* q9 Z* H7 \
      3.577925078578125*^9, {3.577925141125*^9, 3.577925141453125*^9}, {* d, G& D' ?* `& q
       3.5779583712597866`*^9, 3.5779583781393986`*^9}, {3.577958536604475*^9,
    - M+ T& p1 j/ B   3.5779585491624975`*^9}, {3.5779592802577715`*^9,
    0 M' B% b8 P* a   3.5779593014270086`*^9}, {3.5779594039971876`*^9,
    " U2 i. |! N/ O4 q   3.5779594059783907`*^9}, {3.57795949706695*^9, 3.5779595174717855`*^9}, {* d3 P% m: z7 s
       3.5779604302529774`*^9, 3.577960442311798*^9}, 3.57801246978125*^9,
      S( q7 P8 e& b! X   3.578012920859375*^9}],
    . b3 C9 L+ J5 y% V  u1 C
    # v1 E  Q+ b$ \1 u8 j5 z# A$ R  eCell[BoxData[4 i7 A8 Z" O  U) w7 |+ N8 u
    GraphicsBox[{{}, {},
    0 R1 {( w! z% {5 y; ?0 D   {RGBColor[0, 0, 0], LineBox[CompressedData["
    3 S; e  V' V/ R+ ]1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM! ?. N- {4 A- x$ M
    /g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ$ W1 i& o7 D/ E# A2 G. X
    9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P6 i- F% r5 d. Q5 w
    ofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC0 M0 O3 U+ `, w' }5 q" n, R+ H% o4 w
    qPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK' w$ Z& w6 ^$ f8 i3 F
    1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx
    & R# F) _* w! L0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p1. i2 O6 O  u8 }; t' }: w. D& C- Z
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH
    ( f2 w3 N  E2 [. t( |' h99yxuG0PAHw7nyU=: p" v7 n5 u/ k, V  o: T! `# D. ?# ?
         "]]}},. `" S9 K! ~9 ?$ f3 L0 Q
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],$ o, q: M; o0 E6 ]. k
      Axes->True,/ H! u# e) i/ w( A# p5 V  H
      AxesOrigin->{61, 0},6 Z# W( n" v& N/ q0 O3 {! ]- F
      Frame->True,
    / ]' h9 U# M8 j& X% J: A  FrameLabel->{
    8 s" \2 ^) s& i    FormBox["\"\:7089\:6b21\"", TraditionalForm],
    4 D" d7 T) z- D  `& l% V    FormBox[
    , M, c$ s0 j# C: O' N' v    "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"",
    : {" W9 u4 ^6 l3 O) o     TraditionalForm]},
    $ p; ~* d- N3 e  PlotRange->{{61, 89}, {0, 1}},
      L7 n7 b; w- G3 {4 p, {  PlotRangeClipping->True,
    / M) m- |; f; U& x, l  PlotRangePadding->{Automatic, Automatic}]], "Output",1 s6 d6 @/ @* q, W) o" |
    CellChangeTimes->{
    6 w5 Y! ~$ L# X" h4 s6 c; w  3.577925144625*^9, 3.577925396578125*^9, 3.5779583797150016`*^9,
    ) f& y7 h* f/ b, \   3.577958519990446*^9, 3.5779585510813007`*^9, 3.5779590670678*^9,
    . j3 A8 H; y) r! y   3.5779593035642123`*^9, {3.5779594075383935`*^9, 3.577959430158433*^9}, 7 A0 |( a$ j0 }4 L
       3.5779595184233866`*^9, 3.5779604438874006`*^9, 3.5779623548833966`*^9,
    % U* t& L) s# X   3.57801247209375*^9, 3.5780129225625*^9}]
    ) z( p, s6 v; A& x7 _8 k( p, ]8 \$ }}, Open  ]],
    , y: ~; O" h. C0 }  D; D0 K3 I4 K# m. ^. E2 a* _9 y: Q7 ^$ l& }
    Cell[CellGroupData[{
    0 H6 ~% `4 [$ \; [( i
    7 L) o8 }% [9 v# [& a# LCell[BoxData[- q2 D7 c- Q+ S* Y% W/ m/ ^7 ^
    RowBox[{"p2b", "=", 2 T( [7 w/ f1 _. Q: h, G
      RowBox[{"ListPlot", "[", 9 t+ D+ i3 e# o* D, q
       RowBox[{"y20", ",", ! W: v: y3 y7 N2 l+ j+ Z- l
        RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
    * q5 C, l  a) U( }& B% C& D    RowBox[{"PlotStyle", "\[Rule]",
    0 T1 N5 ~* b& [; \( A. {( a. D4 Y* V     RowBox[{"{",
    % R$ Z) r. l* S7 \* N      RowBox[{8 J7 S9 H1 b& F' }% W
           RowBox[{"RGBColor", "[",
    3 U( v9 m9 f+ i. |        RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", "Dashed"}], "}"}]}],
    5 A; ^5 P5 q4 G; a& t9 Y+ m) a    ",", / x, P/ x! c( L# h( ~
        RowBox[{"PlotRange", "\[Rule]",
    ; J5 v3 V# f$ u6 e/ E" t% w  v- ~     RowBox[{"{", 4 A6 |) g) J1 l5 X$ m" v: Q2 W6 y
          RowBox[{/ K& H$ {) _8 m2 c
           RowBox[{"{",
    ; N& }& D# Q2 ^        RowBox[{"61", ",", "89"}], "}"}], ",", . v: o- e, F* G# l3 z
           RowBox[{"{",
    : x+ H/ O4 P' t+ S, {        RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ",", 4 m: j& B* n  f
        RowBox[{"AxesOrigin", "\[Rule]",
    : |; F5 c1 Z0 x  r, |9 D+ P9 i1 d+ X     RowBox[{"{", 2 A/ [3 s  W" V8 H0 B& u0 ^
          RowBox[{"61", ",", "0"}], "}"}]}], ",",
    1 C# D) U5 u  T9 |+ F    RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}]], "Input",
    2 t2 G7 g5 y# u7 o3 e/ M CellChangeTimes->{7 q* Q' U( W7 L! \" _; ^
      3.5779253991875*^9, {3.577958382429406*^9, 3.5779583843326097`*^9},
    + a9 g0 G7 N3 x' s2 k   3.57795855655691*^9, 3.5779595724462814`*^9, 3.57801248346875*^9}],1 l6 @% J8 L+ u: n: n1 ~( p0 Y

    , A1 m4 Q# W/ G- zCell[BoxData[1 a4 I6 Q4 l: a9 R2 w' f  }
    GraphicsBox[{{}, {},
    9 ]' a( j0 |3 H* |8 ]. J   {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["
    $ y" x# K+ X/ D3 z- a2 g( ]1 j  s' A1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn% s$ S4 l7 P+ n1 l; k2 t3 [& p
    8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV$ [: F1 c) T0 P- S
    c/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc
    4 ?! s' B  g/ ViX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk4
    % `; y, @1 H7 W% G' ITZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO
      v* ]6 K* X2 M9 B( ^2 }5 P0 @! [2 XfzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB
    0 A/ V) M2 I# T9 eTWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG! [! i9 O$ C1 J: x. K
    p0OYg4Fg/tz63VfsAdsCnzU=8 W  a" r" P" t" d8 {
         "]]}},
    9 V0 n3 g- L* Z  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],+ K( f) F! s# f
      Axes->True," w: p$ r1 {; h* c
      AxesOrigin->{61, 0},
    5 g. n. V3 r/ F' l% Q. M  Frame->True,
    * I# a5 T# w6 N+ ~) t  PlotRange->{{61, 89}, {0, 1}},
    * S& G- X4 _! q1 m# `' V  PlotRangeClipping->True,5 @2 ~) v8 B% U+ ?+ {1 T
      PlotRangePadding->{Automatic, Automatic}]], "Output",2 E! U/ _0 z0 a( s
    CellChangeTimes->{3.577925147265625*^9, 3.577925400640625*^9, $ V1 N: ^2 l: Q, ]. o9 B4 p+ e- ^
      3.5779583861890125`*^9, 3.5779585219092493`*^9, 3.577958558132513*^9, ; d+ ^$ x$ O0 I1 u: G
      3.5779590691114035`*^9, 3.577959577906291*^9, 3.5779623569426003`*^9,
    0 L! V/ D' d# V) G* [, ?, M5 Z  3.578012484703125*^9, 3.578012925875*^9}]5 J& _& i' L2 J5 s( X' q
    }, Open  ]],
    * l1 O  c7 V  t# `6 f1 v
    1 _9 _; R3 K( G8 _Cell[CellGroupData[{9 F( k2 {0 t5 Z7 B* S
    4 \  {& T6 A7 O6 l% L4 |! Z
    Cell[BoxData[8 o% U2 I5 O# ]( e: C
    RowBox[{"Show", "[", . w" x4 u9 t) u/ o2 V+ \
      RowBox[{"p2a", ",", "p2b"}], "]"}]], "Input"],
    7 f5 B3 C, r0 O8 A+ h5 C8 Z- I* O. l/ Q. y2 y( S
    Cell[BoxData[. Y7 c$ V  T* a
    GraphicsBox[{{{}, {},
    % }, D1 o: T. C! t, ]    {RGBColor[0, 0, 0], LineBox[CompressedData["1 f6 P9 E  x0 K
    1:eJxTTMoPSmViYGCQB2IQLfG6//j9f74ODGDwwR5C+zk4KBc05fPfh/Ab0PgM
    ' X; i! X* G; y7 d- {) k/g4m4oprPt26A5X3dxAJP9lu738dKh/gcKP+aOqjnNsQvkOAQ9SpXDt3zXtQ4 ]# |& t/ C0 A; D6 B
    9QEOX5eumfHj0gMI/0CAg/bMflMmOZj5gQ4JrN9OfvS7BdUf6LDxwhrZu30P
    4 p3 {% ], j" H! Z) W- M! qofoDHVZuXXhg+6p6qP5Ah8uuLVeVMnug+oMcck/nsagE34TqD3I4uP6k+vJC0 d* v  ^5 Q) q
    qPsaghzi+pXfnJ53Cao/yOHQV+9FOsVQ8xmCHcrmvJ+53R7qP4dgh6P/FKdK8 ~0 b' m/ X, F6 a! n, E4 [$ U) {0 @
    1ED90xDsEMcvcjVsCpR/INih6pmNEQvLY6j+EIfv6m2LK+WvQvWHOOTuqzlx
    * m9 N' V& I1 g8 c- x0fYEVH+Iw5EJuS/WesL0hzi8kP0QYPHmLFR/qMO/I2uO+N6dBtUf6rAj61p1+ y0 R4 _& `8 B! i  j% n
    sPt5qP5QB47ZhxK3nIG690CoQwOb5i6rkweg+sMc+K6uP7th9iOo/jCHdUEH: l' h. Q# `- _
    99yxuG0PAHw7nyU=: A+ V3 _  q8 y: O% i; j$ h" @0 G
          "]]}}, {{}, {}, 8 ^. B7 |0 ~9 o9 ?% p4 b
        {RGBColor[0, 0, 0], Dashing[{Small, Small}], LineBox[CompressedData["- w5 W. G8 _+ @- {: I
    1:eJxTTMoPSmViYGCQB2IQbff56PXX/3wdGMDggz2E9nPoi/ymssHyAYTfgMZn9 x9 h0 i3 [' @  c0 |  G$ w
    8HdY88xS6f7Sc1B5f4clDzSfeNnehMoHOGSUexg6LLoK4TsEoMo3BDj8WDWV$ z  E) x- x( N; Y
    c/+VwxD+gQCH6gx57R9vH0H1Bzpw6R9cya9yC6o/0GFSzD/nX28vQfUHOvgc/ j* Q% X+ _9 G$ y' P
    iX5+X+8pVH+gQ4eu7axXJ19A9Qc5WF5ueav++DlUf5DDkWlyvl9T3kD1Bzk4
    / f+ u& V, o* A$ f  M: @TZ1le4HrNVR/kMP2iwz3mDqfQfUHO4S2FZp3hEHNcwh2WPHYkHnqx9tQ/cEO; U- T! H" P* Z. D0 h3 w
    fzMXW8l6PIHqD4aaB5VnCEF1r0OIw6lD16/vunIZqj8E1X8HQqDhcxKqP9SB
    * U' }5 r) M" X+ I) o% t, l1 GTWdn19F8mPtDHa63f3Vbu+ElVH8oqv8OhDrkVAUEdIXdgOoPc9DhS68zZYeG( H; I$ e5 B* t; x* d. W
    p0OYg4Fg/tz63VfsAdsCnzU=
    7 U2 N1 P. s7 z5 w" v      "]]}}},
    ' r# n8 n  N3 `+ e0 Q! t2 ~  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    # {& j" B4 ^  c7 p: w3 X5 q  Axes->True,
    # M/ D8 [+ [; N0 q  AxesOrigin->{61, 0},( c" x9 L8 X5 `' K
      Frame->True,. U6 I9 j5 i3 u; t
      FrameLabel->{7 ^1 o" Q7 A! k  H. n
        FormBox["\"\:7089\:6b21\"", TraditionalForm], 0 N# J" U5 V7 Q) m9 X
        FormBox[5 h, [# ]0 v! p
        "\"\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6\:ff08\:5f52\:4e00\:5316\:ff09\"",
    6 m% B1 ?6 g1 i3 N1 F  |! _; r     TraditionalForm]},  u$ p# i; A4 g  ?: Q/ W; g
      PlotRange->{{61, 89}, {0, 1}},
    * ]* v6 G, L2 P2 @1 T; @6 g# K  PlotRangeClipping->True,  N% ^5 {. Q/ v; H
      PlotRangePadding->{Automatic, Automatic}]], "Output",( o" W1 [& x/ S2 r: u" V
    CellChangeTimes->{3.5779623624182096`*^9, 3.5780124863125*^9,
    , \  M! u. e8 ]; ~# Y  3.578012927734375*^9}]- z0 `% u  b6 U5 i
    }, Open  ]],, m; [7 G" C& i7 }* t

    " G* M/ w" g: d+ M$ F) K& xCell[BoxData[
    , I% m3 \7 D0 g% B) b RowBox[{"\:ff08",
    # P% a  H$ N$ d# B! h% I5 O* n* I  RowBox[{$ h6 W5 n0 x" G% W' v* [5 n  _
      "\:5df2\:77e5\:521d\:59cb\:94c1\:6c34\:8d28\:91cf0", ".7406", ' B. p! O! E- S; d* P: P. d
       "\:3001\:5e9f\:94a2\:8d28\:91cf0", ".4621", 4 f7 M( g/ v3 H; P, t8 U
       "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea60", ".5208", 3 g7 A+ L! `. Z
       "\:3001\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:542b\:78b3\:91cf0",
    . I9 @5 k, k4 `' e! e/ \3 L% a   ".2221", "\:ff1b\:76ee\:6807\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\4 w3 [  g2 D2 \5 _3 d0 _% P/ e
    \:4e3a0", ".6224", 7 m5 U1 C) G2 M6 ?( Q9 A* {
       "\:3001\:76ee\:6807\:94a2\:6c34\:7684\:78b3\:542b\:91cf\:4e3a0", ".2521"}],
    1 X, f" L& ^- L1 K   "\:ff09"}]], "Input"],+ ]9 p6 d/ J$ `( H
    $ K7 b8 [% T7 r/ x0 v
    Cell[BoxData[
    2 H$ V  h! k0 S8 q6 f9 k$ T RowBox[{"{",
    - |% u8 N3 B/ W; @% I  RowBox[{
    / k9 A; M, G' V  "\:94c1\:6c34\:8d28\:91cf", ",", "\:5e9f\:94a2\:8d28\:91cf", ",",
    1 l% m$ ?' H0 ?! d   "\:5439\:6c27\:91cf", ",",
    . ^6 }- R% [) [8 N   "\:4e0b\:526f\:67aa\:65f6\:7684\:542b\:78b3\:91cf", ",",
    3 X7 W  i  l9 ~& s: C# q/ `   "\:4e0b\:526f\:67aa\:65f6\:7684\:94a2\:6c34\:6e29\:5ea6", ",", - j2 B) B, v- ^2 U9 S" H
       "\:5757\:72b6\:77f3\:7070", ",", "\:8f7b\:70e7\:767d\:77f3\:7070", ",",
    " e# \6 R7 L1 n+ L) z8 J, T   "\:83f1\:9541\:7403", ",", "\:5757\:72b6\:767d\:4e91\:77f3", ",",
    * \% b+ m% q- G0 s2 M   "\:94a2\:6c34\:7ec8\:70b9\:542b\:78b3\:91cf", ",", + ~# t: h" v4 g( E
       "\:94a2\:6c34\:7ec8\:70b9\:6e29\:5ea6"}], "}"}]], "Input"],
      q1 P4 o/ H# o( V9 G3 y) f% V( c) V; K/ F) l
    Cell[BoxData[" "], "Input",
    7 H0 P$ `5 J* f8 n CellChangeTimes->{3.577962834553033*^9}],) w+ h7 _- U, R  f! j) K6 \0 X8 I
    ! e9 H* h: K: E" f% V5 V% B
    Cell[BoxData["\:94a2\:6c34\:7684\:78b3\:542b\:91cf"], "Input"],% @3 J1 \$ a, R9 P8 O

    ( |2 f, b: d: A& ?0 Z  Q, O; {" _Cell[CellGroupData[{9 }' }/ `; u9 u; x
    0 H) ]1 F, z8 ?4 [
    Cell[BoxData[
    4 l6 j1 a. M* r% z6 y9 n( P- n RowBox[{"y1", "/.",
    - q. `. r+ ~' C  RowBox[{"{", 7 O( Q7 p1 j+ K: L: j" g0 u/ {
       RowBox[{
    * W3 j- X, c) \/ v3 `' X    RowBox[{"x1", "->", "0.7406"}], ",", ' g% p: g. L! t0 O
        RowBox[{"x2", "->", "0.4621"}], ",",
    6 }! A1 M& y2 c! J- u  O, T    RowBox[{"x4", "->", "0.2221"}], ",", ! t4 c/ ^  \3 J9 P6 P9 U  N8 }
        RowBox[{"x5", "->", "0.5208"}]}], "}"}]}]], "Input",+ `& O0 u/ G( M% s% c! i/ ?' Q5 b
    CellChangeTimes->{{3.57796267209435*^9, 3.5779627224200373`*^9}, {
    . g  U9 |: V0 E  3.5779627663029137`*^9, 3.577962774820529*^9}}],
    $ C/ W; T! I9 i( i  z
    6 b# j% G1 N. SCell[BoxData[
    2 K. P- u4 _8 {8 Y; R4 m& h' R RowBox[{+ T# r4 O2 X8 d- q/ N3 \
      RowBox[{"0.2286149508637297`", " ",
    2 S" C4 d" Y* |' P   SuperscriptBox["\[ExponentialE]", " N; L! p7 q# o! P! O
        RowBox[{"3.1415926535897936`", " ",
    ( t% R( l2 E6 w' n7 i/ }+ B5 G  d     RowBox[{"(", 2 V* U6 ?2 W; q" q: @
          RowBox[{
    1 I" X, G: l# [( B" n* u       RowBox[{"-", "0.17911224641499998`"}], "-",
    8 s. x, {7 f  r6 Q( [  ]       SuperscriptBox[; ]- Y* ]& ?! z4 {. M- F
            RowBox[{"(",
    9 q+ d' r  w& D         RowBox[{
    6 D( b- f* s9 d          RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-",
    ; r& G4 y5 H+ ^$ r. H       SuperscriptBox[
    4 _1 n! x1 Z) g# X* i        RowBox[{"(",
    7 x2 v- K4 A; g; M         RowBox[{
    # Y& f+ w5 q& u9 u          RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-", ! n, a9 I# ^9 g
           SuperscriptBox[/ e* N5 ^, r0 D( B( K0 g
            RowBox[{"(",
    & D( ?( E/ h& i6 D: d         RowBox[{, `) h! L2 Q: o. _3 q4 w, Q7 Z. k
              RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", 8 I, A5 l; U- {9 j
           SuperscriptBox["x8", "2"], "-", " {" d) ~/ ]6 x& X+ ]1 {
           SuperscriptBox[
    - |/ W4 I7 V1 }; r8 O8 d        RowBox[{"(", : R' e! Z" f5 g  k) x. Z, Q9 q3 I1 b
             RowBox[{
    " j9 ^* v% V0 g1 v, J          RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+",
    - G) o+ K2 T4 ^1 S: b/ D  RowBox[{"0.020180806675835994`", " ", 6 b" y- ]2 j: d0 l6 S# c0 V2 [
       SuperscriptBox["\[ExponentialE]", + h9 J4 `* w4 g( J0 y: B2 s
        RowBox[{"3.1415926535897936`", " ", + R5 G1 l( Q: b) ^9 q7 R
         RowBox[{"(",
    ( w$ R0 ]- i/ j, z      RowBox[{( |4 _3 |1 \/ F) W( m
           RowBox[{"-", "0.105619387859`"}], "-", 9 |- A6 v2 W" g$ m2 I! T
           SuperscriptBox[' f0 @  Y% B& F* j
            RowBox[{"(",
    1 E3 p: l& N% S         RowBox[{/ ?3 h) I( b& D- F* Y
              RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    3 ^; L1 d( ]# g       SuperscriptBox["x6", "2"], "-",
    % e% h( u% [: |; W% U" E6 H  X. h/ ?       SuperscriptBox[8 U3 ?) I" y+ Z7 m4 W
            RowBox[{"(", ; o1 B$ ~+ P! s% E1 d. F
             RowBox[{) k, k" z1 V* c$ i4 f1 Z  X5 ^3 g
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    & G/ o, f5 N6 ]* g       SuperscriptBox["x8", "2"], "-", & E$ x1 u- ~% B& x6 [$ F9 k
           SuperscriptBox[
    5 Z$ R% o2 B7 E# C5 g% h8 M        RowBox[{"(",
    3 T6 m& O8 v" l( o& Y         RowBox[{
    ) y+ x) q  `2 U8 B4 b7 r- e1 a& h          RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],   [% V/ j6 ]1 R2 w2 T5 j
      "+",
    % e* E$ O3 U% A% T8 t) C( f, ?  RowBox[{"0.13092706311748437`", " ",
    7 k3 Q2 F; j( A% J   SuperscriptBox["\[ExponentialE]",
    # ~: h2 M, P4 |4 _! A5 L& K" M. b    RowBox[{"3.1415926535897936`", " ", % A1 W2 H4 Y& ~2 t, F) Y
         RowBox[{"(", + a+ s8 `: ^2 U1 Y1 T
          RowBox[{
    2 y- r- q0 L* n1 d4 d       RowBox[{"-", "0.236605670085`"}], "-",
    2 b0 n  _, u6 ~- t! |0 p; Y       SuperscriptBox[6 E* M5 ]2 K" ]. B
            RowBox[{"(",
    2 E  l7 F  C) c; \         RowBox[{
    * y8 L1 U* J. c9 e1 B8 |6 h          RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-",
    # g! T) y2 b( \% H% B6 C       SuperscriptBox["x6", "2"], "-", 8 h8 l7 i0 B, l/ E0 d, }  C. Q
           SuperscriptBox["x7", "2"], "-",
    ! n/ E9 B, U4 O       SuperscriptBox["x8", "2"], "-",
    . U% ]/ w+ ]6 n$ B$ N  r% I       SuperscriptBox[
    ( u1 _7 I1 ^& j5 y        RowBox[{"(",
    5 n* k3 _) M# T6 H( ^9 l5 S         RowBox[{) Q( V6 P: a4 G- k+ p
              RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 3 a+ [6 C' u( p
      "-",
    6 Y) F. m9 }0 O  `  RowBox[{"0.033459349088924784`", " ",
    ( _- y% J# ^$ O  b6 {   SuperscriptBox["\[ExponentialE]", 4 v. y0 j2 l" ]+ M* I* E9 j
        RowBox[{"3.1415926535897936`", " ",   B/ h3 e+ V! ?8 M+ Y3 _# E! R
         RowBox[{"(", " t; A- y% Y) _7 A; J8 J
          RowBox[{
    0 `# o) k# o$ [0 e8 y- j0 H( s       RowBox[{"-", "0.46221081830200006`"}], "-",
    ) }' t  N. ~. J6 a! c5 \, \6 m       SuperscriptBox[5 c; W5 p+ s! B2 M8 j, H
            RowBox[{"(",
    $ n+ [/ p) r3 h4 e7 e$ \; O         RowBox[{9 g6 u2 H! S, |4 y3 m; t& `
              RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-", 8 j# F0 d/ L6 g1 L/ n2 Q
           SuperscriptBox[9 Y9 A  ~* N* b0 y
            RowBox[{"(", - h, s" i. e: w2 C6 \8 ?. Y4 ~
             RowBox[{
    6 ^+ U! y/ C6 @: I' D/ J  A          RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", 2 B1 I, {" n8 c) u; A* P
           SuperscriptBox[
    2 |. [4 `3 w7 ]9 [9 E        RowBox[{"(",
    " [( Y+ w& H% e% B         RowBox[{
    5 G4 v4 ]; _0 e+ O# T* E( q          RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-",
    + L6 Y% @) o, T5 o. _! y       SuperscriptBox["x8", "2"], "-", ' F# h" _# ~3 D1 ~" s8 q
           SuperscriptBox[
    * m5 v# t) O2 m        RowBox[{"(", 1 f# r0 Q# E) F$ x: {2 ]
             RowBox[{1 i+ l# M3 y& C  j8 i
              RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    3 q& M# T1 g( A5 P  "+",
    1 P3 ?! O+ G9 r8 _% Y2 u; n' z  RowBox[{"0.39611806709006653`", " ", 8 G- F/ J( I5 Q
       SuperscriptBox["\[ExponentialE]", ; s. c$ w) u7 H
        RowBox[{"3.1415926535897936`", " ", 8 F" R" j! E/ y  y! t9 w+ J
         RowBox[{"(", ) e2 a2 r, R, d: g) T
          RowBox[{* w, d! v7 r& V1 e5 P
           RowBox[{"-", "0.5837889295140001`"}], "-",
    . A& h. Q2 G! m9 p- c  h( ?) U       SuperscriptBox[
    9 g# z& T" Q5 ^5 D1 ]$ K% M        RowBox[{"(",
    . S" B+ B; y. `4 J' x2 Z         RowBox[{* _3 {" a0 Q- J; `* {7 o) t1 e8 r
              RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-", 0 v, g( Q$ Q4 k5 B
           SuperscriptBox["x6", "2"], "-", * q& q3 t! M6 ~" ~
           SuperscriptBox[
    : H& y( N& M* Q( B5 n0 G        RowBox[{"(", 3 r7 ^6 t# S0 x" W3 @+ K
             RowBox[{+ [* H. |, R! k# L& m. l
              RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-", ' R' W4 h$ D6 g
           SuperscriptBox["x8", "2"], "-",
    8 r: `1 |, t/ {* p       SuperscriptBox[0 H* r4 Z, u/ u) }* S1 b/ [
            RowBox[{"(",
    0 U* M" X7 I) z; a         RowBox[{
    & i" y) S% t1 j* d: e6 ]6 t          RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    ) K/ o) E/ n; W+ j" Y1 s) M8 s  "-", 2 O9 o  e1 e: }! f4 q1 z4 ^; ^
      RowBox[{"0.19996885877792045`", " ", + ^  ?. f0 g" W. l6 A# s
       SuperscriptBox["\[ExponentialE]",
    6 R/ I7 N. \/ u7 @9 G6 `    RowBox[{"3.1415926535897936`", " ",
    5 E5 G9 ~1 C+ e2 ?8 o* @     RowBox[{"(", ; F( F# G" t' I* X( c
          RowBox[{" _: S. e7 K+ g
           RowBox[{"-", "0.19030188470200005`"}], "-",
    $ J. ^" w- b9 `+ p% g       SuperscriptBox[& c9 w3 P" i/ {) V* r/ V
            RowBox[{"(", + l3 v6 K7 H8 ~7 {
             RowBox[{
    $ v2 f# i7 a' C# n4 b# {$ z          RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", : ?" F3 m6 n& L# L4 ]6 a
           SuperscriptBox[
    6 Q! l$ E: r$ S5 \  u) A        RowBox[{"(",
    & p; {( c; r) [+ Z, N- ~3 v* e8 y3 u         RowBox[{
    ; q# s/ A! f, D- h4 o" V3 ~  r$ W          RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-", & I8 O0 I8 Z3 e( F8 b% T6 A. o5 h
           SuperscriptBox["x7", "2"], "-", / r0 }6 Y0 H& M. s
           SuperscriptBox["x8", "2"], "-",
    3 ?- U% [! u' y+ `0 n       SuperscriptBox[
    / I) [5 N9 F  j+ b4 c        RowBox[{"(", + I; A# M0 `' p# q$ _$ T1 `
             RowBox[{5 U  V& x1 m$ E( z: @
              RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ; ]) O3 J7 y, O0 _; Y
      "+",
    3 o. R0 I1 ]) g  RowBox[{"0.23580523388620744`", " ", 6 k6 Y0 Z% x. H( K: v
       SuperscriptBox["\[ExponentialE]",
    + u$ H5 ]- G2 U- O; x    RowBox[{"3.1415926535897936`", " ", - I) s+ c* W; \
         RowBox[{"(", ; o9 b( O- F' E* q
          RowBox[{2 i3 z' d# C& w+ m9 e0 W
           RowBox[{"-", "0.28518780882`"}], "-", % G1 }& }7 @7 q% {, ^! f) p7 `, M
           SuperscriptBox[, p; V- ]& Q  P. Q4 ]
            RowBox[{"(",
    7 k2 C) {' E' K% s; {: W. ?* h         RowBox[{
    ( `8 _; O7 _& a          RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-", , x+ q( z' f. @: s, k
           SuperscriptBox[" ~4 s' v' X% H, c8 s$ F' \
            RowBox[{"(", & }+ _( t3 w5 Q  T2 `* m9 Z
             RowBox[{
    9 ]" u. i3 t2 D) q& P          RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-", 7 @# U  \. ^- O/ d/ ?
           SuperscriptBox[
    % X( k2 C2 t; m# X7 g        RowBox[{"(",
    ' i& e! J  N9 b* `4 ^' W3 W* M% I         RowBox[{7 w. A: I; F1 \/ ^2 H3 P
              RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",   Q' Y; l3 G/ o4 f" K
           SuperscriptBox["x8", "2"], "-", , M" n# b* p' J! R
           SuperscriptBox[6 r( D3 N: @- j) D/ \) z/ M% \* [
            RowBox[{"(",
    / Q; R1 q( a  P$ Q  t1 Y8 n3 S         RowBox[{/ k& m9 K* D: V: E( S$ K/ b
              RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    : \" G  m. Z& |& Y6 f  "+", $ r8 O& R  T  Y; K
      RowBox[{"0.667027259367853`", " ", 9 W) J( ]( x0 N+ a# x
       SuperscriptBox["\[ExponentialE]", 8 T& ?* F2 v  |% F
        RowBox[{"3.1415926535897936`", " ",
    * d5 _; F( g7 O! G     RowBox[{"(",   u1 q  c' k' a
          RowBox[{
    , c3 g; y6 O8 U4 ]! u/ l4 _       RowBox[{"-", "0.11387365200400001`"}], "-",
    ' C* I* s: ]! w- @9 V       SuperscriptBox[
    : ~( S9 r; _# T1 q! ]$ x        RowBox[{"(",
    , e% V/ S* C7 V, E1 _, I6 h/ L         RowBox[{
    7 B4 B( B) x# v          RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", 5 j% W" _) N1 M9 b; V7 t2 N
           SuperscriptBox[/ L" v7 G+ `+ E' e- x9 D$ L
            RowBox[{"(", : ~  _3 p- {1 B
             RowBox[{( ]  t- F/ P: O% g. ^
              RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-",
      y2 d; e* K6 x5 b* d0 ^8 t1 y: m# t       SuperscriptBox["x7", "2"], "-", ; f3 _. X5 t  Y- m! l
           SuperscriptBox["x8", "2"], "-", , k. z: z1 h. F$ K. r) i, V: s: @
           SuperscriptBox[( ~) t! n! P0 L- `
            RowBox[{"(",
    ' q! x' _& D6 _/ }* V         RowBox[{
      c" J( n9 ^% r" _; _          RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], 2 N1 f; U0 B+ f, s
      "+", 1 g+ o2 \% B6 W* L* J/ ?* \
      RowBox[{"0.25282438852646905`", " ", $ i9 ]  ]/ {* Q* _
       SuperscriptBox["\[ExponentialE]", - g1 z5 n4 h# M# r* G  r% X" G
        RowBox[{"3.1415926535897936`", " ",
    $ N" @" Z3 k2 r! g/ J) F     RowBox[{"(",
      ?: d3 m4 K6 [, U& Y' S% z6 j/ h' S3 M      RowBox[{
    5 ~/ L; W5 q0 n9 g; t       RowBox[{"-", "0.11442644782500001`"}], "-",
    , n7 N  U4 O- |0 S% k9 Z4 y       SuperscriptBox[
    / {/ I1 v4 F0 \& L        RowBox[{"(",
    2 x, G8 E! p) ^7 r; _7 U! G         RowBox[{
    ; j; w) p8 `& p! G& P' ~& d/ B# s: |          RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-",
    7 S7 ~% q" Q; J: n       SuperscriptBox["x6", "2"], "-",
    2 _" _* Y7 u  w& E% E/ t       SuperscriptBox[
    ' ^& q  h( x' `$ k  Q1 M        RowBox[{"(", ; g# s) K5 X: [+ h8 ^" C6 t& E
             RowBox[{
    / D5 i2 p! ^( A8 z$ U2 G0 q. c9 d          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 1 z; r- r2 X4 }# y- h5 N! d' d
           SuperscriptBox[/ O# `2 h7 A  Z0 T* ^
            RowBox[{"(", 6 f  e2 I7 `" ~# c0 \
             RowBox[{" q' D4 N: T( h. p. R4 L2 _8 L
              RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-", 7 q; T( f. n# r3 D
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    5 ^$ v" B# T5 a4 p  RowBox[{"0.07581214474544536`", " ",
    8 E% e8 \+ ?4 U6 _   SuperscriptBox["\[ExponentialE]",
    7 P" J  d2 z/ H5 }    RowBox[{"3.1415926535897936`", " ", 7 A4 \* L  h( M3 V, s: P- \4 |
         RowBox[{"(", ) h/ R5 S# c) U6 M, S' `& j
          RowBox[{. m1 e' e; W. l5 o, [+ `
           RowBox[{"-", "0.21008576609800003`"}], "-", + W! e+ h/ Y( E4 C  y
           SuperscriptBox["x3", "2"], "-", ' ~( R7 Q- j" ]8 M# o4 s4 c2 d
           SuperscriptBox["x6", "2"], "-", ) f4 N- j# E- s0 j
           SuperscriptBox["x7", "2"], "-",
    & r3 K. X2 P9 E7 r4 T" D       SuperscriptBox[
    : v( W. D) Q. U; U1 X3 R        RowBox[{"(",
    ( d- w! H. V0 J5 J$ y9 J, W8 x         RowBox[{) x3 L4 p: ^& w5 N0 |
              RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-",
    1 k$ G9 d& g( `$ W; L$ R       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    ) s, c* y& g. H. E  RowBox[{"0.10599338351843121`", " ",
    9 N5 k- }5 B6 v% w* n" U! e0 g   SuperscriptBox["\[ExponentialE]",
    1 L! P! M# O8 V" p( R9 X) ^    RowBox[{"3.1415926535897936`", " ",
    2 t! Q# g7 O+ `- ^' @8 r7 H     RowBox[{"(",
    1 z, K! A5 G( m% S2 U& G      RowBox[{9 a$ D" y8 Q) [& L* I6 L5 c
           RowBox[{"-", "0.4481471925460001`"}], "-", " b- p. E+ i2 {* Z, X) d6 @
           SuperscriptBox[/ F9 I9 J3 ?& X8 O  Z: k
            RowBox[{"(", & p( w( r( D, S" Q% ~( z
             RowBox[{
    2 W/ q3 S8 }+ c# O" @9 T          RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    - d( `4 c" }4 h1 `       SuperscriptBox[
    4 L5 V; L% m- y        RowBox[{"(",
    # X6 y1 K6 X, R! G4 U         RowBox[{- }$ ?  y1 ~* c8 h$ M( p3 K  ~
              RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-", . V3 K# i4 r( u) h1 }2 e) H! g5 v
           SuperscriptBox["x7", "2"], "-",
    ( A- D  V) ~- H5 t       SuperscriptBox[
    ' R5 M) I: `" J        RowBox[{"(",
    2 e0 R6 P, v% R- T# X' M/ x         RowBox[{
    4 F" ~7 s: l- D2 G7 e. ^          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    1 S( g' A7 s2 S0 `; W4 h0 a: ~0 m       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", % O' P5 v2 g2 ^5 D: O9 u
      RowBox[{"0.5008208386064421`", " ",
    ; x  E8 w6 [" `( c   SuperscriptBox["\[ExponentialE]",
    " [$ Y& X; Y/ U4 ^    RowBox[{"3.1415926535897936`", " ",
    ! d2 I! z) Q* ^9 J: p: a5 z     RowBox[{"(", , |5 m3 {: q" ~
          RowBox[{
    ) A) `! l! K& l: N" ?4 G" N       RowBox[{"-", "0.08722659614000003`"}], "-",
    % t# c) e, u" A& n8 U& q/ G       SuperscriptBox[7 o/ ^4 i1 h5 Y. k1 U$ }
            RowBox[{"(", # }* M' C  W) [" P' {1 @; V% d
             RowBox[{
    0 Z+ M" d6 q5 r0 I7 S& v% F          RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-",
    ! ^4 u# a( e+ p: H- C- E       SuperscriptBox[
    # _/ Q% Y0 P5 H* j5 T, u* n        RowBox[{"(", ( c& `/ j: ^  @! s  J+ ~0 s
             RowBox[{7 l0 X1 V9 Z' }
              RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-", % U1 n9 W; t: k/ r
           SuperscriptBox["x7", "2"], "-",
    1 W. v& Z" J% j" S       SuperscriptBox[8 A0 z* ?- t+ Q- ~6 B5 O0 ~
            RowBox[{"(", , c$ o( a5 \4 k) y( n" b
             RowBox[{
    ) \- z% r/ r1 @& D( y; p# T5 A          RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    1 Y* \0 K0 h0 ?6 b, ^, ^1 C       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", - k1 e7 T8 C- m
      RowBox[{"0.32564305572552343`", " ",   [/ ]  E: l8 V' p  c2 a( o
       SuperscriptBox["\[ExponentialE]",
    ! Z, n: Y  F/ c3 P+ D' f  @0 s    RowBox[{"3.1415926535897936`", " ",
    : Y  l( q) H$ C1 ^8 w     RowBox[{"(", ) m3 V5 K( j. t* m
          RowBox[{
    " H& `! T: _! f6 y+ X/ U       RowBox[{"-", "0.23738217000100004`"}], "-", - i1 |) B# ?" M! j
           SuperscriptBox[
    , z9 |8 K' q7 |  E/ W6 z2 N        RowBox[{"(", + h( F! v# U" o5 I( ^
             RowBox[{" f8 _' [3 i% J# |' O
              RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-",
    7 J) G' F" B" {) O3 W% p* a       SuperscriptBox[
    8 A( t/ W# z( @, v5 Z& E        RowBox[{"(",
    * P2 n0 e: e6 r& h0 _         RowBox[{
    7 Q- ?2 }! `, T7 s7 x8 I          RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-",
    6 M) H+ f& l" }       SuperscriptBox[3 x4 |8 O2 e- |7 i5 M1 F. M' e
            RowBox[{"(",
    0 E5 a  [) o/ m1 I+ T         RowBox[{
    0 k! a; i( x/ i: W          RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", 7 j" B2 [5 O9 E: B" A' `
           SuperscriptBox[
    . M* ^4 p" O5 a/ ]        RowBox[{"(", ! ?: r% z8 T! Y) a( e. r# O7 r
             RowBox[{
    2 [- M# o, @/ O          RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-", , _  D  r! B4 k, U% x) U
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", , |2 G7 C' g; {+ O% o% j3 v( d
      RowBox[{"0.6665374509702793`", " ",
    + `( w# A7 o7 U- N( i3 V. z2 h   SuperscriptBox["\[ExponentialE]",
    9 n; J8 n: w) H$ ~0 Q2 l1 A    RowBox[{"3.1415926535897936`", " ",
    1 a7 M3 M  [, E9 f/ d5 c     RowBox[{"(",
    / |6 m/ S$ N9 C: ~9 s+ b+ L$ f      RowBox[{# }/ {. X) d7 i0 U3 m  I7 ~
           RowBox[{"-", "0.19162171876400003`"}], "-",
    # G: }4 b9 |8 G9 ~       SuperscriptBox[
    3 n9 z7 @# e6 L7 O, Z& L+ a5 D        RowBox[{"(", 2 K0 V/ B1 X. C' P, M
             RowBox[{+ t7 q0 w$ s5 R4 T1 z7 L
              RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-", / h# a: F0 N( m
           SuperscriptBox[' M1 b% w- `; \6 q
            RowBox[{"(", ' Q0 U+ _! H. G9 C% N9 a# A
             RowBox[{2 S; e% N1 ~: n9 i; T
              RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", $ i$ _3 P: b" j) R! `9 Q7 g
           SuperscriptBox[6 F! s* b; \% R2 T* C9 L+ o8 ?
            RowBox[{"(",
    & j2 c$ U* [! [" ]6 r1 Y; y" Q         RowBox[{
    5 S2 \& [7 D9 d- H          RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
      H2 n+ Z, y4 I) A; u; l- J% M( V       SuperscriptBox["x8", "2"], "-", 0 G* p9 E3 f+ K9 @& I$ u: D  ?: o
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", ' @( J) ~+ ]# t/ O
      RowBox[{"0.4812237524557293`", " ", . B9 G3 O  ]- e7 i0 w# V9 x
       SuperscriptBox["\[ExponentialE]",
    / B3 u- S* \$ H% z    RowBox[{"3.1415926535897936`", " ",
    , \5 Z  ~1 u) @# j/ K) T' L     RowBox[{"(",
    / B7 {: B7 D" e. ]      RowBox[{
    , Q6 S( r* ?( \8 c4 t- D' n$ P       RowBox[{"-", "0.109748954594`"}], "-",
    3 T3 @1 R! r) `. W6 u% m       SuperscriptBox[6 u4 `4 y* \% l; h3 m8 A, X
            RowBox[{"(", 6 o% o* A  x" Z3 v
             RowBox[{
    8 G6 @" I6 |+ V  r: m          RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-", 4 Q. z' q; x% d( W& |4 r/ t
           SuperscriptBox["x6", "2"], "-",
    / g& a6 M9 F! c+ l/ v% }       SuperscriptBox[% M( N. e0 K: C) o# x* }4 |
            RowBox[{"(", 2 @4 T- C  l; ?" H
             RowBox[{
    # a4 i5 s" o2 w. r6 D. \          RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", - w: x# l1 V3 r4 m  R
           SuperscriptBox["x8", "2"], "-",
    + a; C1 T8 \/ l       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    ( X# O) h; M7 o  RowBox[{"0.176024676254045`", " ",
    5 e/ q4 K" c: L   SuperscriptBox["\[ExponentialE]", 1 E) s# H3 z: E' M& o4 U( H8 ^
        RowBox[{"3.1415926535897936`", " ", " T/ I( P: h& X+ }) ^' Y; @- X
         RowBox[{"(",
    : P+ Q( M* q3 J, S4 w      RowBox[{6 u- t6 ]* {& X2 x8 Z9 v
           RowBox[{"-", "0.14616677062500003`"}], "-",
    * ^& p1 z( O; V' K$ `$ J       SuperscriptBox[
    # }$ }7 M2 W, R        RowBox[{"(",   o6 F: D9 x4 U  H- ]  n
             RowBox[{
    8 S, _4 i% J) D          RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-", : \1 b  J3 e9 ]0 f: p3 ~( r0 O
           SuperscriptBox["x6", "2"], "-",
    % o* v9 C2 |$ S8 A9 t       SuperscriptBox[
    - |: V1 u* ^5 B" X* G* ]3 R        RowBox[{"(", : `. O- p1 `* X/ _; R4 `4 @
             RowBox[{
    # \* {  E6 }$ A4 @6 c( H8 K( {          RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    9 K, t6 h* l. q8 R3 Q- R       SuperscriptBox["x8", "2"], "-",
    3 f# g8 B0 n* V/ W' M       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", 8 u) X' H4 M3 t6 n1 R$ d! _
      RowBox[{"0.5945873894818965`", " ",
    ) U$ }+ k; j" R+ {   SuperscriptBox["\[ExponentialE]",
    % Y: {2 N7 I1 n$ L" ]' ^( J    RowBox[{"3.1415926535897936`", " ",
    - z% o& K: e7 ^% s9 L/ H     RowBox[{"(",
      p* [8 A& C" M: U$ v& G      RowBox[{% ?& k+ v) n/ B- ?, S
           RowBox[{"-", "0.10407011464100005`"}], "-",
    ) _# k7 _* |) J7 A2 I( c       SuperscriptBox[2 ?1 D8 ]9 q( T! h' n& k
            RowBox[{"(", $ u) ~: z/ R% Y5 \# k  I
             RowBox[{
    - {( F; @: @$ Z' b/ ~          RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-", / W/ Q) C- `/ T: t2 j# P
           SuperscriptBox[
    % @3 Y8 o" f7 O' o8 C        RowBox[{"(", ' f- e: m( M' Y/ n% I3 ~
             RowBox[{
    ' B, I9 l" G& B1 d          RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-",
    ! m9 ]- x0 k5 I' \% P" W       SuperscriptBox[
    ' S2 W/ `8 ^& ^7 w" ~; O6 u        RowBox[{"(",
    - X. W$ |4 ~- ^7 _9 E         RowBox[{
    " p# o) V) d6 h          RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    9 `4 D0 S% k( y+ \3 O+ @2 D0 y       SuperscriptBox["x8", "2"], "-", : d; C9 v0 C  |3 e" C) g9 K0 p
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", : _& S: V: Z6 a( p7 n7 U$ [1 w1 [, g
      RowBox[{"0.027591936509660075`", " ", ( m  F! L$ ~, K0 Z7 s- H
       SuperscriptBox["\[ExponentialE]",
    7 _  l0 U, c  G- D- Y    RowBox[{"3.1415926535897936`", " ",
    ' t: L$ K& Q' K6 r6 ^0 @0 [     RowBox[{"(",
    5 E' r4 E. y4 T4 _% o! I3 _. l! \      RowBox[{2 y3 I. y2 j! G+ v" F: k
           RowBox[{"-", "0.31770463544200006`"}], "-", - q6 `! Y6 x0 y7 P4 O
           SuperscriptBox[
    ( d* S- V) ]  Q1 c* W- p        RowBox[{"(", + y( H3 A( \; t! j
             RowBox[{$ J5 e0 R) @9 p* y6 Z
              RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-",
    6 X) E$ f- _* L5 A! |2 Q       SuperscriptBox["x6", "2"], "-", ( f8 G$ i7 j$ }' T# m! r% A
           SuperscriptBox["x7", "2"], "-",
    0 W& F; N9 E& W1 e5 g9 A' o       SuperscriptBox["x8", "2"], "-", + A# K' }8 Y) j2 e8 Z: k, Z
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", " C+ R' Y1 B: b  I6 v' o
      RowBox[{"0.5252475961933536`", " ",
    6 \' A: @$ e1 i  v6 s; A3 _   SuperscriptBox["\[ExponentialE]", ( Y- A2 E" T# ^# t$ S+ ~& x
        RowBox[{"3.1415926535897936`", " ", ) N3 O! U/ d) S# C( p8 o0 s, C
         RowBox[{"(",
    ! {0 P* O5 J  d/ c4 R0 D      RowBox[{- \9 u& W' K% o6 \' |
           RowBox[{"-", "0.6410867660730001`"}], "-", + k2 V1 O5 }0 d) x1 P8 n
           SuperscriptBox[* a7 s, i4 \0 U1 P( G
            RowBox[{"(", 1 _( t1 s7 u9 F0 C5 O
             RowBox[{$ n/ u9 Q9 x6 b' ]. S3 O( X
              RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-",
    % V9 j" n4 F/ k       SuperscriptBox["x6", "2"], "-",
    5 k% x5 f* b2 q4 m2 o       SuperscriptBox["x7", "2"], "-",
    * x& z4 G' b+ w0 Q. J       SuperscriptBox["x8", "2"], "-",
    ; ^8 v' h5 j6 S+ i       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    ( \2 X5 j( x) p# N$ U7 C: K! V/ ?! ^  RowBox[{"0.32047284779644936`", " ",
    . r; C. u: O7 F, K, C   SuperscriptBox["\[ExponentialE]",
    + M, m3 ]2 w& `    RowBox[{"3.1415926535897936`", " ", & t- a2 E8 I# u7 F- Y. J8 ~: c
         RowBox[{"(",
    ; h" w9 C+ C' H# j      RowBox[{, P9 ~, l3 i- B5 m+ q+ [
           RowBox[{"-", "0.155663887074`"}], "-", 8 D- O8 n. H; U
           SuperscriptBox[  x  m: \' p1 S) `9 _% q
            RowBox[{"(", % `8 }5 }# D& {% O, q- a% t/ l
             RowBox[{: i4 c: ~5 |/ x4 z- b9 C
              RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-",
    ' Q& o6 D; u6 R! H& K3 h       SuperscriptBox["x6", "2"], "-", 5 o" u; m. \: M; I7 y9 q! P1 K
           SuperscriptBox["x7", "2"], "-",
    ( r3 l# H- Q: C6 Y9 G$ N       SuperscriptBox["x8", "2"], "-",
    3 j2 J* x1 ]' n; P- R) V) ]       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    / ?, i) s/ t# I" p1 N  RowBox[{"0.7528674241482847`", " ",
    / A% F0 X; a9 r% P9 m- h; t7 q9 p   SuperscriptBox["\[ExponentialE]", 0 U9 u9 O+ a, \  C% H% O- P5 r
        RowBox[{"3.1415926535897936`", " ",
    ! J$ \* v# W& D1 N     RowBox[{"(",
    * R" `# w# |0 _! \1 o      RowBox[{- _) h9 R/ E0 v, D% c+ j: e
           RowBox[{"-", "0.14151232428600002`"}], "-",
    $ ]1 U0 [4 y; S# l, l       SuperscriptBox[
      B( r2 ?' n! o        RowBox[{"(", 8 }# s. a2 K; v8 L
             RowBox[{
    ' Z( o& }8 Y3 `0 W3 U          RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    " x! Y& O; _" P. N       SuperscriptBox["x6", "2"], "-", + N" E, G. b6 {
           SuperscriptBox["x7", "2"], "-", & v" h* n4 S2 F+ r* B% c1 [
           SuperscriptBox["x8", "2"], "-",
    ; \* g* T$ R' E       SuperscriptBox["x9", "2"]}], ")"}]}]]}]}]], "Output",
    & N  N9 P, M* k( K* b CellChangeTimes->{3.5779628386090403`*^9}]/ i1 u1 f! i" r2 `3 ~& D
    }, Open  ]],
    ) d0 i* F- z2 {! v2 K5 D8 S: ]& {' |6 s+ Q* r5 M+ I
    Cell[BoxData[" "], "Input",0 S' j: h" Z8 V6 }
    CellChangeTimes->{3.577962835879035*^9}],
    ; T* D% [7 l  H, U9 p, E6 `; w. U. m6 L/ G( D0 F
    Cell[BoxData["\:94a2\:6c34\:7684\:7ec8\:70b9\:6e29\:5ea6\:4e3a"], "Input"],
    # p8 U$ B7 K) e' O4 P1 g
    ; V. s0 M5 s6 l+ |2 OCell[CellGroupData[{
    % }1 \4 _7 N  W& k- Q$ J
    ( g, g' N: B; u* S3 M+ nCell[BoxData[# g- L) I8 C5 G9 w" A
    RowBox[{"y2", "/.",
    % [6 D) s$ q1 l+ B& [$ \" B  RowBox[{"{",
    * ~2 F) F  S7 h0 P8 @& w   RowBox[{
    % z7 h5 }' M1 z7 i    RowBox[{"x1", "->", "0.7406"}], ",", ; X- `7 Z4 F% t6 B6 I
        RowBox[{"x2", "->", "0.4621"}], ",", $ T* n: V' e3 u/ L) W; i/ \
        RowBox[{"x4", "->", "0.2221"}], ",",
    4 ^- |& R5 Z' L1 M1 x4 d    RowBox[{"x5", "->", "0.5208"}]}], "}"}]}]], "Input",( F8 e/ e1 g, `% }2 R
    CellChangeTimes->{3.577962787784151*^9}],
    " [  v6 N0 I% j6 E4 l, j
    , E9 _% v6 B* E% ?% mCell[BoxData[
    ) i; g* E: r3 [0 ~. p! e RowBox[{
    ! K, a2 S, w+ F* D  RowBox[{"0.9125798890455848`", " ",
    - y9 ^+ ]$ J# c0 i! [) o. k( s5 a6 K# u   SuperscriptBox["\[ExponentialE]", ; ]7 L5 C2 _* g' `- c: m; w
        RowBox[{"3.1415926535897936`", " ", ) I3 U  Z& [6 Z( D4 C, u- `
         RowBox[{"(", ' i1 s0 h  _, K4 A" K+ u$ u
          RowBox[{1 S: g3 a, p; [7 p1 m" B; Y. ^; X
           RowBox[{"-", "0.17911224641499998`"}], "-",
    + X8 Q1 ]/ o( z, Q       SuperscriptBox[
    & ?6 `  |3 }2 o        RowBox[{"(", 6 E1 k) J/ D) L" u0 u
             RowBox[{* q* c; k) s; X9 n+ S0 V% Q
              RowBox[{"-", "0.530346`"}], "+", "x3"}], ")"}], "2"], "-", " N5 K/ L% u' K0 Z( d* C
           SuperscriptBox[
    $ {% _  }1 p: y& R" T! u        RowBox[{"(",
    ; U( k1 ]; d$ h8 q  `' f4 \         RowBox[{. I& e8 |* J8 D9 {3 e0 C
              RowBox[{"-", "0.529013`"}], "+", "x6"}], ")"}], "2"], "-",
    0 d* z: v7 s/ U8 Q: j) e+ N# Y       SuperscriptBox[1 z7 u$ _6 F9 C+ i4 T$ j
            RowBox[{"(",
    $ c. b8 ]& ~# L! x0 ~3 C, o2 s5 a         RowBox[{( q6 r# K: O# Y+ E5 G' N, u3 f6 O, e' f
              RowBox[{"-", "0.409756`"}], "+", "x7"}], ")"}], "2"], "-", 9 ?' z1 j3 ^6 `
           SuperscriptBox["x8", "2"], "-", 6 i" x% h+ F1 y" S
           SuperscriptBox[0 o- P' e  h% f. S
            RowBox[{"(",
    3 Q/ }5 v1 v$ I7 t- d3 J( S' D- [% ~         RowBox[{* {+ }: Q: [3 X9 L# a6 P
              RowBox[{"-", "1.`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], "+",
    ' z4 U" |. J* a+ I9 L& ]( Q7 `# ?  RowBox[{"0.2883186011296682`", " ",
    5 h) K' I1 Z" d% M/ [( Z, P) O   SuperscriptBox["\[ExponentialE]", 7 r" J2 h4 j6 D
        RowBox[{"3.1415926535897936`", " ", 8 N/ |) B# M0 _% C% g- ^0 K
         RowBox[{"(",
    ' V! m9 m/ N* @4 f, F$ o' g6 N      RowBox[{
    ' n. Q& T" L7 T       RowBox[{"-", "0.105619387859`"}], "-", ( S% Y: @  X( ~) [8 Y' k! a9 M
           SuperscriptBox[  W* L" T* @; E% w* g
            RowBox[{"(",
    ; j8 _2 B4 Y9 f         RowBox[{
    1 h) M; W4 ?+ ~5 r5 H+ n          RowBox[{"-", "0.64973`"}], "+", "x3"}], ")"}], "2"], "-",
    " t. X% X* \6 x! M8 e: ?+ Q( F       SuperscriptBox["x6", "2"], "-", % M4 [+ ^! y; e6 [( Y# Y; }
           SuperscriptBox[$ v6 h) k1 b9 g0 Z( O
            RowBox[{"(",   R) j* z* W( r7 t& U0 ~5 W8 r
             RowBox[{7 i' B1 P/ y, E; ?, B" c
              RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-", 7 {  a3 y  J3 e  o& J+ ~
           SuperscriptBox["x8", "2"], "-", % V0 @& J- [( C. H# e1 p+ o: A
           SuperscriptBox[
    " x7 _0 b3 z  ~2 U% f        RowBox[{"(",
    6 P; {) {# |, v. v$ x( ?         RowBox[{
    3 E9 ^3 w) ~2 A: V$ H3 i          RowBox[{"-", "0.766748`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    - h5 R( v& L7 j! T3 h  "+", 0 R' x" P2 B; s7 b2 f2 g
      RowBox[{"0.2115905228598317`", " ", ' c, {6 M# {/ R9 B% Q
       SuperscriptBox["\[ExponentialE]", 8 g7 `( A: ]4 |9 C: Z
        RowBox[{"3.1415926535897936`", " ", - W! t# Z6 l0 `
         RowBox[{"(", ) s6 {. W# {' j! V0 S/ K
          RowBox[{, B6 x% B* ^: U+ l1 \
           RowBox[{"-", "0.236605670085`"}], "-",
    * Z: H: g9 A7 q: k$ b! S       SuperscriptBox[1 v3 o& |4 ?. ^
            RowBox[{"(", ) ^9 j7 K' ^6 `  k5 u+ f7 L# F
             RowBox[{& Y: R' ^1 Y$ r. @7 i; ^
              RowBox[{"-", "0.109343`"}], "+", "x3"}], ")"}], "2"], "-", 7 e8 _' ~& r0 S6 h4 W
           SuperscriptBox["x6", "2"], "-", " z  o- Q+ Q# W( W
           SuperscriptBox["x7", "2"], "-",
    8 R, g# z* M7 E, [$ O       SuperscriptBox["x8", "2"], "-",
    8 p! y! [& Y0 o       SuperscriptBox[" G, K5 J  w3 t% z) j0 o( K
            RowBox[{"(", 5 j6 e1 ?+ [& }
             RowBox[{& f2 e, N0 |$ i; M$ x' s
              RowBox[{"-", "0.752567`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    + C0 i- N% C4 c" Q5 |  "-", # b/ o2 N! R% z/ l& a* b
      RowBox[{"0.22829938846668896`", " ",
    - C) X7 O1 F% {8 c+ h+ r% f# V   SuperscriptBox["\[ExponentialE]", ; c6 `( z! \. N0 `) s
        RowBox[{"3.1415926535897936`", " ",
    0 \4 H# T3 Y' @) a4 j$ `0 ^; X6 r     RowBox[{"(", 5 a7 f# ^5 Q+ k6 p
          RowBox[{
    7 Q% n: _0 Y4 `6 W" c8 p5 O. E9 g       RowBox[{"-", "0.46221081830200006`"}], "-", 2 L0 M' h% v+ ^8 E. |# s# y. f
           SuperscriptBox[+ ~& e5 j7 a# Z0 f! y2 e
            RowBox[{"(",
    " h& ?- Y( d% S* F7 a- v9 \0 V         RowBox[{% q; M' r( T- T3 l
              RowBox[{"-", "0.258697`"}], "+", "x3"}], ")"}], "2"], "-",
    % \/ ^; n0 k' U- F       SuperscriptBox[
    1 l5 n% s1 M5 k) j* V        RowBox[{"(", 5 b/ @! U9 I  w
             RowBox[{
    9 q9 y  |$ I( l$ z4 q          RowBox[{"-", "0.420497`"}], "+", "x6"}], ")"}], "2"], "-", 7 @4 W0 j, J! O" V
           SuperscriptBox[' O! D& A; h  z! D8 H6 ?; w8 K9 t
            RowBox[{"(",
    ! {* b2 n/ ]. x) {/ w         RowBox[{
    - G! ^4 ?1 b+ _  P) B+ R& b          RowBox[{"-", "0.535772`"}], "+", "x7"}], ")"}], "2"], "-", 7 `9 @9 c4 c# `6 j) i
           SuperscriptBox["x8", "2"], "-", ! l8 x: D0 i  w5 P- ^( c8 R
           SuperscriptBox[6 e9 O8 D, a( Z1 k/ z! Q
            RowBox[{"(", + k7 s/ W2 N+ \: u
             RowBox[{* @: n9 }6 A' E+ ~, u" T$ h
              RowBox[{"-", "0.494866`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], " p' }3 K' g% k% c3 Q
      "+",
    2 L. J' n* H9 b$ i0 p# L; ?6 s6 C  RowBox[{"0.27551257162880105`", " ",
    9 `5 g" C- V. i% C: r! h& w   SuperscriptBox["\[ExponentialE]",
    5 _( A! {$ Z6 S3 b6 d    RowBox[{"3.1415926535897936`", " ",
    ( B8 w& N% l! ]* _# U! p     RowBox[{"(", 4 Z! G2 r4 g; y% R7 q: v0 J9 ?$ a
          RowBox[{
      b  o) u- ?4 x- c6 v       RowBox[{"-", "0.5837889295140001`"}], "-",
    7 |9 y; @- p: _. i8 b       SuperscriptBox[
    & p: @: U; `3 K6 s1 M        RowBox[{"(",
    # U2 x( Q6 K8 s; J: M( c         RowBox[{) a  U; j6 J+ ^
              RowBox[{"-", "0.027011`"}], "+", "x3"}], ")"}], "2"], "-",
    # {1 K: y1 ~' X! i       SuperscriptBox["x6", "2"], "-", 7 Z6 G2 K( v, r9 U) i7 B
           SuperscriptBox[
    8 V& }! q4 L( M9 t, D, b        RowBox[{"(",
    2 b/ X& {0 \9 R         RowBox[{2 y+ t, w  Y. b4 r9 N$ v# v- S0 v
              RowBox[{"-", "0.452033`"}], "+", "x7"}], ")"}], "2"], "-",
    : }8 l# Y( |6 E% W* i       SuperscriptBox["x8", "2"], "-", & E$ m& P3 G1 ?3 C: c9 A* L  C- i
           SuperscriptBox[
    / w$ t9 W0 T6 j+ O1 c( N. {: I        RowBox[{"(",
    " P/ s  E" h7 C5 y         RowBox[{3 D% u1 D' T9 z- U2 _4 ~
              RowBox[{"-", "0.278729`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], ( k) M7 s$ `& {
      "-",
    , Z5 q* S# ~% f  RowBox[{"0.12620581913715256`", " ",
    . P7 i* ?8 {* m6 o) Z( A1 f* E   SuperscriptBox["\[ExponentialE]",
    & y9 t* u& S* [+ q& s0 d    RowBox[{"3.1415926535897936`", " ",
    , i3 ~* B1 [! r     RowBox[{"(",
    ! u% P9 B2 P! _9 p: y2 L      RowBox[{
    # f9 h  N' b" u0 ?% E7 q5 l       RowBox[{"-", "0.19030188470200005`"}], "-", % r+ L' H5 g; b& J
           SuperscriptBox[
    # B' C# y0 A' n0 @3 v        RowBox[{"(", + p# R: q9 ]- H+ b& H- Y
             RowBox[{; b# n! @, W" i1 Z
              RowBox[{"-", "0.510223`"}], "+", "x3"}], ")"}], "2"], "-", 1 f$ h3 O$ ?+ [# ]# @, M( K' D. l
           SuperscriptBox[% l' K( n9 C& B/ p: g
            RowBox[{"(", 7 a  E7 Y& U0 r9 U3 E3 J
             RowBox[{6 T) q- t! `; j+ Z" p0 [) _
              RowBox[{"-", "0.748304`"}], "+", "x6"}], ")"}], "2"], "-",
    % z, `. U9 o+ {4 i, ~4 |% g; z       SuperscriptBox["x7", "2"], "-",
    8 w- V9 d. K8 G  \& Y) O, q9 A' S       SuperscriptBox["x8", "2"], "-", 8 x+ t$ V0 D- r7 X
           SuperscriptBox[
    0 k3 Z! V+ C, D" L        RowBox[{"(",
    % ?! A6 q  Z3 N         RowBox[{$ u8 n) D: X1 U- s' Z- F! k3 K
              RowBox[{"-", "0.243032`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    / r! T$ C8 x% S9 a  "+",   j9 I; _5 N; s: D. x
      RowBox[{"0.12782130225993898`", " ", # m% F$ n' G% O
       SuperscriptBox["\[ExponentialE]",
      O4 w7 ?" u6 f$ |    RowBox[{"3.1415926535897936`", " ",
    1 z- @3 ~$ ~+ W5 a3 T5 P     RowBox[{"(",
    & R- s: T0 e( V/ m$ J. u  M& |      RowBox[{8 v+ t: Z; i  b
           RowBox[{"-", "0.28518780882`"}], "-",
    0 Z: y& T4 Z. x$ V       SuperscriptBox[- F* m0 r: ?1 o) b! ]
            RowBox[{"(",
    ) e/ j: I4 ~* ~' s0 I( q, i, @" \         RowBox[{
    7 r2 b, j  d7 |* g  F' o          RowBox[{"-", "0.158058`"}], "+", "x3"}], ")"}], "2"], "-",
    ) e5 o6 r+ [  ^/ @. g+ e       SuperscriptBox[
    % C, \+ Z2 v6 c% T        RowBox[{"(",
    1 O# Q) s6 [. u& `" M8 j         RowBox[{/ L5 m8 ?- _) A/ v
              RowBox[{"-", "0.166541`"}], "+", "x6"}], ")"}], "2"], "-", 4 A% E- W9 |" x6 T% t& p  a
           SuperscriptBox[! h, D2 n. ?3 W5 h" H
            RowBox[{"(",
    ; |( g0 i. r0 V0 H, M         RowBox[{+ g8 i, x; X" J6 }) k2 I, v
              RowBox[{"-", "0.278049`"}], "+", "x7"}], ")"}], "2"], "-",
    4 [6 Y; C# x% Z8 `$ b. Q       SuperscriptBox["x8", "2"], "-",
    & V. x# ]5 f3 R. [- l. ~       SuperscriptBox[9 R, A7 W( h2 L9 S+ n3 r0 f/ T5 j
            RowBox[{"(",
    . z8 u7 k$ V! V  Y8 T- R3 v8 K# t+ n         RowBox[{
    : h$ P! M% E! {  A          RowBox[{"-", "0.236675`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}], $ q1 H  u6 X4 r( D% A2 h
      "+",
    $ r4 r" R$ A4 J$ C) e- P  RowBox[{"0.23615247809381104`", " ",
    , g, P3 S' x6 B+ g+ y   SuperscriptBox["\[ExponentialE]", 0 ]4 w: o+ I$ T, ]& C
        RowBox[{"3.1415926535897936`", " ", 6 m7 m" I, ^$ a6 g/ s7 x* w7 {: x
         RowBox[{"(", % @- p# l& M- k" Q1 [3 L& H
          RowBox[{1 o$ \# N0 ]: ^
           RowBox[{"-", "0.11387365200400001`"}], "-", ! H- c/ i8 |0 l6 ?6 w1 r
           SuperscriptBox[
    3 _0 A& Z3 d* o' B. o        RowBox[{"(",
    ' e8 B/ k, N5 _' U, U% ]! K3 u         RowBox[{: V6 |0 z- s% z
              RowBox[{"-", "0.177646`"}], "+", "x3"}], ")"}], "2"], "-", 1 `8 i; S' B7 g" p' M8 A
           SuperscriptBox[
    6 c  `4 [! s+ J* Q' Q1 h        RowBox[{"(", ) B( ?* X$ C, F( W9 t6 ~8 C9 U
             RowBox[{+ U! U" S' k; N! H  C
              RowBox[{"-", "0.502638`"}], "+", "x6"}], ")"}], "2"], "-", 4 s+ |  N  p: s5 v$ c
           SuperscriptBox["x7", "2"], "-",
    % D! P9 ~) }0 U" C; M7 f" x' h2 B       SuperscriptBox["x8", "2"], "-", % E8 [" ^: g9 U( o3 _7 `' v4 Q4 _
           SuperscriptBox[8 K( j7 Y0 N0 w6 q% U/ r; a/ d1 V
            RowBox[{"(", 3 g4 g$ X* N0 _; v2 W, E
             RowBox[{
    5 b$ o! Y- W$ ^4 |          RowBox[{"-", "0.178973`"}], "+", "x9"}], ")"}], "2"]}], ")"}]}]]}],
    3 l5 e. c: M& L1 X/ y  "+", 8 h5 R0 N/ {, J" r% f4 ~
      RowBox[{"0.3207174990295845`", " ", $ D" d" Y7 {7 h2 X! P# X: h
       SuperscriptBox["\[ExponentialE]", * `! E6 O. I8 ]- o  c- m$ [6 }
        RowBox[{"3.1415926535897936`", " ", 2 h/ A2 M* t2 T3 y; V
         RowBox[{"(", ( D; H- n/ |# H; ?; g. Z- d
          RowBox[{
    . m; R1 ?( _2 N# S, c. e: O       RowBox[{"-", "0.11442644782500001`"}], "-", 9 I7 y! `+ p0 Y
           SuperscriptBox[
    % z2 l3 m# _7 T* U0 O        RowBox[{"(", ! w3 ]6 ~0 q( j% k7 D: F2 O
             RowBox[{
    6 d5 w6 K/ q, a; s          RowBox[{"-", "0.33973`"}], "+", "x3"}], ")"}], "2"], "-", - _6 r0 t' c: r0 }
           SuperscriptBox["x6", "2"], "-", % }% M5 c" Q( e) S
           SuperscriptBox[& W+ e6 a  A5 |
            RowBox[{"(",
    # m) b# G6 h- m5 f/ v         RowBox[{
    3 R1 |) ~! {1 r9 G0 n7 G, B          RowBox[{"-", "0.636585`"}], "+", "x7"}], ")"}], "2"], "-",
    7 T7 ]: Z' D$ Q: g) f4 {( y       SuperscriptBox[, s& G) q3 {( I, D1 U$ j
            RowBox[{"(",
    : W1 _, t& P' P         RowBox[{: W% l; ^% o# ~, a: v; z
              RowBox[{"-", "0.780463`"}], "+", "x8"}], ")"}], "2"], "-",
    # e9 O7 [. L. |5 X. V, O9 V* U0 x       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", : m8 B4 Q4 |& m# q, i$ K+ q6 n9 G
      RowBox[{"0.15852708848338293`", " ",
    2 e6 I& Q( m3 ~1 ?9 O   SuperscriptBox["\[ExponentialE]",
    9 l6 g( d& R. H( x( }1 X* |    RowBox[{"3.1415926535897936`", " ",
    ) ?- t& F: z& D- I. O4 V     RowBox[{"(", * J; A& u- [6 ^$ r
          RowBox[{
    : s8 I! T3 }0 N       RowBox[{"-", "0.21008576609800003`"}], "-", + G% U2 b5 K$ L0 X7 h' ^- }: ?7 g
           SuperscriptBox["x3", "2"], "-", 5 _( V6 q" l: u" P+ c# j8 [+ ]7 V
           SuperscriptBox["x6", "2"], "-", - S; r3 S  T9 O; {: Z$ g
           SuperscriptBox["x7", "2"], "-", : Q0 T$ o% R7 e/ @7 H1 N" q# d
           SuperscriptBox[) b& c1 u+ c4 [% C, p
            RowBox[{"(",
    6 K, R: m" ^# |& t# M; c0 X( W9 j         RowBox[{
      v7 o/ q- B& Q8 ?          RowBox[{"-", "0.672709`"}], "+", "x8"}], ")"}], "2"], "-", & [3 ?0 S5 w8 L9 J, z, |
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",   E& P) h2 B% e8 i
      RowBox[{"0.6019775648968266`", " ",
    ! n# B+ x6 I0 o! q( ^) {! ~   SuperscriptBox["\[ExponentialE]", ( n6 `$ C0 q/ }* u7 u, y
        RowBox[{"3.1415926535897936`", " ",
    # [( I6 {9 M% z9 w1 C( c     RowBox[{"(",
    8 ]4 A, V- r# m* {9 k* J7 h      RowBox[{
    % _7 V, {7 b. Q0 b       RowBox[{"-", "0.4481471925460001`"}], "-", ( I( k: f9 ?9 n# E! n$ D% ?( W
           SuperscriptBox[4 i1 L$ ~' m' f; L9 }' S1 l# k, a
            RowBox[{"(", ! v; E, @7 f5 n& v' k6 a3 B: Q
             RowBox[{
      R6 h& B' _3 H# j" d2 @          RowBox[{"-", "0.452931`"}], "+", "x3"}], ")"}], "2"], "-",
    6 T) T2 ]4 ?4 ], `1 k       SuperscriptBox[
    . w! v7 F7 Q$ [        RowBox[{"(",
    . q4 P4 n6 `1 y6 c* ~( [5 {) r         RowBox[{1 u, Y; a; E- ~8 H0 v
              RowBox[{"-", "0.370761`"}], "+", "x6"}], ")"}], "2"], "-",
    2 r  k6 y: L: U) a       SuperscriptBox["x7", "2"], "-",
    $ f2 a5 i. n  w! l0 U$ f       SuperscriptBox[5 I' G( p( ^: f, ?) _& \' C
            RowBox[{"(",
    ! N7 f3 y# j- l- W         RowBox[{
    ) K/ u# t; `, {$ V& ?          RowBox[{"-", "0.509567`"}], "+", "x8"}], ")"}], "2"], "-",
    " ]; ]1 Q: H5 a( Z9 K' P9 ~       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", ) F& E* w0 l3 C4 n
      RowBox[{"0.16041393254115266`", " ",
    1 A$ r- V* h& T: ]8 R* U5 L& R   SuperscriptBox["\[ExponentialE]", % w  F! W, P% ^7 @9 ?9 S: {
        RowBox[{"3.1415926535897936`", " ", 1 C* A2 N0 _9 }' o
         RowBox[{"(",
    ' I) ~" n2 ]9 C; X* g3 l* O      RowBox[{
    5 ~. z3 Y3 m7 `6 E: e) @       RowBox[{"-", "0.08722659614000003`"}], "-",
    / `7 q' f  C3 y. b( j$ i# _: _1 X5 G6 P       SuperscriptBox[
    ( B4 W- X* T% s# Q) K' W3 C        RowBox[{"(",
    7 k7 j5 L2 K7 _* }         RowBox[{
    ( @$ ?; W# q# g  D4 j; [0 m          RowBox[{"-", "0.4943`"}], "+", "x3"}], ")"}], "2"], "-", ( _8 a  Z8 G1 h, _# X
           SuperscriptBox[
    " K) f% E1 T5 U$ J* n* A        RowBox[{"(",
    / B, b  a4 x1 A         RowBox[{* y3 L& R; Q( Q+ J: U
              RowBox[{"-", "0.375283`"}], "+", "x6"}], ")"}], "2"], "-",
    & y1 E0 |- t8 M) r3 Y" t4 n       SuperscriptBox["x7", "2"], "-", 2 I, A% r3 W% ~& x% l( w
           SuperscriptBox[
    0 h( @/ q, r$ O. ]        RowBox[{"(",
    0 ]" s1 o3 T8 [$ o; Y, f         RowBox[{: \! q( j- K" E# m6 i
              RowBox[{"-", "0.505539`"}], "+", "x8"}], ")"}], "2"], "-",
    ' ], B# B2 Y2 R       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    ! z0 o/ w& o/ V! E3 A: u7 d$ @  RowBox[{"0.482281849713638`", " ", 6 X& n9 ?% G4 n1 @& A
       SuperscriptBox["\[ExponentialE]",
    ( J3 E" Z: A) R% A  h* W    RowBox[{"3.1415926535897936`", " ", ( A" R; ~# \8 }3 i6 e; d
         RowBox[{"(",
    9 r" Q' H5 e+ T      RowBox[{
    4 S( I4 V! e7 N$ m  N" d       RowBox[{"-", "0.23738217000100004`"}], "-", 7 @4 e" K# B1 q* k! j
           SuperscriptBox[
    3 d  S) v  ?; Q5 Y        RowBox[{"(", ) x7 s' i4 Z" Y4 |* h1 R+ H/ {
             RowBox[{/ ?, `' `2 `8 Q2 d6 M( I/ ?
              RowBox[{"-", "0.33037`"}], "+", "x3"}], ")"}], "2"], "-", : _9 b2 c; ]$ O! J! c1 X! Y6 G2 v
           SuperscriptBox[
    7 Q" g/ }! P: N! @% W        RowBox[{"(",
      {0 Q" i2 J, [         RowBox[{, Y) |4 `. T; ?! c) p
              RowBox[{"-", "0.752072`"}], "+", "x6"}], ")"}], "2"], "-", ; Y% C- |& o. l! g1 Y- D
           SuperscriptBox[2 K& N9 T# d, z1 }5 [
            RowBox[{"(", # R; ]: j+ r% b- z$ _
             RowBox[{
    * }2 X3 e3 o" u4 a          RowBox[{"-", "0.408943`"}], "+", "x7"}], ")"}], "2"], "-", ! e- D% ]& z) U" ~
           SuperscriptBox[
    8 ]! ]" _4 C/ Z5 i9 Z* R        RowBox[{"(", . M/ z; Y) W/ @/ \3 ?
             RowBox[{
    0 K1 @1 O! j0 c          RowBox[{"-", "0.504532`"}], "+", "x8"}], ")"}], "2"], "-",
    5 C& V. G# b2 o7 A       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", 2 C0 P1 e" T/ U
      RowBox[{"0.29549238400772093`", " ",
    8 h4 k' I. m  Q& a% x   SuperscriptBox["\[ExponentialE]", : v) R  J/ r0 {0 G) C& @, Z0 j
        RowBox[{"3.1415926535897936`", " ", 1 z& x- x2 r% `
         RowBox[{"(",
    . W1 s% Q' M" G/ m5 _6 |      RowBox[{! r: \& J7 J- K% Y; F
           RowBox[{"-", "0.19162171876400003`"}], "-", / I+ h/ R. Y, g) g; l  G6 S/ d( w
           SuperscriptBox[
    ( |! t1 W9 z* }6 o' Z        RowBox[{"(", + _  F) g8 V" m& t! s
             RowBox[{4 R  b# `1 H& Z* o4 h  x* t
              RowBox[{"-", "0.544826`"}], "+", "x3"}], ")"}], "2"], "-",
    * E/ _1 l1 m! d- X' A) }       SuperscriptBox[
    + J: u, \# H: C9 O- ]$ H$ w9 Q        RowBox[{"(", 1 a2 b! Z7 o( l
             RowBox[{
    $ S; |% E8 v: N2 [7 P  G          RowBox[{"-", "0.53052`"}], "+", "x6"}], ")"}], "2"], "-", : D) y( u9 Q; b: y, F1 S: X
           SuperscriptBox[
    $ h( S: q2 S2 V& s        RowBox[{"(", ! n, l; H2 P/ M& T' N3 \
             RowBox[{; |+ W% @  b( \/ M7 H, b8 K3 b
              RowBox[{"-", "0.819512`"}], "+", "x7"}], ")"}], "2"], "-",
    6 k' O2 X- ]+ e5 t' y8 U$ m       SuperscriptBox["x8", "2"], "-", , F) n+ g! r; C6 G; R
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    # s# U; ?: z) [. I; w  RowBox[{"0.31296872769679895`", " ", % ?0 q0 j+ \! N2 @4 ]- T
       SuperscriptBox["\[ExponentialE]", 5 j' H8 H9 l9 ]: f9 K2 E3 K' P
        RowBox[{"3.1415926535897936`", " ", / `6 H4 d4 A! _2 s0 N# i
         RowBox[{"(", ' t# ^, K( ^2 B/ h2 [: V1 z
          RowBox[{0 I5 z6 K9 h- P5 ~
           RowBox[{"-", "0.109748954594`"}], "-",
    5 b; ~  P1 ^( O$ W       SuperscriptBox[
    . g6 {0 A: v9 ]( N2 G        RowBox[{"(", ( r' H) Y( O5 _  K* s5 [8 M* c! Z
             RowBox[{
    7 P. ~. L* f1 E, S* ?          RowBox[{"-", "0.160584`"}], "+", "x3"}], ")"}], "2"], "-",   D' `/ M% Y. ~
           SuperscriptBox["x6", "2"], "-", ' G: ]1 ]( ^4 y
           SuperscriptBox[
    - d3 {. T9 [, R. }- S        RowBox[{"(",
    9 d& d* g, f" l4 t/ n         RowBox[{) E) F4 y; S& }. w7 |" U% {
              RowBox[{"-", "0.684553`"}], "+", "x7"}], ")"}], "2"], "-", + Z% Y; G: a& }' _3 x% _: E. c
           SuperscriptBox["x8", "2"], "-",
    + i4 M+ J, m  r7 A/ W6 e4 n  k       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", . ^4 J3 ?6 c' Z9 Q7 t0 }: B
      RowBox[{"0.4666313851213299`", " ", / z! J# t: ]; v' z6 a
       SuperscriptBox["\[ExponentialE]",
    - b+ P+ ^, j6 d6 ^! G% W" q    RowBox[{"3.1415926535897936`", " ",
    $ a2 B; c# V8 T$ P- |, E4 D     RowBox[{"(",
    ; O: n9 `( `2 V  c/ C  K      RowBox[{
    $ {5 D) d' I% G) x9 ~; {       RowBox[{"-", "0.14616677062500003`"}], "-", : `5 h. b3 f+ z& o$ P
           SuperscriptBox[
    8 \$ \6 x' `; ~        RowBox[{"(", + a9 S( N  {( L! u- i& S0 S
             RowBox[{
    8 @; ~) r: j7 O- W, t0 }          RowBox[{"-", "0.414297`"}], "+", "x3"}], ")"}], "2"], "-",
    % G; j7 @. K0 R3 o1 u8 m       SuperscriptBox["x6", "2"], "-",
    & }* p1 u/ r' L' Q( ^       SuperscriptBox[
    0 A$ O9 U# K. j        RowBox[{"(",
    3 [, n% J# R+ |! x- T" w         RowBox[{. H$ x$ h, r) [3 w! e4 o7 Z
              RowBox[{"-", "0.544715`"}], "+", "x7"}], ")"}], "2"], "-",
    / O- i8 y& ^0 f( i5 j       SuperscriptBox["x8", "2"], "-", . b* r, H. r0 S+ D% O- M5 \
           SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    ( }  u8 Z. J: M" k/ b2 s  RowBox[{"0.37419828116611387`", " ",
    - ~) C( Z0 S8 S# I   SuperscriptBox["\[ExponentialE]", / j& E( U. F7 W/ o
        RowBox[{"3.1415926535897936`", " ",
    % g% a, N7 ]/ f% J( Z     RowBox[{"(",
    1 B% P- [6 _$ M! H' c! @      RowBox[{- m7 w2 |* E% i% Z
           RowBox[{"-", "0.10407011464100005`"}], "-",   }# f: F: n: F$ S: t/ _4 H- B
           SuperscriptBox[
    7 o: u+ j! X  W2 X$ ~* X- \% g$ o        RowBox[{"(",
    % J6 o4 C1 e* [2 a" w1 O- i$ T         RowBox[{
    ' N$ B" T, i& z1 k: V0 c          RowBox[{"-", "0.3555`"}], "+", "x3"}], ")"}], "2"], "-",
    3 w% I1 n/ x# q7 T$ v       SuperscriptBox[
      O* u9 w$ H! r1 n' P  y) O        RowBox[{"(", 9 t9 }' x/ Q4 i
             RowBox[{
    # h1 R( f' H* _" H( Q5 _8 u          RowBox[{"-", "0.37679`"}], "+", "x6"}], ")"}], "2"], "-", 8 x8 B# c) c) b) W
           SuperscriptBox[
    ( t" h1 G/ X0 T8 W        RowBox[{"(", ! X- i$ D2 h% j( U
             RowBox[{+ ^3 H- Z8 ?" _' W0 t
              RowBox[{"-", "0.411382`"}], "+", "x7"}], ")"}], "2"], "-",
    6 T4 B( P8 q0 s+ O, }; g       SuperscriptBox["x8", "2"], "-",
    6 p( G% [; {8 s: W0 K& ]4 E       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-", ; U: m; f) E  S# s2 t  t& B) L9 k
      RowBox[{"0.025873988843992612`", " ", ( e2 g) i7 u9 W0 X2 g
       SuperscriptBox["\[ExponentialE]", 5 u& e& P2 D# }- F
        RowBox[{"3.1415926535897936`", " ",
    1 F- K' j2 I& X9 p     RowBox[{"(", 2 u7 K/ _; g. D! A
          RowBox[{3 g: v! o+ K7 v9 V" I
           RowBox[{"-", "0.31770463544200006`"}], "-",
    * y' \; V  P$ t! A6 ]! E9 [       SuperscriptBox[4 n% x/ w, f2 b- j% j
            RowBox[{"(",
    . ^1 X4 }: K. t, J4 P         RowBox[{
    4 D7 b: R; C, _  ?  n/ c6 ^1 W          RowBox[{"-", "0.655012`"}], "+", "x3"}], ")"}], "2"], "-", 5 p, w+ i2 G5 \
           SuperscriptBox["x6", "2"], "-",
    5 D. Q, |  _1 n3 y; A       SuperscriptBox["x7", "2"], "-", * Z4 E8 I" i7 u# U9 Q, ?6 {
           SuperscriptBox["x8", "2"], "-",
    ; X+ V$ `: }, T/ @- m       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+", . m. i% Y# P9 \
      RowBox[{"0.5575503376854455`", " ",
    6 H4 ^+ p% l' ~4 M1 w   SuperscriptBox["\[ExponentialE]",
    . Q# E1 w/ h7 `: `    RowBox[{"3.1415926535897936`", " ", * E3 f( L3 v) M+ ]! |# B* Z
         RowBox[{"(", 5 ~* X; l8 m, W- |6 Z( }
          RowBox[{
    8 ~. G& Q9 y9 e" X% ~$ j" y       RowBox[{"-", "0.6410867660730001`"}], "-", 7 F$ b) `9 k1 B# p9 e9 h
           SuperscriptBox[
    , M# @2 H% j* V  \. F* w! @        RowBox[{"(",
    8 [) ^) B% z0 {# W         RowBox[{
    ' N$ i! F6 Z6 ~: J+ M- w# o          RowBox[{"-", "0.420753`"}], "+", "x3"}], ")"}], "2"], "-", 6 o, g. j! D; i7 l
           SuperscriptBox["x6", "2"], "-", 4 o3 I2 U: ^5 A0 T
           SuperscriptBox["x7", "2"], "-",
    3 ^7 }6 I4 ~$ [' \4 [/ y( n       SuperscriptBox["x8", "2"], "-",
    " Z& `+ Z7 C3 L/ z       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "-",
    ( C. }0 k0 {. t8 ?  RowBox[{"0.13398540448199214`", " ",
    % V2 b+ ~5 q' O' ]0 [8 H   SuperscriptBox["\[ExponentialE]",
    4 n$ R2 K, `# E/ W- E; Y# d- {2 d: X    RowBox[{"3.1415926535897936`", " ", ' G9 ?- r4 g! {+ y' P
         RowBox[{"(",
    , E0 p/ _4 ~, B4 ^      RowBox[{
    5 e6 V% R* }' T: E       RowBox[{"-", "0.155663887074`"}], "-", / ~" N( z( t" r+ S& G
           SuperscriptBox[: ~1 a$ C1 J' Z( n  F
            RowBox[{"(",
    ( l8 P+ `6 s& _         RowBox[{
    % s! ?' i6 g/ m- u( A5 C          RowBox[{"-", "0.267704`"}], "+", "x3"}], ")"}], "2"], "-", ! t- d5 F( {8 o; ?# o1 p9 a
           SuperscriptBox["x6", "2"], "-",   K; t* \. o4 a% ]- Y3 W2 y
           SuperscriptBox["x7", "2"], "-",
    * \( w3 ^7 l1 F, q" v) E% G$ X       SuperscriptBox["x8", "2"], "-",
    6 n3 R1 u( K! Q7 f1 V5 m       SuperscriptBox["x9", "2"]}], ")"}]}]]}], "+",
    & ]0 o) R# O5 ~5 M( F  y  RowBox[{"0.4572385099113415`", " ", 2 A' O9 E7 e) i; x( ^; ]
       SuperscriptBox["\[ExponentialE]", : H0 E3 @0 ~- _% V# h1 H; t
        RowBox[{"3.1415926535897936`", " ", 7 A1 e' s8 l/ x/ ?8 V
         RowBox[{"(",
    ( D- T' H3 y' e9 P( ], |      RowBox[{4 }7 }% B5 w+ ~! ?1 W
           RowBox[{"-", "0.14151232428600002`"}], "-",
    1 b& u1 \* C3 ]  s8 E       SuperscriptBox[
    6 c) G1 \4 G& `7 H        RowBox[{"(",
    8 ~; b5 S. Q, f1 Q! z& n! \         RowBox[{4 C/ L3 W+ E$ l4 B8 b# R. H/ M
              RowBox[{"-", "0.234619`"}], "+", "x3"}], ")"}], "2"], "-",
    / j% s/ z$ L% _5 K* U" i       SuperscriptBox["x6", "2"], "-",
    # k6 X4 i: @! }9 k       SuperscriptBox["x7", "2"], "-",
    / P* M) x0 L: d4 [* ]       SuperscriptBox["x8", "2"], "-",
    % s" ]( J- _7 k$ O/ W! w       SuperscriptBox["x9", "2"]}], ")"}]}]]}]}]], "Output"," X" d3 S9 T; y' r4 \3 p  o7 M
    CellChangeTimes->{3.577962841401445*^9}]
    5 X/ }% p, e  `' r7 Q4 c. a4 a3 _& f}, Open  ]]/ q+ P$ c( k$ r4 G
    },/ D; R2 o4 M$ _1 X1 o8 r! A. S( \
    WindowSize->{1093, 659},
    4 ~% J, d1 l! \( iWindowMargins->{{61, Automatic}, {Automatic, 15}},
    9 z  U  c: g: MFrontEndVersion->"7.0 for Microsoft Windows (32-bit) (February 18, 2009)",, _* G' I# h" k
    StyleDefinitions->"Default.nb"
    * X; F3 p! Y) {* `]; g) y2 X# b( u1 |
    (* End of Notebook Content *)' K  ~1 A( W& |! I9 O3 D7 Q

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

    ; V9 I1 t* v: q# d% s% P' V这个是用mathmatic做的神经网络，能导出最后的权值，就是可以写出表达式，我想用matlab做，却不知道怎么做
    回复

    使用道具 举报

    569646632        

    0

    主题

    7

    听众

    46

    积分

    升级  43.16%

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

    • 签到天数: 9 天

    [LV.3]偶尔看看II

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

    使用道具 举报

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

    0

    主题

    8

    听众

    44

    积分

    升级  41.05%

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

    • 签到天数: 12 天

    [LV.3]偶尔看看II

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

    使用道具 举报

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

    qq
    收缩

    • 电话咨询

    • 04714969085

    fastpost

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

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

    蒙公网安备 15010502000194号

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

    GMT+8, 2026-7-27 11:30 , Processed in 2.489790 second(s), 106 queries .

    回顶部