10 lines
133 B
Haskell
10 lines
133 B
Haskell
import Numeric.LinearAlgebra
|
|
|
|
a :: Matrix R
|
|
a = (3><3)
|
|
[ 12, -51, 4
|
|
, 6, 167, -68
|
|
, -4, 24, -41]
|
|
|
|
main = do
|
|
print $ qr a
|