#!/bin/sh
#
# fermat-test - shell wrapper for performing fermat test
#
# Written in 2016-2021 by Alex Vong <alexvong1995 AT protonmail DOT com>
#
# To the extent possible under law, the author(s) have dedicated all copyright
# and related and neighboring rights to this software to the public domain
# worldwide. This software is distributed without any warranty.
#
# You should have received a copy of the CC0 Public Domain Dedication along
# with this software.
# If not, see <https://creativecommons.org/publicdomain/zero/1.0/>.

# Use error
set -e

# Obtain MLUCAS_PATH by tranforming `foo/bar' to `foo'
# Otherwise, assume it is the current working directory
case "$0" in
    */*)
        MLUCAS_PATH=`expr "x$0" : 'x\(.*\)/[^/]*'`/../
        ;;
    *)
        MLUCAS_PATH='../'
        ;;
esac

# Export MLUCAS_PATH so that mlucas.cfg stays in the build directory
export MLUCAS_PATH

# Do fermat-test
"$MLUCAS_PATH/mlucas" -fftlen 1024 -f 24 -iters 100 && \
    "$MLUCAS_PATH/mlucas" -fftlen 1024 -radset 4 -f 24 -iters 1000
