diff --git a/aivika-experiment-chart.cabal b/aivika-experiment-chart.cabal
--- a/aivika-experiment-chart.cabal
+++ b/aivika-experiment-chart.cabal
@@ -1,17 +1,25 @@
 name:            aivika-experiment-chart
-version:         4.3.1
+version:         4.3.2
 synopsis:        Simulation experiments with charting for the Aivika library
 description:
-    This package complements the Aivika and Aivika Experiment packages with
+    This package complements the aivika [1] and aivika-experiment [2] packages with
     charting capabilites. Now the simulation results can be represented
     as charts.
     .
     Nevertheless, to plot the charts, you hould use one of the rendering backends
-    provided by packages Aivika Experiment Cairo or Aivika Experiment Diagrams.
-    While the Cairo backend suits mostly to Linux and partially OS X, the Diagrams 
+    provided by packages aivika-experiment-cairo [3] or aivika-experiment-diagrams [4].
+    While the Cairo-based backend suits mostly to Linux and partially OS X, the Diagrams-based 
     backend is mainly destined for MS Windows, although it should work on Linux 
     and OS X too.
     .
+    \[1] <http://hackage.haskell.org/package/aivika>
+    .
+    \[2] <http://hackage.haskell.org/package/aivika-experiment>
+    .
+    \[3] <http://hackage.haskell.org/package/aivika-experiment-cairo>
+    .
+    \[4] <http://hackage.haskell.org/package/aivika-experiment-diagrams>
+    .
 category:        Simulation
 license:         BSD3
 license-file:    LICENSE
@@ -125,7 +133,7 @@
                      Chart >= 1.5,
                      split >= 0.2.2,
                      lens >= 3.9,
-                     data-default-class < 0.1,
+                     data-default-class >= 0.0.1,
                      colour >= 2.3.3,
                      aivika >= 4.3,
                      aivika-experiment >= 4.0.3
diff --git a/examples/PERT/Experiment.hs b/examples/PERT/Experiment.hs
--- a/examples/PERT/Experiment.hs
+++ b/examples/PERT/Experiment.hs
@@ -38,6 +38,11 @@
 
 completionTime series = 
   T.tr $ 
+  T.arrivalProcessingTime $
+  T.ArrivalTimer series
+
+completionTimeMean series = 
+  T.tr $ 
   T.samplingStatsMean $
   T.arrivalProcessingTime $
   T.ArrivalTimer series
@@ -57,9 +62,9 @@
      finalStatsSeries = 
        completionTime timers <> 
        completionTime projCompletion },
-   outputView $ histogramView "Node 2" $ completionTime timer2,
-   outputView $ histogramView "Node 3" $ completionTime timer3,
-   outputView $ histogramView "Node 4" $ completionTime timer3,
-   outputView $ histogramView "Node 5" $ completionTime timer5,
+   outputView $ histogramView "Node 2" $ completionTimeMean timer2,
+   outputView $ histogramView "Node 3" $ completionTimeMean timer3,
+   outputView $ histogramView "Node 4" $ completionTimeMean timer3,
+   outputView $ histogramView "Node 5" $ completionTimeMean timer5,
    outputView $ histogramView "The Project Completion" $ 
-     completionTime projCompletion]
+     completionTimeMean projCompletion]
