simple elementary Scrubbing patch:

File:simple elementary patch_ scrubbing.maxpat