# Non-Hohmann Transfers: Common Apse Line Example¶

A satellite is in a 3,500 km by 14,500 km orbit around Earth. At 150° of true anomaly, the satellite conducts an impulsive maneuver for reentry at the apse line. Determine the $$\Delta v$$ and the angle relative to local horizontal that the thrust vector makes.

Note that in this case there will only be a single impulse and we will assume that reentry occurs at the radius of Earth, 6378.1 km. The original and the transfer orbit have the same apse line and the same focus. We will use Eq. (300) to determine $$\Delta v$$ and Eq. (301) to determine $$\gamma$$. These equations both require the velocity vector at 150° true anomaly on the original orbit and the transfer orbit.

First we will find the orbital elements for the original orbit.

import math as m

mu = 3.986E5  # km**3/s**2
R_E = 6378.1  # km
r_p_i = 3500 + R_E  # km
r_a_i = 14500 + R_E  # km

a_i = (r_p_i + r_a_i) / 2
e_i = (r_a_i - r_p_i) / (r_a_i + r_p_i)
p_i = a_i * (1 - e_i**2)


The semimajor axis is $$a_i =$$ 15378.10 km and the eccentricity is $$e_i =$$ 0.3577. Next, we need to calculate $$r_A$$ and $$r_B$$ to determine the orbital parameters for the transfer orbit.

There is no target orbit; rather, the target is a point on the apse line at the radius of Earth. Thus, $$r_B =$$ 6378.1 km and $$\nu_B =$$ 0°. $$r_A$$ is found from the orbit equation on the initial orbit. Then, Eq. (298) is used to find the orbital elements.

r_A = p_i / (1 + e_i * m.cos(nu_A))
r_B = R_E
nu_B = 0  # rad

e_t = (r_B - r_A) / (r_A * m.cos(nu_A) - r_B * m.cos(nu_B))
p_t = r_A * r_B * (m.cos(nu_A) - m.cos(nu_B)) / (r_A * m.cos(nu_A) - r_B * m.cos(nu_B))
a_t = p_t / (1 - e_t**2)


The semimajor axis is $$a_t =$$ 14576.34 km and the eccentricity is $$e_t =$$ 0.5624. Now we have enough information to determine the velocity components and the flight path angles on the original orbit and the transfer orbit.

h_i = m.sqrt(p_i * mu)
h_t = m.sqrt(p_t * mu)

v_p_i = h_i / r_A
v_p_t = h_t / r_A

v_r_i = mu / h_i * e_i * m.sin(nu_A)
v_r_t = mu / h_t * e_t * m.sin(nu_A)

v_i = m.sqrt(v_p_i**2 + v_r_i**2)
v_t = m.sqrt(v_p_t**2 + v_r_t**2)

phi_i = m.degrees(m.atan2(v_r_i, v_p_i))
phi_t = m.degrees(m.atan2(v_r_t, v_p_t))


The velocities and flight path angles are shown in Table 4.

Table 4 Velocity components and flight path angles on the original and transfer orbits

Initial

Transfer

$$v_{\perp}$$ (km/s)

3.76

3.24

$$v_{r}$$ (km/s)

0.97

1.78

$$v$$ (km/s)

3.89

3.70

$$\phi$$ (deg.)

14.52

28.73

Finally, we can compute $$\Delta v$$ and $$\gamma$$.

Delta_v = m.sqrt(v_i**2 + v_t**2 - 2 * v_i * v_t * m.cos(m.radians(phi_t - phi_i)))
gamma = m.degrees(m.atan2(v_r_t - v_r_i, v_p_t - v_p_i))


The required $$\Delta v=$$ 0.9568 km/s and the angle of the thrust vector is $$\gamma =$$ 122.87°.