From 59b485a3c860c81546f3a2b5389b14e5001e053d Mon Sep 17 00:00:00 2001 From: Tom Smeding Date: Tue, 7 Apr 2026 20:36:35 +0200 Subject: I a few letters Thanks Daniel --- src/Index.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Index.hs') diff --git a/src/Index.hs b/src/Index.hs index 36b2374..69be325 100644 --- a/src/Index.hs +++ b/src/Index.hs @@ -369,7 +369,7 @@ genEventID (YMDHMS (YMD y m d) (HMS hh mm ss)) off -- > ceiling (2 ** (64 - logBase 2 (5000 * 12 * 31 * 24 * 60 * 60))) -- 114787088 -- to fit the ID number in a Word64. - -- Let's round that down converatively to 100_000_000, i.e. 100 million events per day max. + -- Let's round that down conservatively to 100_000_000, i.e. 100 million events per day max. -- -- The result number is encoded in base62, and an 'a' is prefixed as an ID version identifier. | off >= 100_000_000 = error "Too many events per day" -- cgit v1.3