aiken/examples/acceptance_tests/007/lib/tests.ak

pub fn unzip(xs: List<(a, b)>) -> (List<a>, List<b>) {
  when xs is {
    [] -> ([], [])
    [(a, b), ..rest] -> {
      let (a_tail, b_tail) = unzip(rest)
      ([a, ..a_tail], [b, ..b_tail])
    }
  }
}