Function Next-Worker-Name

Part of:

package kmrcl
( next-worker-name < base-name > )