Refactoring
This commit is contained in:
@@ -177,7 +177,7 @@ updateTractor colID time i w
|
||||
q = _pjVel pj
|
||||
p1 = _pjPos pj
|
||||
p' = _pjStartPos pj
|
||||
p2 = maybe p' fst $ collidePointWalls p1 p' $ wallsNearPoint p' w
|
||||
p2 = maybe p' fst $ reflectPointWalls p1 p' $ wallsNearPoint p' w
|
||||
p4 = vNormal p5
|
||||
p5 = errorNormalizeV 12 $ p2 -.- p1
|
||||
p3 = p1 +.+ p4
|
||||
|
||||
Reference in New Issue
Block a user