1 read_image(Image,'monkey') 2 gen_circle(region,200,200,150) 3 reduce_domain(Image,region,Mask) 4 crop_domain(Mask, ImagePart1) 5 write_image(ImagePart1, 'bmp', 0, 'e:/1.bmp')