File mtt/lib/examples/Control/GPC/TwoLinkGPC/TwoLinkPS_simp.r artifact 5fa9cf5d7f part of check-in 7a7022c729
%% Reduce commands to simplify output for system TwoLinkP (TwoLinkP_simp.r) % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% LET cos(mttx2) = c_2; LET sin(mttx2) = s_2; LET cos(mttx4) = c_4; LET sin(mttx4) = s_4; LET cos(mttx2-mttx4) = c; LET sin(mttx2-mttx4) = s; END;