anchor.diff:  %%
   %% %CopyrightBegin%
   %%
  -%% Copyright Ericsson AB 2000-2017. All Rights Reserved.
  +%% Copyright Ericsson AB 2000-2018. All Rights Reserved.
   %%
   %% Licensed under the Apache License, Version 2.0 (the "License");
   %% you may not use this file except in compliance with the License.
  
positive.code:       "Total rounds: ~w, tolerance: 1/~.2f..1/~.2f, "
        "outlier: ~.2f, probability 1/~.2f.",
        [TotalRounds, Precision, TopPrecision, Outlier, InvOP]),
      {TotalRounds, [], []} =
          {TotalRounds,
           check_histogram(
             W, TotalRounds, StdDevs, PositiveHistogram, Buckets),
           check_histogram(
             W, TotalRounds, StdDevs, NegativeHistogram, Buckets)},
      %% If the probability for getting this Outlier is lower than 1/50,
      %% then this is fishy!
      true = (1/50 =< OutlierProbability),
      {comment, {tp, TopPrecision, op, InvOP}}.
  %%
  stats_standard_normal(
  
negative.code:     P = 0.5 * math:erfc(Bucket / W),
      BucketP = P - PrevP,
      if
          BucketP < TargetP ->
              check_histogram(
                W, Rounds, StdDevs, Histogram, TargetP,
                Bucket - 1, PrevBucket, PrevP, N);
  