main=interact$unlines.filter(\s->sum[2|i<-s,elem i"aeiou"]>length s).lines