Appendix/Ramblings/51BiPolytropeStability/BetterInterfacePt2: Difference between revisions

From jetwiki
Jump to navigation Jump to search
 
(43 intermediate revisions by the same user not shown)
Line 1,335: Line 1,335:
</tr>
</tr>
</table>
</table>
=====Determine Coefficients=====
The difference between the last two expressions gives,
The difference between the last two expressions gives,


Line 1,434: Line 1,436:
</tr>
</tr>
</table>
</table>
From the first expression, we also see that,
 
<!-- ************************** -->
 
<table border="1" align="center" cellpadding="10" width="80%"><tr><td align="left">
Repeat, to check &hellip;


<table border="0" align="center" cellpadding="5">
<table border="0" align="center" cellpadding="5">
Line 1,441: Line 1,447:
   <td align="right">
   <td align="right">
<math>
<math>
2b\tilde{r}_J \Delta\tilde{r}  
x_J - x_{J-1}  
</math>
</math>
   </td>
   </td>
Line 1,447: Line 1,453:
   <td align="left">
   <td align="left">
<math>
<math>
(x_J)^' \Delta\tilde{r}
[b\tilde{r}_J^2 + c\tilde{r}_J^4]
- 4c\tilde{r}_J^3 \Delta\tilde{r}
-[b(\tilde{r}_{J}-\Delta\tilde{r})^2 + c(\tilde{r}_{J}-\Delta\tilde{r})^4]
\, .
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
Therefore we have,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right"><math>x_J - x_{J-1}</math></td>
   <td align="right">
&nbsp;
  </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\biggl[
[b\tilde{r}_J^2 + c\tilde{r}_J^4]
(x_J)^' \Delta\tilde{r}- 4c\tilde{r}_J^3 \Delta\tilde{r}
-[b(\tilde{r}_{J}^2 - 2\tilde{r}_{J}\Delta\tilde{r} + \Delta\tilde{r}^2)
\biggr]
+  
\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
c(\tilde{r}_{J}^2 - 2\tilde{r}_{J}\Delta\tilde{r} + \Delta\tilde{r}^2)(\tilde{r}_{J}^2 - 2\tilde{r}_{J}\Delta\tilde{r} + \Delta\tilde{r}^2)]
+c\biggl[
4\tilde{r}_J^3\Delta\tilde{r}  
- 6\tilde{r}_J^2\Delta\tilde{r}^2  
+ 4\tilde{r}_J\Delta\tilde{r}^3
- \Delta\tilde{r}^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 1,478: Line 1,475:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
&nbsp;
  </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\biggl[(x_J)^' \Delta\tilde{r}\biggr]
[c\tilde{r}_J^4]
\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
+ b[2\tilde{r}_{J}\Delta\tilde{r} - \Delta\tilde{r}^2]  
+
- c[
\biggl[2c\tilde{r}_J^2 \Delta\tilde{r}\biggr]
\tilde{r}_{J}^2 (\tilde{r}_{J}^2 - 2\tilde{r}_{J}\Delta\tilde{r} + \Delta\tilde{r}^2)
\biggl[ \Delta\tilde{r} - 2\tilde{r}_J\biggr]
- 2\tilde{r}_{J}\Delta\tilde{r} (\tilde{r}_{J}^2 - 2\tilde{r}_{J}\Delta\tilde{r} + \Delta\tilde{r}^2)
+
+
c\biggl[
\Delta\tilde{r}^2(\tilde{r}_{J}^2 - 2\tilde{r}_{J}\Delta\tilde{r} + \Delta\tilde{r}^2)
4\tilde{r}_J^3\Delta\tilde{r}  
]
- 6\tilde{r}_J^2\Delta\tilde{r}^2  
+ 4\tilde{r}_J\Delta\tilde{r}^3
- \Delta\tilde{r}^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 1,499: Line 1,494:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
&nbsp;
  </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\biggl[(x_J)^' \Delta\tilde{r}\biggr]
b[2\tilde{r}_{J}\Delta\tilde{r} - \Delta\tilde{r}^2]
\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
- c[  
+
(- 2\tilde{r}_{J}^3\Delta\tilde{r} + \tilde{r}_{J}^2 \Delta\tilde{r}^2)
c\biggl[2\tilde{r}_J^2 \Delta\tilde{r}^2
+ (-2\tilde{r}_{J}^3\Delta\tilde{r} + 4\tilde{r}_{J}^2\Delta\tilde{r}^2  - 2\tilde{r}_{J}\Delta\tilde{r}^3 )
-
+  
4\tilde{r}_J^3 \Delta\tilde{r}\biggr]
(\tilde{r}_{J}^2\Delta\tilde{r}^2 - 2\tilde{r}_{J}\Delta\tilde{r}^3 + \Delta\tilde{r}^4)
+
]
c\biggl[
</math>
4\tilde{r}_J^3\Delta\tilde{r}  
  </td>
- 6\tilde{r}_J^2\Delta\tilde{r}^2  
</tr>
+ 4\tilde{r}_J\Delta\tilde{r}^3  
 
- \Delta\tilde{r}^4
<tr>
  <td align="right">
&nbsp;
  </td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
2b\tilde{r}_J \Delta\tilde{r}\biggl[1 - \frac{\Delta\tilde{r}}{2\tilde{r}_{J}} \biggr]  
+ c\biggl[  
4\tilde{r}_{J}^3\Delta\tilde{r} - 6\tilde{r}_{J}^2 \Delta\tilde{r}^2
+ 4\tilde{r}_{J}\Delta\tilde{r}^3 - \Delta\tilde{r}^4
\biggr]
\biggr]
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
Hence,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
<math>
x_J - x_{J-1}
</math>
  </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\biggl[(x_J)^' \Delta\tilde{r}\biggr]
\biggl[(x_J)^' \Delta\tilde{r}- 4c\tilde{r}_J^3 \Delta\tilde{r}\biggr]
\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
\biggl[1 - \frac{\Delta\tilde{r}}{2\tilde{r}_{J}} \biggr]  
+
+ c\biggl[  
c\biggl[
4\tilde{r}_{J}^3\Delta\tilde{r} - 6\tilde{r}_{J}^2 \Delta\tilde{r}^2
- 4\tilde{r}_J^2\Delta\tilde{r}^2  
+ 4\tilde{r}_{J}\Delta\tilde{r}^3 - \Delta\tilde{r}^4
+ 4\tilde{r}_J\Delta\tilde{r}^3  
- \Delta\tilde{r}^4
\biggr]
\biggr]
</math>
</math>
Line 1,539: Line 1,552:
<tr>
<tr>
   <td align="right">
   <td align="right">
<math>\Rightarrow ~~~
&nbsp;
c\Delta\tilde{r}^2
\biggl[ 4\tilde{r}_J^2 - 4\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2 \biggr]
</math>
   </td>
   </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}  
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) \biggr]
+
c\biggl[4\tilde{r}_J^3 \Delta\tilde{r}\biggr]\biggl[\frac{\Delta\tilde{r}}{2\tilde{r}_{J}} - 1\biggr]
+  
c\biggl[
4\tilde{r}_{J}^3\Delta\tilde{r} - 6\tilde{r}_{J}^2 \Delta\tilde{r}^2
+ 4\tilde{r}_{J}\Delta\tilde{r}^3 - \Delta\tilde{r}^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 1,554: Line 1,571:
<tr>
<tr>
   <td align="right">
   <td align="right">
<math>\Rightarrow ~~~  
<math>
4c \tilde{r}_J^2 \Delta\tilde{r}^2
\Rightarrow ~~~ x_J - x_{J-1} - (x_J)^' \Delta\tilde{r}
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
\biggl[1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) \biggr]  
</math>
</math>
   </td>
   </td>
Line 1,562: Line 1,579:
   <td align="left">
   <td align="left">
<math>
<math>
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}  
c \biggl[2\tilde{r}_J^2\Delta\tilde{r}^2 - 4\tilde{r}_J^3 \Delta\tilde{r}\biggr]  
+
c\biggl[  
4\tilde{r}_{J}^3\Delta\tilde{r} - 6\tilde{r}_{J}^2 \Delta\tilde{r}^2
+ 4\tilde{r}_{J}\Delta\tilde{r}^3 - \Delta\tilde{r}^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 1,569: Line 1,591:
<tr>
<tr>
   <td align="right">
   <td align="right">
<math>\Rightarrow ~~~
&nbsp;
4c \tilde{r}_J^4
\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
   </td>
   </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}  
c\biggl[  
\, .
- 4\tilde{r}_{J}^2 \Delta\tilde{r}^2
+ 4\tilde{r}_{J}\Delta\tilde{r}^3 - \Delta\tilde{r}^4
\biggr]
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
Hence also,


<table border="0" align="center" cellpadding="5">
<tr>
 
<tr>
   <td align="right">
   <td align="right">
<math>
<math>\Rightarrow ~~~
2b\tilde{r}_J \Delta\tilde{r} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
4c\tilde{r}_{J}^4 \cdot \mathcal{A}
</math>
</math>
   </td>
   </td>
Line 1,598: Line 1,613:
   <td align="left">
   <td align="left">
<math>
<math>
(x_J)^' \Delta\tilde{r}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
x_{J-1}-x_J + (x_J)^' \Delta\tilde{r}
- \biggl\{
\biggl[1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) \biggr]
4c\tilde{r}_J^2 \Delta\tilde{r}^2
\biggr\}
</math>
</math>
   </td>
   </td>
Line 1,608: Line 1,621:
<tr>
<tr>
   <td align="right">
   <td align="right">
<math>\Rightarrow ~~~
&nbsp;
2b\tilde{r}_J \Delta\tilde{r} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
   </td>
   </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
(x_J)^' \Delta\tilde{r}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
x_{J-1}-x_J + (x_J)^' \tilde{r}_J
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
\biggl[\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]  
- \biggl\{
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}
\biggr\}
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
where,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">
   <td align="right">
&nbsp;
<math>
\mathcal{A}
</math>
   </td>
   </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>\equiv</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
x_J - x_{J-1}
\biggl[
+
\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
(x_J)^' \biggl(\frac{\Delta\tilde{r}^2}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
+ \frac{1}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
-\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J}
\biggr] \, .
\biggr]
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
Also,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">
   <td align="right">
&nbsp;
<math>
2b\tilde{r}_J^2 
</math>
   </td>
   </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
x_J - x_{J-1}
(x_J)^' \tilde{r}_J - 4c\tilde{r}_J^4  
+
(x_J)^' \biggl(\frac{\Delta\tilde{r}^2}{\tilde{r}_J}\biggr)
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
- (x_J)^' \Delta\tilde{r}
+\frac{1}{2} (x_J)^' \biggl( \frac{\Delta\tilde{r}^2}{\tilde{r}_J} \biggr)
</math>
</math>
   </td>
   </td>
Line 1,661: Line 1,674:
<tr>
<tr>
   <td align="right">
   <td align="right">
<math>\Rightarrow ~~~  
<math>
2b\tilde{r}_J^2  
\Rightarrow ~~~ 2b\tilde{r}_J^2 \cdot \mathcal{A}  
\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
</math>
   </td>
   </td>
Line 1,671: Line 1,681:
   <td align="left">
   <td align="left">
<math>
<math>
x_J - x_{J-1}
(x_J)^' \tilde{r}_J\cdot \mathcal{A}  
+
- \biggl\{  
(x_J)^' \Delta\tilde{r}  
x_{J-1}-x_J + (x_J)^' \tilde{r}_J
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggl[\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggr\}
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
Finally,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right"><math>a</math></td>
   <td align="right">
&nbsp;
  </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
x_J - b\tilde{r}_J^2 - c\tilde{r}_J^4
x_J-x_{J-1}
+ (x_J)^' \tilde{r}_J
\biggl[\mathcal{A} -\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]
\, .
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
</td></tr></table>
<!-- ************************** -->
From the first expression, we also see that,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right"><math>\Rightarrow ~~~
   <td align="right">
a\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
  </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
<math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
2b\tilde{r}_J \Delta\tilde{r}  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
- b\tilde{r}_J^2 \biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
 
- c\tilde{r}_J^4 \biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
</math>
   </td>
   </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
(x_J)^' \Delta\tilde{r}- 4c\tilde{r}_J^3 \Delta\tilde{r}
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
\, .
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
Therefore we have,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right"><math>x_J - x_{J-1}</math></td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
- \frac{1}{2}\biggl\{
\biggl[
x_J - x_{J-1}
(x_J)^' \Delta\tilde{r}- 4c\tilde{r}_J^3 \Delta\tilde{r}
+
\biggr]
(x_J)^' \Delta\tilde{r}  
\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+c\biggl[
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
4\tilde{r}_J^3\Delta\tilde{r}  
\biggr\}
- 6\tilde{r}_J^2\Delta\tilde{r}^2
</math>
+ 4\tilde{r}_J\Delta\tilde{r}^3
  </td>
- \Delta\tilde{r}^4
</tr>
\biggr]
 
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
- \frac{1}{4}\biggl\{
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}
\biggr\}
</math>
</math>
   </td>
   </td>
