Record time to calculate compation run

As this is a factor in assessing suitability of Journal size

docs/STARTUP_OPTIONS.md

@@ -21,7 +21,7 @@ If there are smaller objects then lookups within a Journal may get faster if eac
 - excessive CPU use and related performance impacts during rolling of CDB files, see log `CDB07`;
 - excessive load caused during journal compaction despite tuning down `max_run_length`.
 
-If the store is used to hold bigger objects, the `max_journalsize` may be scaled up accordingly.  Having fewer Journal files (by using larger objects), will reduce the lookup time to find the right Journal during GET requests, but in most circumstances the impact of this improvement is marginal.
+If the store is used to hold bigger objects, the `max_journalsize` may be scaled up accordingly.  Having fewer Journal files (by using larger objects), will reduce the lookup time to find the right Journal during GET requests, but in most circumstances the impact of this improvement is marginal.  The primary impact of fewer Journal files is the decision-making time of Journal compaction (the time to calculate if a compaction should be undertaken, then what should be compacted) will increase.  The timing for making compaction calculations can be monitored through log `IC003`.
 
 ## Ledger Cache Size
 

src/leveled_iclerk.erl

@@ -217,6 +217,10 @@ handle_cast({compact, Checker, InitiateFun, CloseFun, FilterFun, Inker, _TO},
                 State) ->
     % Empty the waste folder
     clear_waste(State),
+    SW = os:timestamp(), 
+        % Clock to record the time it takes to calculate the potential for
+        % compaction
+    
     % Need to fetch manifest at start rather than have it be passed in
     % Don't want to process a queued call waiting on an old manifest
     [_Active|Manifest] = leveled_inker:ink_getmanifest(Inker),
@@ -233,6 +237,7 @@ handle_cast({compact, Checker, InitiateFun, CloseFun, FilterFun, Inker, _TO},
     case score_run(BestRun0, ScoreParams) of
         Score when Score > 0.0 ->
             BestRun1 = sort_run(BestRun0),
+            leveled_log:log_timer("IC003", [Score, true], SW),
             print_compaction_run(BestRun1, ScoreParams),
             ManifestSlice = compact_files(BestRun1,
                                             CDBopts,
@@ -258,7 +263,7 @@ handle_cast({compact, Checker, InitiateFun, CloseFun, FilterFun, Inker, _TO},
                     {noreply, State}
             end;
         Score ->
-            leveled_log:log("IC003", [Score]),
+            leveled_log:log_timer("IC003", [Score, false], SW),
             ok = leveled_inker:ink_compactioncomplete(Inker),
             ok = CloseFun(FilterServer),
             {noreply, State}

src/leveled_log.erl

@@ -296,7 +296,8 @@
     {"IC002",
         {info, "Clerk updating Inker as compaction complete of ~w files"}},
     {"IC003",
-        {info, "No compaction run as highest score=~w"}},
+        {info, "Scoring of compaction runs complete with highest score=~w " 
+                ++ "and run to be made=~w"}},
     {"IC004",
         {info, "Score for filename ~s is ~w"}},
     {"IC005",