let systemError errorMessage=
  print_endline (errorMessage);
  exit(-1)