Merge pull request #598 from gpetiot/preview-ocamlformat-0.20.0

upgrade to ocamlformat.0.20.0

Author: jzstark

.ocamlformat

@@ -1,6 +1,5 @@
-version=0.19.0
+version=0.20.0
 profile=janestreet
-wrap-comments=false
 doc-comments=after-when-possible
 align-cases=true
 align-constructors-decl

src/owl/signal/owl_signal.mli

@@ -1,6 +1,6 @@
-(*
- * OWL - OCaml Scientific and Engineering Computing
- * Copyright (c) 2021 Chandra Shekhar <[email protected]>, Kumar Appaiah <[email protected]>
+(*
+ * OWL - OCaml Scientific and Engineering Computing
+ * Copyright (c) 2021 Chandra Shekhar <[email protected]>, Kumar Appaiah <[email protected]>
  *)
 
 (** Signal: Fundamental Signal Processing functions. *)
@@ -10,18 +10,18 @@ open Owl_dense
 (** {Basic window functions} *)
 
 val blackman : int -> Ndarray.D.arr
-(** Blackman window is a taper formed by using the first three terms of a summation of cosines. It was designed to have close to the minimal leakage possible. 
-``blackman m`` returns a blackman window.
+(** Blackman window is a taper formed by using the first three terms of a summation of cosines. It was designed to have close to the minimal leakage possible. 
+``blackman m`` returns a blackman window.
 *)
 
 val hamming : int -> Ndarray.D.arr
-(** Hamming window is a taper formed by using a raised cosine with non-zero endpoints, optimized to minimize the nearest side lobe. ``hamming m``
-returns a hamming window.
+(** Hamming window is a taper formed by using a raised cosine with non-zero endpoints, optimized to minimize the nearest side lobe. ``hamming m``
+returns a hamming window.
 *)
 
 val hann : int -> Ndarray.D.arr
-(** Hann window is a taper formed by using a raised cosine or sine-squared with ends that touch zero. ``hann m``
-returns a hann window.
+(** Hann window is a taper formed by using a raised cosine or sine-squared with ends that touch zero. ``hann m``
+returns a hann window.
 *)
 
 (** {Filter response function} *)
@@ -32,9 +32,9 @@ val freqz
   -> float array
   -> float array
   -> Ndarray.D.arr * Ndarray.Z.arr
-(** freqz computes the frequency response of a digital filter. 
-
-``freqz b a`` computes the frequency response of digital filter with numerator filter coeffecient given by ``b`` (float array) while the denominator filter coeffecient given by ``a`` (float array), and returns the frequencies and the frequency response respectively in real and complex ndarrays. Two optional parameters may be specified: ``n`` is an integer that determines the number of frequencies where the frequency response is to be evaluated, and ``whole`` is a boolean that decides whether the frequency response is two-sided or one-sided. Default values of ``n`` and ``whole`` are 512 and false.
+(** freqz computes the frequency response of a digital filter. 
+
+``freqz b a`` computes the frequency response of digital filter with numerator filter coeffecient given by ``b`` (float array) while the denominator filter coeffecient given by ``a`` (float array), and returns the frequencies and the frequency response respectively in real and complex ndarrays. Two optional parameters may be specified: ``n`` is an integer that determines the number of frequencies where the frequency response is to be evaluated, and ``whole`` is a boolean that decides whether the frequency response is two-sided or one-sided. Default values of ``n`` and ``whole`` are 512 and false.
 *)
 
 (*ends here*)

test/unit_stats_rvs.ml

@@ -424,12 +424,10 @@ module RandomTest = struct
     in
     let _, _ = iter blah 0 in
     C.print ~max_col:64 x;
-    (*
-     *)
+    (* *)
     let f = Owl.Fft.S.fft x in
     C.print ~max_col:64 f;
-    (*
-     *)
+    (* *)
     let p = 0.95 in
     let q = 1. -. p in
     let t2 = float n *. -.log q in
@@ -950,7 +948,8 @@ let test_true_is_not_random _ =
   let sampler _ length = length, fun _ -> true in
   let tests =
     [ bin_frequency, true, 0, 100; bin_block_frequency_7, true, 0, 100
-    ; bin_fft_64, false, 0, 1024; bin_fft_1024, true, 0, 1024
+    ; bin_fft_64, false, 0, 1024
+    ; bin_fft_1024, true, 0, 1024
       (* there is one frequency here - expect others randomly to exceed 95% too *) ]
   in
   run_random_tests test_name pretest sampler tests