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

VEC: use the Square type for inRange

Browse Source
This commit is contained in:
hasufell
2014-11-13 23:04:26 +01:00
parent c765c63125
commit b1280ac958
3 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Graphics/Diagram/Types.hs
View File

@@ -138,4 +138,4 @@ maybeDiag b d
filterValidPT :: DiagProp -> [PT] -> [PT]
filterValidPT p = filter (inRange (dX p) (dY p))
filterValidPT p = filter (inRange (dX p, dY p))