# encoding: UTF-8
grammar ScientificNameDirty
  include ScientificNameClean

  rule root
    super
  end

  rule scientific_name_5
    a:scientific_name_4 garbage {
      def value
        a.value
      end
      
      def canonical
        a.canonical
      end
      
      def pos
        a.pos
      end
      
      def details
        a.details
      end
    }
    /
    super
  end
  
  rule infraspecies
    a:infraspecies_epitheton space b:year {
      def value
        a.value + " " + b.value
      end
  
      def canonical
        a.canonical
      end
  
      def pos
        a.pos.merge(b.pos)
      end
  
      def details
        {:infraspecies => a.details[:infraspecies].merge(b.details)}
      end
    }
    /
    a:infraspecies_epitheton space epitheton_authorship_inconsistencies space b:authorship {
      def value
        a.value + " " + b.value
      end
  
      def canonical
        a.canonical
      end
  
      def pos
        a.pos.merge(b.pos)
      end
  
      def details
        {:infraspecies => a.details[:infraspecies].merge(b.details)}
      end
    }
    /
    super
  end
  
  rule species
    a:species_epitheton space b:year {
       def value
         a.value + " " + b.value
       end
     
       def canonical
         a.canonical
       end
     
       def pos
         a.pos.merge(b.pos)
       end
     
       def details
         {:species => a.details[:species].merge(b.details)}
       end
     }
     /
     super
  end

  rule right_paren
   ")" space ")"
   /
   super
  end
  
  rule left_paren
   "(" space "("
   /
   super
  end
  
  rule year
    a:year_number space b:approximate_year {
      def value
        a.value + " " + b.value
      end
      
      def pos
        a.pos.merge(b.pos)
      end
      
      def details
        {:year => a.value, :approximate_year => b.value}
      end
    }
    /
    a:year_number space page_number {
      def value
        a.text_value
      end
      
      def pos
        {a.interval.begin => ['year', a.interval.end]}
      end
      
      def details
        {:year => value}
      end
    }
    /
    year_number_with_punctuation
    /
    approximate_year
    /
    double_year
    /
    super
  end
  
  rule approximate_year
    "[" space a:year_number space "]"+ {
      def value
       "(" + a.text_value + ")"
      end
      
      def pos
        {a.interval.begin => ['year', a.interval.end]}
      end
      
      def details
        {:approximate_year => value}
      end
    }
  end
  
  
  rule double_year
    year_number "-" [0-9]+ [A-Za-z]? [\?]? {
      def value
        text_value
      end
      
      def pos
        {interval.begin => ['year', interval.end]}
      end
      
      def details
        {:year => value}
      end
    }
  end
  
  rule year_number_with_punctuation
    a:year_number "." {
      def value
        a.text_value
      end

      def pos
        {interval.begin => ['year', interval.end]}
      end

      def details
        {:year => value}
      end
    }
  end

  
  rule page_number
    ":" space [\d]+
    {
      def value
      end
    }
  end
  
  rule epitheton_authorship_inconsistencies
    ("corrig.")
  end
  
  rule garbage
    space (["',.]) space [^щ]*
    /
    space_hard [^ш]+
  end
  
end