///|
fn make_sequence(size : Int, offset : Int) -> Array[@counterpoint.Note] {
  let result : Array[@counterpoint.Note] = []
  for i in 0..