[Gsll-devel] inverse-matrix-product
Dmitri Hrapof
hrapof at common-lisp.ru
Wed Feb 25 12:25:20 UTC 2009
Hello!
Just cloned git repository. In both SBCL 1.0.23 and ClozureCL
1.2-r11583M on Linux PPC, with GSL 1.9-3:
CL-USER> (gsll:invert-matrix #m((1 0 2) (-1 3 1) (1 1 0)))
#<MATRIX-DOUBLE-FLOAT #2A((0.11111111111111116D0 -0.2222222222222222D0
0.6666666666666666D0)
(-0.11111111111111109D0 0.22222222222222224D0
0.3333333333333333D0)
(0.4444444444444444D0 0.1111111111111111D0
-0.3333333333333333D0))>
CL-USER> (gsll:matrix-product * #m(3 2 1))
#<VECTOR-DOUBLE-FLOAT #(0.5555555555555557D0 0.44444444444444453D0
1.222222222222222D0)>
CL-USER> (gsll:inverse-matrix-product #m((1 0 2) (-1 3 1) (1 1 0)) #m(3
2 1))
#<VECTOR-DOUBLE-FLOAT #(1D+-0 #| not-a-number |# -1D++0 1D++0)>
Do I misunderstand something?
Sincerely yours,
Dmitri
PS and to add insult to injury ;) nonsymmetric-generalized.lisp fails to
compile, complaining about invalid function call: ("gsl_eigen_gen"
"gsl_eigen_gen_QZ")
More information about the gsll-devel
mailing list