def BitLength.agrees

bend-collections-laws-crypto@1.0.0.0 · spec/math/generic.bend:184

import Base
import bend-collections-laws-crypto@1.0.0.0/src/math/num.bend as N
import bend-collections-laws-crypto@1.0.0.0/src/math/generic.bend as G
import bend-collections-laws-crypto@1.0.0.0/src/math/natural.bend as M

184def BitLength.agrees(~T: Data, ~op: N.Op<T> -> T, ~test: N.Test<T> -> Bool, ~val: T -> Nat, +n: T) -> Type:
185  {G.bit_length(~T, ~op, ~test, n) == M.bit_length(val(n)) : Nat}