hasufell
/
cga
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

TESTS: reorder arguments in getAngleProp6

This commit is contained in:
hasufell 2014-12-17 05:18:49 +01:00
parent ce418f33f2
commit d7366c7e27
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Test/Vector.hs
View File

@ -79,4 +79,4 @@ getAngleProp5 (Positive (R2 x1 _)) (Positive (R2 _ y2))
getAngleProp6 :: Positive Vec -> Positive Vec -> Bool
getAngleProp6 (Positive (R2 _ y1)) (Positive (R2 x2 _))
= getAngle (R2 x2 0) (R2 0 y1) == pi / 2
= getAngle (R2 0 y1) (R2 x2 0) == pi / 2