bergsoe committed b132cb9

The to_option_less_than utility is trivial and is removed.

Comments (0)

Files changed (2)


 let to_option m = (); fun a b -> Some (m a b)
-let to_option_less_than m eps = ();
-  fun a b ->
-    let d = m a b in
-      if d < eps then Some d
-      else None
 let map_result f m a b = f (m a b)
 let scale s = map_result (( *. ) s)


     a b)].
-val to_option_less_than : 'a t -> float -> 'a option_t
 val map_result : (float -> float) -> 'a t -> 'a t
 (** Map a function onto the result of a metric.
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.