32 lines
1.2 KiB
Nim
32 lines
1.2 KiB
Nim
# Constantine
|
|
# Copyright (c) 2018-2019 Status Research & Development GmbH
|
|
# Copyright (c) 2020-Present Mamy André-Ratsimbazafy
|
|
# Licensed and distributed under either of
|
|
# * MIT license (license terms in the root directory or at http://opensource.org/licenses/MIT).
|
|
# * Apache v2 license (license terms in the root directory or at http://www.apache.org/licenses/LICENSE-2.0).
|
|
# at your option. This file may not be copied, modified, or distributed except according to those terms.
|
|
|
|
import std/unittest,
|
|
../constantine/config/common,
|
|
../constantine/arithmetic,
|
|
../constantine/config/curves,
|
|
../constantine/curves/zoo_glv
|
|
|
|
echo "\n------------------------------------------------------\n"
|
|
|
|
proc checkCubeRootOfUnity(curve: static Curve) =
|
|
test $curve & " cube root of unity (mod p)":
|
|
var cru = curve.getCubicRootOfUnity_mod_p()
|
|
cru.square()
|
|
cru *= curve.getCubicRootOfUnity_mod_p()
|
|
|
|
check: bool cru.isOne()
|
|
|
|
proc main() =
|
|
suite "Sanity checks on precomputed values" & " [" & $WordBitwidth & "-bit mode]":
|
|
checkCubeRootOfUnity(BN254_Snarks)
|
|
checkCubeRootOfUnity(BLS12_377)
|
|
checkCubeRootOfUnity(BLS12_381)
|
|
|
|
main()
|