def sq_cls
import bend-collections@1.0.0.0/src/math/f64.bend as F64import Base
import bend-collections@1.0.0.0/src/math/u64.bend as W
508def sq_cls(+x: F64, s: Bool, +e: Nat, +f: W.U64, top: Bool) -> F64:
509 match top:
510 case True{}:
511 nan_or(x, Bool.or(nz(f), s))
512 case False{}:
513 sq_sign(x, s, e, f, fin_zero(e, f))