• Home
• it.unibo.tuprolog
• solve-jvm
• 0.30.0
• source code
• AbsoluteValue.kt

×

Project download

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.

commonMain.it.unibo.tuprolog.solve.stdlib.function.AbsoluteValue.kt Maven / Gradle / Ivy

package it.unibo.tuprolog.solve.stdlib.function

import it.unibo.tuprolog.core.Integer
import it.unibo.tuprolog.core.Numeric
import it.unibo.tuprolog.core.Real
import it.unibo.tuprolog.solve.ExecutionContext
import it.unibo.tuprolog.solve.function.UnaryMathFunction

/**
 * Implementation of `abs/1` arithmetic functor
 *
 * @author Enrico
 */
object AbsoluteValue : UnaryMathFunction("abs") {

    override fun mathFunction(integer: Integer, context: ExecutionContext): Numeric =
        Numeric.of(integer.value.absoluteValue) // TODO: 24/10/2019 missing Prolog Standard "int_overflow" check (see the standard)

    override fun mathFunction(real: Real, context: ExecutionContext): Numeric =
        Numeric.of(real.value.absoluteValue)
}