Extract Method

A common subexpression in several implementations of disjoint_taxon_name_relationships class method has been extracted into collect_to_s private class method at TaxonNameClassification class.

app/models/taxon_name_classification.rb

@@ -92,4 +92,9 @@ def sv_validate_disjoint_classes
 
 
   #endregion
+
+  private
+  def self.collect_to_s(*args)
+    args.collect{|arg| arg.to_s}
+  end
 end

app/models/taxon_name_classification/icn/effectively_published/invalidly_published.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished < TaxonNameClassification::Icn::EffectivelyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished.to_s] +
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished) +
         TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished.descendants.collect{|t| t.to_s} +
         [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished.to_s]
   end

app/models/taxon_name_classification/icn/effectively_published/invalidly_published/as_synonym.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished::AsSynonym < TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/invalidly_published/nomen_nudum.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished::NomenNudum < TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/invalidly_published/non_binomial.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished::NonBinomial < TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/invalidly_published/not_latin.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished::NotLatin < TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/invalidly_published/provisional.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished::Provisional < TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/invalidly_published/rejected_publication.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished::RejectedPublication < TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/invalidly_published/tautonym.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished::Tautonym < TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished < TaxonNameClassification::Icn::EffectivelyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished.to_s] +
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished) +
         TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.descendants.collect{|t| t.to_s} +
         [TaxonNameClassification::Icn::EffectivelyPublished::InvalidlyPublished.to_s]
   end

app/models/taxon_name_classification/icn/effectively_published/validly_published/illegitimate.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished.to_s] +
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished) +
         TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.descendants.collect{|t| t.to_s} +
         [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s]
   end

app/models/taxon_name_classification/icn/effectively_published/validly_published/illegitimate/homonym.rb

@@ -1,10 +1,10 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Homonym < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::IncorrectOriginalSpelling.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Superfluous.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::IncorrectOriginalSpelling,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Superfluous)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/illegitimate/incorrect_original_spelling.rb

@@ -1,10 +1,10 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::IncorrectOriginalSpelling < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Homonym.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Superfluous.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Homonym,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Superfluous)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/illegitimate/superfluous.rb

@@ -1,10 +1,10 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Superfluous < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::IncorrectOriginalSpelling.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Homonym.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::IncorrectOriginalSpelling,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate::Homonym)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished.to_s] +
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished) +
         TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate.descendants.collect{|t| t.to_s} +
         [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Illegitimate.to_s]
   end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/adopted_by_Persoon.rb

@@ -1,9 +1,9 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::AdoptedByPersoon < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::AdoptedByFries.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::AdoptedByFries)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/adopted_by_fries.rb

@@ -1,9 +1,9 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::AdoptedByFries < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::AdoptedByPersoon.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::AdoptedByPersoon)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/autonym.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Autonym < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/conserved.rb

@@ -1,9 +1,9 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Conserved < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Sanctioned.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Sanctioned)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/conserved_spelling.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::ConservedSpelling < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/correct.rb

@@ -1,9 +1,9 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Correct < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Incorrect.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Incorrect)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/incorrect.rb

@@ -1,9 +1,9 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Incorrect < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Correct.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Correct)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/nomen_novum.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::NomenNovum < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/nothotaxon.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Nothotaxon < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate)
   end
 
 end

app/models/taxon_name_classification/icn/effectively_published/validly_published/legitimate/sanctioned.rb

@@ -1,9 +1,9 @@
 class TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Sanctioned < TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate.to_s] +
-        [TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Conserved.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate,
+        TaxonNameClassification::Icn::EffectivelyPublished::ValidlyPublished::Legitimate::Conserved)
   end
 
 end

app/models/taxon_name_classification/iczn/available/invalid.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Iczn::Available::Invalid < TaxonNameClassification::Iczn::Available
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Iczn::Available::Valid.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Iczn::Available::Valid)
   end
 
 end

app/models/taxon_name_classification/iczn/available/invalid/homonym.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Iczn::Available::Invalid::Homonym < TaxonNameClassification::Iczn::Available::Invalid
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Iczn::Available::Invalid.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Iczn::Available::Invalid)
   end
 
 end

app/models/taxon_name_classification/iczn/available/valid.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Iczn::Available::Valid < TaxonNameClassification::Iczn::Available
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Iczn::Available::Invalid.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Iczn::Available::Invalid)
   end
 
 end

app/models/taxon_name_classification/iczn/available/valid/nomen_dubium.rb

@@ -1,8 +1,8 @@
 class TaxonNameClassification::Iczn::Available::Valid::NomenDubium < TaxonNameClassification::Iczn::Available::Valid
 
   def self.disjoint_taxon_name_classes
-    self.parent.disjoint_taxon_name_classes +
-        [TaxonNameClassification::Iczn::Available::Valid.to_s]
+    self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+        TaxonNameClassification::Iczn::Available::Valid)
   end
 
 end

app/models/taxon_name_classification/iczn/unavailable/non_binomial.rb

@@ -23,18 +23,18 @@ def self.applicable_ranks
           NomenclaturalRank::Iczn::GenusGroup.descendants.collect{|t| t.to_s}
     end
     def self.disjoint_taxon_name_classes
-      self.parent.disjoint_taxon_name_classes +
-          [TaxonNameClassification::Iczn::Unavailable::NonBinomial.to_s]
+      self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+          TaxonNameClassification::Iczn::Unavailable::NonBinomial)
     end
   end
 
   class SpeciesNotBinomial < TaxonNameClassification::Iczn::Unavailable::NonBinomial
     extend InnerClassSpeciesGroup
 
     def self.disjoint_taxon_name_classes
-      self.parent.disjoint_taxon_name_classes +
-          [TaxonNameClassification::Iczn::Unavailable::NonBinomial.to_s] +
-          [TaxonNameClassification::Iczn::Unavailable::NonBinomial::SubspeciesNotTrinomial.to_s]
+      self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+          TaxonNameClassification::Iczn::Unavailable::NonBinomial,
+          TaxonNameClassification::Iczn::Unavailable::NonBinomial::SubspeciesNotTrinomial)
     end
   end
 
@@ -43,18 +43,18 @@ def self.applicable_ranks
       NomenclaturalRank::Iczn::GenusGroup.descendants.collect{|t| t.to_s}
     end
     def self.disjoint_taxon_name_classes
-      self.parent.disjoint_taxon_name_classes +
-          [TaxonNameClassification::Iczn::Unavailable::NonBinomial.to_s]
+      self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+          TaxonNameClassification::Iczn::Unavailable::NonBinomial)
     end
   end
 
   class SubspeciesNotTrinomial < TaxonNameClassification::Iczn::Unavailable::NonBinomial
     extend InnerClassSpeciesGroup
 
     def self.disjoint_taxon_name_classes
-      self.parent.disjoint_taxon_name_classes +
-          [TaxonNameClassification::Iczn::Unavailable::NonBinomial.to_s] +
-          [TaxonNameClassification::Iczn::Unavailable::NonBinomial::SpeciesNotBinomial.to_s]
+      self.parent.disjoint_taxon_name_classes + self.collect_to_s(
+          TaxonNameClassification::Iczn::Unavailable::NonBinomial,
+          TaxonNameClassification::Iczn::Unavailable::NonBinomial::SpeciesNotBinomial)
     end
   end