[WIP] Monadic refactoring
This commit is contained in:
parent
ca3898cb53
commit
022bd4856a
@ -133,7 +133,9 @@ def xref_to_maybe_image(doc, xref) -> Maybe:
|
|||||||
|
|
||||||
|
|
||||||
def make_maybe_image_metadata_pair(image: Maybe, metadata: Maybe):
|
def make_maybe_image_metadata_pair(image: Maybe, metadata: Maybe):
|
||||||
return Maybe.apply(make_image_metadata_pair).to_arguments(image, metadata)
|
# haskell.org/tutorial/monads.html
|
||||||
|
# (>>) :: m a -> m b -> m b
|
||||||
|
return Just(make_image_metadata_pair).amap(image).amap(metadata)
|
||||||
|
|
||||||
|
|
||||||
@curry(2)
|
@curry(2)
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user