Line 1,762: Line 1,758:
   <td align="left">
   <td align="left">
<math>
<math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
\biggl[(x_J)^' \Delta\tilde{r}\biggr]
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+
- \frac{1}{2}\biggl\{
\biggl[2c\tilde{r}_J^2 \Delta\tilde{r}\biggr]
x_J - x_{J-1}  
\biggl[ \Delta\tilde{r} - 2\tilde{r}_J\biggr]
\biggr\}
+
- \frac{1}{4}\biggl\{
c\biggl[
-x_J + x_{J-1}
4\tilde{r}_J^3\Delta\tilde{r}
\biggr\}
- 6\tilde{r}_J^2\Delta\tilde{r}^2
 
+ 4\tilde{r}_J\Delta\tilde{r}^3
- \Delta\tilde{r}^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 1,778: Line 1,776:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
- \frac{1}{2}\biggl\{
\biggl[(x_J)^' \Delta\tilde{r}\biggr]
(x_J)^' \Delta\tilde{r}  
\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
c\biggl[2\tilde{r}_J^2 \Delta\tilde{r}^2
\biggr\}
-
- \frac{1}{4}\biggl\{
4\tilde{r}_J^3 \Delta\tilde{r}\biggr]
(x_J)^' \Delta\tilde{r}\biggl[ 1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) \biggr]
+
\biggr\}
c\biggl[
4\tilde{r}_J^3\Delta\tilde{r}  
- 6\tilde{r}_J^2\Delta\tilde{r}^2
+ 4\tilde{r}_J\Delta\tilde{r}^3
- \Delta\tilde{r}^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 1,798: Line 1,801:
   <td align="left">
   <td align="left">
<math>
<math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
\biggl[(x_J)^' \Delta\tilde{r}\biggr]
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+
 
c\biggl[
+\frac{x_{J-1} - x_J}{4}
- 4\tilde{r}_J^2\Delta\tilde{r}^2
+ 4\tilde{r}_J\Delta\tilde{r}^3
- \Delta\tilde{r}^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 1,808: Line 1,814:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
   <td align="center">&nbsp;</td>
<math>\Rightarrow ~~~
c\Delta\tilde{r}^2
\biggl[ 4\tilde{r}_J^2 - 4\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2 \biggr]
</math>
  </td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+ \biggl\{
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}  
(x_J)^' \Delta\tilde{r}  
\biggl[\frac{1}{2}- \frac{1}{4} + \frac{1}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) - \frac{3}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggr\}
</math>
</math>
   </td>
   </td>
Line 1,822: Line 1,829:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
<math>\Rightarrow ~~~
4c \tilde{r}_J^2 \Delta\tilde{r}^2
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
  </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\frac{x_{J-1} - x_J}{4}
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}  
+
</math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
  </td>
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
</tr>
 
<tr>
  <td align="right">
<math>\Rightarrow ~~~
4c \tilde{r}_J^4  
\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+
</math>
(x_J)^' \Delta\tilde{r}  
  </td>
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr
  <td align="center"><math>=</math></td>
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
  <td align="left">
<math>
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}  
\, .
\, .
</math>
</math>
Line 1,840: Line 1,861:
</tr>
</tr>
</table>
</table>
 
Hence also,
 
<table border="1" width="80%" align="center" cellpadding="8"><tr><td align="left">
<div align="center"><b>Summary:</b></div>


<table border="0" align="center" cellpadding="5">
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right"><math>a \cdot \mathcal{A}</math></td>
   <td align="right">
<math>
2b\tilde{r}_J \Delta\tilde{r} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
</math>
  </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\frac{x_{J-1} - x_J}{4}
(x_J)^' \Delta\tilde{r}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+
- \biggl\{  
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
4c\tilde{r}_J^2 \Delta\tilde{r}^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr\}
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+
(x_J)^' \Delta\tilde{r}
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) 
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\, ,
</math>
</math>
   </td>
   </td>
Line 1,868: Line 1,884:
<tr>
<tr>
   <td align="right">
   <td align="right">
<math>  
<math>\Rightarrow ~~~
2b\tilde{r}_J^2 \cdot \mathcal{A}
2b\tilde{r}_J \Delta\tilde{r} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
</math>
   </td>
   </td>
Line 1,875: Line 1,892:
   <td align="left">
   <td align="left">
<math>
<math>
x_J - x_{J-1}
(x_J)^' \Delta\tilde{r}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
(x_J)^' \Delta\tilde{r}  
- \biggl\{  
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggr\}
\, ,
</math>
</math>
   </td>
   </td>
Line 1,887: Line 1,903:
<tr>
<tr>
   <td align="right">
   <td align="right">
<math>\Rightarrow ~~~
&nbsp;
4c \tilde{r}_J^4 \cdot \mathcal{A}
</math>
   </td>
   </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
(x_J)^' \Delta\tilde{r}\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}  
x_J - x_{J-1}
\, ,
+
(x_J)^' \biggl(\frac{\Delta\tilde{r}^2}{\tilde{r}_J}\biggr)
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
-\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J}  
\biggr]
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
where,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right"><math>\mathcal{A}</math></td>
   <td align="right">
   <td align="center"><math>\equiv</math></td>
&nbsp;
  </td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
x_J - x_{J-1}
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
(x_J)^' \biggl(\frac{\Delta\tilde{r}^2}{\tilde{r}_J}\biggr)
\, .
\biggl[ 1 - \frac{\Delta\tilde{r}}{\tilde{r}_J} + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
- (x_J)^' \Delta\tilde{r}
+\frac{1}{2} (x_J)^' \biggl( \frac{\Delta\tilde{r}^2}{\tilde{r}_J} \biggr)
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
</td></tr></table>
Let's now determine the expression for <math>x_{J+1}</math>.  We begin by writing &hellip;
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right"><math>x_{J+1}</math></td>
   <td align="right">
<math>\Rightarrow ~~~
2b\tilde{r}_J^2
\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
  </td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
a + b(\tilde{r}_{J}+\Delta\tilde{r})^2 + c(\tilde{r}_{J}+\Delta\tilde{r})^4
x_J - x_{J-1}
+
(x_J)^' \Delta\tilde{r}  
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
Finally,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right"><math>a</math></td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
a + b(\tilde{r}_{J}^2 +2\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2)
x_J - b\tilde{r}_J^2 - c\tilde{r}_J^4
+ c \biggl[\tilde{r}_{J}^2(\tilde{r}_{J}^2 +2\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2)
+ 2\tilde{r}_J\Delta\tilde{r}(\tilde{r}_{J}^2 +2\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2)
+ \Delta\tilde{r}^2(\tilde{r}_{J}^2 +2\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2)
\biggr]
</math>
</math>
   </td>
   </td>
Line 1,949: Line 1,972:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right"><math>\Rightarrow ~~~
a\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
  </math></td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
a + b\tilde{r}_{J}^2 \biggl[1 + \frac{2\Delta\tilde{r}}{\tilde{r}_J} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]  
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
+ c \biggl[(\tilde{r}_{J}^4 +2\tilde{r}_J^3\Delta\tilde{r} + \tilde{r}_J^2\Delta\tilde{r}^2)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ (2\tilde{r}_J^3\Delta\tilde{r} +4\tilde{r}_J^2\Delta\tilde{r}^2 + 2\tilde{r}_J\Delta\tilde{r}^3)
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+ (\tilde{r}_{J}^2\Delta\tilde{r}^2 +2\tilde{r}_J\Delta\tilde{r}^3 + \Delta\tilde{r}^4)
- b\tilde{r}_J^2 \biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
\biggr]  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
 
- c\tilde{r}_J^4 \biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
</math>
   </td>
   </td>
Line 1,967: Line 1,999:
   <td align="left">
   <td align="left">
<math>
<math>
a + b\tilde{r}_{J}^2 \biggl[1 + \frac{2\Delta\tilde{r}}{\tilde{r}_J} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+ c \biggl[\tilde{r}_{J}^4 + 4\tilde{r}_J^3\Delta\tilde{r} + 6\tilde{r}_J^2\Delta\tilde{r}^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ 4\tilde{r}_J\Delta\tilde{r}^3 + \Delta\tilde{r}^4
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
\biggr]  
</math>
</math>
   </td>
   </td>
Line 1,977: Line 2,008:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="center">&nbsp;</td>
   <td align="left">
   <td align="left">
<math>
<math>
a + b\tilde{r}_{J}^2 \biggl[1 + 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
- \frac{1}{2}\biggl\{
+ c \tilde{r}_{J}^4 \biggl[1 + 4\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) + 6 \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2  
x_J - x_{J-1}  
+ 4 \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
+
\biggr]
(x_J)^' \Delta\tilde{r}  
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggr\}
</math>
</math>
   </td>
   </td>
Line 1,990: Line 2,024:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="center">&nbsp;</td>
   <td align="left">
   <td align="left">
<math>
<math>
a + 2b\tilde{r}_{J}^2 \biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \frac{1}{4}\biggl\{
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]  
\biggl[(x_J)^' \Delta\tilde{r}\biggr]\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}
+ 4c \tilde{r}_{J}^4 \biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) + \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
\biggr\}
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
</math>
\biggr]
\, .
</math>
   </td>
   </td>
</tr>
</tr>
</table>
This means that,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right"><math>\mathcal{A} \cdot x_{J+1}</math></td>
   <td align="right">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
a \cdot \mathcal{A}  
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
</math>
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
  </td>
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</tr>
- \frac{1}{2}\biggl\{
x_J - x_{J-1}  
\biggr\}
- \frac{1}{4}\biggl\{
-x_J + x_{J-1}
\biggr\}


<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+ 2b\tilde{r}_{J}^2 \cdot \mathcal{A} \biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
</math>
   </td>
   </td>
Line 2,033: Line 2,058:
   <td align="left">
   <td align="left">
<math>
<math>
+ 4c\tilde{r}_{J}^\cdot \mathcal{A} \biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
- \frac{1}{2}\biggl\{
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2  
(x_J)^' \Delta\tilde{r}  
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
\biggr]
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggr\}
- \frac{1}{4}\biggl\{
(x_J)^' \Delta\tilde{r}\biggl[ 1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) \biggr]
\biggr\}
</math>
</math>
   </td>
   </td>
Line 2,046: Line 2,075:
   <td align="left">
   <td align="left">
<math>
<math>
\frac{x_{J-1} - x_J}{4}
+
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+  
 
(x_J)^' \Delta\tilde{r}
+\frac{x_{J-1} - x_J}{4}
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) 
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
</math>
</math>
   </td>
   </td>
Line 2,064: Line 2,089:
   <td align="left">
   <td align="left">
<math>
<math>
+  
+ \biggl\{
\biggl\{
x_J - x_{J-1}
+
(x_J)^' \Delta\tilde{r}  
(x_J)^' \Delta\tilde{r}  
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggl[\frac{1}{2}- \frac{1}{4} + \frac{1}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) - \frac{3}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggr\}
\biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]  
</math>
  </td>
</tr>
 
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl\{
(x_J)^' \Delta\tilde{r}\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}
\biggr\}
\biggr\}
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 2,100: Line 2,103:
   <td align="left">
   <td align="left">
<math>
<math>
\frac{1}{4}x_{J-1} - \frac{1}{4}x_J
\frac{x_{J-1} - x_J}{4}
+
+
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
Line 2,109: Line 2,112:
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)   
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)   
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\, .
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
<table border="1" width="80%" align="center" cellpadding="8"><tr><td align="left">
<div align="center"><b>OLD Summary:</b></div>
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right"><math>a \cdot \mathcal{A}</math></td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
\frac{x_{J-1} - x_J}{4}
+
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+  
+  
\biggl\{
(x_J)^' \Delta\tilde{r}
x_J - x_{J-1}  
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) 
\biggr\}  
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
\, ,
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]  
</math>
</math>
   </td>
   </td>
Line 2,129: Line 2,143:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
   <td align="center">&nbsp;</td>
<math>
2b\tilde{r}_J^2 \cdot \mathcal{A}
</math>
  </td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
x_J - x_{J-1}
+
(x_J)^' \Delta\tilde{r}  
(x_J)^' \Delta\tilde{r}  
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\, ,
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
</math>
   </td>
   </td>
