commit 567195a681fe11a012344442936be75aff8cf562
parent 9b3f35c22e2e0ac8c4ef06f9a8968e58ac413c54
Author: Kyle Milz <kyle@getaddrinfo.net>
Date: Mon, 11 May 2015 20:00:45 -0600
ps_html: pretty up the matrix
Diffstat:
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/ps_html b/ps_html
@@ -40,10 +40,12 @@ my $desc_sth = $dbh->prepare(qq{select description from descriptions where
manufacturer = ? and part_num = ? order by date});
# catmull-rom to cubic bezier conversion matrix
-my $catrom_to_bezier = Math::MatrixReal->new_from_rows([[0, 1, 0, 0],
- [-1/6, 1, 1/6, 0],
- [0, 1/6, 1, -1/6],
- [0, 0, 1, 0]]);
+my $catrom_to_bezier = Math::MatrixReal->new_from_rows(
+ [[0, 1, 0, 0],
+ [-1/6, 1, 1/6, 0],
+ [0, 1/6, 1, -1/6],
+ [0, 0, 1, 0]]
+);
my $m_t = ~$catrom_to_bezier;
#