def hea

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/f64mulc.bend:20

import Base
import bend-collections-laws-math@1.0.0.0/spec/math/f64.bend as SF
import bend-collections-laws-math@1.0.0.0/src/math/f64.bend as F
import bend-collections-laws-math@1.0.0.0/proofs/math/typed/f64bits.bend as FB

20def hea(+xl: U32, +xh: U32) -> {F.exp_field(F.Bits{xl, xh}) == SF.efield(F.Bits{xl, xh}) : Nat}:
21  FB.ef_g(1n, {==}, xh, 1048576, {==}, 2047, {==})