Line 2,144: Line 2,162:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
   <td align="center">&nbsp;</td>
<math>\Rightarrow ~~~
4c \tilde{r}_J^4 \cdot \mathcal{A}
</math>
  </td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+
(x_J)^' \Delta\tilde{r}\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}  
\biggl\{
\, ,
-x_J + x_{J-1}
\biggr\}
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2  
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
where,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right"><math>\mathcal{A}</math></td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>\equiv</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+
\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
(x_J)^' \Delta\tilde{r}\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2  
\, .
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]  
</math>
</math>
   </td>
   </td>
Line 2,176: Line 2,194:
</table>
</table>


Keep going &hellip;
</td></tr></table>
 
<!-- 333333333333333333 -->
 
Repeat, to check &hellip;


<table border="0" align="center" cellpadding="5">
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right"><math>\mathcal{A} \cdot x_{J+1}</math></td>
   <td align="right"><math>4\biggl[ x_J - a \biggr]\cdot \mathcal{A}</math></td>
   <td align="center"><math>=</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
4b\tilde{r}_J^2\cdot \mathcal{A} + 4c\tilde{r}_J^4 \cdot \mathcal{A}
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
=
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
2\biggl\{ 2b\tilde{r}_J^2 \cdot \mathcal{A} \biggr\}
+  
\biggl\{ 4c\tilde{r}_J^4 \cdot \mathcal{A} \biggr\}
</math>
</math>
   </td>
   </td>
Line 2,194: Line 2,218:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
2\biggl\{ x_J-x_{J-1}
+ (x_J)^' \tilde{r}_J
\biggl[\mathcal{A} -\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]
\biggr\}
+  
+  
\biggl\{
\biggl\{  
x_J - x_{J-1}  
x_{J-1}-x_J + (x_J)^' \tilde{r}_J
\biggl[\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]
\biggr\}
\biggr\}
\biggl[-\frac{1}{4}+\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 -\frac{1}{4} - \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
- \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 - \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
</math>
   </td>
   </td>
Line 2,212: Line 2,237:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
\biggl\{ x_J-x_{J-1}
(x_J)^' \Delta\tilde{r}  
+ (x_J)^' \tilde{r}_J
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggl[2\mathcal{A} -\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)  
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]
\biggr\}  
</math>
</math>
   </td>
   </td>
Line 2,224: Line 2,250:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right"><math>\Rightarrow ~~~  4 a \cdot \mathcal{A}</math></td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+
4 x_J \cdot \mathcal{A} - \biggl\{ x_J-x_{J-1}  
(x_J)^' \Delta\tilde{r}  
+ (x_J)^' \tilde{r}_J
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggl[2\mathcal{A} -\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]
\biggl[\frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]  
\biggr\}
</math>
</math>
   </td>
   </td>
Line 2,239: Line 2,265:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
(4 \mathcal{A} - 1) x_J+x_{J-1} - (x_J)^' \tilde{r}_J
(x_J)^' \Delta\tilde{r}  
\biggl[2\mathcal{A} -\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)  
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggl[\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
\biggr]  
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
<!-- 444444444444444 -->
<table border="1" width="80%" align="center" cellpadding="8"><tr><td align="left">
<div align="center"><b>New Summary:</b></div>
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right"><math>4a\cdot \mathcal{A}</math></td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
(4 \mathcal{A} - 1) x_J+x_{J-1} - (x_J)^' \tilde{r}_J
(x_J)^' \Delta\tilde{r}  
\biggl[2\mathcal{A} -\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)  
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggl[\frac{1}{2} \biggr]  
</math>
</math>
   </td>
   </td>
Line 2,268: Line 2,297:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
(4 \mathcal{A} - 1) x_J+x_{J-1} + (x_J)^' \Delta\tilde{r}
(x_J)^' \Delta\tilde{r}  
\biggl\{ 1  
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \frac{5}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
- \frac{1}{2}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr]
\biggr\}
\, ,
</math>
</math>
   </td>
   </td>
Line 2,282: Line 2,312:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
<math>
+
2b\tilde{r}_J^2 \cdot \mathcal{A}  
(x_J)^' \Delta\tilde{r}\biggl[ - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2  
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
</math>
   </td>
   </td>
</tr>
   <td align="center"><math>=</math></td>
<tr><td align="center" colspan="3">''midpoint''</td></tr>
<tr>
  <td align="right">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
x_J-x_{J-1}  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ (x_J)^' \tilde{r}_J
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
\biggl[\mathcal{A} -\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)  
+
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr)^2 \biggr]
\biggl\{
x_J - x_{J-1}
\biggr\}
\biggl[
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
- \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
- \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]  
</math>
</math>
   </td>
   </td>
Line 2,318: Line 2,329:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
   <td align="center">&nbsp;</td>
&nbsp;
  </td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
x_J-x_{J-1}
(x_J)^' \Delta\tilde{r}  
+ (x_J)^' \Delta\tilde{r}
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggl\{-1  
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
+ \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
\biggr\}
\, ,
</math>
</math>
   </td>
   </td>
Line 2,331: Line 2,348:


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">
   <td align="center">&nbsp;</td>
<math>
4c\tilde{r}_{J}^4 \cdot \mathcal{A}
</math>
  </td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
x_{J-1}-x_J + (x_J)^' \Delta\tilde{r}
(x_J)^' \Delta\tilde{r}  
\biggl[ 1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) \biggr]
\biggl[-\frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{3}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\, ,
- \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 + \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^5 \biggr]
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
where,
<table border="0" align="center" cellpadding="5">


