Return to generate_unions.ads CVS log | Up to [local] / OpenXM_contrib / PHC / Ada / Root_Counts / Product |
File: [local] / OpenXM_contrib / PHC / Ada / Root_Counts / Product / generate_unions.ads (download)
Revision 1.1, Sun Oct 29 17:45:29 2000 UTC (23 years, 10 months ago) by maekawa
Initial revision |
generic type boolean_array is array ( integer range <> ) of boolean; with procedure Process ( ar : in boolean_array; continue : out boolean ); procedure Generate_Unions ( k,first,last : in integer ); -- DESCRIPTION : -- This procedure generates all possible unions of k elements in the -- range first..last.