Unused variable

lib/src/CoAlgFormula.ml

@@ -2254,7 +2254,6 @@ let checkClosed f = match freeVariables f with
   | frees -> raise (CoAlgException (Printf.sprintf "%s is not closed because the variables '%s' occur freely" (string_of_formula f) (List.fold_right (fun el accu -> el ^ " " ^ accu) (List.tl frees) (List.hd frees))))
 
 let convertToMu formula =
-  let name = Stream.next gensym in
   let helper formula =
     match formula with
     | AF f1 -> CTLSyntax.af default_relation f1