def spec_c

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/f64addv.bend:84

import bend-collections-laws-math@1.0.0.0/proofs/math/typed/f64addv.bend as F64addv
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

84# the spec's add, classified
85def spec_c(+xl: U32, +xh: U32, +yl: U32, +yh: U32) -> {SF.add(F.Bits{xl, xh}, F.Bits{yl, yh}) == spec_g(Nat.is_eq(SF.efield(F.Bits{xl, xh}), 2047n), Nat.is_eq(SF.frac(F.Bits{xl, xh}), 0n), Nat.is_eq(SF.efield(F.Bits{yl, yh}), 2047n), Nat.is_eq(SF.frac(F.Bits{yl, yh}), 0n), SF.sign(F.Bits{xl, xh}), SF.sign(F.Bits{yl, yh}), F.Bits{xl, xh}, F.Bits{yl, yh}, SF.add_fin(F.Bits{xl, xh}, F.Bits{yl, yh})) : F.F64}:
86  {==}

Uses (9)

Used by (1)