F64.am_case: def of bend-collections@1.0.0.0
Import: import bend-collections@1.0.0.0/src/math/f64.bend as F64
Lines 239-246 of bend-collections@1.0.0.0/src/math/f64.bend: https://jend.leeeet.dev/read.txt?path=bend-collections@1.0.0.0/src/math/f64.bend&start_line=239&end_line=246

import Base

def am_case(+x: F64, +y: F64, +s: Bool, +ea: Nat, +eb: Nat, c: Cmp) -> F64:
  match c:
    case EQ{}:
      am_eq(x, s, ea, frac(x), frac(y))
    case LT{}:
      am_big(y, s, eb, frac(y), ea, frac(x), Nat.is_eq(eb, 2047n))
    case GT{}:
      am_big(x, s, ea, frac(x), eb, frac(y), Nat.is_eq(ea, 2047n))

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Cmp
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.is_eq
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/math/f64.bend&name=F64
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/math/f64.bend&name=am_big
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/math/f64.bend&name=am_eq
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/math/f64.bend&name=frac