from_ijk_to_rsw Interface

public interface from_ijk_to_rsw

Conversion from IJK to RSW

Calls

interface~~from_ijk_to_rsw~~CallsGraph interface~from_ijk_to_rsw relative_motion_module::from_ijk_to_rsw proc~from_ijk_to_rsw_mat relative_motion_module::from_ijk_to_rsw_mat interface~from_ijk_to_rsw->proc~from_ijk_to_rsw_mat proc~from_ijk_to_rsw_rv relative_motion_module::from_ijk_to_rsw_rv interface~from_ijk_to_rsw->proc~from_ijk_to_rsw_rv proc~cross vector_module::cross proc~from_ijk_to_rsw_mat->proc~cross proc~uhat_dot vector_module::uhat_dot proc~from_ijk_to_rsw_mat->proc~uhat_dot proc~unit vector_module::unit proc~from_ijk_to_rsw_mat->proc~unit proc~from_ijk_to_rsw_rv->interface~from_ijk_to_rsw

Called by

interface~~from_ijk_to_rsw~~CalledByGraph interface~from_ijk_to_rsw relative_motion_module::from_ijk_to_rsw proc~from_ijk_to_rsw_rv relative_motion_module::from_ijk_to_rsw_rv interface~from_ijk_to_rsw->proc~from_ijk_to_rsw_rv proc~from_ijk_to_rsw_rv->interface~from_ijk_to_rsw proc~from_rsw_to_ijk_mat relative_motion_module::from_rsw_to_ijk_mat proc~from_rsw_to_ijk_mat->interface~from_ijk_to_rsw proc~relative_motion_test relative_motion_module::relative_motion_test proc~relative_motion_test->interface~from_ijk_to_rsw interface~from_rsw_to_ijk relative_motion_module::from_rsw_to_ijk interface~from_rsw_to_ijk->proc~from_rsw_to_ijk_mat proc~from_rsw_to_ijk_rv relative_motion_module::from_rsw_to_ijk_rv interface~from_rsw_to_ijk->proc~from_rsw_to_ijk_rv proc~from_rsw_to_ijk_rv->interface~from_rsw_to_ijk

Module Procedures

private subroutine from_ijk_to_rsw_mat(r, v, a, c, cdot)

Author
Jacob Williams
Date
4/19/2014

Compute the transformation matrices to convert IJK to RSW.

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in), dimension(3) :: r

position vector of target [km]

real(kind=wp), intent(in), dimension(3) :: v

velocity vector of target [km/s]

real(kind=wp), intent(in), optional, dimension(3) :: a

acceleration vector of target [km/s^2] (if not present, then a torque-free force model is assumed)

real(kind=wp), intent(out), dimension(3,3) :: c

C transformation matrix

real(kind=wp), intent(out), optional, dimension(3,3) :: cdot

CDOT transformation matrix

private subroutine from_ijk_to_rsw_rv(rt_ijk, vt_ijk, r_ijk, v_ijk, dr_rsw, dv_rsw)

Author
Jacob Williams
Date
8/23/2014

Transform a position (and optionally velocity) vector from IJK to RSW.

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in), dimension(3) :: rt_ijk

Target IJK absolute position vector [km]

real(kind=wp), intent(in), dimension(3) :: vt_ijk

Target IJK absolute position vector [km]

real(kind=wp), intent(in), dimension(3) :: r_ijk

Chaser IJK absolute position vector [km]

real(kind=wp), intent(in), dimension(3) :: v_ijk

Chaser IJK absolute position vector [km]

real(kind=wp), intent(out), dimension(3) :: dr_rsw

Chaser RSW position vector relative to target [km]

real(kind=wp), intent(out), optional, dimension(3) :: dv_rsw

Chaser RSW position vector relative to target [km]