Help for this page

Select Code to Download


  1. or download this
    sub eul2mat {
        my $phi_rad=deg2rad($_[0]);
...
        print "\n";
        return @rot_mat;
}
  2. or download this
    0 0 0
ARRAY(0xad80a0) ARRAY(0xad8190) ARRAY(0xb4f618)
2.10905464637947 0.019391480654283 -2.12295165601555
ARRAY(0xad80a0) ARRAY(0xad8190) ARRAY(0xb4f618)
  3. or download this
    #!/usr/bin/perl -w
use strict;
...
        return ($theta_deg,$phi_deg,$psi_deg);
}