Core.add: def of bend-collections@1.0.0.0
Import: import bend-collections@1.0.0.0/src/crypto/sha512/core.bend as Core
Lines 18-24 of bend-collections@1.0.0.0/src/crypto/sha512/core.bend: https://jend.leeeet.dev/read.txt?path=bend-collections@1.0.0.0/src/crypto/sha512/core.bend&start_line=18&end_line=24

import Base
import bend-collections@1.0.0.0/src/crypto/sha512/types.bend as T

# (a + b) mod 2^64: the carry out of the low halves is 1 exactly when their
# wrapped sum is below an addend.
def add(a: T.Lane, b: T.Lane) -> T.Lane:
  match a b:
    case T.W{ah, +al} T.W{bh, bl}:
      +lo = U32.add(al, bl)
      T.W{U32.add(U32.add(ah, bh), Bool.to_u32(U32.is_lt(lo, al))), lo}

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool.to_u32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.add
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.is_lt
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/src/crypto/sha512/types.bend&name=Lane