AFC - Abacus Formula Compiler for Java

Decompiled Code For LARGE( C917:E917, F917 )

The expression

=LARGE( C917:E917, F917 )

is compiled to the following class(es):

package org.formulacompiler.gen;
import org.formulacompiler.runtime.Computation;
import org.formulacompiler.runtime.internal.Environment;
import org.formulacompiler.runtime.internal.RuntimeDouble_v2;
import org.formulacompiler.runtime.internal.Runtime_v2;
import org.formulacompiler.tests.reference.base.Inputs;
import org.formulacompiler.tests.reference.base.Outputs;

final class $Root extends Outputs implements Computation
{
    private final Inputs $inputs;
    final Environment $environment;

    $Root(Inputs inputs, Environment environment) {
        $environment = environment;
        $inputs = inputs;
    }

    final double get$0() {
        double d;
        if (!(3.0 - get$4() + 1.0 <= 3.0) || 3.0 - get$4() + 1.0 < 1.0) {
            Runtime_v2
                .fun_ERROR("#NUM! because not 1 <= k <= n in SMALL/LARGE");
            d = (double) -1;
        } else {
            double d_0_;
            d = get$5(d_0_ = 3.0 - get$4() + 1.0);
        }
        return d;
    }

    public final double dbl() {
        return get$0();
    }

    final double get$5(double d) {
        double d_1_ = -1.7976931348623157E308;
        double d_2_ = 1.0;
        d_1_ = d_2_ > d ? d_1_ : get$6(d_2_, d_1_);
        d_2_++;
        d_1_ = d_2_ > d ? d_1_ : get$7(d_2_, d_1_);
        d_2_++;
        d_1_ = d_2_ > d ? d_1_ : get$8(d_2_, d_1_);
        d_2_++;
        return d_1_;
    }

    final double get$6(double d, double d_3_) {
        double d_4_ = 1.7976931348623157E308;
        double d_5_ = 0.0;
        d_4_ = get$1() > d_3_ ? RuntimeDouble_v2.min(get$1(), d_4_) : d_4_;
        d_5_ = get$1() <= d_3_ ? d_5_ + 1.0 : d_5_;
        d_4_ = get$2() > d_3_ ? RuntimeDouble_v2.min(get$2(), d_4_) : d_4_;
        d_5_ = get$2() <= d_3_ ? d_5_ + 1.0 : d_5_;
        d_4_ = get$3() > d_3_ ? RuntimeDouble_v2.min(get$3(), d_4_) : d_4_;
        d_5_ = get$3() <= d_3_ ? d_5_ + 1.0 : d_5_;
        return d_5_ >= d ? d_3_ : d_4_;
    }

    final double get$7(double d, double d_6_) {
        double d_7_ = 1.7976931348623157E308;
        double d_8_ = 0.0;
        d_7_ = get$1() > d_6_ ? RuntimeDouble_v2.min(get$1(), d_7_) : d_7_;
        d_8_ = get$1() <= d_6_ ? d_8_ + 1.0 : d_8_;
        d_7_ = get$2() > d_6_ ? RuntimeDouble_v2.min(get$2(), d_7_) : d_7_;
        d_8_ = get$2() <= d_6_ ? d_8_ + 1.0 : d_8_;
        d_7_ = get$3() > d_6_ ? RuntimeDouble_v2.min(get$3(), d_7_) : d_7_;
        d_8_ = get$3() <= d_6_ ? d_8_ + 1.0 : d_8_;
        return d_8_ >= d ? d_6_ : d_7_;
    }

    final double get$8(double d, double d_9_) {
        double d_10_ = 1.7976931348623157E308;
        double d_11_ = 0.0;
        d_10_ = get$1() > d_9_ ? RuntimeDouble_v2.min(get$1(), d_10_) : d_10_;
        d_11_ = get$1() <= d_9_ ? d_11_ + 1.0 : d_11_;
        d_10_ = get$2() > d_9_ ? RuntimeDouble_v2.min(get$2(), d_10_) : d_10_;
        d_11_ = get$2() <= d_9_ ? d_11_ + 1.0 : d_11_;
        d_10_ = get$3() > d_9_ ? RuntimeDouble_v2.min(get$3(), d_10_) : d_10_;
        d_11_ = get$3() <= d_9_ ? d_11_ + 1.0 : d_11_;
        return d_11_ >= d ? d_9_ : d_10_;
    }

    final double get$1() {
        return $inputs.dbl(0);
    }

    final double get$2() {
        return $inputs.dbl(1);
    }

    final double get$3() {
        return $inputs.dbl(2);
    }

    final double get$4() {
        return $inputs.dbl(3);
    }
}