opening_circle (Regions, RegionOpening, 2)
dev_set_draw ('margin')
shape_trans (RegionOpening, RegionTrans, 'convex')
smallest_rectangle2 (RegionTrans, Row, Column, Phi, Length1, Length2)
connection (Regions, ConnectedRegions)
select_shape_std (ConnectedRegions, SelectedRegions, 'max_area', 70)
orientation_region (SelectedRegions, Phi1)
gen_region_line (RegionLines, Row, Column-Length1, Row, Column+Length1)
12-06
5606
03-09
1972
07-14