read cermet,B * read cermet image
don,3         * lowest bitplne display
thr B,B,1     * threshold
inv           * invert bitplane
bcop 1,3      * copy bitplane
ero 8         * erode 8
dil 8         * dilate 8  
bcop 3,1      * orignal
dil 8,1,6,1,B * dilate 8
ero 8,1,6,1,B * erode 8
bcop 3,1      * copy bitplane
inv           * invert
-skel 100     * skeleton
dil 1         * dilate (for display)
inv           * invert
label B,C,1   * label the regions
bdisp,C       * display bitplanes