function A2 = A2(q)
%A2
% A2 = A2(NU,PHI,PSI,TET)
% p=[Rx3;Ry3;Rz3;phi;psi;tet;gam;eps;nu];
nu=q(9);
phi=q(4);
psi=q(5);
tet=q(6);
% This function was generated by the Symbolic Math Toolbox version 5.6.
% 09-Apr-2014 00:13:15
t2 = cos(phi);
t3 = sin(tet);
t4 = cos(tet);
t5 = sin(phi);
t6 = sin(psi);
t7 = cos(nu);
t8 = t2.*t3;
t9 = t4.*t5.*t6;
t10 = t8+t9;
t11 = sin(nu);
t12 = t2.*t4;
t13 = t12-t3.*t5.*t6;
t14 = cos(psi);
t15 = t3.*t5;
t16 = t15-t2.*t4.*t6;
t17 = t4.*t5;
t18 = t2.*t3.*t6;
t19 = t17+t18;
A2 = reshape([-t10.*t11+t13.*t7,-t11.*t16+t19.*t7,-t11.*t14.*t4-t14.*t3.*t7,-t14.*t5,t14.*t2,t6,t11.*t13+t10.*t7,t11.*t19+t16.*t7,-t11.*t14.*t3+t14.*t4.*t7],[3, 3]);
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
