Advertisement
Guest User

Untitled

a guest
Oct 26th, 2014
206
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.28 KB | None | 0 0
  1. eq = {7.876174155966237*10^8 q[1] q[2] +
  2. 3.089573929076111*10^11 q[1]*q[3] -
  3. 1.383164420023547*10^11 q[1]*q[4] -
  4. 8.69327863244762*10^10 q[1]*q[5] -
  5. 5.782276395051118*10^10 q[1]*q[6] -
  6. 3.882747274312769*10^10 q[1]*q[7] -
  7. 2.718153431333784*10^10 q[1]*q[8] -
  8. 1.871727631370937*10^10 q[1]*q[9] -
  9. 1.160739768204187*10^10 q[1]*q[10] -
  10. 8.06637222864757*10^9 q[1]*q[11] -
  11. 5.963897903744298*10^9 q[1]*q[12] -
  12. 4.915457539792909*10^9 q[1]*q[13] ==
  13. 41.5726614785708351779158 .23696667442628*10^8 q[3]*q[2] +
  14. 3.089573929076111*10^11 q[1]*q[3] -
  15. 3.14514257979788*10^11 q[3]*q[4] -
  16. 1.364812421413417*10^11 q[3]*q[5] -
  17. 8.200749083805965*10^10 q[3]*q[6] -
  18. 5.199209763929092*10^10 q[3]*q[7] -
  19. 3.48884718739484*10^10 q[3]*q[8] -
  20. 2.32869468208448*10^10 q[3]*q[9] -
  21. 1.380239079268908*10^10 q[3]*q[10] -
  22. 9.323329484842843*10^9 q[3]*q[11] -
  23. 6.754539699898449*10^9 q[3]*q[12] -
  24. 5.502821647682379*10^9 q[3]*q[13] == 39.090711539551680838935,
  25. 8.61522790311153*10^8 q[4]*q[2] +
  26. 3.14514257979788*10^11 q[3]*q[4] +
  27. 1.383164420023547*10^11 q[1]*q[4] -
  28. 3.018556794730371*10^11 q[4]*q[5] -
  29. 1.251939130894869*10^11 q[4]*q[6] -
  30. 7.200708200204837*10^10 q[4]*q[7] -
  31. 4.581328545341369*10^10 q[4]*q[8] -
  32. 2.95259803140547*10^10 q[4]*q[9] -
  33. 1.660482187826396*10^10 q[4]*q[10] -
  34. 1.086049100232898*10^10 q[4]*q[11] -
  35. 7.691599943122406*10^9 q[4]*q[12] -
  36. 6.186520887032309*10^9 q[4]*q[13] == 39.71119902430646942368,
  37. 9.04024901520535*10^8 q[5]*q[2] +
  38. 3.018556794730371*10^11 q[4]*q[5] +
  39. 1.364812421413417*10^11 q[3]*q[5] +
  40. 8.69327863244762*10^10 q[1]*q[5] -
  41. 2.662069346680555*10^11 q[5]*q[6] -
  42. 1.084567931193396*10^11 q[5]*q[7] -
  43. 4.58462119991434*10^10 q[5]*q[8] -
  44. 2.954233262566902*10^10 q[5]*q[9] -
  45. 1.086298309404161*10^10 q[5]*q[11] -
  46. 7.692872367401133*10^9 q[5]*q[12] -
  47. 6.187349069941687*10^9 q[5]*q[13] == 43.43412393283520093215,
  48. 9.58107308865949*10^8 q[6]*q[2] +
  49. 2.662069346680555*10^11 q[5]*q[6] +
  50. 1.251939130894869*10^11 q[4]*q[6] +
  51. 8.200749083805965*10^10 q[3]*q[6] +
  52. 5.782276395051118*10^10 q[1]*q[6] -
  53. 2.416484550106671*10^11 q[6]*q[7] -
  54. 1.000589953622153*10^11 q[6]*q[8] -
  55. 5.667851443992393*10^10 q[6]*q[9] -
  56. 2.71540993739268*10^10 q[6]*q[10] -
  57. 1.613848374025927*10^10 q[6]*q[11] -
  58. 1.070606507930378*10^10 q[6]*q[12] -
  59. 8.3069156585462*10^9 q[6]*q[13] == 66.30774855209701225155,
  60. 1.023694674428333*10^9 q[7]*q[2] +
  61. 2.416484550106671*10^11 q[6]*q[7] +
  62. 1.084567931193396*10^11 q[5]*q[7] +
  63. 7.200708200204837*10^10 q[4]*q[7] +
  64. 5.199209763929092*10^10 q[3]*q[7] +
  65. 3.882747274312769*10^10 q[1]*q[7] -
  66. 2.335526899537523*10^11 q[7]*q[8] -
  67. 9.170819378390439*10^10 q[7]*q[9] -
  68. 3.868051931218125*10^10 q[7]*q[10] -
  69. 2.128903059755466*10^10 q[7]*q[11] -
  70. 1.341864327566713*10^10 q[7]*q[12] -
  71. 1.013051826593238*10^10 q[7]*q[13] == 59.676973696887311026395,
  72. 1.09740654139634*10^9 q[8]*q[2] +
  73. 2.335526899537523*10^11 q[7]*q[8] +
  74. 1.000589953622153*10^11 q[6]*q[8] +
  75. 4.58462119991434*10^10 q[5]*q[8] +
  76. 4.581328545341369*10^10 q[4]*q[8] +
  77. 3.48884718739484*10^10 q[3]*q[8] +
  78. 2.718153431333784*10^10 q[1]*q[8] -
  79. 1.632980324637583*10^11 q[8]*q[9] -
  80. 5.906288180566143*10^10 q[8]*q[10] -
  81. 2.944094061812386*10^10 q[8]*q[11] -
  82. 1.737854910543447*10^10 q[8]*q[12] -
  83. 1.267694594748506*10^10 q[8]*q[13] == 59.676973696887311026395,
  84. 1.226485374572291*10^9 q[9]*q[2] +
  85. 1.632980324637583*10^11 q[8]*q[9] +
  86. 9.170819378390439*10^10 q[7]*q[9] +
  87. 5.667851443992393*10^10 q[6]*q[9] +
  88. 2.954233262566902*10^10 q[5]*q[9] +
  89. 2.95259803140547*10^10 q[4]*q[9] +
  90. 2.32869468208448*10^10 q[3]*q[9] +
  91. 1.871727631370937*10^10 q[1]*q[9] -
  92. 1.319053049676902*10^11 q[9]*q[10] -
  93. 5.363293427524359*10^10 q[9]*q[11] -
  94. 2.756647166322137*10^10 q[9]*q[12] -
  95. 1.87253921409798*10^10 q[9]*q[13] == 30.3662534756404375,
  96. 1.421056739280782*10^9 q[10]*q[2] +
  97. 1.319053049676902*10^11 q[9]*q[10] +
  98. 5.906288180566143*10^10 q[8] q[10] +
  99. 3.868051931218125*10^10 q[7]*q[10] +
  100. 2.71540993739268*10^10 q[6]*q[10] +
  101. 1.661042505714571*10^10 q[5]*q[10] +
  102. 1.660482187826396*10^10 q[4]*q[10] +
  103. 1.380239079268908*10^10 q[3]*q[10] +
  104. 1.160739768204187*10^10 q[1]*q[10] 1.369382557754065*10^11 q[10]*
  105. q[11] - 5.811111845727664*10^10 q[10]*q[12] -
  106. 3.464461454834223*10^10 q[10]*q[13] == 29.54554392224475,
  107. 1.649776763694766*10^9 q[11]*q[2] +
  108. 1.369382557754065*10^11 q[10]*q[11] +
  109. 5.363293427524359*10^10 q[9]*q[11] +
  110. 2.944094061812386*10^10 q[8]*q[11] +
  111. 2.128903059755466*10^10 q[7]*q[11] +
  112. 1.613848374025927*10^10 q[6]*q[11] +
  113. 1.086298309404161*10^10 q[5]*q[11] +
  114. 1.086049100232898*10^10 q[4]*q[11] +
  115. 9.323329484842843*10^9 q[3]*q[11] +
  116. 8.06637222864757*10^9 q[1]*q[11] -
  117. 1.406003409468488*10^11 q[11]*q[12] -
  118. 7.363054544339372*10^10 q[11]*q[13] == 26.4268476193411375,
  119. 1.926892257497436*10^9 q[12]*q[2] +
  120. 5.811111845727664*10^10 q[10]*q[12] +
  121. 2.756647166322137*10^10 q[9]*q[12] +
  122. 1.737854910543447*10^10 q[8]*q[12] +
  123. 1.341864327566713*10^10 q[7]*q[12] +
  124. 1.070606507930378*10^10 q[6]*q[12] +
  125. 7.692872367401133*10^9 q[5]*q[12] +
  126. 7.691599943122406*10^9 q[4]*q[12] +
  127. 6.754539699898449*10^9 q[3]*q[12] +
  128. 5.963897903744298*10^9 q[1]*q[12] -
  129. 1.636667034244436*10^11 q[12]*q[13] == 27.5758409940951,
  130. 2.169244191944226*10^9 q[13]*q[2] +
  131. 3.464461454834223*10^10 q[10]*q[13] +
  132. 1.87253921409798*10^10 q[9]*q[13] +
  133. 1.267694594748506*10^10 q[8]*q[13] +
  134. 1.013051826593238*10^10 q[7]*q[13] +
  135. 8.3069156585462*10^9 q[6]*q[13] +
  136. 6.187349069941687*10^9 q[5]*q[13] +
  137. 6.186520887032309*10^9 q[4]*q[13] +
  138. 5.502821647682379*10^9 q[3]*q[13] +
  139. 4.915457539792909*10^9 q[1]*q[13] == 9.5778412995448368};
  140. {val, sol} =
  141. NMaximize[{q@2, And @@ eq}, Array[q, 13],
  142. Method -> {"SimulatedAnnealing", "PerturbationScale" -> 10}]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement