diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -31,4 +31,7 @@
 
 * Second version revised A. Changed the name of the module.
 
+## 0.2.2.0 -- 2019-11-08
+
+* Second version revised B. Added a new function mapI3. 
 
diff --git a/Data/List/InnToOut.hs b/Data/List/InnToOut.hs
--- a/Data/List/InnToOut.hs
+++ b/Data/List/InnToOut.hs
@@ -24,3 +24,8 @@
 mapI2 :: (a -> Bool) -> (a -> b) -> (a -> [b]) -> [a] -> [b]
 mapI2 p f g = concatMap (\x -> if p x then [f x] else g x)
 {-#INLINE mapI2#-}
+
+-- | Function that can apply two different ways of computing something depending of the predicate value @p :: a -> Bool@ for the @[a]@. Similar to arrow techniques.
+mapI3 :: (a -> Bool) -> (a -> b) -> (b -> d) -> (a -> c) -> (c -> d) -> [a] -> [d]
+mapI3 p f1 g f2 h = map (\x -> if p x then g (f1 x) else h (f2 x)) 
+{-#INLINE mapI3#-}
diff --git a/mmsyn5.cabal b/mmsyn5.cabal
--- a/mmsyn5.cabal
+++ b/mmsyn5.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                mmsyn5
-version:             0.2.1.0
+version:             0.2.2.0
 synopsis:            Various additional operations on lists
 description:         A small library to deal with a little bit more complex operations on lists than Data.List module
 homepage:            http://hackage.haskell.org/package/mmsyn5