let arrange = fun float_array_array_array -> fun width ->
let concat faaa = fun i ->
let faa = faaa.(i) in
Array.concat (Array.to_list faa)
in
let float_array_array = Array.init width (concat float_array_array_array) in
let float_array_list = Array.to_list float_array_array in
float_array_list