# zamiana rdzenia
# change_core = ("dr." : "doktor") | ("prof." : "profesor") | ("hab." : "habilitowany") | ("ks." : "ksiądz") | ("mgr.": "magister") | ("dr": "doktor") | ("mgr": "magister")  

# export PROCESS = Optimize[CDRewrite[change_core, "", "", allChars]];