commonMain.it.unibo.tuprolog.solve.TestOr.kt Maven / Gradle / Ivy

Go to download

Show more of this group Show more artifacts with this name
Show all versions of test-solve Show documentation

Common testing facilities for 2P-Kt-based logic solvers

There is a newer version: 1.0.4

package it.unibo.tuprolog.solve

/**
 * Tests of ';'/2 (= or, disjunction)
 */
interface TestOr : SolverTest {
    companion object {
        fun prototype(solverFactory: SolverFactory): TestOr = TestOrImpl(solverFactory)
    }

    /**
     * Tests the query
     * ```prolog
     * ?- ';'(true, fail).
     * ```
     * succeeds on a solver initialized with default built-ins and with and empty theory,
     * producing 1 solution with no variable bindings.
     */
    fun testTrueOrFalse()

    /**
     * Tests the query
     * ```prolog
     * ';'((!, fail), true).
     * ```
     * fails on a solver initialized with default built-ins and with and empty theory.
     */
    fun testCutFalseOrTrue()

    /**
     * Tests the query
     * ```prolog
     * ';'(!, call(3)).
     * ```
     * succeeds on a solver initialized with default built-ins and with and empty theory,
     * producing 1 solution with no variable bindings.
     */
    fun testCutCall()

    /**
     * Tests the query
     * ```prolog
     * ';'((X=1, !), X=2).
     * ```
     * succeeds on a solver initialized with default built-ins and with and empty theory,
     * producing 1 solution which binds variable `X` to the value `1`.
     */
    fun testCutAssignedValue()

    /**
     * Tests the query
     * ```prolog
     * ';'(X=1, X=2).
     * ```
     * succeeds on a solver initialized with default built-ins and with and empty theory,
     * producing 2 solutions which bind variable `X` to the values `1` and `2`, respectively.
     */
    fun testOrDoubleAssignment()
}