home *** CD-ROM | disk | FTP | other *** search
/ PC World 1998 October / PCWorld_1998-10_cd.bin / software / prehled / inprise / JSAMPLES.Z / Counting2.java < prev    next >
Text File  |  1998-05-08  |  851b  |  37 lines
  1. // Copyright(c) 1997 ObjectSpace, Inc.
  2. import com.objectspace.jgl.*;
  3. import com.objectspace.jgl.algorithms.*;
  4. import com.objectspace.jgl.functions.*;
  5.  
  6. /**
  7.  * Sum the values of a range using a binary function.
  8.  *
  9.  * @see com.objectspace.jgl.algorithms.Counting
  10.  * @version 3.0.0
  11.  * @author ObjectSpace, Inc.
  12.  */
  13.  
  14. public class Counting2
  15.   {
  16.   public static void main( String[] args )
  17.     {
  18.     Array array = new Array();
  19.     array.add( new Long( 5 ) );
  20.     array.add( new Long( 4 ) );
  21.     array.add( new Long( 3 ) );
  22.     array.add( new Long( 2 ) );
  23.     array.add( new Long( 1 ) );
  24.  
  25.     Number prod = new Long( 1 );
  26.     prod = Counting.accumulate
  27.       (
  28.       array.start(),
  29.       array.finish(),
  30.       prod,
  31.       new TimesNumber( prod.getClass() )
  32.       );
  33.  
  34.     System.out.println( "Product = " + prod );
  35.     }
  36.   }
  37.