X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fpage-spacing-result.cc;h=93c737c83949786f2289904c94cac371138f5c7a;hb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;hp=9a05ef802b1c87e9a05aaa95e32ec76e9059adb6;hpb=4c72b133f96204598051fea3d55c78329f368866;p=lilypond.git

diff --git a/lily/page-spacing-result.cc b/lily/page-spacing-result.cc
index 9a05ef802b..93c737c839 100644
--- a/lily/page-spacing-result.cc
+++ b/lily/page-spacing-result.cc
@@ -3,7 +3,7 @@
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 2007 Han-Wen Nienhuys <hanwen@lilypond.org>
+  (c) 2007--2008 Han-Wen Nienhuys <hanwen@lilypond.org>
   
 */
 
@@ -24,3 +24,29 @@ Page_spacing_result::system_count () const
 
   return total;      
 }
+
+vsize
+Page_spacing_result::page_count () const
+{
+  return systems_per_page_.size();
+}
+
+Real
+Page_spacing_result::average_force () const
+{
+  Real average_force = 0;
+  for (vsize i = 0; i < page_count (); i++)
+    average_force += force_[i];
+
+  average_force /= page_count ();
+  return average_force;
+}
+
+void
+Page_spacing_result::print () const
+{
+  printf ("penalty %lf, demerits %lf\n" , penalty_, demerits_);
+  for (vsize i = 0; i < page_count (); i++)
+    printf (" %d:  #sys=%d, force=%lf\n", int (i), int (systems_per_page_[i]),
+	    force_[i]);
+}