95 palDeuler(
const char *order,
double phi,
double theta,
double psi,
105 rotations[1] = theta;
109 while (i < 3 && order[i] !=
'\0') {
115 eraRx( rotations[i], rmat );
121 eraRy( rotations[i], rmat );
127 eraRz( rotations[i], rmat );
void palDeuler(const char *order, double phi, double theta, double psi, double rmat[3][3])
void eraRx(double phi, double r[3][3])
void eraIr(double r[3][3])
void eraRy(double theta, double r[3][3])
void eraRz(double psi, double r[3][3])