Hough transform: Difference between revisions
Content deleted Content added
added img |
→{{header|Tcl}}: oops |
||
Line 224:
for {set rho 0} {$rho < $targetH} {incr rho} {
set row {}
for {set theta 0} {$theta <
set cos [expr {cos($theta/180.0*$PI)}]
set sin [expr {sin($theta/180.0*$PI)}]
| |||