From 9484597491c9291782a1d1a730f96dc9bdacb57d Mon Sep 17 00:00:00 2001
From: Daniel Barlow <dan@telent.net>
Date: Thu, 21 Nov 2024 21:40:47 +0000
Subject: [PATCH] inline/remove top level oneliners
---
frontend/src/Lib.elm | 12 +++++-------
1 file changed, 5 insertions(+), 7 deletions(-)
diff --git a/frontend/src/Lib.elm b/frontend/src/Lib.elm
index 5f4d13f..7c073b3 100644
--- a/frontend/src/Lib.elm
+++ b/frontend/src/Lib.elm
@@ -1,17 +1,15 @@
-- miscellaneous functions extracted from Main so
-- we can more easily test them
-module Lib exposing(looseLabels)
+module Lib exposing (looseLabels)
-- https://github.com/cenfun/nice-ticks/blob/master/docs/Nice-Numbers-for-Graph-Labels.pdf
-log10 x = logBase 10 x
-expt b x = b^(toFloat x)
-
niceNumber x round =
- let exp = floor (log10 x)
- f = x / (expt 10.0 exp)
+ let expt b ex = b^ toFloat ex
+ exp = floor (logBase 10 x)
+ f = x / expt 10.0 exp
nfRound = if f < 1.5
then 1
else if f < 3
@@ -37,6 +35,6 @@ looseLabels ticks min max =
let
range = niceNumber (max-min) False
d = niceNumber (range/(ticks - 1)) True
- graphmin = toFloat (floor (min/d)) * d
+ graphmin = toFloat (floor (min/d)) * d
graphmax = toFloat (ceiling (max/d)) * d
in (graphmin, graphmax, d)