demo Morphologial filter
from sample197.tcl
simple demo