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