Thread rotationsmodul in perl? (11 answers)
Opened by supersucker at 2005-06-09 21:20

Dubu
 2005-06-11 18:57
#55445 #55445
User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image
Quote
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
#!/usr/bin/perl

use warnings;
use strict;

use Math::SO3;

my $rotation=Math::SO3->new("zr" => 3.14159/2,
                          "xr" => 3.14159/4,
                          "zr" => 3.14159/8);
                         
$rotation->format_matrix("%16.8f");  


erhalt ich überhaupt nichts als ausgabe, nicht mal eine fehlermeldung, das script läuft durch und ich krieg keine fehlermeldung.

Ich sehe da kein print.

Quote
desweiteren ist in der manpage (und das ist die einzigste informationsquelle die ich zu dem modul hab, weder über google noch über cpan hab ich mehr infos gefunden) nicht einmal beschrieben wie ich denn diese rotationsmatrix verwende, [...]


Meinst du das hier?
Quote
$rotation->translate_vectors($vec1, $vec2,
                              $vec3, $vec4, @other_vectors);

   Destructively replace each single one of a list of
   cscv's by the corresponding cbcv's. Note that vectors
   must be packed-double-strings:
   $vec=pack("d3",$xcoord,$ycoord,$zcoord);

   Note: if vectors are "longer", say, like pack("d4", 5,8,10,1),
   only the first three coordinates will be replaced.
   This is very useful when working with homogenous coordinates.


Quote
gehe ich mal von arrays aus

"Packed double strings" sind es, s. Doku oben.

View full thread rotationsmodul in perl?