read_image (Image1, 'E:/work/OpenCV/Image/oil.jpg')
decompose3(Image1, Image11, Image2, Image3)
threshold (Image11, Regions, 85, 171)
fill_up(Regions, RegionFillUp)
connection(RegionFillUp, ConnectedRegions)
select_shape_std(ConnectedRegions, SelectedRegions, 'max_area', 70)
shape_trans(SelectedRegions, RegionTrans, 'outer_circle')
dilation_circle(RegionTrans, RegionDilation, 1)
reduce_domain(Image11, RegionDilation, ImageReduced)
threshold (ImageReduced, Region, 0,30)
connection(Region, ConnectedRegions1)
select_shape_std(ConnectedRegions1, SelectedRegions1, 'max_area', 70)
dilation_circle(SelectedRegions1, RegionDilation1, 8.5)