home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / BC_502 / STDLIB.PAK / INCLUDES.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1997-05-06  |  911 b   |  31 lines
  1.  #include <algorithm>
  2.  #include <set>
  3.  
  4.  using namespace std;
  5.  
  6.  int main ()
  7.  {
  8.   //
  9.   // Initialize some sets.
  10.   //
  11.   int a1[10] = {1,2,3,4,5,6,7,8,9,10};
  12.   int a2[6]  = {2,4,6,8,10,12};
  13.   int a3[4]  = {3,5,7,8};
  14.   set<int, less<int> > all(a1+0, a1+10), even(a2+0, a2+6), smalll(a3+0, a3+4);
  15.   //
  16.   // Demonstrate includes.
  17.   //
  18.   cout << "The set: ";
  19.   copy(all.begin(),all.end(), ostream_iterator<int>(cout," "));
  20.   bool answer = includes(all.begin(), all.end(), smalll.begin(), smalll.end());
  21.   cout << endl << (answer ? "INCLUDES " : "DOES NOT INCLUDE ");
  22.   copy(smalll.begin(),smalll.end(), ostream_iterator<int>(cout," "));
  23.   answer = includes(all.begin(), all.end(), even.begin(), even.end());
  24.   cout << ", and" << endl << (answer ? "INCLUDES" : "DOES NOT INCLUDE ");
  25.   copy(even.begin(),even.end(), ostream_iterator<int>(cout," "));
  26.   cout << endl << endl;
  27.  
  28.   return 0;
  29.  }
  30.  
  31.