Отфильтруйте [Узел] в [Элемент] с помощью ghcjs-dom

Question

Я использую GHCJS-DOM. Как я могу отфильтровать элементы из массива узлов?

import GHCJS.DOM.Types

nodesToElements :: [Node] -> [Element]
nodesToElements = ??

или же

nodesToElements :: [Node] -> IO [Element]
nodesToElements = ??

Answer 1

import GHCJS.DOM.Types
import Data.Maybe (mapMaybe)

nodeToElement :: Node -> Maybe Element
nodeToElement node = if node `isA` gTypeElement
                     then Just $ castToElement node
                     else Nothing

nodesToElements :: [Node] -> [Element]
nodesToElements = mapMaybe nodeToElement