ECUACIÓN DE KEPLER.

$c_{e} = 10^{-n}$
$e_{0} = e ∙ \frac{180}{π}$
$E_{0} = M$
$C_{i} = \frac{M + e_{0} ∙ sen (E_{i - 1}) - E_{i - 1}}{1 - e ∙ cos (E_{i - 1})}$
$E_{i} = E_{i - 1} + C_{i}$
- $Si$

Devuelve la anomalía excéntrica, E en grados

ITERACIONES Método III. (SINNOT)

Se procede por iteraciones sucesivas. Se alcanza convergencia al finalizar el número de iteraciones.

Número de iteraciones a realizar: $N_{I} = R [p_{s} \cdot \frac{1}{\log_{10} (2)}] + 1$
Variable auxiliar de anomalía media:
- Variable signo: $S_{a} = \{\begin{matrix} -1 & si & M < 0 \\ +1 & si & M > 0 \\ 0 & si & M = 0 \end{matrix}$
- Variable intermedia M_a: $M_{a} = \frac{| M |}{2 π}$
- Variable intermedia M_b: $M_{b} = (M_{a} - E [M_{a}]) \cdot 2 π \cdot S_{a}$
- Variable intermedia M_c: $M_{c} = \{\begin{matrix} M_{b} + 2 \cdot π & si & M_{b} < 0 \\ M_{b} - 2 \cdot π & si & M_{b} > 2 \cdot π \end{matrix}$
- Signo S_g: $S_{g} = \{\begin{matrix} 1 & si & M_{c} \leq 2 \cdot π \\ -1 & si & M_{c} > 2 \cdot π \end{matrix}$
- Variables iniciales de iteraciones: $D_{0} = \frac{π}{4} E_{0} = \frac{π}{2}$
Iteraciones para i=0,1,2,...,N_I:
- $M_{i} = E_{i} - e \cdot sen (E_{i})$
- $S_{i} = \{\begin{matrix} -1 & si & M_{c} - M_{i} < 0 \\ +1 & si & M_{c} - M_{i} > 0 \\ 0 & si & M_{c} - M_{i} = 0 \end{matrix}$
- $E_{i + 1} = E_{i} + D_{i} \cdot S_{i}$
- $D_{i + 1} = \frac{D_{i}}{2}$
Anomalía excéntrica: $E = E_{N_{I}} \cdot S_{g} \cdot \frac{180}{π}$

Devuelve la anomalía excéntrica, E en grados

$t_{ν} \equiv tan (\frac{ν}{2}) = \sqrt{\frac{1 + e}{1 - e}} \cdot tan (\frac{E}{2})$
$ν = 2 \cdot arc$

Devuelve la anomalía verdadera, ν en grados

Devuelve el radio vector, r en UA