diff --git a/ocaml/Input_determinants_by_hand.ml b/ocaml/Input_determinants_by_hand.ml
index 9c316f8c..dee338e3 100644
--- a/ocaml/Input_determinants_by_hand.ml
+++ b/ocaml/Input_determinants_by_hand.ml
@@ -355,8 +355,6 @@ end = struct
       let nstates =
         read_n_states ()
         |> States_number.to_int
-      and ndet =
-        Det_number.to_int b.n_det
       and ndet_qp_edit =
         Det_number.to_int b.n_det_qp_edit
       in
diff --git a/ocaml/qp_set_mo_class.ml b/ocaml/qp_set_mo_class.ml
index 7ab861e2..5447c93c 100644
--- a/ocaml/qp_set_mo_class.ml
+++ b/ocaml/qp_set_mo_class.ml
@@ -38,11 +38,6 @@ let set ~core ~inact ~act ~virt ~del =
   let mo_num =
     Ezfio.get_mo_basis_mo_num ()
   in
-  let n_int =
-    try  N_int_number.of_int (Ezfio.get_determinants_n_int ())
-    with _ -> Bitlist.n_int_of_mo_num mo_num
-  in
-
 
   let mo_class =
     Array.init mo_num (fun i -> None)