diff --git a/src/Dodge/Creature/Update.hs b/src/Dodge/Creature/Update.hs
new file mode 100644
index 000000000..c7395b035
--- /dev/null
+++ b/src/Dodge/Creature/Update.hs
@@ -0,0 +1,9 @@
+module Dodge.Creature.Update where
+import Dodge.Data
+import Dodge.Creature.State
+import Dodge.Creature.Impulse
+import Dodge.Creature.ChainUpdates
+
+defaultImpulsive :: [World -> Creature -> Creature]
+    -> Creature -> World -> World
+defaultImpulsive = stateUpdate' . impulsiveAI' . chainCreatureUpdates