diff --git a/ocaml/out/samples b/ocaml/out/samples index 725ba8d7..a954344c 100755 Binary files a/ocaml/out/samples and b/ocaml/out/samples differ diff --git a/ocaml/out/samples.cmi b/ocaml/out/samples.cmi index 8c33d943..a8acf933 100644 Binary files a/ocaml/out/samples.cmi and b/ocaml/out/samples.cmi differ diff --git a/ocaml/out/samples.cmx b/ocaml/out/samples.cmx index 537266d3..c88049e5 100644 Binary files a/ocaml/out/samples.cmx and b/ocaml/out/samples.cmx differ diff --git a/ocaml/out/samples.o b/ocaml/out/samples.o index b6288153..5d12d7ae 100644 Binary files a/ocaml/out/samples.o and b/ocaml/out/samples.o differ diff --git a/ocaml/samples.ml b/ocaml/samples.ml index 8230de07..dd4861ce 100644 --- a/ocaml/samples.ml +++ b/ocaml/samples.ml @@ -51,7 +51,7 @@ let mixture (samplers: (unit -> float) array) (weights: float array) = let chosenSamplerIndex = findIndex cumsummed_normalized_weights (fun x -> x < p) in let sample = match chosenSamplerIndex with | None -> None - | Some(i) -> Some(1.0) (* (samplers.(i) ()) |> Some *) + | Some(i) -> Some((samplers.(i) ())) (* (samplers.(i) ()) |> Some *) in sample