Evaluated proc jizzcum-fix str {string map {eing ing ys ies llly ly lely ly yer er eer er sss sses ys ies yed ied eed ed shs shes teeths teeth} $str}