On 10/23/2009 6:49:15 PM, alainstgt wrote:
>Jean, the || under the square
>root is necessary, since
>Omega0 can be greater than 1!
>If you take a look to the
>first published data of WMAP,
>you�ll find that Omega0 =
>1.003
==> I trust you on that .
>For the remainder, the
>solution is, as Tom has
>suggested, to rename the
>variable Dx and to use the
>root finding algorithm, which
>works well in that case!
==> No problem to solve on the run on a dummy variable, XX(1535) does nothing. Solving on the run is attached but watch your incorrect call. The culprit is that often the continuous root is not possible if the solver needs be seeded. I have quite a few examples reputed "not solvable" even by Mathematica. For those difficult solving, you can use the seeded root scanner, it runs like a bomb and has never failed. I'm not saying YET the project is such a case. The advantage of the seeded root solver is that you have a data table, that can be exported, linearly interpolated on very low level pocket calculator. You can spline and have a continuous function analytical to the 2nd order derivative, or better in this project: the root scanner is approximated by a TCF [Thiele Continued Fraction]. The project as such, suffers some scaling that you might want to reconsider, i.e: speed of light and Hubble. Your approach does not meet the literature wrt the scaling . The other limiting aspect is the numerical maths. The project is asymptotic, and like all those of this sort, the numerical solvers fail. Here, everything is slow because the recompute of the integrals starting at 0 on each cycle. If you have questions, please repost this work sheet with the presumed appropriate scaling... you just have an extra term vs Wikipeia, but your does not read/match either Wiki or other materials I have consulted. A diagram/picture (more than one) and an introductory tutorial would help this project to be of great interest in the "Age of the Universe" [Hubble project]. You should in fact rename your work sheet "Hubble Project" [suggestion].
Jean