correct reaction
This commit is contained in:
parent
bb61df8b6d
commit
0b03c306c3
|
@ -89,8 +89,8 @@ class (Show c, Mass c) => Collidible c where
|
||||||
then
|
then
|
||||||
( gt
|
( gt
|
||||||
, if gx == g1 || gx == g3
|
, if gx == g1 || gx == g3
|
||||||
then V2 0 (round $ signum d1y)
|
then V2 (round $ signum d1x) 0
|
||||||
else V2 (round $ signum d1x) 0
|
else V2 0 (round $ signum d1y)
|
||||||
)
|
)
|
||||||
else acc1
|
else acc1
|
||||||
)
|
)
|
||||||
|
|
Loading…
Reference in New Issue