From 3960697916c9d526810db4dbfd3e0240af08891f Mon Sep 17 00:00:00 2001 From: joshvera Date: Thu, 15 Sep 2016 16:50:44 -0400 Subject: [PATCH] whitespace --- src/Data/RandomWalkSimilarity.hs | 2 -- 1 file changed, 2 deletions(-) diff --git a/src/Data/RandomWalkSimilarity.hs b/src/Data/RandomWalkSimilarity.hs index 98c6d2afa..04941ab7c 100644 --- a/src/Data/RandomWalkSimilarity.hs +++ b/src/Data/RandomWalkSimilarity.hs @@ -89,7 +89,6 @@ rws compare as bs (as, bs, succ counterA, succ counterB, diffs <> pure (These counterA counterB, diff'), allDiffs <> pure (Index counterA)) ) ([], [], 0, 0, [], []) sesDiffs - findNearestNeighbourToDiff :: TermOrIndexOrNil (UnmappedTerm f fields) -> State (Int, UnmappedTerms f fields, UnmappedTerms f fields) (Maybe (These Int Int, Free (CofreeF f (Both (Record fields))) (Patch (Cofree f (Record fields))))) findNearestNeighbourToDiff termThing = case termThing of Nil -> pure Nothing @@ -99,7 +98,6 @@ rws compare as bs put (i, unA, unB) pure Nothing - kdas = KdTree.build (Vector.toList . feature) fas kdbs = KdTree.build (Vector.toList . feature) fbs