def fmax_select

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/float.bend:40

import Base
import bend-collections-laws-math@1.0.0.0/spec/math/generic.bend as SG
import bend-collections-laws-math@1.0.0.0/src/math/num.bend as N

40def fmax_select(~T: Data, ~op: N.Op<T> -> T, ~test: N.Test<T> -> Bool, +a: T, +b: T) -> SG.FMax.select(~T, ~op, ~test, a, b):
41  pick_eq(T, test(N.Lt{a, b}), b, a)