sig val pool : ThreadPoolExecutor.t val chunk_size : int end