diff options
| author | Marc Sunet <jeannekamikaze@gmail.com> | 2012-08-08 13:15:15 +0200 |
|---|---|---|
| committer | Marc Sunet <jeannekamikaze@gmail.com> | 2012-08-08 13:15:15 +0200 |
| commit | 0663ba45c77b3222fda3074857dc3bf5ece7faec (patch) | |
| tree | a35fdd4ff53968a0b95819748107a95e8dc1bf0a | |
| parent | cefa451ff5088b60f3a224a59a1883201c2589d0 (diff) | |
fixed whitespace
| -rw-r--r-- | Spear/Physics/World.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Spear/Physics/World.hs b/Spear/Physics/World.hs index 4ad0191..e0996e6 100644 --- a/Spear/Physics/World.hs +++ b/Spear/Physics/World.hs | |||
| @@ -131,7 +131,7 @@ setForces fs (ObjectID i) world = world { bodies = bodies' } | |||
| 131 | bs <- thaw $ bodies world | 131 | bs <- thaw $ bodies world |
| 132 | obj <- readArray bs i | 132 | obj <- readArray bs i |
| 133 | writeArray bs i $ fmap (\obj -> obj { forces = fs }) obj | 133 | writeArray bs i $ fmap (\obj -> obj { forces = fs }) obj |
| 134 | return bs | 134 | return bs |
| 135 | 135 | ||
| 136 | 136 | ||
| 137 | -- | Set the world's gravity. | 137 | -- | Set the world's gravity. |