declare oracle parameters

lib/convergence_detection.ml

@@ -185,6 +185,8 @@ let recall_precision_curve table =
   ]
 
 let%pworkflow oracle ~n_h0 ~n_ha =
+  let n_h0 = [%param n_h0] in
+  let n_ha = [%param n_ha] in
   "Sites\tOracle"
   :: (List.init n_h0 ~f:(fun i -> sprintf "%d\t0" (i + 1)))
   @ (List.init n_ha ~f:(fun i -> sprintf "%d\t1" (n_h0 + i + 1)))