From 355ab840bbfe94604c5a86afccf23efacdbe97d7 Mon Sep 17 00:00:00 2001 From: Tavian Barnes Date: Sun, 14 Jun 2009 01:48:03 +0000 Subject: New dmnsn_scale_matrix() function. --- libdimension/geometry.c | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'libdimension/geometry.c') diff --git a/libdimension/geometry.c b/libdimension/geometry.c index 846095c..a89fb9e 100644 --- a/libdimension/geometry.c +++ b/libdimension/geometry.c @@ -43,6 +43,15 @@ dmnsn_matrix_construct(double a0, double a1, double a2, double a3, return m; } +dmnsn_matrix +dmnsn_scale_matrix(dmnsn_vector s) +{ + return dmnsn_matrix_construct(s.x, 0.0, 0.0, 0.0, + 0.0, s.y, 0.0, 0.0, + 0.0, 0.0, s.z, 0.0, + 0.0, 0.0, 0.0, 1.0); +} + /* Translation matrix */ dmnsn_matrix dmnsn_translation_matrix(dmnsn_vector d) -- cgit v1.2.3