Add sorensen dice sorting to advanced term search (Issue #95).

nfdi4plants · Jan 27, 2021 · 9987184 · 9987184
1 parent b73c9c4
commit 9987184
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/Server/Server.fs b/src/Server/Server.fs
@@ -102,7 +102,11 @@ let annotatorApi cString = {
     getTermsForAdvancedSearch = fun (ontOpt,searchName,mustContainName,searchDefinition,mustContainDefinition,keepObsolete) ->
         async {
             let result =
+                let searchSet = searchName + mustContainName + searchDefinition + mustContainDefinition|> Suggestion.createBigrams
                 OntologyDB.getAdvancedTermSearchResults cString ontOpt searchName mustContainName searchDefinition mustContainDefinition keepObsolete
+                |> Array.sortByDescending (fun sugg ->
+                    Suggestion.sorensenDice (Suggestion.createBigrams sugg.Name) searchSet
+                    )
             return result
         }