From 9014a19a7d19f7e84bddd421252399cfbe9a6486 Mon Sep 17 00:00:00 2001 From: Marc Sunet Date: Wed, 29 Aug 2012 20:12:34 +0200 Subject: Tidied up mat4 --- Spear/Math/Matrix4.hs | 10 +--------- 1 file changed, 1 insertion(+), 9 deletions(-) diff --git a/Spear/Math/Matrix4.hs b/Spear/Math/Matrix4.hs index 45a8171..a03f1da 100644 --- a/Spear/Math/Matrix4.hs +++ b/Spear/Math/Matrix4.hs @@ -160,15 +160,7 @@ position (Matrix4 _ _ _ a30 _ _ _ a31 _ _ _ a32 _ _ _ _) -- | Build a matrix from the specified values. -mat4 :: Float -> Float -> Float -> Float -> - Float -> Float -> Float -> Float -> - Float -> Float -> Float -> Float -> - Float -> Float -> Float -> Float -> Matrix4 -mat4 m00 m10 m20 m30 m01 m11 m21 m31 m02 m12 m22 m32 m03 m13 m23 m33 = Matrix4 - m00 m10 m20 m30 - m01 m11 m21 m31 - m02 m12 m22 m32 - m03 m13 m23 m33 +mat4 = Matrix4 -- | Build a matrix from four vectors in 4D. -- cgit v1.2.3