Please wait. This can take some minutes ...
Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $
You can buy this project and download/modify it how often you want.
eu.lunisolar.magma.func.function.from.LBiDblFunction Maven / Gradle / Ivy
/*
* This file is part of "lunisolar-magma".
*
* (C) Copyright 2014-2019 Lunisolar (http://lunisolar.eu/).
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
package eu.lunisolar.magma.func.function.from;
import javax.annotation.Nonnull; // NOSONAR
import javax.annotation.Nullable; // NOSONAR
import java.util.Comparator; // NOSONAR
import java.util.Objects; // NOSONAR
import eu.lunisolar.magma.basics.*; //NOSONAR
import eu.lunisolar.magma.basics.builder.*; // NOSONAR
import eu.lunisolar.magma.basics.exceptions.*; // NOSONAR
import eu.lunisolar.magma.basics.meta.*; // NOSONAR
import eu.lunisolar.magma.basics.meta.aType.*; // NOSONAR
import eu.lunisolar.magma.basics.meta.functional.*; // NOSONAR
import eu.lunisolar.magma.basics.meta.functional.type.*; // NOSONAR
import eu.lunisolar.magma.basics.meta.functional.domain.*; // NOSONAR
import eu.lunisolar.magma.func.IA;
import eu.lunisolar.magma.func.SA;
import eu.lunisolar.magma.func.*; // NOSONAR
import eu.lunisolar.magma.func.tuple.*; // NOSONAR
import java.util.function.*; // NOSONAR
import java.util.*; // NOSONAR
import java.lang.reflect.*;
import eu.lunisolar.magma.func.action.*; // NOSONAR
import eu.lunisolar.magma.func.consumer.*; // NOSONAR
import eu.lunisolar.magma.func.consumer.primitives.*; // NOSONAR
import eu.lunisolar.magma.func.consumer.primitives.bi.*; // NOSONAR
import eu.lunisolar.magma.func.consumer.primitives.obj.*; // NOSONAR
import eu.lunisolar.magma.func.consumer.primitives.tri.*; // NOSONAR
import eu.lunisolar.magma.func.function.*; // NOSONAR
import eu.lunisolar.magma.func.function.conversion.*; // NOSONAR
import eu.lunisolar.magma.func.function.from.*; // NOSONAR
import eu.lunisolar.magma.func.function.to.*; // NOSONAR
import eu.lunisolar.magma.func.operator.binary.*; // NOSONAR
import eu.lunisolar.magma.func.operator.ternary.*; // NOSONAR
import eu.lunisolar.magma.func.operator.unary.*; // NOSONAR
import eu.lunisolar.magma.func.predicate.*; // NOSONAR
import eu.lunisolar.magma.func.supplier.*; // NOSONAR
/**
* Non-throwing functional interface (lambda) LBiDblFunction for Java 8.
*
* Type: function
*
* Domain (lvl: 2): double a1,double a2
*
* Co-domain: R
*
*/
@FunctionalInterface
@SuppressWarnings("UnusedDeclaration")
public interface LBiDblFunction extends MetaFunction, MetaInterface.NonThrowing, Codomain>, Domain2 { // NOSONAR
String DESCRIPTION = "LBiDblFunction: R apply(double a1,double a2)";
@Nullable
// R apply(double a1,double a2) ;
default R apply(double a1, double a2) {
// return nestingApply(a1,a2);
try {
return this.applyX(a1, a2);
} catch (Throwable e) { // NOSONAR
throw Handling.nestCheckedAndThrow(e);
}
}
/**
* Implement this, but call apply(double a1,double a2)
*/
R applyX(double a1, double a2) throws Throwable;
default R tupleApply(LDblPair args) {
return apply(args.first(), args.second());
}
/** Function call that handles exceptions according to the instructions. */
default R handlingApply(double a1, double a2, HandlingInstructions handling) {
try {
return this.applyX(a1, a2);
} catch (Throwable e) { // NOSONAR
throw Handler.handleOrNest(e, handling);
}
}
default LBiDblFunction handling(HandlingInstructions handling) {
return (a1, a2) -> handlingApply(a1, a2, handling);
}
default R apply(double a1, double a2, @Nonnull ExWMF exF, @Nonnull String newMessage, @Nullable Object... messageParams) {
try {
return this.applyX(a1, a2);
} catch (Throwable e) { // NOSONAR
throw Handling.wrap(e, exF, newMessage, messageParams);
}
}
default LBiDblFunction trying(@Nonnull ExWMF exF, @Nonnull String newMessage, @Nullable Object... messageParams) {
return (a1, a2) -> apply(a1, a2, exF, newMessage, messageParams);
}
default R apply(double a1, double a2, @Nonnull ExWF exF) {
try {
return this.applyX(a1, a2);
} catch (Throwable e) { // NOSONAR
throw Handling.wrap(e, exF);
}
}
default LBiDblFunction trying(@Nonnull ExWF exF) {
return (a1, a2) -> apply(a1, a2, exF);
}
default R applyThen(double a1, double a2, @Nonnull LFunction handler) {
try {
return this.applyX(a1, a2);
} catch (Throwable e) { // NOSONAR
Handling.handleErrors(e);
return handler.apply(e);
}
}
default LBiDblFunction tryingThen(@Nonnull LFunction handler) {
return (a1, a2) -> applyThen(a1, a2, handler);
}
/** Function call that handles exceptions by always nesting checked exceptions and propagating the others as is. */
default R nestingApply(double a1, double a2) {
try {
return this.applyX(a1, a2);
} catch (Throwable e) { // NOSONAR
throw Handling.nestCheckedAndThrow(e);
}
}
/** Function call that handles exceptions by always propagating them as is, even when they are undeclared checked ones. */
default R shovingApply(double a1, double a2) {
try {
return this.applyX(a1, a2);
} catch (Throwable e) { // NOSONAR
throw Handling.shoveIt(e);
}
}
static R handlingApply(double a1, double a2, LBiDblFunction func, HandlingInstructions handling) { // <-
Null.nonNullArg(func, "func");
return func.handlingApply(a1, a2, handling);
}
static R tryApply(double a1, double a2, LBiDblFunction func) {
Null.nonNullArg(func, "func");
return func.nestingApply(a1, a2);
}
static R tryApply(double a1, double a2, LBiDblFunction func, @Nonnull ExWMF exF, @Nonnull String newMessage, @Nullable Object... messageParams) {
Null.nonNullArg(func, "func");
return func.apply(a1, a2, exF, newMessage, messageParams);
}
static R tryApply(double a1, double a2, LBiDblFunction func, @Nonnull ExWF exF) {
Null.nonNullArg(func, "func");
return func.apply(a1, a2, exF);
}
static R tryApplyThen(double a1, double a2, LBiDblFunction func, @Nonnull LFunction handler) {
Null.nonNullArg(func, "func");
return func.applyThen(a1, a2, handler);
}
default R failSafeApply(double a1, double a2, @Nonnull LBiDblFunction failSafe) {
try {
return apply(a1, a2);
} catch (Throwable e) { // NOSONAR
Handling.handleErrors(e);
return failSafe.apply(a1, a2);
}
}
static R failSafeApply(double a1, double a2, LBiDblFunction func, @Nonnull LBiDblFunction failSafe) {
Null.nonNullArg(failSafe, "failSafe");
if (func == null) {
return failSafe.apply(a1, a2);
} else {
return func.failSafeApply(a1, a2, failSafe);
}
}
static LBiDblFunction failSafe(LBiDblFunction func, @Nonnull LBiDblFunction failSafe) {
Null.nonNullArg(failSafe, "failSafe");
return (a1, a2) -> failSafeApply(a1, a2, func, failSafe);
}
LSupplier NULL_VALUE_MESSAGE_SUPPLIER = () -> "Evaluated value by nonNullApply() method cannot be null (" + DESCRIPTION + ").";
/** Function call that ensures the result is not null */
@Nonnull
default R nonNullApply(double a1, double a2) {
return Null.requireNonNull(apply(a1, a2), NULL_VALUE_MESSAGE_SUPPLIER);
}
/** Returns description of the functional interface. */
@Nonnull
default String functionalInterfaceDescription() {
return LBiDblFunction.DESCRIPTION;
}
/** From-To. Intended to be used with non-capturing lambda. */
public static void fromTo(int min_i, int max_i, double a1, double a2, LBiDblFunction func) {
Null.nonNullArg(func, "func");
if (min_i <= max_i) {
for (int i = min_i; i <= max_i; i++) {
func.apply(a1, a2);
}
} else {
for (int i = min_i; i >= max_i; i--) {
func.apply(a1, a2);
}
}
}
/** From-To. Intended to be used with non-capturing lambda. */
public static void fromTill(int min_i, int max_i, double a1, double a2, LBiDblFunction func) {
Null.nonNullArg(func, "func");
if (min_i <= max_i) {
for (int i = min_i; i < max_i; i++) {
func.apply(a1, a2);
}
} else {
for (int i = min_i; i > max_i; i--) {
func.apply(a1, a2);
}
}
}
/** From-To. Intended to be used with non-capturing lambda. */
public static void times(int max_i, double a1, double a2, LBiDblFunction func) {
if (max_i < 0)
return;
fromTill(0, max_i, a1, a2, func);
}
public default LDblFunction lShrink(LDblUnaryOperator left) {
return a2 -> apply(left.applyAsDbl(a2), a2);
}
public default LDblFunction lShrinkc(double a1) {
return a2 -> apply(a1, a2);
}
public static LDblFunction lShrinked(LDblUnaryOperator left, LBiDblFunction func) {
return func.lShrink(left);
}
public static LDblFunction lShrinkedc(double a1, LBiDblFunction func) {
return func.lShrinkc(a1);
}
public default LDblFunction rShrink(LDblUnaryOperator right) {
return a1 -> apply(a1, right.applyAsDbl(a1));
}
public default LDblFunction rShrinkc(double a2) {
return a1 -> apply(a1, a2);
}
public static LDblFunction rShrinked(LDblUnaryOperator right, LBiDblFunction func) {
return func.rShrink(right);
}
public static LDblFunction rShrinkedc(double a2, LBiDblFunction func) {
return func.rShrinkc(a2);
}
/** */
public static LBiDblFunction uncurry(LDblFunction> func) {
return (double a1, double a2) -> func.apply(a1).apply(a2);
}
/** Cast that removes generics. */
public default LBiDblFunction untyped() {
return this;
}
/** Cast that replace generics. */
public default LBiDblFunction cast() {
return untyped();
}
/** Cast that replace generics. */
public static LBiDblFunction cast(LBiDblFunction function) {
return (LBiDblFunction) function;
}
/** Captures arguments but delays the evaluation. */
default LSupplier capture(double a1, double a2) {
return () -> this.apply(a1, a2);
}
/** Creates function that always returns the same value. */
static LBiDblFunction constant(R r) {
return (a1, a2) -> r;
}
/** Captures single parameter function into this interface where only 1st parameter will be used. */
@Nonnull
static LBiDblFunction apply1st(@Nonnull LDblFunction func) {
return (a1, a2) -> func.apply(a1);
}
/** Captures single parameter function into this interface where only 2nd parameter will be used. */
@Nonnull
static LBiDblFunction apply2nd(@Nonnull LDblFunction func) {
return (a1, a2) -> func.apply(a2);
}
/** Convenient method in case lambda expression is ambiguous for the compiler (that might happen for overloaded methods accepting different interfaces). */
@Nonnull
static LBiDblFunction biDblFunc(final @Nonnull LBiDblFunction lambda) {
Null.nonNullArg(lambda, "lambda");
return lambda;
}
@Nonnull
static LBiDblFunction recursive(final @Nonnull LFunction, LBiDblFunction> selfLambda) {
final LBiDblFunctionSingle single = new LBiDblFunctionSingle();
LBiDblFunction func = selfLambda.apply(single);
single.target = func;
return func;
}
final class LBiDblFunctionSingle implements LSingle>, LBiDblFunction {
private LBiDblFunction target = null;
@Override
public R applyX(double a1, double a2) throws Throwable {
return target.applyX(a1, a2);
}
@Override
public LBiDblFunction value() {
return target;
}
}
@Nonnull
static LBiDblFunction biDblFuncThrowing(final @Nonnull ExF exF) {
Null.nonNullArg(exF, "exF");
return (a1, a2) -> {
throw exF.produce();
};
}
@Nonnull
static LBiDblFunction biDblFuncThrowing(final String message, final @Nonnull ExMF exF) {
Null.nonNullArg(exF, "exF");
return (a1, a2) -> {
throw exF.produce(message);
};
}
//
/** Convenient method in case lambda expression is ambiguous for the compiler (that might happen for overloaded methods accepting different interfaces). */
@Nonnull
static LDbl1Dbl0Func dbl1Dbl0Func(final @Nonnull LDbl1Dbl0Func lambda) {
Null.nonNullArg(lambda, "lambda");
return lambda;
}
//
static R call(double a1, double a2, final @Nonnull LBiDblFunction lambda) {
Null.nonNullArg(lambda, "lambda");
return lambda.apply(a1, a2);
}
//
//
//
/** Safe instance. That always returns the same value (as produce). */
@Nonnull
static LBiDblFunction safe() {
return LBiDblFunction::produce;
}
/** Safe instance supplier. Returns supplier of safe() instance. */
@Nonnull
static LSupplier> safeSupplier() {
return () -> safe();
}
/** Safe wrapping. Either argument function is returned (if it is not null) or safe() instance. */
@Nonnull
static LBiDblFunction safe(final @Nullable LBiDblFunction other) {
if (other == null) {
return safe();
} else {
return other;
}
}
/** Safe supplier. Either argument supplier is returned (if it is not null) or supplier of safe() instance. */
@Nonnull
static LSupplier> safeSupplier(final @Nullable LSupplier> supplier) {
if (supplier == null) {
return safeSupplier();
} else {
return supplier;
}
}
//
//
/** Allows to manipulate the domain of the function. */
@Nonnull
default LBiDblFunction compose(@Nonnull final LDblUnaryOperator before1, @Nonnull final LDblUnaryOperator before2) {
Null.nonNullArg(before1, "before1");
Null.nonNullArg(before2, "before2");
return (v1, v2) -> this.apply(before1.applyAsDbl(v1), before2.applyAsDbl(v2));
}
public static LBiDblFunction composed(@Nonnull final LDblUnaryOperator before1, @Nonnull final LDblUnaryOperator before2, LBiDblFunction after) {
return after.compose(before1, before2);
}
/** Allows to manipulate the domain of the function. */
@Nonnull
default LBiFunction biDblFuncCompose(@Nonnull final LToDblFunction super V1> before1, @Nonnull final LToDblFunction super V2> before2) {
Null.nonNullArg(before1, "before1");
Null.nonNullArg(before2, "before2");
return (v1, v2) -> this.apply(before1.applyAsDbl(v1), before2.applyAsDbl(v2));
}
public static LBiFunction composed(@Nonnull final LToDblFunction super V1> before1, @Nonnull final LToDblFunction super V2> before2, LBiDblFunction after) {
return after.biDblFuncCompose(before1, before2);
}
//
//
/** Combines two functions together in a order. */
@Nonnull
default LBiDblFunction then(@Nonnull LFunction super R, ? extends V> after) {
Null.nonNullArg(after, "after");
return (a1, a2) -> after.apply(this.apply(a1, a2));
}
/** Combines two functions together in a order. */
@Nonnull
default LBiDblConsumer thenConsume(@Nonnull LConsumer super R> after) {
Null.nonNullArg(after, "after");
return (a1, a2) -> after.accept(this.apply(a1, a2));
}
@Nonnull
default LBiDblFunction before(@Nonnull LBiDblConsumer before) {
Null.nonNullArg(before, "before");
return (a1, a2) -> {
before.accept(a1, a2);
return this.apply(a1, a2);
};
}
@Nonnull
default LBiDblFunction after(@Nonnull LConsumer super R> after) {
Null.nonNullArg(after, "after");
return (a1, a2) -> {
R result = this.apply(a1, a2);
after.accept(result);
return result;
};
}
/** Combines two functions together in a order. */
@Nonnull
default LDblBinaryOperator thenToDbl(@Nonnull LToDblFunction super R> after) {
Null.nonNullArg(after, "after");
return (a1, a2) -> after.applyAsDbl(this.apply(a1, a2));
}
/** Combines two functions together in a order. */
@Nonnull
default LBiDblPredicate thenToBool(@Nonnull LPredicate super R> after) {
Null.nonNullArg(after, "after");
return (a1, a2) -> after.test(this.apply(a1, a2));
}
//
//
//
/** Converts to function that makes sure that the result is not null. */
@Nonnull
default LBiDblFunction nonNullable() {
return this::nonNullApply;
}
//
/** Permutation of LBiDblFunction for method references. */
@FunctionalInterface
interface LDbl1Dbl0Func extends LBiDblFunction {
@Nullable
R applyDbl1Dbl0(double a2, double a1);
@Override
default R applyX(double a1, double a2) {
return this.applyDbl1Dbl0(a2, a1);
}
}
//
/** Does nothing (LBiDblFunction) Function */
public static R produce(double a1, double a2) {
return (R) Function4U.defaultObject;
}
/**
* For each element (or tuple) from arguments, calls the function and passes the result to consumer.
* Thread safety, fail-fast, fail-safety of this method is not expected.
*/
default void forEach(IndexedRead ia1, C1 source1, IndexedRead ia2, C2 source2, LConsumer super R> consumer) {
int size = ia1.size(source1);
LOiToDblFunction oiFunc1 = (LOiToDblFunction) ia1.getter();
size = Integer.min(size, ia2.size(source2));
LOiToDblFunction oiFunc2 = (LOiToDblFunction) ia2.getter();
int i = 0;
for (; i < size; i++) {
double a1 = oiFunc1.applyAsDbl(source1, i);
double a2 = oiFunc2.applyAsDbl(source2, i);
consumer.accept(this.apply(a1, a2));
}
}
/**
* For each element (or tuple) from arguments, calls the function and passes the result to consumer.
* Thread safety, fail-fast, fail-safety of this method is not expected.
*/
default void iterate(SequentialRead sa1, C1 source1, IndexedRead ia2, C2 source2, LConsumer super R> consumer) {
Object iterator1 = ((LFunction) sa1.adapter()).apply(source1);
LPredicate testFunc1 = (LPredicate) sa1.tester();
LToDblFunction nextFunc1 = (LToDblFunction) sa1.supplier();
int size = ia2.size(source2);
LOiToDblFunction oiFunc2 = (LOiToDblFunction) ia2.getter();
int i = 0;
while (testFunc1.test(iterator1) && i < size) {
double a1 = nextFunc1.applyAsDbl(iterator1);
double a2 = oiFunc2.applyAsDbl(source2, i);
consumer.accept(this.apply(a1, a2));
i++;
}
}
/**
* For each element (or tuple) from arguments, calls the function and passes the result to consumer.
* Thread safety, fail-fast, fail-safety of this method is not expected.
*/
default void iterate(IndexedRead ia1, C1 source1, SequentialRead sa2, C2 source2, LConsumer super R> consumer) {
int size = ia1.size(source1);
LOiToDblFunction oiFunc1 = (LOiToDblFunction) ia1.getter();
Object iterator2 = ((LFunction) sa2.adapter()).apply(source2);
LPredicate testFunc2 = (LPredicate) sa2.tester();
LToDblFunction nextFunc2 = (LToDblFunction) sa2.supplier();
int i = 0;
while (i < size && testFunc2.test(iterator2)) {
double a1 = oiFunc1.applyAsDbl(source1, i);
double a2 = nextFunc2.applyAsDbl(iterator2);
consumer.accept(this.apply(a1, a2));
i++;
}
}
/**
* For each element (or tuple) from arguments, calls the function and passes the result to consumer.
* Thread safety, fail-fast, fail-safety of this method depends highly on the arguments.
*/
default void iterate(SequentialRead sa1, C1 source1, SequentialRead sa2, C2 source2, LConsumer super R> consumer) {
Object iterator1 = ((LFunction) sa1.adapter()).apply(source1);
LPredicate testFunc1 = (LPredicate) sa1.tester();
LToDblFunction nextFunc1 = (LToDblFunction) sa1.supplier();
Object iterator2 = ((LFunction) sa2.adapter()).apply(source2);
LPredicate testFunc2 = (LPredicate) sa2.tester();
LToDblFunction nextFunc2 = (LToDblFunction) sa2.supplier();
while (testFunc1.test(iterator1) && testFunc2.test(iterator2)) {
double a1 = nextFunc1.applyAsDbl(iterator1);
double a2 = nextFunc2.applyAsDbl(iterator2);
consumer.accept(this.apply(a1, a2));
}
}
}