def OverflowingShl.flag

bend-collections-laws-math@1.0.0.0 · spec/math/fixed.bend:173

import Base
import bend-collections-laws-math@1.0.0.0/src/math/fixed.bend as F

173def OverflowingShl.flag(~T: Data, ~f: @+x: T -> @+y: U32 -> F.Over<T>, +a: T, +s: U32, +w: Nat) -> Type:
174  {ov_flag(T, f(a, s)) == Bool.not(Nat.is_lt(U32.to_nat(s), w)) : Bool}