let close_in iz =
  dispose_in iz ;
  close_in iz.ic