B64.utf8.cat.pick: def of cswap-bend-cli@0.1.0.0
Import: import cswap-bend-cli@0.1.0.0/b64.bend as B64
Lines 8-17 of cswap-bend-cli@0.1.0.0/b64.bend: https://jend.leeeet.dev/read.txt?path=cswap-bend-cli@0.1.0.0/b64.bend&start_line=8&end_line=17

import Base

def utf8.cat.pick(a: Bool, b: Bool, d: Bool, +c: U32, rest: List<&2, U32>) -> List<&2, U32>:
  match a b d:
    case True{} _ _:
      c <> rest
    case False{} True{} _:
      (192 .|. (c >> 6n) : U32) <> (128 .|. (c .&. 63) : U32) <> rest
    case False{} False{} True{}:
      (224 .|. (c >> 12n) : U32) <> (128 .|. ((c >> 6n) .&. 63) : U32) <> (128 .|. (c .&. 63) : U32) <> rest
    case False{} False{} False{}:
      (240 .|. (c >> 18n) : U32) <> (128 .|. ((c >> 12n) .&. 63) : U32) <> (128 .|. ((c >> 6n) .&. 63) : U32) <> (128 .|. (c .&. 63) : U32) <> rest

Uses (6):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.and
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.or
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.shrn