def signbit_value

bend-collections-laws-crypto@1.0.0.0 · proofs/math/typed/f64bits.bend:235

import Base
import bend-collections-laws-crypto@1.0.0.0/spec/math/f64.bend as SF
import bend-collections-laws-crypto@1.0.0.0/src/math/f64.bend as F

235def signbit_value(+x: F.F64) -> SF.Signbit.value(x):
236  match x:
237    case F.Bits{+l, +h}:
238      signbit_g(1n, {==}, l, h, 2147483648, {==})