Skip to content

Commit d050182

Browse files
Manuel Bärenzturion
authored andcommitted
Use standard FreeT instead of applicative
1 parent d7ccd0f commit d050182

File tree

2 files changed

+2
-2
lines changed

2 files changed

+2
-2
lines changed

src/Control/Monad/Bayes/Class.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -81,7 +81,7 @@ import Control.Monad.Except (ExceptT, lift)
8181
import Control.Monad.Identity (IdentityT)
8282
import Control.Monad.Reader (ReaderT)
8383
import Control.Monad.State (StateT)
84-
import Control.Monad.Trans.Free.Ap (FreeT)
84+
import Control.Monad.Trans.Free (FreeT)
8585
import Control.Monad.Writer (WriterT)
8686
import Data.Histogram qualified as H
8787
import Data.Histogram.Fill qualified as H

src/Control/Monad/Bayes/Population.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -56,7 +56,7 @@ import Control.Monad.Bayes.Weighted
5656
import Control.Monad.Bayes.Weighted qualified as Weighted
5757
import Control.Monad.IO.Class
5858
import Control.Monad.Trans
59-
import Control.Monad.Trans.Free.Ap
59+
import Control.Monad.Trans.Free
6060
import Data.List (unfoldr)
6161
import Data.List qualified
6262
import Data.Maybe (catMaybes)

0 commit comments

Comments
 (0)