let print_sys m b = Array.iteri (fun i e -> Array.iter (Printf.printf "(%f)") e ; Printf.printf "=(%f)\n" b.(i)) m