Add missing test for scale and translate matrix methods.

This commit is contained in:
Andrey Antukh 2016-02-05 18:26:37 +02:00
parent f406ec2621
commit 670446e209

View file

@ -101,3 +101,14 @@
0.17364817766693033
0.984807753012208
0 0]))))
(t/deftest matrix-scale-test
(let [m (-> (gmt/matrix)
(gmt/scale 2))]
(t/is (= @m [2 0 0 2 0 0]))))
(t/deftest matrix-translate-test
(let [m (-> (gmt/matrix)
(gmt/translate 2 10))]
(t/is (= @m [1 0 0 1 2 10]))))