Decompiled Code For PERMUT( C124, D124 )

The expression

=PERMUT( C124, D124 )

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 (Math.floor(get$1()) < 0.0) {
            Runtime_v2.fun_ERROR("#NUM! because n < 0 in PERMUT");
            d = (double) -1;
        } else if (Math.floor(get$2()) < 0.0) {
            Runtime_v2.fun_ERROR("#NUM! because k < 0 in PERMUT");
            d = (double) -1;
        } else if (Math.floor(get$1()) < Math.floor(get$2())) {
            Runtime_v2.fun_ERROR("#NUM! because n < k in PERMUT");
            d = (double) -1;
        } else
            d = (RuntimeDouble_v2.fun_FACT(Math.floor(get$1()))
                 / RuntimeDouble_v2
                       .fun_FACT(Math.floor(get$1()) - Math.floor(get$2())));
        return d;
    }

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

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

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