Anonymous user
Canny edge detector: Difference between revisions
m
→{{header|J}}
m (→{{header|J}}) |
|||
Line 804:
ix =: 0
case. 2 do.
wd 'set txt text "... iterating over edges with >75 points ...";'
img =: edges=ix{ids
whilst. (num<75) *. (ix<nids) do.
Line 818:
end.
if. case<2 do. case =: >: case end.
NB. img =: 5 inflate img NB. might need this for high-res cellphone display
glfill 255 128 255
glpixels 0 0,(|.$img), ,img
| |||