(= (Position (Reference-Point Gimbal-1-Base)
(Reference-Point Planar-Mace))
(* (Buslength Bus-Assy)
(Basis.Vec (Reference-Frame Planar-Mace) 1)))
(= (Reference-Frame Gimbal-1-Base) (Reference-Frame Planar-Mace))
(<- (Gimbal-1-Torque ?X)
(Dot (Basis.Vec (Reference-Frame Gimbal-1-Base) 1)
(Applied-Torque Gimbal-1-Base Gimbal-1-Platform)))
(= (Reference-Point Gimbal-1-Platform)
(Reference-Point Gimbal-1-Base))
(= (Orientation (Reference-Frame Gimbal-1-Platform)
(Reference-Frame Gimbal-1-Base))
(Simple-Rotation 3 Gimbal-1-Angle))