diff --git a/elm.json b/elm.json
index 07ec9a75..62ae921c 100644
--- a/elm.json
+++ b/elm.json
@@ -37,7 +37,6 @@
         "Nri.Ui.Menu.V1",
         "Nri.Ui.Message.V1",
         "Nri.Ui.Modal.V3",
-        "Nri.Ui.Modal.V9",
         "Nri.Ui.Modal.V10",
         "Nri.Ui.Page.V3",
         "Nri.Ui.Palette.V1",
diff --git a/src/Nri/Ui/Modal/V9.elm b/src/Nri/Ui/Modal/V9.elm
deleted file mode 100644
index 4cda1262..00000000
--- a/src/Nri/Ui/Modal/V9.elm
+++ /dev/null
@@ -1,581 +0,0 @@
-module Nri.Ui.Modal.V9 exposing
-    ( Model, init, initOpen, isOpen
-    , Msg, open, close, update, subscriptions
-    , FocusManager(..), info, warning
-    )
-
-{-| Changes from V8:
-
-  - replace multipleFocusableElementView, onlyFocusableElementView, ViewFuncs, and Focusable with FocusManager
-  - adds initOpen
-  - enable checks against the state (e.g., is the modal open or not?)
-
-@docs Model, init, initOpen, isOpen
-@docs Msg, open, close, update, subscriptions
-@docs FocusManager, info, warning
-
-    import Html.Styled exposing (text)
-    import Nri.Ui.Modal.V9 as Modal
-
-    type Msg
-        = ModalMsg Modal.Msg
-
-    ...
-
-    viewModal : Modal.Model -> Html Msg
-    viewModal modalState =
-        Modal.info
-            { title = "Modal Title"
-            , visibleTitle = False
-            , wrapMsg = ModalMsg
-            , focusManager =
-                Modal.OneFocusableElement
-                    (\{ onlyFocusableElement, closeButton } ->
-                        { content =
-                            [ closeButton onlyFocusableElement
-                            , text "Modal Content"
-                            ]
-                        , footer = []
-                        }
-                    )
-            }
-            modalState
-
--}
-
-import Accessibility.Styled as Html exposing (..)
-import Accessibility.Styled.Aria as Aria
-import Accessibility.Styled.Key as Key
-import Accessibility.Styled.Role as Role
-import Accessibility.Styled.Widget as Widget
-import Browser
-import Browser.Dom as Dom
-import Browser.Events
-import Color.Transparent as Transparent
-import Css exposing (..)
-import Css.Transitions
-import Html.Styled as Root
-import Html.Styled.Attributes as Attributes exposing (css, id)
-import Html.Styled.Events exposing (onClick)
-import Nri.Ui.Colors.Extra
-import Nri.Ui.Colors.V1 as Colors
-import Nri.Ui.Fonts.V1 as Fonts
-import Nri.Ui.SpriteSheet
-import Nri.Ui.Svg.V1
-import Task
-
-
-{-| -}
-type Model
-    = Opened String
-    | Closed
-
-
-{-| -}
-init : Model
-init =
-    Closed
-
-
-{-| Pass the id of the element that should receive focus when the modal is closed.
--}
-initOpen : String -> Model
-initOpen =
-    Opened
-
-
-{-| -}
-isOpen : Model -> Bool
-isOpen model =
-    case model of
-        Opened _ ->
-            True
-
-        Closed ->
-            False
-
-
-type By
-    = EscapeKey
-    | OverlayClick
-    | Other
-
-
-{-| -}
-type Msg
-    = OpenModal String
-    | CloseModal By
-    | Focus String
-    | Focused (Result Dom.Error ())
-
-
-{-| Include the subscription if you want the modal to dismiss on `Esc`.
--}
-subscriptions : Model -> Sub Msg
-subscriptions model =
-    case model of
-        Opened _ ->
-            Browser.Events.onKeyDown (Key.escape (CloseModal EscapeKey))
-
-        Closed ->
-            Sub.none
-
-
-{-| -}
-update : { dismissOnEscAndOverlayClick : Bool } -> Msg -> Model -> ( Model, Cmd Msg )
-update { dismissOnEscAndOverlayClick } msg model =
-    case msg of
-        OpenModal returnFocusTo ->
-            ( Opened returnFocusTo
-            , Dom.focus autofocusId
-                |> Task.onError (\_ -> Dom.focus firstId)
-                |> Task.attempt Focused
-            )
-
-        CloseModal by ->
-            let
-                closeModal returnFocusTo =
-                    ( Closed, Task.attempt Focused (Dom.focus returnFocusTo) )
-            in
-            case ( model, by, dismissOnEscAndOverlayClick ) of
-                ( Opened returnFocusTo, _, True ) ->
-                    closeModal returnFocusTo
-
-                ( Opened returnFocusTo, Other, False ) ->
-                    closeModal returnFocusTo
-
-                _ ->
-                    ( model, Cmd.none )
-
-        Focus id ->
-            ( model, Task.attempt Focused (Dom.focus id) )
-
-        Focused _ ->
-            -- TODO: consider adding error handling when we didn't successfully
-            -- fous an element
-            ( model, Cmd.none )
-
-
-type Autofocus
-    = Default
-    | Last
-
-
-{-| Pass the id of the element that should receive focus when the modal closes.
--}
-open : String -> Msg
-open =
-    OpenModal
-
-
-{-| -}
-close : Msg
-close =
-    CloseModal Other
-
-
-
--- ATTRIBUTES
-
-
-{-| Modals should allow the user to tab forwards & backwards through the modal content.
-The user should never find their Focus lost behind the modal backdrop!
-
-Use the `FocusManager` to tag the focusable elements in your modal, so that we
-know to which element to return focus when the user reaches the last focusable element.
-
--}
-type FocusManager msg
-    = MultipleFocusableElements
-        ({ firstFocusableElement : List (Attribute msg)
-         , lastFocusableElement : List (Attribute msg)
-         , autofocusElement : Attribute msg
-         , closeButton : List (Attribute msg) -> Html msg
-         }
-         ->
-            { content : List (Html msg)
-            , footer : List (Html msg)
-            }
-        )
-    | OneFocusableElement
-        ({ onlyFocusableElement : List (Attribute msg)
-         , closeButton : List (Attribute msg) -> Html msg
-         }
-         ->
-            { content : List (Html msg)
-            , footer : List (Html msg)
-            }
-        )
-
-
-modalStyle : List Style
-modalStyle =
-    [ position relative
-
-    -- Border
-    , borderRadius (px 20)
-    , boxShadow5 zero (px 1) (px 10) zero (rgba 0 0 0 0.35)
-
-    -- Spacing
-    , margin2 (px 50) auto
-
-    -- Size
-    , minHeight (vh 40)
-    , width (px 600)
-    , backgroundColor Colors.white
-
-    -- the modal should grow up to the viewport minus a 50px margin
-    , maxHeight (calc (pct 100) minus (px 100))
-    ]
-
-
-titleStyle : Color -> Bool -> List Style
-titleStyle titleColor visibleTitle =
-    if visibleTitle then
-        [ Fonts.baseFont
-        , Css.fontWeight (Css.int 700)
-        , Css.paddingTop (Css.px 40)
-        , Css.paddingBottom (Css.px 20)
-        , Css.margin Css.zero
-        , Css.fontSize (Css.px 20)
-        , Css.textAlign Css.center
-        , Css.color titleColor
-        ]
-
-    else
-        [ -- https://snook.ca/archives/html_and_css/hiding-content-for-accessibility
-          Css.property "clip" "rect(1px, 1px, 1px, 1px)"
-        , Css.position Css.absolute
-        , Css.height (Css.px 1)
-        , Css.width (Css.px 1)
-        , Css.overflow Css.hidden
-        , Css.margin (Css.px -1)
-        , Css.padding Css.zero
-        , Css.border Css.zero
-        ]
-
-
-
--- VIEW
-
-
-{-| -}
-info :
-    { visibleTitle : Bool
-    , title : String
-    , wrapMsg : Msg -> msg
-    , focusManager : FocusManager msg
-    }
-    -> Model
-    -> Html msg
-info config =
-    view config
-        { overlayColor = Nri.Ui.Colors.Extra.withAlpha 0.9 Colors.navy
-        , titleStyles = titleStyle Colors.navy config.visibleTitle
-        }
-
-
-{-| -}
-warning :
-    { visibleTitle : Bool
-    , title : String
-    , wrapMsg : Msg -> msg
-    , focusManager : FocusManager msg
-    }
-    -> Model
-    -> Html msg
-warning config =
-    view config
-        { overlayColor = Nri.Ui.Colors.Extra.withAlpha 0.9 Colors.gray20
-        , titleStyles = titleStyle Colors.red config.visibleTitle
-        }
-
-
-view :
-    { visibleTitle : Bool
-    , title : String
-    , wrapMsg : Msg -> msg
-    , focusManager : FocusManager msg
-    }
-    -> { overlayColor : Color, titleStyles : List Style }
-    -> Model
-    -> Html msg
-view config styles model =
-    case model of
-        Opened _ ->
-            div
-                [ css
-                    [ position fixed
-                    , top zero
-                    , left zero
-                    , width (pct 100)
-                    , height (pct 100)
-                    , displayFlex
-                    , alignItems center
-                    ]
-                ]
-                [ viewBackdrop config.wrapMsg styles.overlayColor
-                , div [ css modalStyle ] [ viewModal config styles ]
-                , Root.node "style" [] [ Root.text "body {overflow: hidden;} " ]
-                ]
-                |> List.singleton
-                |> div [ css [ Css.position Css.relative, Css.zIndex (Css.int 1) ] ]
-
-        Closed ->
-            text ""
-
-
-viewBackdrop : (Msg -> msg) -> Color -> Html msg
-viewBackdrop wrapMsg overlayColor =
-    Root.div
-        -- We use Root html here in order to allow clicking to exit out of
-        -- the overlay. This behavior is available to non-mouse users as
-        -- well via the ESC key, so imo it's fine to have this div
-        -- be clickable but not focusable.
-        [ css
-            [ position absolute
-            , width (pct 100)
-            , height (pct 100)
-            , backgroundColor overlayColor
-            ]
-        , onClick (wrapMsg (CloseModal OverlayClick))
-        ]
-        []
-
-
-viewModal :
-    { visibleTitle : Bool
-    , title : String
-    , wrapMsg : Msg -> msg
-    , focusManager : FocusManager msg
-    }
-    -> { a | titleStyles : List Style }
-    -> Html msg
-viewModal config styles =
-    section
-        [ Role.dialog
-        , Aria.labeledBy modalTitleId
-        ]
-        [ h1 [ id modalTitleId, css styles.titleStyles ] [ text config.title ]
-        , viewContent config.visibleTitle <|
-            case config.focusManager of
-                OneFocusableElement toContentAndFooter ->
-                    toContentAndFooter
-                        { onlyFocusableElement =
-                            List.map (Attributes.map config.wrapMsg)
-                                [ Key.onKeyDown
-                                    [ Key.tabBack (Focus autofocusId)
-                                    , Key.tab (Focus autofocusId)
-                                    ]
-                                , id autofocusId
-                                ]
-                        , closeButton = closeButton config.wrapMsg
-                        }
-
-                MultipleFocusableElements toContentAndFooter ->
-                    toContentAndFooter
-                        { firstFocusableElement =
-                            List.map (Attributes.map config.wrapMsg)
-                                [ Key.onKeyDown [ Key.tabBack (Focus lastId) ]
-                                , id firstId
-                                ]
-                        , lastFocusableElement =
-                            List.map (Attributes.map config.wrapMsg)
-                                [ Key.onKeyDown [ Key.tab (Focus firstId) ]
-                                , id lastId
-                                ]
-                        , autofocusElement =
-                            Attributes.map config.wrapMsg (id autofocusId)
-                        , closeButton = closeButton config.wrapMsg
-                        }
-        ]
-
-
-{-| -}
-viewContent : Bool -> { content : List (Html msg), footer : List (Html msg) } -> Html msg
-viewContent visibleTitle { content, footer } =
-    div []
-        [ viewInnerContent content visibleTitle (not (List.isEmpty footer))
-        , viewFooter footer
-        ]
-
-
-{-| -}
-viewInnerContent : List (Html msg) -> Bool -> Bool -> Html msg
-viewInnerContent children visibleTitle visibleFooter =
-    let
-        titleHeight =
-            if visibleTitle then
-                45
-
-            else
-                0
-
-        footerHeight =
-            if visibleFooter then
-                180
-
-            else
-                0
-
-        modalTitleStyles =
-            if visibleTitle then
-                []
-
-            else
-                [ Css.borderTopLeftRadius (Css.px 20)
-                , Css.borderTopRightRadius (Css.px 20)
-                , Css.overflowY Css.hidden
-                ]
-
-        modalFooterStyles =
-            if visibleFooter then
-                []
-
-            else
-                [ Css.borderBottomLeftRadius (Css.px 20)
-                , Css.borderBottomRightRadius (Css.px 20)
-                , Css.overflowY Css.hidden
-                ]
-    in
-    div
-        [ css (modalTitleStyles ++ modalFooterStyles)
-        ]
-        [ div
-            [ css
-                [ Css.overflowY Css.auto
-                , Css.overflowX Css.hidden
-                , Css.minHeight (Css.px 150)
-                , Css.maxHeight
-                    (Css.calc (Css.vh 100)
-                        Css.minus
-                        (Css.px (footerHeight + titleHeight + 145))
-                    )
-                , Css.width (Css.pct 100)
-                , Css.boxSizing Css.borderBox
-                , Css.paddingLeft (Css.px 40)
-                , Css.paddingRight (Css.px 40)
-                , if visibleTitle then
-                    Css.paddingTop Css.zero
-
-                  else
-                    Css.paddingTop (Css.px 40)
-                , if visibleFooter then
-                    Css.paddingBottom Css.zero
-
-                  else
-                    Css.paddingBottom (Css.px 40)
-                , if visibleFooter then
-                    shadow (Transparent.customOpacity 0.15) (Css.px 16)
-
-                  else
-                    shadow (Transparent.customOpacity 0.4) (Css.px 30)
-                ]
-            ]
-            children
-        ]
-
-
-shadow : Transparent.Opacity -> Css.Px -> Css.Style
-shadow opacity bottomShadowHeight =
-    let
-        to =
-            Transparent.fromRGBA { red = 0, green = 0, blue = 0, alpha = opacity }
-                |> Transparent.toRGBAString
-    in
-    Css.batch
-        [ -- Shadows for indicating that the content is scrollable
-          [ "/* TOP shadow */"
-          , "top linear-gradient(to top, rgb(255, 255, 255), rgb(255, 255, 255)) local,"
-          , "top linear-gradient(to top, rgba(255, 255, 255, 0), rgba(0, 0, 0, 0.15)) scroll,"
-          , ""
-          , "/* BOTTOM shadow */"
-          , "bottom linear-gradient(to bottom, rgb(255, 255, 255), rgb(255, 255, 255)) local,"
-          , "bottom linear-gradient(to bottom, rgba(255, 255, 255, 0), " ++ to ++ ") scroll"
-          ]
-            |> String.join "\n"
-            |> Css.property "background"
-        , Css.backgroundSize2 (Css.pct 100) bottomShadowHeight
-        , Css.backgroundRepeat Css.noRepeat
-        ]
-
-
-{-| -}
-viewFooter : List (Html msg) -> Html msg
-viewFooter children =
-    if List.isEmpty children then
-        Html.text ""
-
-    else
-        div
-            [ css
-                [ Css.alignItems Css.center
-                , Css.displayFlex
-                , Css.flexDirection Css.column
-                , Css.flexGrow (Css.int 2)
-                , Css.flexWrap Css.noWrap
-                , Css.margin4 (Css.px 20) Css.zero Css.zero Css.zero
-                , Css.paddingBottom (Css.px 40)
-                , Css.width (Css.pct 100)
-                ]
-            ]
-            children
-
-
-
---BUTTONS
-
-
-{-| -}
-closeButton : (Msg -> msg) -> List (Attribute msg) -> Html msg
-closeButton wrapMsg focusableElementAttrs =
-    button
-        (Widget.label "Close modal"
-            :: Attributes.map wrapMsg (onClick close)
-            :: css
-                [ -- in the upper-right corner of the modal
-                  Css.position Css.absolute
-                , Css.top Css.zero
-                , Css.right Css.zero
-
-                -- make the hitspace extend all the way to the corner
-                , Css.width (Css.px 40)
-                , Css.height (Css.px 40)
-                , Css.padding4 (Css.px 20) (Css.px 20) Css.zero Css.zero
-
-                -- apply button styles
-                , Css.borderWidth Css.zero
-                , Css.backgroundColor Css.transparent
-                , Css.cursor Css.pointer
-                , Css.color Colors.azure
-                , Css.hover [ Css.color Colors.azureDark ]
-                , Css.Transitions.transition [ Css.Transitions.color 0.1 ]
-                ]
-            :: focusableElementAttrs
-        )
-        [ Nri.Ui.Svg.V1.toHtml Nri.Ui.SpriteSheet.xSvg
-        ]
-
-
-
--- IDS
-
-
-modalTitleId : String
-modalTitleId =
-    "modal__title"
-
-
-firstId : String
-firstId =
-    "modal__first-focusable-element"
-
-
-lastId : String
-lastId =
-    "modal__last-focusable-element"
-
-
-autofocusId : String
-autofocusId =
-    "modal__autofocus-element"
diff --git a/styleguide-app/Examples/Modal.elm b/styleguide-app/Examples/Modal.elm
index 330ad1ca..c4ff8590 100644
--- a/styleguide-app/Examples/Modal.elm
+++ b/styleguide-app/Examples/Modal.elm
@@ -71,7 +71,7 @@ initModalSettings =
 {-| -}
 example : Example State Msg
 example =
-    { name = "Nri.Ui.Modal.V9"
+    { name = "Nri.Ui.Modal.V10"
     , categories = [ Modals ]
     , atomicDesignType = Organism
     , keyboardSupport = []
diff --git a/tests/elm-verify-examples.json b/tests/elm-verify-examples.json
index a0e1f6f2..f78d28dd 100644
--- a/tests/elm-verify-examples.json
+++ b/tests/elm-verify-examples.json
@@ -33,7 +33,6 @@
         "Nri.Ui.Menu.V1",
         "Nri.Ui.Message.V1",
         "Nri.Ui.Modal.V3",
-        "Nri.Ui.Modal.V9",
         "Nri.Ui.Modal.V10",
         "Nri.Ui.Page.V3",
         "Nri.Ui.Palette.V1",