From 6724f552ed29ddc3ac59f4af002d81bc64005c4c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jyri-Matti=20La=CC=88hteenma=CC=88ki?=
 <jyri-matti.lahteenmaki@solita.fi>
Date: Thu, 4 Jan 2024 09:27:48 +0200
Subject: [PATCH] add some function helpers

---
 pom.xml                                       |   2 +-
 .../fi/solita/utils/functional/Function.java  | 180 ++++++++++++++++++
 .../solita/utils/functional/Functional.java   |   7 +
 3 files changed, 188 insertions(+), 1 deletion(-)

diff --git a/pom.xml b/pom.xml
index 28ad348..99e481e 100644
--- a/pom.xml
+++ b/pom.xml
@@ -2,7 +2,7 @@
     <modelVersion>4.0.0</modelVersion>
     <groupId>fi.solita.utils</groupId>
     <artifactId>functional-utils</artifactId>
-    <version>0.12.43</version>
+    <version>0.12.44</version>
     <build>
         <resources>
                 <resource>
diff --git a/src/main/java/fi/solita/utils/functional/Function.java b/src/main/java/fi/solita/utils/functional/Function.java
index eaebf55..47360f4 100644
--- a/src/main/java/fi/solita/utils/functional/Function.java
+++ b/src/main/java/fi/solita/utils/functional/Function.java
@@ -493,6 +493,186 @@ public final E apply(A t1, B t2, C t3, D t4) {
             }
         };
     }
