8 lines
312 B
Plaintext
8 lines
312 B
Plaintext
|
|
|
|
# zamiana rdzenia
|
|
change_core = ("dr." : "doktor") | ("prof." : "profesor") | ("hab." : "habilitowany") | ("ks." : "ksiądz") | ("mgr.": "magister") | ("dr": "doktor") | ("mgr": "magister")
|
|
|
|
Rule001_02 = CDRewrite [change_core, "", "', Any*];
|
|
export PROCESS = Optimize[CDRewrite[change_core, "", "", Any*]];
|