<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right"><math>\mathcal{A}</math></td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>\equiv</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+
\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
(x_J)^' \Delta\tilde{r}
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3  
\biggl[-\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
\, .
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>


<tr>
</td></tr></table>
   <td align="right">&nbsp;</td>
 
   <td align="center">&nbsp;</td>
=====Project Forward=====
 
Let's now determine the expression for <math>x_{J+1}</math>.  We begin by writing &hellip;
 
<table border="0" align="center" cellpadding="5">
 
<tr>
   <td align="right"><math>x_{J+1}</math></td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
a + b(\tilde{r}_{J}+\Delta\tilde{r})^2 + c(\tilde{r}_{J}+\Delta\tilde{r})^4
(x_J)^' \Delta\tilde{r}  
\biggl[-\frac{1}{2} + \frac{3}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
- \frac{1}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
</math>
</math>
   </td>
   </td>
Line 2,371: Line 2,401:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
a + b(\tilde{r}_{J}^2 +2\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2)  
(x_J)^' \Delta\tilde{r}  
+ c \biggl[\tilde{r}_{J}^2(\tilde{r}_{J}^2 +2\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2)
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)  
+ 2\tilde{r}_J\Delta\tilde{r}(\tilde{r}_{J}^2 +2\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2  
+ \Delta\tilde{r}^2(\tilde{r}_{J}^2 +2\tilde{r}_J\Delta\tilde{r} + \Delta\tilde{r}^2)
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]  
\biggr]  
</math>
</math>
Line 2,386: Line 2,415:
<tr>
<tr>
   <td align="right">&nbsp;</td>
   <td align="right">&nbsp;</td>
   <td align="center">&nbsp;</td>
   <td align="center"><math>=</math></td>
   <td align="left">
   <td align="left">
<math>
<math>
+  
a + b\tilde{r}_{J}^2 \biggl[1 + \frac{2\Delta\tilde{r}}{\tilde{r}_J} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
(x_J)^' \Delta\tilde{r}  
+ c \biggl[(\tilde{r}_{J}^4 +2\tilde{r}_J^3\Delta\tilde{r} + \tilde{r}_J^2\Delta\tilde{r}^2)
\biggl[-\frac{1}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) - \frac{1}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2  
+ (2\tilde{r}_J^3\Delta\tilde{r} +4\tilde{r}_J^2\Delta\tilde{r}^2 + 2\tilde{r}_J\Delta\tilde{r}^3)
- \frac{3}{4} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^3
+ (\tilde{r}_{J}^2\Delta\tilde{r}^2 +2\tilde{r}_J\Delta\tilde{r}^3 + \Delta\tilde{r}^4)
- \frac{1}{2} \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^5
\biggr]
</math>
  </td>
</tr>
 
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a + b\tilde{r}_{J}^2 \biggl[1 + \frac{2\Delta\tilde{r}}{\tilde{r}_J} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
+ c \biggl[\tilde{r}_{J}^4 + 4\tilde{r}_J^3\Delta\tilde{r} + 6\tilde{r}_J^2\Delta\tilde{r}^2
+ 4\tilde{r}_J\Delta\tilde{r}^3 + \Delta\tilde{r}^4
\biggr]  
\biggr]  
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a + b\tilde{r}_{J}^2 \biggl[1 + 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
+ c \tilde{r}_{J}^4 \biggl[1 + 4\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) + 6 \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ 4 \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a + 2b\tilde{r}_{J}^2 \biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
+ 4c \tilde{r}_{J}^4 \biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) + \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
\, .
</math>
</math>
   </td>
   </td>
</tr>
</tr>
</table>
</table>
This means that,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>\mathcal{A} \cdot x_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a \cdot \mathcal{A}
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+ 2b\tilde{r}_{J}^2 \cdot \mathcal{A} \biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+ 4c\tilde{r}_{J}^4  \cdot \mathcal{A} \biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\frac{x_{J-1} - x_J}{4}
+
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+
(x_J)^' \Delta\tilde{r}
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) 
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl\{
x_J - x_{J-1}
+
(x_J)^' \Delta\tilde{r}
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggr\}
\biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl\{
(x_J)^' \Delta\tilde{r}\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]-x_J + x_{J-1}
\biggr\}
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\frac{1}{4}x_{J-1} - \frac{1}{4}x_J
+
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+
(x_J)^' \Delta\tilde{r}
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) 
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl\{
x_J - x_{J-1}
\biggr\}
\biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggl[\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl\{
-x_J + x_{J-1}
\biggr\}
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}\biggl[ 1 - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
</table>
Keep going &hellip;
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>\mathcal{A} \cdot x_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl\{
x_J - x_{J-1}
\biggr\}
\biggl[-\frac{1}{4}+\frac{1}{2} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 -\frac{1}{4} - \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
- \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 - \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) 
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggl[\frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggl[\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[-1 + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
\biggl[\frac{1}{2} \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}\biggl[ - \frac{\Delta\tilde{r}}{2\tilde{r}_J} \biggr]
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr><td align="center" colspan="3">''midpoint''</td></tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_J\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+
\biggl\{
x_J - x_{J-1}
\biggr\}
\biggl[
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
- \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
- \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[\frac{1}{4} - \frac{5}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) 
+ \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[-\frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{3}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
- \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 + \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^5 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[-\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) + \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[-\frac{1}{2}  + \frac{3}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \frac{1}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 + \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[\frac{1}{4} + \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ \frac{3}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 + \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
(x_J)^' \Delta\tilde{r}
\biggl[-\frac{1}{8}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr) - \frac{1}{2} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \frac{3}{4} \biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^3
- \frac{1}{2} \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 - \frac{1}{8}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^5
\biggr]
</math>
  </td>
</tr>
<tr><td align="center" colspan="3">---- ''next in line'' ----</td></tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_J\biggl[
- 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3\biggr]
+
x_{J-1}
\biggl[
\biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
+
(x_J)^' \Delta\tilde{r}
\biggl[
2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
- \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_J\biggl[
- 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3\biggr]
+ \biggl\{
2x_{J-1} \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J} \biggr)^3
-
2x_{J-1} \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J} \biggr)^3
\biggr\}
+
x_{J-1}
\biggl[
\biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
+
2(x_J)^' \Delta\tilde{r}
\biggl[
\biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
- \frac{1}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right"><math>\Rightarrow~~~ \mathcal{A}\cdot x_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
(x_J - x_{J-1})\biggl[
- 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3\biggr]
+
\mathcal{A}\cdot x_{J-1}
+
2(x_J)^' \Delta\tilde{r}
\biggl[
\biggl(\frac{\Delta\tilde{r}}{\tilde{r}}\biggr)^2
- \frac{1}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr] \, .
</math>
  </td>
</tr>
</table>
<span id="FirstGrouping">Grouping terms</span> with like powers of <math>(\Delta\tilde{r}/\tilde{r}_J)</math> we find,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>0</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggl[
\biggl(x_{J-1} - x_{J+1}\biggr)+ 2(x_J)^' \Delta\tilde{r}
\biggr]
+
\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3 \biggl[
x_{J-1} - 2x_J + x_{J+1} 
\biggr]
+
\frac{1}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggl[
\biggl(x_{J-1} - x_{J+1}\biggr) - 2(x_J)^' \Delta\tilde{r}
\biggr]
\, .
</math>
  </td>
</tr>
</table>
----
<table border="1" width="80%" align="center" cellpadding="8"><tr><td align="left">
<div align="center"><b>New Summary:</b></div>
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>4a\cdot \mathcal{A}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
(4 \mathcal{A} - 1) x_J+x_{J-1} + (x_J)^' \Delta\tilde{r}
\biggl\{ 1
- \frac{5}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \frac{1}{2}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr\}
\, ,
</math>
  </td>
</tr>
<tr>
  <td align="right">
<math>
2b\tilde{r}_J^2 \cdot \mathcal{A}
</math>
  </td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl\{
x_J-x_{J-1}
+ (x_J)^' \Delta\tilde{r}
\biggl[-1
+ \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr]\biggr\}
\, ,
</math>
  </td>
</tr>
<tr>
  <td align="right">
<math>
4c\tilde{r}_{J}^4 \cdot \mathcal{A}
</math>
  </td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl\{
x_{J-1}-x_J + (x_J)^' \Delta\tilde{r}
\biggl[ 1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) \biggr]
\biggr\}
\, ,
</math>
  </td>
</tr>
</table>
where,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>\mathcal{A}</math></td>
  <td align="center"><math>\equiv</math></td>
  <td align="left">
<math>
\biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
\, .
</math>
  </td>
</tr>
</table>
</td></tr></table>
Try again &hellip;
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>x_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a + b(\tilde{r}_{J}+\Delta\tilde{r})^2 + c(\tilde{r}_{J}+\Delta\tilde{r})^4
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a
+
b(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)
+
c(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a
+
b(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)
+
c \biggl[\tilde{r}_{J}^2(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)
+
2 \tilde{r}_J \Delta\tilde{r}(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)
+
\Delta\tilde{r}^2(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a
+
b(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)
+
c \biggl[(\tilde{r}_{J}^4 +2 \tilde{r}_J^3 \Delta\tilde{r} + \tilde{r}_J^2\Delta\tilde{r}^2)
+
(2\tilde{r}_J^3 \Delta\tilde{r} +4\tilde{r}_J^2 \Delta\tilde{r}^2 + 2\tilde{r}_J \Delta\tilde{r}^3)
+
(\tilde{r}_{J}^2\Delta\tilde{r}^2 +2 \tilde{r}_J \Delta\tilde{r}^3 + \Delta\tilde{r}^4)
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a
+
b(\tilde{r}_{J}^2 +2 \tilde{r}_J \Delta\tilde{r} + \Delta\tilde{r}^2)
+
c \biggl[\tilde{r}_{J}^4 +4 \tilde{r}_J^3 \Delta\tilde{r} + 6\tilde{r}_J^2\Delta\tilde{r}^2
+
4\tilde{r}_J \Delta\tilde{r}^3
+
\Delta\tilde{r}^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
a
+
b\tilde{r}_{J}^2\biggl[ 1 +2\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
+
c \tilde{r}_{J}^4\biggl[1 +4 \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 6\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr] \, .
</math>
  </td>
</tr>
</table>
Multiplying through by <math>4\mathcal{A}</math> gives,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>4 x_{J+1}\cdot \mathcal{A}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
4a \cdot \mathcal{A}
+
2b\tilde{r}_{J}^2 \cdot \mathcal{A}\biggl[ 2 +4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 2\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
+
4c \tilde{r}_{J}^4 \cdot \mathcal{A}\biggl[1 +4 \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 6\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
(4 \mathcal{A} - 1) x_J+x_{J-1} + (x_J)^' \Delta\tilde{r}
\biggl[ 1
- \frac{5}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \frac{1}{2}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl\{
x_J-x_{J-1}
+ (x_J)^' \Delta\tilde{r}
\biggl[-1
+ \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr]\biggr\}
\biggl[ 2 +4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 2\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl\{
x_{J-1}-x_J + (x_J)^' \Delta\tilde{r}
\biggl[ 1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) \biggr]
\biggr\}
\biggl[1 +4 \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 6\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
4 \mathcal{A}x_J + \biggl(x_J - x_{J-1} \biggr)
\biggl\{
-1 + \biggl[ 2 +4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 2\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
-
\biggl[1 +4 \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 6\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
\biggr\}
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+ (x_J)^' \Delta\tilde{r}
\biggl\{
\biggl[ 1
- \frac{5}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \frac{1}{2}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr]
+
\biggl[-1
+ \frac{3}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr]
\biggl[ 2 +4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 2\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 \biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl[ 1 - \frac{1}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_{J}}\biggr) \biggr]
\biggl[1 +4 \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 6\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
\biggr\}
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
4 \mathcal{A}x_J + 4\biggl(x_J - x_{J-1} \biggr)
\biggl\{
-
\biggl[ \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\frac{1}{4}\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
\biggr\}
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+ (x_J)^' \Delta\tilde{r}
\biggl\{
\biggl[ 1
- \frac{5}{2}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \frac{1}{2}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl[-2
+ 3\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)
- 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+ \frac{1}{2}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl[-4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)
+ 6\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- 4\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl[-2\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+ 3\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
- 2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
+ \frac{1}{2}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^5
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center">&nbsp;</td>
  <td align="left">
<math>
+
\biggl[1 +4 \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr) + 6\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
4\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
+
\biggl[- \frac{1}{2}\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)
-2 \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2 -3\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
- 2 \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
- \frac{1}{2} \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^5
\biggr]
\biggr\}
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
4 \mathcal{A}x_J + 4\biggl(x_J - x_{J-1} \biggr)
\biggl\{
-
\biggl[ \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\frac{1}{4}\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
\biggr\}
+ (x_J)^' \Delta\tilde{r}
\biggl\{
\biggl[
8\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
-2\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
\biggr\}\, .
</math>
  </td>
</tr>
</table>
Grouping terms with like powers of <math>(\Delta\tilde{r}/\tilde{r}_J)</math> we find,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>0</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl(x_J - x_{J+1} \biggr)
\cdot \biggl[ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
- \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+ \frac{1}{4}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4 \biggr]
+
\biggl(x_{J-1} - x_J \biggr)
\biggl[ \biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
+
\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^3
+
\frac{1}{4}\biggl(\frac{ \Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
+ (x_J)^' \Delta\tilde{r}
\biggl[
2\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2
-\frac{1}{2}\biggl( \frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4
\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^2\biggl[
x_{J-1} + 2(x_J)^'\Delta\tilde{r} - x_{J+1}
\biggr]
+ \biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^3\biggl[
x_{J-1} - 2x_J + x_{J+1}
\biggr]
+ \frac{1}{4}\biggl(\frac{\Delta\tilde{r}}{\tilde{r}_J}\biggr)^4\biggl[
x_{J-1} - 2(x_J)^'\Delta\tilde{r} - x_{J+1}
\biggr]
</math>
  </td>
</tr>
</table>
This <font color="red"><b>EXACTLY MATCHES</b></font> our [[#FirstGrouping|above first derivation and grouping]]!
====Improve First Approximation====
After slogging through the preceding "Second thru Fifth" approximations, I have come to appreciate that the approach used way back in the "[[Appendix/Ramblings/51BiPolytropeStability/BetterInterface#First_Approximation|First Approximation]]" was a good one, but that the attempt to introduce an implicit dependence was misguided.  I now think I have discovered the preferable implicit treatment.  Let's repeat, while improving this approach.
=====2<sup>nd</sup>-Order Explicit Approach=====
As was done in our earlier [[Appendix/Ramblings/51BiPolytropeStability/BetterInterface#First_Approximation|First Approximation]], let's set up a grid associated with a uniformly spaced spherical radius, where the subscript <math>J</math> denotes the grid zone at which all terms in the finite-difference representation of the governing relations will be evaluated.  More specifically,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>\tilde{r}_{J-1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\tilde{r}_J - \Delta\tilde{r}
</math>
  </td>
<td align="center">&nbsp; &nbsp; &nbsp; and &nbsp; &nbsp; &nbsp;</td>
  <td align="right"><math>\tilde{r}_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\tilde{r}_J + \Delta\tilde{r} \, ;
</math>
  </td>
</tr>
</table>
also,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>\biggl(\frac{dx}{d\tilde{r}}\biggr)_{J}</math></td>
  <td align="center"><math>\approx</math></td>
  <td align="left">
<math>
\frac{(x_{J+1} - x_{J-1})}{2\Delta\tilde{r}}
</math>
  </td>
<td align="center">&nbsp; &nbsp; &nbsp; and &nbsp; &nbsp; &nbsp;</td>
  <td align="right"><math>\biggl(\frac{dp}{d\tilde{r}}\biggr)_{J}</math></td>
  <td align="center"><math>\approx</math></td>
  <td align="left">
<math>
\frac{(p_{J+1} - p_{J-1})}{2\Delta\tilde{r}} \, .
</math>
  </td>
</tr>
</table>
And at each grid location, the governing relations establish the local evaluation of the derivatives, that is,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>\biggl(\frac{dx}{d \tilde{r}}\biggr)_J </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
- \frac{1}{\tilde{r}_J}\biggl[
3x + \frac{p}{\gamma_g}\biggr]_J \, ,
</math>
  </td>
<td align="center">&nbsp; &nbsp; &nbsp; and &nbsp; &nbsp; &nbsp;</td>
  <td align="right"><math>\biggl(\frac{dp}{d \tilde{r}}\biggr)_J </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\frac{\tilde{\rho}_J}{\tilde{P}_J}\biggl[
(4x + p)\frac{\tilde{M}_r}{\tilde{r}^2}
+
\tau_c^2 \omega^2 \tilde{r} x \biggr]_J \, .
</math>
  </td>
</tr>
</table>
<span id="1stapprox">So, integrating</span> step-by-step from the center of the configuration, outward, once all the variable values are known at grid locations <math>J</math> and <math>(J-1)</math>, the values of <math>x</math> and <math>p</math> at <math>(J+1)</math> are given by the expressions,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>x_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_{J-1} - 2\Delta\tilde{r} \biggl\{
\frac{1}{\tilde{r}}\biggl[
3x + \frac{p}{\gamma_g}\biggr]
\biggr\}_J \, ,
</math>
  </td>
<td align="center">&nbsp; &nbsp; &nbsp; and &nbsp; &nbsp; &nbsp;</td>
  <td align="right"><math>p_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
p_{J-1} + 2\Delta\tilde{r}
\biggl\{
\frac{\tilde{\rho}}{\tilde{P}} \cdot \frac{\tilde{M}_r}{\tilde{r}^2}
\biggl[ (4x + p)
+
\sigma_c^2 \biggl(\frac{2\pi}{3} \cdot \frac{\tilde{\rho}_c \tilde{r}^3 }{\tilde{M}_r}\biggr) x \biggr]
\biggr\}_J\, .
</math>
  </td>
</tr>
</table>
Then we will obtain the "<math>x_J</math>" and "<math>p_J</math>" values via the ''average'' expressions,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>x_{J}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\frac{1}{2}(x_{J-1} + x_{J+1})
\, ,
</math>
  </td>
<td align="center">&nbsp; &nbsp; &nbsp; and &nbsp; &nbsp; &nbsp;</td>
  <td align="right"><math>p_{J}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\frac{1}{2}(p_{J-1} + p_{J+1})
\, .
</math>
  </td>
</tr>
</table>
=====Convert to Implicit Approach=====
Consider implementing an ''implicit'' finite-difference analysis that improves on our earlier [[Appendix/Ramblings/51BiPolytropeStability/BetterInterface#First_Approximation|First Approximation]].  The general form of the source term expressions is,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>x_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_{J-1} + 2\Delta\tilde{r} \biggl\{
\mathfrak{A}x_J + \mathfrak{B}p_J
\biggr\}
</math>
  </td>
</tr>
</table>
where,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>\mathfrak{A}</math></td>
  <td align="center"><math>\equiv</math></td>
  <td align="left">
<math>
- \biggl\{ \frac{3}{\tilde{r}} \biggr\}_J \, ,
</math>
  </td>
<td align="center">&nbsp; &nbsp; &nbsp; and &nbsp; &nbsp; &nbsp;</td>
  <td align="right"><math>\mathfrak{B}</math></td>
  <td align="center"><math>\equiv</math></td>
  <td align="left">
<math>
- \biggl\{ \frac{1}{\gamma_g \tilde{r}} \biggr\}_J \, ;
</math>
  </td>
</tr>
</table>
and,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>p_{J+1}</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
p_{J-1} + 2\Delta\tilde{r} \biggl\{
\mathfrak{C}x_J + \mathfrak{D}p_J
\biggr\}
</math>
  </td>
</tr>
</table>
where,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>\mathfrak{C}</math></td>
  <td align="center"><math>\equiv</math></td>
  <td align="left">
<math>
\biggl\{
\mathfrak{D}
\biggl[ 4
+
\sigma_c^2 \biggl(\frac{2\pi}{3} \cdot \frac{\tilde{\rho}_c \tilde{r}^3 }{\tilde{M}_r}\biggr)  \biggr]
\biggr\}_J\, ,
</math>
  </td>
<td align="center">&nbsp; &nbsp; &nbsp; and &nbsp; &nbsp; &nbsp;</td>
  <td align="right"><math>\mathfrak{D}</math></td>
  <td align="center"><math>\equiv</math></td>
  <td align="left">
<math>
\biggl\{
\frac{\tilde{\rho}}{\tilde{P}} \cdot \frac{\tilde{M}_r}{\tilde{r}^2}
\biggr\}_J\, .
</math>
  </td>
</tr>
</table>
Now, wherever a "<math>J+1</math>" index appears in the source term, replace it with the ''average expressions''; specifically, <math>x_{J+1} \rightarrow (2 x_J - x_{J-1})</math> and <math>p_{J+1} \rightarrow (2 p_J - p_{J-1})</math>.  For the fractional radial displacement, we have,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>x_J </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_{J-1} + \Delta\tilde{r} \biggl\{
\mathfrak{A}x_J + \mathfrak{B}p_J
\biggr\} \, ;
</math>
  </td>
</tr>
</table>
and for the fractional pressure displacement,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>p_{J} </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
p_{J-1} + \Delta\tilde{r} \biggl\{
\mathfrak{C}x_J + \mathfrak{D}p_J
\biggr\} \, .
</math>
  </td>
</tr>
</table>
Solving for <math>p_J</math> in this second expression, we obtain,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>p_{J}\biggl[ 1 - \mathfrak{D}\Delta\tilde{r}\biggr] </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
p_{J-1} + (\mathfrak{C}\Delta\tilde{r}) x_J
</math>
  </td>
</tr>
</table>
in which case the first expression gives,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>x_J </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_{J-1} + (\mathfrak{A} \Delta\tilde{r})x_J
+ (\mathfrak{B} \Delta\tilde{r}) \biggl[ p_{J-1} + (\mathfrak{C}\Delta\tilde{r}) x_J\biggr]\biggl[ 1 - \mathfrak{D}\Delta\tilde{r}\biggr]^{-1}
</math>
  </td>
</tr>
<tr>
  <td align="right"><math>\Rightarrow ~~~ x_J \biggl[ 1 - \mathfrak{D}\Delta\tilde{r}\biggr]</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl\{
x_{J-1} + (\mathfrak{A} \Delta\tilde{r})x_J
\biggr\}\biggl[ 1 - \mathfrak{D}\Delta\tilde{r}\biggr]
+ (\mathfrak{B} \Delta\tilde{r}) \biggl[ p_{J-1} + (\mathfrak{C}\Delta\tilde{r}) x_J\biggr]
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_{J-1} \biggl[ 1 - \mathfrak{D}\Delta\tilde{r}\biggr]
+ (\mathfrak{B} \Delta\tilde{r}) p_{J-1}
+
(\mathfrak{A} \Delta\tilde{r})x_J \biggl[ 1 - \mathfrak{D}\Delta\tilde{r}\biggr]
+ (\mathfrak{B} \Delta\tilde{r}) (\mathfrak{C}\Delta\tilde{r}) x_J
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_{J-1} ( 1 - \mathfrak{D}\Delta\tilde{r})
+ (\mathfrak{B} \Delta\tilde{r}) p_{J-1}
+\biggl[
(\mathfrak{A} \Delta\tilde{r}) ( 1 - \mathfrak{D}\Delta\tilde{r})
+ (\mathfrak{B} \Delta\tilde{r}) (\mathfrak{C}\Delta\tilde{r})
\biggr] x_J
</math>
  </td>
</tr>
<tr>
  <td align="right"><math>
\Rightarrow ~~~
x_J \biggl\{ ( 1 - \mathfrak{D}\Delta\tilde{r} )- \biggl[
(\mathfrak{A} \Delta\tilde{r}) ( 1 - \mathfrak{D}\Delta\tilde{r})
+ (\mathfrak{B} \Delta\tilde{r}) (\mathfrak{C}\Delta\tilde{r})
\biggr] \biggr\}
</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_{J-1} ( 1 - \mathfrak{D}\Delta\tilde{r})
+ (\mathfrak{B} \Delta\tilde{r}) p_{J-1}
</math>
  </td>
</tr>
<tr>
  <td align="right"><math>
\Rightarrow ~~~
x_J \biggl\{ 1 - \biggl[
(\mathfrak{A} \Delta\tilde{r})
+ \frac{(\mathfrak{B} \Delta\tilde{r}) (\mathfrak{C}\Delta\tilde{r})}{ ( 1 - \mathfrak{D}\Delta\tilde{r} ) }
\biggr] \biggr\}
</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
x_{J-1}
+ \biggl[\frac{(\mathfrak{B} \Delta\tilde{r})}{( 1 - \mathfrak{D}\Delta\tilde{r} )}\biggr] p_{J-1}
</math>
  </td>
</tr>
<tr>
  <td align="right"><math>
\Rightarrow ~~~
x_J
</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl\{ x_{J-1}
+ \biggl[\frac{(\mathfrak{B} \Delta\tilde{r})}{( 1 - \mathfrak{D}\Delta\tilde{r} )}\biggr] p_{J-1} \biggr\}
\biggl\{ 1 - \biggl[
(\mathfrak{A} \Delta\tilde{r})
+ \frac{(\mathfrak{B} \Delta\tilde{r}) (\mathfrak{C}\Delta\tilde{r})}{ ( 1 - \mathfrak{D}\Delta\tilde{r} ) }
\biggr] \biggr\}^{-1}
\, .
</math>
  </td>
</tr>
</table>
Then,
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>p_{J}( 1 - \mathfrak{D}\Delta\tilde{r} ) </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
p_{J-1} + (\mathfrak{C}\Delta\tilde{r}) x_J
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
p_{J-1} + (\mathfrak{C}\Delta\tilde{r})
\biggl\{ x_{J-1}
+ \biggl[\frac{(\mathfrak{B} \Delta\tilde{r})}{( 1 - \mathfrak{D}\Delta\tilde{r} )}\biggr] p_{J-1} \biggr\}
\biggl\{ 1 - \biggl[
(\mathfrak{A} \Delta\tilde{r})
+ \frac{(\mathfrak{B} \Delta\tilde{r}) (\mathfrak{C}\Delta\tilde{r})}{ ( 1 - \mathfrak{D}\Delta\tilde{r} ) }
\biggr] \biggr\}^{-1}
</math>
  </td>
</tr>
</table>
<table border=1 align="center" cellpadding="10" width="80%"><tr><td bgcolor="lightblue" align="left">
This is test of  our "implicit" scheme for the <math>(n_c, n_e) = (5, 1)</math> bipolytrope with <math>\mu_e/\mu_c = 0.31</math> and (Model A) <math>\xi_i = 9.12744</math>; here, we also assume <math>\sigma_c^2 = 0.000109</math> and <math>J = i+2</math>.  Here are the quantities that we assume are <b>known</b> &hellip;
<table border="1" align="center" cellpadding="5">
  <tr>
<td align="center" bgcolor="white"><math>\tilde{r}</math></td>
<td align="center" bgcolor="white"><math>\tilde\rho</math></td>
<td align="center" bgcolor="white"><math>\tilde{P}</math></td>
<td align="center" bgcolor="white"><math>\tilde{M}_r</math></td>
<td align="center" bgcolor="white"><math>\tilde{\rho}_c</math></td>
<td align="center" bgcolor="white"><math>\mathfrak{A}</math></td>
<td align="center" bgcolor="white"><math>\mathfrak{B}</math></td>
<td align="center" bgcolor="white"><math>\frac{\mathfrak{C}}{\mathfrak{D}}</math></td>
<td align="center" bgcolor="white"><math>\mathfrak{D}</math></td>
  </tr>
  <tr>
<td align="center" bgcolor="white">0.0193368</td>
<td align="center" bgcolor="white">192.21728</td>
<td align="center" bgcolor="white">1913.1421</td>
<td align="center" bgcolor="white">0.3403116</td>
<td align="center" bgcolor="white">3359266.406</td>
<td align="center" bgcolor="white">-155.14459</td>
<td align="center" bgcolor="white">-25.85743</td>
<td align="center" bgcolor="white">4.0162932</td>
<td align="center" bgcolor="white">91.443479</td>
  </tr>
</table>
<table border="1" align="center" cellpadding="5">
  <tr>
<td align="center" bgcolor="white"><math>\Delta\tilde{r}</math></td>
<td align="center" bgcolor="white"><math>x_{J-1}</math></td>
<td align="center" bgcolor="white"><math>p_{J-1}</math></td>
<td align="center" bgcolor="white"><font size="-1">determined</font><br /><math>x_J</math></td>
<td align="center" bgcolor="white"><font size="-1">determined</font><br /><math>p_J</math></td>
  </tr>
  <tr>
<td align="center" bgcolor="white">0.001936393</td>
<td align="center" bgcolor="white">-4.755073</td>
<td align="center" bgcolor="white">32.25497</td>
<td align="center" bgcolor="white">-4.999355</td>
<td align="center" bgcolor="white">34.874915</td>
  </tr>
</table>
</td></tr>
<tr><td bgcolor="white" align="center">
<table border="0" align="center" cellpadding="5">
<tr>
  <td align="right"><math>
x_J
</math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl\{ x_{J-1}
+ \biggl[\frac{(\mathfrak{B} \Delta\tilde{r})}{( 1 - \mathfrak{D}\Delta\tilde{r} )}\biggr] p_{J-1} \biggr\}
\biggl\{ 1 - \biggl[
(\mathfrak{A} \Delta\tilde{r})
+ \frac{(\mathfrak{B} \Delta\tilde{r}) (\mathfrak{C}\Delta\tilde{r})}{ ( 1 - \mathfrak{D}\Delta\tilde{r} ) }
\biggr] \biggr\}^{-1}
</math>
  </td>
</tr>
<tr>
  <td align="right">&nbsp;</td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl\{ x_{J-1}
+ \biggl[-0.06084379\biggr] p_{J-1} \biggr\}
\biggl\{ 1 - \biggl[-0.3436910 \biggr] \biggr\}^{-1}
=
-4.999354 \, ;
</math>
  </td>
</tr>
<tr>
  <td align="right"><math>p_{J}( 1 - \mathfrak{D}\Delta\tilde{r} ) </math></td>
  <td align="center"><math>=</math></td>
  <td align="left">
<math>
\biggl[ p_{J-1} + (\mathfrak{C}\Delta\tilde{r}) x_J \biggr]( 1 - \mathfrak{D}\Delta\tilde{r} )^{-1}
=
34.87491 \, .
</math>
  </td>
</tr>
</table>
<tr><td bgcolor="lightblue" align="left">
<b>Best values:</b><br />Nodes 0: &nbsp;n/a
<br />Nodes 1: &nbsp;<math>\sigma_c^2 = 8.958784\times 10^{-5}</math>
<br />Nodes 2: &nbsp;<math>\sigma_c^2 = 3.021\times 10^{-4}</math>
<br />Nodes 3: &nbsp;<math>\sigma_c^2 = 6.09\times 10^{-4}</math>
</td></tr>
</table>
</td></tr></table>


===Interface===
===Interface===
Line 2,575: Line 4,151:
</table>
</table>


==Compare Core With Analytic Displacement Functions==


=See Also=
=See Also=

Latest revision as of 10:03, 26 September 2023

Better Interface for 51BiPolytrope Stability Study

This is Part 2 of an extended chapter discussion. For Part 1, go here.

Discretize for Numerical Integration (continued)

General Discretization

Fourth Approximation

Let's assume that we know the four quantities, xJ1,xJ,(xJ)'(dx/dr~)J, and (xJ1)'(dx/dr~)J1 and want to project forward to determine, xJ+1. We should assume that, locally, the displacement function x is cubic in r~, that is,

x =

a+br~+cr~2+er~3

dxdr~ =

b+2cr~+3er~2,

where we have four unknowns, a,b,c,e. These can be determined by appropriately combining the four relations,

(xJ)' =

b+2cr~J+3er~J2,

(xJ1)' =

b+2c(r~JΔr~)+3e(r~JΔr~)2,

xJ =

a+br~J+cr~J2+er~J3,

xJ1 =

a+b(r~JΔr~)+c(r~JΔr~)2+e(r~JΔr~)3,

The difference between the first two expressions gives,

(xJ)'(xJ1)' =

[2cr~J+3er~J2][2c(r~JΔr~)+3e(r~JΔr~)2]

  =

2cr~J+3er~J2[2cr~J2cΔr~+3e(r~J22r~JΔr~+Δr~2)]

  =

2cΔr~+6er~JΔr~3eΔr~2

2cΔr~ =

[(xJ)'(xJ1)']+3eΔr~26er~JΔr~

c =

[(xJ)'(xJ1)'2Δr~]+3e[Δr~2r~J].

And the difference between the last two expressions gives,

xJxJ1 =

[br~J+cr~J2+er~J3][b(r~JΔr~)+c(r~JΔr~)2+e(r~JΔr~)3]

  =

bΔr~+c(2r~JΔr~Δr~2)+er~J3e(r~JΔr~)(r~J22r~JΔr~+Δr~2)

  =

bΔr~+c(2r~JΔr~Δr~2)+er~J3e[(r~J)(r~J22r~JΔr~+Δr~2)(Δr~)(r~J22r~JΔr~+Δr~2)]

  =

bΔr~+c(2r~JΔr~Δr~2)e[3r~J2Δr~+3r~JΔr~2Δr~3]

  =

bΔr~+c(2r~JΔr~Δr~2)+e[3r~J2Δr~3r~JΔr~2+Δr~3]

bΔr~ =

[xJxJ1]+2cΔr~[Δr~2r~J]e[3r~J2Δr~3r~JΔr~2+Δr~3]

  =

[xJxJ1]+{[(xJ)'(xJ1)']+3eΔr~[Δr~2r~J]}[Δr~2r~J]3eΔr~[r~J2r~JΔr~+Δr~23]

  =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2r~J]+3eΔr~[Δr~22r~JΔr~]3eΔr~[r~JΔr~2r~J2]3eΔr~[r~J2r~JΔr~+Δr~23]

  =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2r~J]3eΔr~{[r~JΔr~Δr~22]+[r~JΔr~2r~J2]+[r~J2r~JΔr~+Δr~23]}

  =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2r~J]+eΔr~[3r~J23r~JΔr~+Δr~22].

Summary #1:

In terms of the coefficient, e

bΔr~ =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2r~J]+eΔr~[3r~J23r~JΔr~+Δr~22],

2cΔr~ =

[(xJ)'(xJ1)']+eΔr~[3Δr~6r~J].

Hence, from the first of the four relations, we find that,

(xJ)'Δr~3er~J2Δr~ =

(bΔr~)+(2cΔr~)r~J

  =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2r~J]+eΔr~[3r~J23r~JΔr~+Δr~22]+{[(xJ)'(xJ1)']+eΔr~[3Δr~6r~J]}r~J

  =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2]+eΔr~[3r~J23r~JΔr~+Δr~22]+eΔr~[3r~JΔr~6r~J2]

  =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2]+eΔr~[3r~J2+Δr~22]

(xJ)'Δr~ =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2]+e[Δr~32]

e[Δr~32] =

[xJxJ1][(xJ)'(xJ1)'][Δr~2]+(xJ)'Δr~

  =

[xJ1xJ]+[(xJ1)'+(xJ)']Δr~2

eΔr~3 =

2[xJ1xJ]+[(xJ1)'+(xJ)']Δr~.

Finally, from the third of the four relations, we can evaluate the coefficient, a; specifically,

xJaer~J3 =

br~J+cr~J2

  =

r~JΔr~{bΔr~}+r~J22Δr~{2cΔr~}

  =

r~JΔr~{[xJxJ1]+[(xJ)'(xJ1)'][Δr~2r~J]+eΔr~[3r~J23r~JΔr~+Δr~22]}+r~J22Δr~{[(xJ)'(xJ1)']+eΔr~[3Δr~6r~J]}

  =

{r~JΔr~[xJxJ1]+r~JΔr~[(xJ)'(xJ1)'][Δr~2r~J]+er~J[3r~J23r~JΔr~+Δr~22]}+{r~J22Δr~[(xJ)'(xJ1)']+er~J22[3Δr~6r~J]}

  =

r~JΔr~[xJxJ1]+[(xJ)'(xJ1)'][r~J2r~J22Δr~]+e[3r~J33r~J2Δr~+r~JΔr~22]+e[3r~J2Δr~23r~J3]

  =

r~JΔr~[xJxJ1]+12Δr~[(xJ)'(xJ1)'][r~JΔr~r~J2]+eΔr~2[r~JΔr~3r~J2].

That is,

a =

xJr~JΔr~[xJxJ1]12Δr~[(xJ)'(xJ1)'][r~JΔr~r~J2]e{Δr~2[r~JΔr~3r~J2]+r~J3}

  =

xJr~JΔr~[xJxJ1]12Δr~[(xJ)'(xJ1)'][r~JΔr~r~J2]eΔr~3{12Δr~2[r~JΔr~3r~J2]+(r~JΔr~)3}

Summary #2:

In terms of the coefficient, e

a =

xJr~JΔr~[xJxJ1]12Δr~[(xJ)'(xJ1)'][r~JΔr~r~J2]eΔr~3{12Δr~2[r~JΔr~3r~J2]+(r~JΔr~)3},

bΔr~ =

[xJxJ1]+[(xJ)'(xJ1)'][Δr~2r~J]+eΔr~3[3r~J2Δr~23r~JΔr~+12],

cΔr~2 =

[(xJ)'(xJ1)']Δr~2+eΔr~3[323r~JΔr~],

eΔr~3 =

2[xJ1xJ]+[(xJ1)'+(xJ)']Δr~.

This is test ...

r~J=r~i+Δr~ Δr~ xJ xJ1 (xJ)' (xJ1)'
0.01740039 0.001936393 -4.695376 -4.547832 -116.0119 -76.19513
a =

3.369552.76645eΔr~3(608.9698)=232.7874,

bΔr~ =

0.5067329+eΔr~3(215.7856)=+80.819698,

cΔr~2 =

0.0385505+eΔr~3(25.45794)=9.51370,

eΔr~3 =

0.3721883.

Hence,

xJ =

a+bΔr~(r~JΔr~)+cΔr~2(r~JΔr~)2+eΔr~3(r~JΔr~)3

  =

232.7874+726.2442768.2108+270.0593=4.68369.

Higher precision value (from Excel) is xJ=4.695376, which precisely matches the input value. Also from Excel, xJ1=4.547832 and xJ+1=3.803455.

As a result,

xJ+1 =

{a}+(r~J+Δr~){b}+(r~J+Δr~)2{c}+(r~J+Δr~)3{e}

  =

{a}+(r~JΔr~+1){bΔr~}+(r~JΔr~+1)2{cΔr~2}+(r~JΔr~+1)3{eΔr~3}

  =

xJr~JΔr~[xJxJ1]12Δr~[(xJ)'(xJ1)'][r~JΔr~r~J2]eΔr~3{12Δr~2[r~JΔr~3r~J2]+(r~JΔr~)3}

   

+(r~JΔr~+1){[xJxJ1]+[(xJ)'(xJ1)'][Δr~2r~J]+eΔr~3[3r~J2Δr~23r~JΔr~+12]}

   

+[(r~JΔr~)2+2r~JΔr~+1]{[(xJ)'(xJ1)']Δr~2+eΔr~3[323r~JΔr~]}

   

+(r~JΔr~+1)[(r~JΔr~)2+2r~JΔr~+1]{eΔr~3}

xJ+1 =

xJr~JΔr~[xJxJ1]12Δr~[(xJ)'(xJ1)'][r~JΔr~r~J2]+[xJxJ1](r~JΔr~+1)+[(xJ)'(xJ1)'][Δr~2r~J](r~JΔr~+1)+[(r~JΔr~)2+2r~JΔr~+1][(xJ)'(xJ1)']Δr~2

   

+eΔr~3[3r~J2Δr~23r~JΔr~+12](r~JΔr~+1)+eΔr~3[323r~JΔr~][(r~JΔr~)2+2r~JΔr~+1]+eΔr~3(r~JΔr~+1)[(r~JΔr~)2+2r~JΔr~+1]eΔr~3{12Δr~2[r~JΔr~3r~J2]+(r~JΔr~)3}

  =

2xJxJ112[(xJ)'(xJ1)'][r~Jr~J2Δr~]+12[(xJ)'(xJ1)'][Δr~2r~J](r~JΔr~+1)+[r~J2Δr~+2r~J+Δr~][(xJ)'(xJ1)']12

   

+eΔr~3{[3r~J2Δr~23r~JΔr~+12](r~JΔr~+1)+[323r~JΔr~][(r~JΔr~)2+2r~JΔr~+1]+(r~JΔr~+1)[(r~JΔr~)2+2r~JΔr~+1][12Δr~2(r~JΔr~3r~J2)+(r~JΔr~)3]}

  =

2xJxJ1+12[(xJ)'(xJ1)']{[Δr~2r~J](r~JΔr~+1)+[r~J2Δr~+2r~J+Δr~][r~Jr~J2Δr~]}

   

+eΔr~3{[3(r~JΔr~)33(r~JΔr~)2+12(r~JΔr~)]+[3(r~JΔr~)23(r~JΔr~)+12]+32[(r~JΔr~)2+2r~JΔr~+1]3[(r~JΔr~)3+2(r~JΔr~)2+(r~JΔr~)]

   

+[(r~JΔr~)3+2(r~JΔr~)2+(r~JΔr~)]+[(r~JΔr~)2+2r~JΔr~+1]+[r~J2Δr~+32(r~JΔr~)2(r~JΔr~)3]}

Continuing …

xJ+1 =

2xJxJ1+[(xJ)'(xJ1)']Δr~

   

+eΔr~3{[r~J2Δr~]+[3(r~JΔr~)+12]+32[(r~JΔr~)2+2r~JΔr~+1][6(r~JΔr~)2+3(r~JΔr~)]

   

+3(r~JΔr~)2+[2r~JΔr~+1]+[r~J2Δr~+32(r~JΔr~)2]}

  =

2xJxJ1+[(xJ)'(xJ1)']Δr~

   

+eΔr~3{r~JΔr~6(r~JΔr~)+3+3r~JΔr~6(r~JΔr~)2+3(r~JΔr~)2+2r~JΔr~+3(r~JΔr~)2}

  =

2xJxJ1+[(xJ)'(xJ1)']Δr~+3eΔr~3

Finally we may write,

xJ+1 =

2xJxJ1+[(xJ)'(xJ1)']Δr~+3{2[xJ1xJ]+[(xJ1)'+(xJ)']Δr~}

  =

2xJxJ1+6[xJ1xJ]+[(xJ)'(xJ1)']Δr~+3[(xJ1)'+(xJ)']Δr~

  =

[5xJ14xJ]+[4(xJ)'+2(xJ1)']Δr~.

This is test ...

Δr~ xJ xJ1 (xJ)' (xJ1)'
0.001936393 -4.695376 -4.547832 -116.0119 -76.19513
xJ+1 =

[5xJ14xJ]+[4(xJ)'+2(xJ1)']Δr~=5.15132.

Fifth Approximation

Let's assume that we know the three quantities, xJ1,xJ,(xJ)'(dx/dr~)J, and want to project forward to determine, xJ+1. Here we will assume that, locally, the displacement function x has only an even-power dependence on r~, that is,

x =

a+br~2+cr~4

dxdr~ =

2br~+4cr~3,

where we have three unknowns, a,b,c. These can be determined by appropriately combining the three relations,

(xJ)' =

2br~J+4cr~J3,

xJ =

a+br~J2+cr~J4,

xJ1 =

a+b(r~JΔr~)2+c(r~JΔr~)4,

Determine Coefficients

The difference between the last two expressions gives,

xJxJ1 =

[br~J2+cr~J4][b(r~JΔr~)2+c(r~JΔr~)4]

  =

br~J2+cr~J4b(r~J22r~JΔr~+Δr~2)c(r~J22r~JΔr~+Δr~2)(r~J22r~JΔr~+Δr~2)

  =

cr~J4+2br~JΔr~bΔr~2c[r~J2(r~J22r~JΔr~+Δr~2)2r~JΔr~(r~J22r~JΔr~+Δr~2)+Δr~2(r~J22r~JΔr~+Δr~2)]

  =

cr~J4+2br~JΔr~bΔr~2c[r~J42r~J3Δr~+r~2Δr~22r~J3Δr~+4r~J2Δr~22r~JΔr~3+r~J2Δr~22r~JΔr~3+Δr~4]

  =

b[2r~JΔr~Δr~2]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4]

  =

2br~JΔr~[1Δr~2r~J]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4].


Repeat, to check …

xJxJ1

=

[br~J2+cr~J4][b(r~JΔr~)2+c(r~JΔr~)4]

 

=

[br~J2+cr~J4][b(r~J22r~JΔr~+Δr~2)+c(r~J22r~JΔr~+Δr~2)(r~J22r~JΔr~+Δr~2)]

 

=

[cr~J4]+b[2r~JΔr~Δr~2]c[r~J2(r~J22r~JΔr~+Δr~2)2r~JΔr~(r~J22r~JΔr~+Δr~2)+Δr~2(r~J22r~JΔr~+Δr~2)]

 

=

b[2r~JΔr~Δr~2]c[(2r~J3Δr~+r~J2Δr~2)+(2r~J3Δr~+4r~J2Δr~22r~JΔr~3)+(r~J2Δr~22r~JΔr~3+Δr~4)]

 

=

2br~JΔr~[1Δr~2r~J]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4]

Hence,

xJxJ1

=

[(xJ)'Δr~4cr~J3Δr~][1Δr~2r~J]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4]

 

=

[(xJ)'Δr~][112(Δr~r~J)]+c[4r~J3Δr~][Δr~2r~J1]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4]

xJxJ1(xJ)'Δr~[112(Δr~r~J)]

=

c[2r~J2Δr~24r~J3Δr~]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4]

 

=

c[4r~J2Δr~2+4r~JΔr~3Δr~4]

4cr~J4𝒜

=

xJ1xJ+(xJ)'Δr~[112(Δr~r~J)]

 

=

xJ1xJ+(xJ)'r~J[(Δr~r~J)12(Δr~r~J)2]

where,

𝒜

[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4].

Also,

2br~J2

=

(xJ)'r~J4cr~J4

2br~J2𝒜

=

(xJ)'r~J𝒜{xJ1xJ+(xJ)'r~J[(Δr~r~J)12(Δr~r~J)2]}

 

=

xJxJ1+(xJ)'r~J[𝒜(Δr~r~J)+12(Δr~r~J)2].


From the first expression, we also see that,

2br~JΔr~

=

(xJ)'Δr~4cr~J3Δr~.

Therefore we have,

xJxJ1 =

[(xJ)'Δr~4cr~J3Δr~][1Δr~2r~J]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4]

  =

[(xJ)'Δr~][1Δr~2r~J]+[2cr~J2Δr~][Δr~2r~J]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4]

  =

[(xJ)'Δr~][1Δr~2r~J]+c[2r~J2Δr~24r~J3Δr~]+c[4r~J3Δr~6r~J2Δr~2+4r~JΔr~3Δr~4]

  =

[(xJ)'Δr~][1Δr~2r~J]+c[4r~J2Δr~2+4r~JΔr~3Δr~4]

cΔr~2[4r~J24r~JΔr~+Δr~2]

=

[(xJ)'Δr~][1Δr~2r~J]xJ+xJ1

4cr~J2Δr~2[1Δr~r~J+14(Δr~r~J)2]

=

[(xJ)'Δr~][1Δr~2r~J]xJ+xJ1

4cr~J4[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]

=

[(xJ)'Δr~][1Δr~2r~J]xJ+xJ1.

Hence also,

2br~JΔr~(Δr~r~J)

=

(xJ)'Δr~(Δr~r~J){4cr~J2Δr~2}

2br~JΔr~(Δr~r~J)[1Δr~r~J+14(Δr~r~J)2]

=

(xJ)'Δr~(Δr~r~J)[1Δr~r~J+14(Δr~r~J)2]{[(xJ)'Δr~][1Δr~2r~J]xJ+xJ1}

 

=

xJxJ1+(xJ)'(Δr~2r~J)[1Δr~r~J+14(Δr~r~J)2][(xJ)'Δr~][1Δr~2r~J]

 

=

xJxJ1+(xJ)'(Δr~2r~J)[1Δr~r~J+14(Δr~r~J)2](xJ)'Δr~+12(xJ)'(Δr~2r~J)

2br~J2[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]

=

xJxJ1+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3]

Finally,

a =

xJbr~J2cr~J4

a[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4] =

xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]br~J2[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]cr~J4[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]

  =

xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]

   

12{xJxJ1+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3]}

   

14{[(xJ)'Δr~][1Δr~2r~J]xJ+xJ1}

  =

xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]12{xJxJ1}14{xJ+xJ1}

   

12{(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3]}14{(xJ)'Δr~[112(Δr~r~J)]}

  =

xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]+xJ1xJ4

   

+{(xJ)'Δr~[1214+18(Δr~r~J)34(Δr~r~J)+12(Δr~r~J)218(Δr~r~J)3]}

  =

xJ1xJ4+xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]+(xJ)'Δr~[1458(Δr~r~J)+12(Δr~r~J)218(Δr~r~J)3].

OLD Summary:
a𝒜 =

xJ1xJ4+xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]+(xJ)'Δr~[1458(Δr~r~J)+12(Δr~r~J)218(Δr~r~J)3],

2br~J2𝒜

=

xJxJ1+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3],

4cr~J4𝒜

=

(xJ)'Δr~[1Δr~2r~J]xJ+xJ1,

where,

𝒜

[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4].


Repeat, to check …

4[xJa]𝒜 =

4br~J2𝒜+4cr~J4𝒜=2{2br~J2𝒜}+{4cr~J4𝒜}

  =

2{xJxJ1+(xJ)'r~J[𝒜(Δr~r~J)+12(Δr~r~J)2]}+{xJ1xJ+(xJ)'r~J[(Δr~r~J)12(Δr~r~J)2]}

  =

{xJxJ1+(xJ)'r~J[2𝒜(Δr~r~J)+12(Δr~r~J)2]}

4a𝒜 =

4xJ𝒜{xJxJ1+(xJ)'r~J[2𝒜(Δr~r~J)+12(Δr~r~J)2]}

  =

(4𝒜1)xJ+xJ1(xJ)'r~J[2𝒜(Δr~r~J)+12(Δr~r~J)2]


New Summary:
4a𝒜 =

(4𝒜1)xJ+xJ1(xJ)'r~J[2𝒜(Δr~r~J)+12(Δr~r~J)2]

  =

(4𝒜1)xJ+xJ1+(xJ)'Δr~{152(Δr~r~J)+2(Δr~r~J)212(Δr~r~J)3},

2br~J2𝒜

=

xJxJ1+(xJ)'r~J[𝒜(Δr~r~J)+12(Δr~r~J)2]

 

=

xJxJ1+(xJ)'Δr~{1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3},

4cr~J4𝒜

=

xJ1xJ+(xJ)'Δr~[112(Δr~r~J)],

where,

𝒜

[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4].

Project Forward

Let's now determine the expression for xJ+1. We begin by writing …

xJ+1 =

a+b(r~J+Δr~)2+c(r~J+Δr~)4

  =

a+b(r~J2+2r~JΔr~+Δr~2)+c[r~J2(r~J2+2r~JΔr~+Δr~2)+2r~JΔr~(r~J2+2r~JΔr~+Δr~2)+Δr~2(r~J2+2r~JΔr~+Δr~2)]

  =

a+br~J2[1+2Δr~r~J+(Δr~r~J)2]+c[(r~J4+2r~J3Δr~+r~J2Δr~2)+(2r~J3Δr~+4r~J2Δr~2+2r~JΔr~3)+(r~J2Δr~2+2r~JΔr~3+Δr~4)]

  =

a+br~J2[1+2Δr~r~J+(Δr~r~J)2]+c[r~J4+4r~J3Δr~+6r~J2Δr~2+4r~JΔr~3+Δr~4]

  =

a+br~J2[1+2(Δr~r~J)+(Δr~r~J)2]+cr~J4[1+4(Δr~r~J)+6(Δr~r~)2+4(Δr~r~J)3+(Δr~r~J)4]

  =

a+2br~J2[12+(Δr~r~J)+12(Δr~r~J)2]+4cr~J4[14+(Δr~r~J)+32(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4].

This means that,

𝒜xJ+1 =

a𝒜

   

+2br~J2𝒜[12+(Δr~r~J)+12(Δr~r~J)2]

   

+4cr~J4𝒜[14+(Δr~r~J)+32(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]

  =

xJ1xJ4+xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]+(xJ)'Δr~[1458(Δr~r~J)+12(Δr~r~J)218(Δr~r~J)3]

   

+{xJxJ1+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3]}[12+(Δr~r~J)+12(Δr~r~J)2]

   

+{(xJ)'Δr~[1Δr~2r~J]xJ+xJ1}[14+(Δr~r~J)+32(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]

  =

14xJ114xJ+xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]+(xJ)'Δr~[1458(Δr~r~J)+12(Δr~r~J)218(Δr~r~J)3]

   

+{xJxJ1}[12+(Δr~r~J)+12(Δr~r~J)2]

   

+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3][12+(Δr~r~J)+12(Δr~r~J)2]

   

+{xJ+xJ1}[14+(Δr~r~J)+32(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]

   

+(xJ)'Δr~[1Δr~2r~J][14+(Δr~r~J)+32(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]

Keep going …

𝒜xJ+1 =

xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]

   

+{xJxJ1}[14+12+(Δr~r~J)+12(Δr~r~J)214(Δr~r~J)32(Δr~r~)2(Δr~r~J)314(Δr~r~J)4]

   

+(xJ)'Δr~[1458(Δr~r~J)+12(Δr~r~J)218(Δr~r~J)3]

   

+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3][12(Δr~r~J)2]

   

+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3][(Δr~r~J)]

   

+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3][12]

   

+(xJ)'Δr~[14+(Δr~r~J)+32(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]

   

+(xJ)'Δr~[Δr~2r~J][14+(Δr~r~J)+32(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]

midpoint
  =

xJ[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]+{xJxJ1}[(Δr~r~)2(Δr~r~J)314(Δr~r~J)4]

   

+(xJ)'Δr~[1458(Δr~r~J)+12(Δr~r~J)218(Δr~r~J)3]

   

+(xJ)'Δr~[12(Δr~r~J)2+34(Δr~r~J)312(Δr~r~J)4+18(Δr~r~J)5]

   

+(xJ)'Δr~[(Δr~r~J)+32(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]

   

+(xJ)'Δr~[12+34(Δr~r~J)12(Δr~r~J)2+18(Δr~r~J)3]

   

+(xJ)'Δr~[14+(Δr~r~J)+32(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]

   

+(xJ)'Δr~[18(Δr~r~J)12(Δr~r~J)234(Δr~r~)312(Δr~r~J)418(Δr~r~J)5]

---- next in line ----
  =

xJ[2(Δr~r~J)3]+xJ1[(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]+(xJ)'Δr~[2(Δr~r~)212(Δr~r~J)4]

  =

xJ[2(Δr~r~J)3]+{2xJ1(Δr~r~J)32xJ1(Δr~r~J)3}+xJ1[(Δr~r~)2+(Δr~r~J)3+14(Δr~r~J)4]+2(xJ)'Δr~[(Δr~r~)214(Δr~r~J)4]

𝒜xJ+1 =

(xJxJ1)[2(Δr~r~J)3]+𝒜xJ1+2(xJ)'Δr~[(Δr~r~)214(Δr~r~J)4].

Grouping terms with like powers of (Δr~/r~J) we find,

0 =

(Δr~r~J)2[(xJ1xJ+1)+2(xJ)'Δr~]+(Δr~r~J)3[xJ12xJ+xJ+1]+14(Δr~r~J)4[(xJ1xJ+1)2(xJ)'Δr~].



New Summary:
4a𝒜 =

(4𝒜1)xJ+xJ1+(xJ)'Δr~{152(Δr~r~J)+2(Δr~r~J)212(Δr~r~J)3},

2br~J2𝒜

=

{xJxJ1+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3]},

4cr~J4𝒜

=

{xJ1xJ+(xJ)'Δr~[112(Δr~r~J)]},

where,

𝒜

[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4].

Try again …

xJ+1 =

a+b(r~J+Δr~)2+c(r~J+Δr~)4

  =

a+b(r~J2+2r~JΔr~+Δr~2)+c(r~J2+2r~JΔr~+Δr~2)(r~J2+2r~JΔr~+Δr~2)

  =

a+b(r~J2+2r~JΔr~+Δr~2)+c[r~J2(r~J2+2r~JΔr~+Δr~2)+2r~JΔr~(r~J2+2r~JΔr~+Δr~2)+Δr~2(r~J2+2r~JΔr~+Δr~2)]

  =

a+b(r~J2+2r~JΔr~+Δr~2)+c[(r~J4+2r~J3Δr~+r~J2Δr~2)+(2r~J3Δr~+4r~J2Δr~2+2r~JΔr~3)+(r~J2Δr~2+2r~JΔr~3+Δr~4)]

  =

a+b(r~J2+2r~JΔr~+Δr~2)+c[r~J4+4r~J3Δr~+6r~J2Δr~2+4r~JΔr~3+Δr~4]

  =

a+br~J2[1+2(Δr~r~J)+(Δr~r~J)2]+cr~J4[1+4(Δr~r~J)+6(Δr~r~J)2+4(Δr~r~J)3+(Δr~r~J)4].

Multiplying through by 4𝒜 gives,

4xJ+1𝒜 =

4a𝒜+2br~J2𝒜[2+4(Δr~r~J)+2(Δr~r~J)2]+4cr~J4𝒜[1+4(Δr~r~J)+6(Δr~r~J)2+4(Δr~r~J)3+(Δr~r~J)4]

  =

(4𝒜1)xJ+xJ1+(xJ)'Δr~[152(Δr~r~J)+2(Δr~r~J)212(Δr~r~J)3]

   

+{xJxJ1+(xJ)'Δr~[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3]}[2+4(Δr~r~J)+2(Δr~r~J)2]

   

+{xJ1xJ+(xJ)'Δr~[112(Δr~r~J)]}[1+4(Δr~r~J)+6(Δr~r~J)2+4(Δr~r~J)3+(Δr~r~J)4]

  =

4𝒜xJ+(xJxJ1){1+[2+4(Δr~r~J)+2(Δr~r~J)2][1+4(Δr~r~J)+6(Δr~r~J)2+4(Δr~r~J)3+(Δr~r~J)4]}

   

+(xJ)'Δr~{[152(Δr~r~J)+2(Δr~r~J)212(Δr~r~J)3]+[1+32(Δr~r~J)(Δr~r~J)2+14(Δr~r~J)3][2+4(Δr~r~J)+2(Δr~r~J)2]

   

+[112(Δr~r~J)][1+4(Δr~r~J)+6(Δr~r~J)2+4(Δr~r~J)3+(Δr~r~J)4]}

  =

4𝒜xJ+4(xJxJ1){[(Δr~r~J)2+(Δr~r~J)3+14(Δr~r~J)4]}

   

+(xJ)'Δr~{[152(Δr~r~J)+2(Δr~r~J)212(Δr~r~J)3]

   

+[2+3(Δr~r~J)2(Δr~r~J)2+12(Δr~r~J)3]

   

+[4(Δr~r~J)+6(Δr~r~J)24(Δr~r~J)3+(Δr~r~J)4]

   

+[2(Δr~r~J)2+3(Δr~r~J)32(Δr~r~J)4+12(Δr~r~J)5]

   

+[1+4(Δr~r~J)+6(Δr~r~J)2+4(Δr~r~J)3+(Δr~r~J)4]+[12(Δr~r~J)2(Δr~r~J)23(Δr~r~J)32(Δr~r~J)412(Δr~r~J)5]}

  =

4𝒜xJ+4(xJxJ1){[(Δr~r~J)2+(Δr~r~J)3+14(Δr~r~J)4]}+(xJ)'Δr~{[8(Δr~r~J)22(Δr~r~J)4]}.

Grouping terms with like powers of (Δr~/r~J) we find,

0 =

(xJxJ+1)[(Δr~r~J)2(Δr~r~J)3+14(Δr~r~J)4]+(xJ1xJ)[(Δr~r~J)2+(Δr~r~J)3+14(Δr~r~J)4]+(xJ)'Δr~[2(Δr~r~J)212(Δr~r~J)4]

  =

(Δr~r~J)2[xJ1+2(xJ)'Δr~xJ+1]+(Δr~r~J)3[xJ12xJ+xJ+1]+14(Δr~r~J)4[xJ12(xJ)'Δr~xJ+1]

This EXACTLY MATCHES our above first derivation and grouping!

Improve First Approximation

After slogging through the preceding "Second thru Fifth" approximations, I have come to appreciate that the approach used way back in the "First Approximation" was a good one, but that the attempt to introduce an implicit dependence was misguided. I now think I have discovered the preferable implicit treatment. Let's repeat, while improving this approach.

2nd-Order Explicit Approach

As was done in our earlier First Approximation, let's set up a grid associated with a uniformly spaced spherical radius, where the subscript J denotes the grid zone at which all terms in the finite-difference representation of the governing relations will be evaluated. More specifically,

r~J1 =

r~JΔr~

      and       r~J+1 =

r~J+Δr~;

also,

(dxdr~)J

(xJ+1xJ1)2Δr~

      and       (dpdr~)J

(pJ+1pJ1)2Δr~.

And at each grid location, the governing relations establish the local evaluation of the derivatives, that is,

(dxdr~)J =

1r~J[3x+pγg]J,

      and       (dpdr~)J =

ρ~JP~J[(4x+p)M~rr~2+τc2ω2r~x]J.

So, integrating step-by-step from the center of the configuration, outward, once all the variable values are known at grid locations J and (J1), the values of x and p at (J+1) are given by the expressions,

xJ+1 =

xJ12Δr~{1r~[3x+pγg]}J,

      and       pJ+1 =

pJ1+2Δr~{ρ~P~M~rr~2[(4x+p)+σc2(2π3ρ~cr~3M~r)x]}J.

Then we will obtain the "xJ" and "pJ" values via the average expressions,

xJ =

12(xJ1+xJ+1),

      and       pJ =

12(pJ1+pJ+1).

Convert to Implicit Approach

Consider implementing an implicit finite-difference analysis that improves on our earlier First Approximation. The general form of the source term expressions is,

xJ+1 =

xJ1+2Δr~{𝔄xJ+𝔅pJ}

where,

𝔄

{3r~}J,

      and       𝔅

{1γgr~}J;

and,

pJ+1 =

pJ1+2Δr~{xJ+𝔇pJ}

where,

{𝔇[4+σc2(2π3ρ~cr~3M~r)]}J,

      and       𝔇

{ρ~P~M~rr~2}J.

Now, wherever a "J+1" index appears in the source term, replace it with the average expressions; specifically, xJ+1(2xJxJ1) and pJ+1(2pJpJ1). For the fractional radial displacement, we have,

xJ =

xJ1+Δr~{𝔄xJ+𝔅pJ};

and for the fractional pressure displacement,

pJ =

pJ1+Δr~{xJ+𝔇pJ}.

Solving for pJ in this second expression, we obtain,

pJ[1𝔇Δr~] =

pJ1+(Δr~)xJ

in which case the first expression gives,

xJ =

xJ1+(𝔄Δr~)xJ+(𝔅Δr~)[pJ1+(Δr~)xJ][1𝔇Δr~]1

xJ[1𝔇Δr~] =

{xJ1+(𝔄Δr~)xJ}[1𝔇Δr~]+(𝔅Δr~)[pJ1+(Δr~)xJ]

  =

xJ1[1𝔇Δr~]+(𝔅Δr~)pJ1+(𝔄Δr~)xJ[1𝔇Δr~]+(𝔅Δr~)(Δr~)xJ

  =

xJ1(1𝔇Δr~)+(𝔅Δr~)pJ1+[(𝔄Δr~)(1𝔇Δr~)+(𝔅Δr~)(Δr~)]xJ

xJ{(1𝔇Δr~)[(𝔄Δr~)(1𝔇Δr~)+(𝔅Δr~)(Δr~)]} =

xJ1(1𝔇Δr~)+(𝔅Δr~)pJ1

xJ{1[(𝔄Δr~)+(𝔅Δr~)(Δr~)(1𝔇Δr~)]} =

xJ1+[(𝔅Δr~)(1𝔇Δr~)]pJ1

xJ =

{xJ1+[(𝔅Δr~)(1𝔇Δr~)]pJ1}{1[(𝔄Δr~)+(𝔅Δr~)(Δr~)(1𝔇Δr~)]}1.

Then,

pJ(1𝔇Δr~) =

pJ1+(Δr~)xJ

  =

pJ1+(Δr~){xJ1+[(𝔅Δr~)(1𝔇Δr~)]pJ1}{1[(𝔄Δr~)+(𝔅Δr~)(Δr~)(1𝔇Δr~)]}1

This is test of our "implicit" scheme for the (nc,ne)=(5,1) bipolytrope with μe/μc=0.31 and (Model A) ξi=9.12744; here, we also assume σc2=0.000109 and J=i+2. Here are the quantities that we assume are known

r~ ρ~ P~ M~r ρ~c 𝔄 𝔅 𝔇 𝔇
0.0193368 192.21728 1913.1421 0.3403116 3359266.406 -155.14459 -25.85743 4.0162932 91.443479
Δr~ xJ1 pJ1 determined
xJ
determined
pJ
0.001936393 -4.755073 32.25497 -4.999355 34.874915
xJ =

{xJ1+[(𝔅Δr~)(1𝔇Δr~)]pJ1}{1[(𝔄Δr~)+(𝔅Δr~)(Δr~)(1𝔇Δr~)]}1

  =

{xJ1+[0.06084379]pJ1}{1[0.3436910]}1=4.999354;

pJ(1𝔇Δr~) =

[pJ1+(Δr~)xJ](1𝔇Δr~)1=34.87491.

Best values:
Nodes 0:  n/a
Nodes 1:  σc2=8.958784×105
Nodes 2:  σc2=3.021×104
Nodes 3:  σc2=6.09×104

Interface

CORE:   When J=(i1) (where i means interface), we can obtain the fractional displacements at the interface, xi and pi, via the expressions,

xi =

xi22Δr~{1r~[3x+pγg]}i1,

      and       pi =

pi2+2Δr~{ρ~P~M~rr~2[(4x+p)+σc2(2π3ρ~cr~3M~r)x]}i1.

Then, setting J=i, the pair of radial derivatives at the interface and as viewed from the perspective of the core is given by the expressions,

(dxdr~)i|core =

1r~i[3xi+pi6/5],

      and       (dpdr~)i|core =

(ρ~i)coreP~iM~corer~i2[(4xi+pi)+σc2(2π3ρ~cr~i3M~core)xi].

It is important to recognize that, throughout the core, (dx/dr~) has been evaluated by setting γg=6/5. If we continue to use this value of γg at the interface, we are determining the slope as viewed from the perspective of the core.


ENVELOPE:   On the other hand, as viewed from the perspective of the envelope, all parameters used to determine (dx/dr~)i at the interface (and throughout the entire envelope) are the same except γg, which equals 2 instead of 6/5. Specifically at the interface, we have,

(dxdr~)i|env =

1r~i[3xi+pi2],

      and       (dpdr~)i|env =

(ρ~i)envP~iM~corer~i2[(4xi+pi)+σc2(2π3ρ~cr~i3M~core)xi].

(See, for example, our related discussion.) Hence, we appreciate that there is a discontinuous change in the value of this slope at the interface. We note as well — for the first time (8/17/2023)! — that there must also be a discontinuous jump in the slope of the "pressure perturbation." All of the variables used to evaluate (dp/dr~)i are the same irrespective of your core/envelope point of view except the leading density term. As viewed from the perspective of the core, (ρ~i)|core=msurf5(μe/μc)10θi5 whereas, from the perspective of the envelope, (ρ~i)|env=msurf5(μe/μc)9θi5ϕi. Appreciating that ϕi=1, this means that the slope of the "pressure perturbation" is a factor of μe/μc smaller as viewed from the perspective of the envelope.

Then the value of the fractional radial displacement and the value of the pressure perturbation at the first zone outside of the interface are obtained by setting J=i. That is,

xi+1 =

xi12Δr~{1r~[3x+p2]}i,

      and       pi+1 =

pi1+2Δr~{(ρ~i)|envP~M~rr~2[(4x+p)+σc2(2π3ρ~cr~3M~r)x]}i.

But, as written, these two expressions are unacceptable because the values just inside the interface, xi1 and pi1, are not known as viewed from the perspective of the envelope. However, we can fix this by drawing from the "average" expressions as replacements, namely,

xi =

12(xi1+xi+1)xi1=(2xixi+1),

      and       pi =

12(pi1+pi+1)pi1=(2pipi+1),

in which case we have,

2xi+1 =

2xi2Δr~{1r~[3x+p2]}i,

      and       2pi+1 =

2pi+2Δr~{(ρ~i)|envP~M~rr~2[(4x+p)+σc2(2π3ρ~cr~3M~r)x]}i.

Compare Core With Analytic Displacement Functions

See Also

Tiled Menu

Appendices: | VisTrailsEquations | VisTrailsVariables | References | Ramblings | VisTrailsImages | myphys.lsu | ADS |