def hea
bend-collections-laws-math@1.0.0.0 · proofs/math/typed/f64light.bend:32
import bend-collections-laws-math@1.0.0.0/proofs/math/typed/f64light.bend as F64light
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
32def hea(+xl: U32, +xh: U32) -> {F.exp_field(F.Bits{xl, xh}) == SF.efield(F.Bits{xl, xh}) : Nat}:
33 FB.ef_g(1n, {==}, xh, 1048576, {==}, 2047, {==})