anchor.diff:  
   END SUBROUTINE CalculatePositions
   !----------------------------------------------------------------------------------------------------------------------------------
  -SUBROUTINE CalculateAngularPosVelAcc( p, x, CoordSys, RtHSdat )
  -! This routine is used to calculate the angular positions, velocities, and accelerations stored in other states that are used in
  +SUBROUTINE CalculateAngularPosVelPAcc( p, x, CoordSys, RtHSdat )
  +! This routine is used to calculate the angular positions, velocities, and partial accelerations stored in other states that are used in
   ! both the CalcOutput and CalcContStateDeriv routines.
   !..................................................................................................................................
   
  
positive.code:    END DO ! J
  
  
  END SUBROUTINE CalculateAngularPosVelAcc
  !----------------------------------------------------------------------------------------------------------------------------------
  SUBROUTINE CalculateLinearVelAcc( p, x, CoordSys, RtHSdat )
  ! This routine is used to calculate the linear velocities and accelerations stored in other states that are used in
  ! both the CalcOutput and CalcContStateDeriv routines.
  !..................................................................................................................................
  
negative.code:    END DO ! J
  
  
  END SUBROUTINE CalculateLinearVelPAcc
  !----------------------------------------------------------------------------------------------------------------------------------
  SUBROUTINE CalculateForcesMoments( p, x, CoordSys, u, RtHSdat )
  ! This routine is used to calculate the forces and moments stored in other states that are used in
  