def is_high

bend-collections-laws-crypto@1.0.0.0 · src/crypto/secp256k1/scalar.bend:115

import Base
import bend-collections-laws-crypto@1.0.0.0/src/crypto/secp256k1/limbs.bend as L

115# a > n / 2 (n is odd), i.e. 2 a >= n + 1 = 2^256 - cm1: the carry out of
116# 2 a + cm1
117def is_high(a: List<&2, Nat>) -> Bool:
118  Bool.not(L.ltm(cm1(), L.scal(2n, a)))