First Adjoint Code for Trajectory Optimization