home *** CD-ROM | disk | FTP | other *** search
/ BUG 15 / BUGCD1998_06.ISO / aplic / jbuilder / jsamples.z / Counting2.java < prev    next >
Text File  |  1997-07-30  |  759b  |  36 lines
  1. // Copyright(c) 1997 ObjectSpace, Inc.
  2.  
  3. import COM.objectspace.jgl.*;
  4.  
  5. /**
  6.  * Sum the values of a range using a binary function.
  7.  *
  8.  * @see COM.objectspace.jgl.Counting
  9.  * @version 2.0.2
  10.  * @author ObjectSpace, Inc.
  11.  */
  12.  
  13. public class Counting2
  14.   {
  15.   public static void main( String[] args )
  16.     {
  17.     Array array = new Array();
  18.     array.add( new Long( 5 ) );
  19.     array.add( new Long( 4 ) );
  20.     array.add( new Long( 3 ) );
  21.     array.add( new Long( 2 ) );
  22.     array.add( new Long( 1 ) );
  23.  
  24.     Number prod = new Long( 1 );
  25.     prod = Counting.accumulate
  26.       (
  27.       array.start(),
  28.       array.finish(),
  29.       prod,
  30.       new TimesNumber( prod.getClass() )
  31.       );
  32.  
  33.     System.out.println( "Product = " + prod );
  34.     }
  35.   }
  36.