谁能看懂这个关于集合划分的程序

我不懂Dephi，谁帮我看看下面的程序，看懂后把程序中的算法告诉我，好吗？如果有更好的也行。谢谢。
程序地址http://www.delphiforfun.org/programs/Download/SetPartitionTestSource.zip
相关网页http://www.delphiforfun.org/programs/Math_Topics/set_partitions.htm

[此贴子已经被作者于2006-6-4 14:53:22编辑过]