Replace List.fold_left (||) false (List.map f lst) with List.exists f lst

Replace List.fold_left (||) false (List.map f lst) with List.exists f lst #8348