Permalink
Browse files

Added step 1c

  • Loading branch information...
1 parent db4f5b7 commit aab0b03715818f6ee5e3050e94ee42a294675891 @weavejester committed Nov 17, 2011
Showing with 3 additions and 0 deletions.
  1. +3 −0 src/stemmer/snowball/english.clj
@@ -62,3 +62,6 @@
(ends-with? preceed double-letter) ""
(short? preceed) (str last-letter "e")
:else last-letter))))))
+
+(defn step-1c [word]
+ (str/replace word (pattern "(?<=^.+" non-vowel ")[yY]$") "i"))

0 comments on commit aab0b03

Please sign in to comment.