Laboratoire de l'Informatique et du Parallélisme » Pobyso

load(str('/home/storres/recherche/arithmetique/pobysoPythonSage/src/ppsTestFunctions.sage'))

#

def test_cmp_rn_values(repeat=10, number=100):

    functionName =  inspect.stack()[0][3]

    print "Running", inspect.stack()[0][3], "..."

    rn1Sa    = RR(1)

    rn1bisSa = RR(1) 

    rn2Sa    = RR(2)

    #

    def test(rn1Sa, rn1bisSa, rn2Sa):

        if cmp_rn_values(rn1Sa, rn1bisSa) != 0:

            exit()

        if cmp_rn_values(rn1Sa, rn2Sa) >= 0:

            exit()

        if cmp_rn_values(rn2Sa, rn1Sa) <= 0:

            exit()

    wrapped = pps_test_wrapper(test, rn1Sa, rn1bisSa, rn2Sa)

    timing = min(timeit.repeat(wrapped, repeat=repeat, number=number))        

    print "\t...", functionName, "done."

    return timing

# End test_cmp_rn_values

def test_get_set_interval_value(repeat=10, number=100):

    functionName =  inspect.stack()[0][3]

    print "Running", inspect.stack()[0][3], "..."

    interval1Sa = RIF(1,2)

    interval2Sa = RIF(2,3)

    #

    def test(interval1Sa, interval2Sa):

        interval1SaValue = get_interval_value(interval1Sa)

        interval2SaValue = get_interval_value(interval2Sa)

        set_interval_value(interval2Sa, interval1SaValue)

        if cmp_interval_values(interval1Sa, interval2Sa) != 0:

            exit()

        set_interval_value(interval2Sa, interval2SaValue)

    #

    wrapped = pps_test_wrapper(test, interval1Sa, interval2Sa)

    timing = min(timeit.repeat(wrapped, repeat=repeat, number=number))        

    print "\t...", functionName, "done."

    return timing

# End test_get_set_interval_value

print "\ntestSageMpfr loading..."

def test_get_set_rn_value(repeat=10, number=100):

    rn1Sa = RR(1)

    rn2Sa = RR(2)

    def test(rn1Sa, rn2Sa):

        rn1SaValue = get_rn_value(rn1Sa)

        rn2SaValue = get_rn_value(rn2Sa)

        set_rn_value(rn2Sa, rn1SaValue)

        if cmp_rn_values(rn1Sa, rn2Sa) != 0:

            exit()

        set_rn_value(rn2Sa, rn2SaValue)

    wrapped = pps_test_wrapper(test, rn1Sa, rn2Sa)

# End test_get_set_rn_value