mirror of
https://github.com/correl/typesafe-monads.git
synced 2024-11-14 19:19:32 +00:00
18 lines
448 B
Python
18 lines
448 B
Python
import pytest # type: ignore
|
|
from typing import Callable, Type, TypeVar
|
|
|
|
from monads import Applicative, Functor, Maybe, Result
|
|
|
|
T = TypeVar("T")
|
|
S = TypeVar("S")
|
|
|
|
|
|
@pytest.fixture(scope="module", params=[Maybe, Result])
|
|
def monad(request) -> Type:
|
|
return request.param
|
|
|
|
|
|
def test_fmap_using_ap(monad) -> None:
|
|
f: Callable[[int], int] = lambda x: x + 1
|
|
m: Applicative[int] = monad.pure(3)
|
|
assert m.map(f) == m.apply(monad.pure(f))
|