module-cluster 1.3.7 → 1.4.0

data/spec/ModuleCluster/Define/ClusterCascadesToModule_spec.rb

@@ -3,6 +3,16 @@ require_relative '../../../lib/module-cluster.rb'
 
 describe ModuleCluster::Define::ClusterCascadesToModule do
 
+  ##########################
+  #  self.should_cascade?  #
+  ##########################
+
+  it 'should cascade to modules' do
+    ModuleCluster::Define::ClusterCascadesToModule.should_cascade?( Kernel ).should == true
+    ModuleCluster::Define::ClusterCascadesToModule.should_cascade?( Class ).should == false
+    ModuleCluster::Define::ClusterCascadesToModule.should_cascade?( Object.new ).should == false
+  end
+  
 	#########################################
 	#  include_cascades_includes_to_module  #
 	#########################################
@@ -16,21 +26,38 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       include_cascades_includes_to_module( Module1, Module2 )
       respond_to?( :included ).should == true
-      module Proof1
+      module ModuleProof1
         include ModuleCluster::Define::ClusterCascadesToModule::Mock01
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module2 ).should == false
+      end
+      class ClassProof
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock01
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module2 ).should == false
       end
-      module Proof2
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock01::Proof1
+      module ModuleProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock01::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module2 ).should == false
       end
-      class Proof3
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock01::Proof2
+      class ClassProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock01::ModuleProof1
         # true b/c of ancestor chain
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock01::Module2 ).should == false
       end
     end
   end
@@ -48,20 +75,34 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       include_cascades_extends_to_module( Module1, Module2 )
       respond_to?( :included ).should == true
-      module Proof1
+      module ModuleProof1
         include ModuleCluster::Define::ClusterCascadesToModule::Mock02
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module2 ).should == true
       end
-      module Proof2
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock02::Proof1
+      class ClassProof
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock02
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module2 ).should == false
+      end
+      module ModuleProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock02::ModuleProof1
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module2 ).should == true
       end
-      class Proof3
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock02::Proof2
+      class ClassProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock02::ModuleProof1
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module1 ).should == false
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock02::Module2 ).should == false
@@ -82,7 +123,7 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       include_cascades_includes_and_extends_to_module( Module1, Module2 )
       respond_to?( :included ).should == true
-      module Proof1
+      module ModuleProof1
         include ModuleCluster::Define::ClusterCascadesToModule::Mock03
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module2 ).should == true
@@ -90,16 +131,24 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module2 ).should == true
       end
-      module Proof2
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock03::Proof1
+      class ClassProof
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock03
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module2 ).should == false
+      end
+      module ModuleProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock03::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module2 ).should == true
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module2 ).should == true
       end
-      class Proof3
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock03::Proof2
+      class ClassProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock03::ModuleProof1
         # true b/c of ancestor chain
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock03::Module2 ).should == true
@@ -123,20 +172,52 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       extend_cascades_includes_to_module( Module1, Module2 )
       respond_to?( :extended ).should == true
-      module Proof1
+      module ModuleProof1
         extend ModuleCluster::Define::ClusterCascadesToModule::Mock04
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == false
+      end
+      class ClassProof
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock04
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == false
       end
-      module Proof2
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock04::Proof1
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock04
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == false
+      end
+      module ModuleProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock04::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        # true because of ancestor chain
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == true
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == true
       end
-      class Proof3
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock04::Proof2
+      class ClassProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock04::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == false
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        # true because of ancestor chain
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == true
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == true
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock04::ModuleProof1
+        eigenclass = class << self ; self ; end
+        # true because of ancestor chain
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module1 ).should == true
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock04::Module2 ).should == true
       end
     end
   end
@@ -154,20 +235,46 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       extend_cascades_extends_to_module( Module1, Module2 )
       respond_to?( :extended ).should == true
-      module Proof1
+      module ModuleProof1
         extend ModuleCluster::Define::ClusterCascadesToModule::Mock05
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == true
       end
-      module Proof2
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock05::Proof1
+      class ClassProof
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock05
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == false
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock05
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == false
+      end
+      module ModuleProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock05::ModuleProof1
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == true
       end
-      class Proof3
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock05::Proof2
+      class ClassProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock05::ModuleProof1
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == false
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock05::ModuleProof1
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module1 ).should == false
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock05::Module2 ).should == false
@@ -188,7 +295,7 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       extend_cascades_includes_and_extends_to_module( Module1, Module2 )
       respond_to?( :extended ).should == true
-      module Proof1
+      module ModuleProof1
         extend ModuleCluster::Define::ClusterCascadesToModule::Mock06
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == true
@@ -196,16 +303,30 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == true
       end
-      module Proof2
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock06::Proof1
+      class ClassProof
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock06
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == false
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock06
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == false
+      end
+      module ModuleProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock06::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == true
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == true
       end
-      class Proof3
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock06::Proof2
+      class ClassProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock06::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == false
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == false
         eigenclass = class << self ; self ; end
@@ -213,6 +334,13 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == true
       end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock06::ModuleProof1
+        eigenclass = class << self ; self ; end
+        # true because Proof2's ancestor chain includes
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module1 ).should == true
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock06::Module2 ).should == true
+      end
     end
   end
 
