diff --git a/src/MindMap.hs b/src/MindMap.hs index 64b42ba..cfca4f3 100644 --- a/src/MindMap.hs +++ b/src/MindMap.hs @@ -72,7 +72,7 @@ springField inGraph = (normv (mmPos node - mmPos a)) | otherwise = -- acc - V2 0 0 - acc - fmap (* (1 / ((distance (mmPos node) (mmPos a)) ^ 2))) + acc - fmap (* (1000 / ((distance (mmPos node) (mmPos a)) ^ 2))) (normv (mmPos a - mmPos node)) -- acc - fmap (* (springKonst * (len (mmPos a - mmPos node)))) -- (signorm (mmPos a - mmPos node))