diff --git a/CHANGELOG b/CHANGELOG
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,7 @@
+2023-11-07
+        * Version bump (3.17). (#466)
+        * Replace uses of deprecated functions. (#457)
+
 2023-09-07
         * Version bump (3.16.1). (#455)
 
diff --git a/copilot-interpreter.cabal b/copilot-interpreter.cabal
--- a/copilot-interpreter.cabal
+++ b/copilot-interpreter.cabal
@@ -1,6 +1,6 @@
 cabal-version:       >=1.10
 name:                copilot-interpreter
-version:             3.16.1
+version:             3.17
 synopsis:            Interpreter for Copilot.
 description:
   Interpreter for Copilot.
@@ -44,7 +44,7 @@
     base       >= 4.9 && < 5,
     pretty     >= 1.0 && < 1.2,
 
-    copilot-core >= 3.16.1 && < 3.17
+    copilot-core >= 3.17 && < 3.18
 
   exposed-modules:
 
diff --git a/src/Copilot/Interpret/Eval.hs b/src/Copilot/Interpret/Eval.hs
--- a/src/Copilot/Interpret/Eval.hs
+++ b/src/Copilot/Interpret/Eval.hs
@@ -17,7 +17,7 @@
 
 import Copilot.Core            (Expr (..), Field (..), Id, Name, Observer (..),
                                 Op1 (..), Op2 (..), Op3 (..), Spec, Stream (..),
-                                Trigger (..), Type (..), UExpr (..), arrayelems,
+                                Trigger (..), Type (..), UExpr (..), arrayElems,
                                 specObservers, specStreams, specTriggers)
 import Copilot.Interpret.Error (badUsage)
 
@@ -242,7 +242,7 @@
   BwXor _      -> (xor)
   BwShiftL _ _ -> ( \ !a !b -> shiftL a $! fromIntegral b )
   BwShiftR _ _ -> ( \ !a !b -> shiftR a $! fromIntegral b )
-  Index    _   -> \xs n -> (arrayelems xs) !! (fromIntegral n)
+  Index    _   -> \xs n -> (arrayElems xs) !! (fromIntegral n)
 
 -- | Apply a function to two numbers, so long as the second one is
 -- not zero.