+    
+    /**
+     * Partially apply {@code arg1} to {@code f}
+     */
+    public static final <T1,T2,R> Function1<T2,R> ap(final Apply2<T1,T2,R> f, final T1 arg1) {
+        return new Function1<T2,R>() {
+            @Override
+            public final R apply(T2 arg2) {
+                return f.apply(arg1, arg2);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1} to {@code f}
+     */
+    public static final <T1,T2,T3,R> Function2<T2,T3,R> ap(final Apply3<T1,T2,T3,R> f, final T1 arg1) {
+        return new Function2<T2,T3,R>() {
+            @Override
+            public final R apply(T2 arg2, T3 arg3) {
+                return f.apply(arg1, arg2, arg3);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1} and {@code arg2} to {@code f}
+     */
+    public static final <T1,T2,T3,R> Function1<T3,R> ap(final Apply3<T1,T2,T3,R> f, final T1 arg1, final T2 arg2) {
+        return new Function1<T3,R>() {
+            @Override
+            public final R apply(T3 arg3) {
+                return f.apply(arg1, arg2, arg3);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,R> Function3<T2,T3,T4,R> ap(final Apply4<T1,T2,T3,T4,R> f, final T1 arg1) {
+        return new Function3<T2,T3,T4,R>() {
+            @Override
+            public final R apply(T2 arg2, T3 arg3, T4 arg4) {
+                return f.apply(arg1, arg2, arg3, arg4);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1} and {@code arg2} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,R> Function2<T3,T4,R> ap(final Apply4<T1,T2,T3,T4,R> f, final T1 arg1, final T2 arg2) {
+        return new Function2<T3,T4,R>() {
+            @Override
+            public final R apply(T3 arg3, T4 arg4) {
+                return f.apply(arg1, arg2, arg3, arg4);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1}, {@code arg2} and {@code arg3} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,R> Function1<T4,R> ap(final Apply4<T1,T2,T3,T4,R> f, final T1 arg1, final T2 arg2, final T3 arg3) {
+        return new Function1<T4,R>() {
+            @Override
+            public final R apply(T4 arg4) {
+                return f.apply(arg1, arg2, arg3, arg4);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,R> Function4<T2,T3,T4,T5,R> ap(final Apply5<T1,T2,T3,T4,T5,R> f, final T1 arg1) {
+        return new Function4<T2,T3,T4,T5,R>() {
+            @Override
+            public final R apply(T2 arg2, T3 arg3, T4 arg4, T5 arg5) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1} and {@code arg2} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,R> Function3<T3,T4,T5,R> ap(final Apply5<T1,T2,T3,T4,T5,R> f, final T1 arg1, final T2 arg2) {
+        return new Function3<T3,T4,T5,R>() {
+            @Override
+            public final R apply(T3 arg3, T4 arg4, T5 arg5) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1}, {@code arg2} and {@code arg3} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,R> Function2<T4,T5,R> ap(final Apply5<T1,T2,T3,T4,T5,R> f, final T1 arg1, final T2 arg2, final T3 arg3) {
+        return new Function2<T4,T5,R>() {
+            @Override
+            public final R apply(T4 arg4, T5 arg5) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1}, {@code arg2}, {@code arg3} and {@code arg4} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,R> Function1<T5,R> ap(final Apply5<T1,T2,T3,T4,T5,R> f, final T1 arg1, final T2 arg2, final T3 arg3, final T4 arg4) {
+        return new Function1<T5,R>() {
+            @Override
+            public final R apply(T5 arg5) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,T6,R> Function5<T2,T3,T4,T5,T6,R> ap(final Apply6<T1,T2,T3,T4,T5,T6,R> f, final T1 arg1) {
+        return new Function5<T2,T3,T4,T5,T6,R>() {
+            @Override
+            public final R apply(T2 arg2, T3 arg3, T4 arg4, T5 arg5, T6 arg6) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5, arg6);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1} and {@code arg2} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,T6,R> Function4<T3,T4,T5,T6,R> ap(final Apply6<T1,T2,T3,T4,T5,T6,R> f, final T1 arg1, final T2 arg2) {
+        return new Function4<T3,T4,T5,T6,R>() {
+            @Override
+            public final R apply(T3 arg3, T4 arg4, T5 arg5, T6 arg6) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5, arg6);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1}, {@code arg2} and {@code arg3} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,T6,R> Function3<T4,T5,T6,R> ap(final Apply6<T1,T2,T3,T4,T5,T6,R> f, final T1 arg1, final T2 arg2, final T3 arg3) {
+        return new Function3<T4,T5,T6,R>() {
+            @Override
+            public final R apply(T4 arg4, T5 arg5, T6 arg6) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5, arg6);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1}, {@code arg2}, {@code arg3} and {@code arg4} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,T6,R> Function2<T5,T6,R> ap(final Apply6<T1,T2,T3,T4,T5,T6,R> f, final T1 arg1, final T2 arg2, final T3 arg3, final T4 arg4) {
+        return new Function2<T5,T6,R>() {
+            @Override
+            public final R apply(T5 arg5, T6 arg6) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5, arg6);
+            }
+        };
+    }
+    
+    /**
+     * Partially apply {@code arg1}, {@code arg2}, {@code arg3}, {@code arg4} and {@code arg5} to {@code f}
+     */
+    public static final <T1,T2,T3,T4,T5,T6,R> Function1<T6,R> ap(final Apply6<T1,T2,T3,T4,T5,T6,R> f, final T1 arg1, final T2 arg2, final T3 arg3, final T4 arg4, final T5 arg5) {
+        return new Function1<T6,R>() {
+            @Override
+            public final R apply(T6 arg6) {
+                return f.apply(arg1, arg2, arg3, arg4, arg5, arg6);
+            }
+        };
+    }
 }
 
 class PartialApplicationHelper {
diff --git a/src/main/java/fi/solita/utils/functional/Functional.java b/src/main/java/fi/solita/utils/functional/Functional.java
index 5b6f2d2..aec1cc0 100644
--- a/src/main/java/fi/solita/utils/functional/Functional.java
+++ b/src/main/java/fi/solita/utils/functional/Functional.java
@@ -60,6 +60,13 @@ public static final <S, T> Iterable<T> map(Apply<? super S, ? extends T> f, Iter
     public static final <S1, S2, T> Iterable<T> map(ApplyBi<? super S1, ? super S2, ? extends T> f, Iterable<? extends Map.Entry<S1, S2>> xs) {
         return FunctionalImpl.map(Function.of(f), xs);
     }
+    
+    /**
+     * @return all elements in {@code xs} transformed with {@code f}.
+     */
+    public static final <S1, S2, S3, T> Iterable<T> map(Apply3<? super S1, ? super S2, ? super S3, ? extends T> f, Iterable<Tuple3<S1, S2, S3>> xs) {
+        return FunctionalImpl.map(Function.of(f), xs);
+    }
 
     /**
      * @return all elements in {@code xs} transformed with {@code f1} and {@code f2} respectively.