@@ -229,21 +357,38 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       include_cascades_to_module_prepending_includes( Module1, Module2 )
       respond_to?( :append_features ).should == true
-      module Proof1
+      module ModuleProof1
         include ModuleCluster::Define::ClusterCascadesToModule::Mock07
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module2 ).should == false
       end
-      module Proof2
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock07::Proof1
+      class ClassProof
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock07
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module2 ).should == false
+      end
+      module ModuleProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock07::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module2 ).should == false
       end
-      class Proof3
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock07::Proof2
+      class ClassProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock07::ModuleProof1
         # true b/c of ancestor chain
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock07::Module2 ).should == false
       end
     end
   end
@@ -261,20 +406,34 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       include_cascades_to_module_prepending_extends( Module1, Module2 )
       respond_to?( :append_features ).should == true
-      module Proof1
+      module ModuleProof1
         include ModuleCluster::Define::ClusterCascadesToModule::Mock08
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module2 ).should == true
       end
-      module Proof2
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock08::Proof1
+      class ClassProof
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock08
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module2 ).should == false
+      end
+      module ModuleProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock08::ModuleProof1
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module2 ).should == true
       end
-      class Proof3
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock08::Proof2
+      class ClassProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock08::ModuleProof1
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module1 ).should == false
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock08::Module2 ).should == false
@@ -295,7 +454,7 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       include_cascades_to_module_prepending_includes_and_extends( Module1, Module2 )
       respond_to?( :append_features ).should == true
-      module Proof1
+      module ModuleProof1
         include ModuleCluster::Define::ClusterCascadesToModule::Mock09
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module2 ).should == true
@@ -303,16 +462,24 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module2 ).should == true
       end
-      module Proof2
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock09::Proof1
+      class ClassProof
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock09
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module2 ).should == false
+      end
+      module ModuleProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock09::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module2 ).should == true
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module2 ).should == true
       end
-      class Proof3
-        include ModuleCluster::Define::ClusterCascadesToModule::Mock09::Proof2
+      class ClassProof2
+        include ModuleCluster::Define::ClusterCascadesToModule::Mock09::ModuleProof1
         # true b/c of ancestor chain
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock09::Module2 ).should == true
@@ -336,20 +503,52 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       extend_cascades_to_module_prepending_includes( Module1, Module2 )
       respond_to?( :extend_object ).should == true
-      module Proof1
+      module ModuleProof1
         extend ModuleCluster::Define::ClusterCascadesToModule::Mock10
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == false
+      end
+      class ClassProof
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock10
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == false
       end
-      module Proof2
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock10::Proof1
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock10
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == false
+      end
+      module ModuleProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock10::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == true
+        eigenclass = class << self ; self ; end
+        # true because of ancestor chain
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == true
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == true
       end
-      class Proof3
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock10::Proof2
+      class ClassProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock10::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == false
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        # true because of ancestor chain
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == true
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == true
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock10::ModuleProof1
+        eigenclass = class << self ; self ; end
+        # true because of ancestor chain
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module1 ).should == true
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock10::Module2 ).should == true
       end
     end
   end
@@ -367,20 +566,46 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       extend_cascades_to_module_prepending_extends( Module1, Module2 )
       respond_to?( :extend_object ).should == true
-      module Proof1
+      module ModuleProof1
         extend ModuleCluster::Define::ClusterCascadesToModule::Mock11
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == true
       end
-      module Proof2
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock11::Proof1
+      class ClassProof
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock11
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == false
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock11
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == false
+      end
+      module ModuleProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock11::ModuleProof1
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == false
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == true
       end
-      class Proof3
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock11::Proof2
+      class ClassProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock11::ModuleProof1
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == false
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock11::ModuleProof1
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module1 ).should == false
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock11::Module2 ).should == false
@@ -401,7 +626,7 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
       end
       extend_cascades_to_module_prepending_includes_and_extends( Module1, Module2 )
       respond_to?( :extend_object ).should == true
-      module Proof1
+      module ModuleProof1
         extend ModuleCluster::Define::ClusterCascadesToModule::Mock12
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == true
@@ -409,20 +634,41 @@ describe ModuleCluster::Define::ClusterCascadesToModule do
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == true
       end
-      module Proof2
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock12::Proof1
+      class ClassProof
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock12
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == false
+        ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == false
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == false
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock12
+        eigenclass = class << self ; self ; end
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == false
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == false
+      end
+      module ModuleProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock12::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == true
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == true
         eigenclass = class << self ; self ; end
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == true
       end
-      class Proof3
-        extend ModuleCluster::Define::ClusterCascadesToModule::Mock12::Proof2
+      class ClassProof2
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock12::ModuleProof1
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == false
         ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == false
         eigenclass = class << self ; self ; end
-        # true b/c Proof2's ancestors include
+        # true because of ancestor chain
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == true
+        eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == true
+      end
+      Object.new.instance_eval do
+        extend ModuleCluster::Define::ClusterCascadesToModule::Mock12::ModuleProof1
+        eigenclass = class << self ; self ; end
+        # true because of ancestor chain
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module1 ).should == true
         eigenclass.ancestors.include?( ModuleCluster::Define::ClusterCascadesToModule::Mock12::Module2 ).should == true
       end