IFJ

Merci beaucoup pour ces précisions.

Merci beaucoup pour votre réponse rapide, effectivement votre routine marche. Je vais prendre le temps de bien comprendre l'ensemble du code. En fait j’insère des block dans AutoCAD à partir d'un fichier texte ou j'ai les points d'insertion et les angles de rotation en x, y, et z. Je réarrange les block et doit les réexporter dans le même format texte. A l'importation des block, AutoCAD transforme les angles de rotations en matrice de rotation, d'où ma question pour retrouver les angles d'Euler à partir de la matrice de rotation. J'ai essayé votre routine en important et exportant un block sans rien changer pour voir si je retrouve les angles. Les chiffres ne sont pas les mêmes, mais c'set peut-être une question de modulo ou sens, je reviendrai vers vous si je ne trouve pas la solution. Merci encore et à bientôt. IFJ

Bonjour, Désolé je n'ai pas eu le temps de faire la demande car j'ai eu des soucis pour m'inscrire sur CADxp. Merci pour la réponse, mais je n'ai pas réussi à utiliser les différentes routines. En fait je cherche à retrouver les angles d'Euler et le point d’insertion d'un block ayant subi des rotations selon x, y et z. J'ai rajouté le code suivant pour sélectionner un block et récupérer la matrice avec nentsel: (defun c:euler () (setq m (nentsel "Choisir un block")) (ProperEuler m) ) Mais la routine plante dans "(defun ProperEuler (m).....)" au niveau de (length (car m)) Merci IFJ