bendesarts
Inscrit le: 27 Fév 2009 Messages: 234
|
Posté le: 22 Mar 2013 12:55 Sujet du message: substitution difficile |
|
|
Bonjour,
La dernière substitution avec algsubs ne se fait pas dans le code suivant :
Code: |
eq1pp := R(t) = (sin(theta[0]+phi)*L^2*M[fixe]+sin(theta[0]+phi)*L[sup]^2*M[sup]+sin(theta[0]+phi)*L[r]^2*M[r]-cos(theta[0]+phi)*a*sin(phi)*L*M[fixe]-cos(theta[0]+phi)*a*sin(phi)*L[r]*M[r]-cos(theta[0]+phi)*a*sin(phi)*L[sup]*M[sup])*(diff(theta(t), t, t))/(a*sin(phi))+Ctheta*sin(theta[0]+phi)*(diff(theta(t), t))/(a*sin(phi))+Ktheta*theta(t)*sin(theta[0]+phi)/(a*sin(phi));
algsubs((Ctheta*sin(theta[0]+phi))/(a*sin(phi))=Ceq,eq1pp);
algsubs((Ktheta*sin(theta[0]+phi))/(a*sin(phi))=Kp,%);
algsubs(sin(theta[0]+phi)*L^2*M[fixe]+L[r]^2*M[r]+L[sup]^2*M[sup])/(a*sin(phi)) = Ip,%);
|
Merci d'avance pour votre aide |
|