-- Copyright 2019 Evan Laforge
-- This program is distributed under the terms of the GNU General Public
-- License 3.0, see COPYING or http://www.gnu.org/licenses/gpl-3.0.txt

-- | Miscellaneous general purpose functions.
module Solkattu.Dsl.Misc where
import qualified Util.Lists as Lists


replaceAt :: Int -> a -> [a] -> [a]
replaceAt :: forall a. Int -> a -> [a] -> [a]
replaceAt Int
i a
x = forall a. Int -> (a -> a) -> [a] -> [a]
Lists.modifyAt Int
i (forall a b. a -> b -> a
const a
x)