我该如何映射Maybe List?

时间:2017-08-03 16:27:47

标签: functional-programming monads elm maybe sanctuary

我离开了provides a __str__ method,似乎是对Maybe的误解。

我相信:

map(add1, Just [1, 2, 3])
// => Just [2, 3, 4]

我对上述指南的感觉是Maybe.map应该尝试在数组上调用Array.map,基本上返回Just(map(add1, [1, 2, 3])

当我尝试使用Professor Frisby's Mostly Adequate Guide to Functional Programming的可能类型,以及最近Sanctuary的可能类型时,我很失望地发现他们都不支持这个(或者,也许,我不喜欢)了解他们如何支持这一点)。

在庇护所,

> S.map(S.add(1), S.Just([1, 2, 3]))
! Invalid value

add :: FiniteNumber -> FiniteNumber -> FiniteNumber
                       ^^^^^^^^^^^^
                            1

1)  [1, 2, 3] :: Array Number, Array FiniteNumber, Array NonZeroFiniteNumber, Array Integer, Array ValidNumber

The value at position 1 is not a member of ‘FiniteNumber’.

在榆树,

> Maybe.map sqrt (Just [1, 2, 3])
-- TYPE MISMATCH --------------------------------------------- repl-temp-000.elm

The 2nd argument to function `map` is causing a mismatch.

4|   Maybe.map sqrt (Just [1, 2, 3])
                     ^^^^^^^^^^^^^^
Function `map` is expecting the 2nd argument to be:

    Maybe Float

But it is:

    Maybe (List number)

同样,我觉得我应该能够将Just(Just(1))视为Just(1)。另一方面,我对[[1]]的直觉完全相反。显然,map(add1, [[1]])应该返回[NaN]而不是[[2]]或其他任何内容。

在Elm,我能够做到以下几点:

> Maybe.map (List.map (add 1)) (Just [1, 2, 3])
Just [2,3,4] : Maybe.Maybe (List number)

这是我想做的,但不是我想要做的。

如何映射Maybe List?

2 个答案:

答案 0 :(得分:6)

您需要处理两个仿函数:MaybeList。您正在寻找的是将它们结合起来的一些方法。您可以简化您按功能组合发布的Elm示例:

> (Maybe.map << List.map) add1 (Just [1, 2, 3])
Just [2,3,4] : Maybe.Maybe (List number)

这实际上只是您发布的示例的简写,您说这不是 您想要这样做。

Sanctuary具有compose功能,因此上述内容将表示为:

> S.compose(S.map, S.map)(S.add(1))(S.Just([1, 2, 3]))
Just([2, 3, 4])
  

同样,我觉得我应该能够将Just(Just(1))视为Just(1)

可以使用elm-community/maybe-extra包中的join来完成此操作。

join (Just (Just 1)) == Just 1
join (Just Nothing)  == Nothing
join Nothing         == Nothing

Sanctuary也具有join功能,因此您可以执行以下操作:

S.join(S.Just(S.Just(1))) == Just(1)
S.join(S.Just(S.Nothing)) == Nothing
S.join(S.Nothing)         == Nothing

答案 1 :(得分:4)

正如Chad所说,你想要转换嵌套在两个仿函数中的值。

让我们从单独的映射开始,以获得舒适:

> S.map(S.toUpper, ['foo', 'bar', 'baz'])
['FOO', 'BAR', 'BAZ']

> S.map(Math.sqrt, S.Just(64))
Just(8)

让我们考虑一般的地图类型:

map :: Functor f => (a -> b) -> f a -> f b

现在,让我们专门针对上述两种用途使用此类型:

map :: (String -> String) -> Array String -> Array String

map :: (Number -> Number) -> Maybe Number -> Maybe Number

到目前为止一切顺利。但在您的情况下,我们希望映射Maybe (Array Number)类型的值。我们需要一个这种类型的函数:

:: Maybe (Array Number) -> Maybe (Array Number)

如果我们映射S.Just([1, 2, 3]),我们需要提供一个函数,它将[1, 2, 3] - 内部值 - 作为参数。因此,我们为S.map提供的函数必须是Array (Number) -> Array (Number)类型的函数。 S.map(S.add(1))就是这样一个功能。把这一切带到一起我们到达:

> S.map(S.map(S.add(1)), S.Just([1, 2, 3]))
Just([2, 3, 4])