diff options
author | Masaya Tojo <masaya@tojo.tokyo> | 2018-06-14 04:16:05 +0900 |
---|---|---|
committer | Masaya Tojo <masaya@tojo.tokyo> | 2018-06-14 04:16:05 +0900 |
commit | f54138636f00d4ee13a215c06b96b737f7f41985 (patch) | |
tree | 3d4d60178b3275257d2e4be2e3a9de9befcf6780 /canny.rkt | |
parent | 13a8e420d27b092b26dc6d9862e2f4759425715a (diff) |
Delete unused procedure
Diffstat (limited to 'canny.rkt')
-rw-r--r-- | canny.rkt | 8 |
1 files changed, 0 insertions, 8 deletions
@@ -24,14 +24,6 @@ (canny img #:heigh heigh #:low low))) (provide flomap-canny) -(: fmatan (-> flomap flomap flomap)) -(define (fmatan fm1 fm2) - (inline-build-flomap - (flomap-components fm1) (flomap-width fm1) (flomap-height fm1) - (λ (k x y i) - (atan (flomap-ref fm1 k x y) - (flomap-ref fm2 k x y))))) - (define-type Orient (Array (U 'horizontal 'positive-diagonal 'vertical 'negative-diagonal))) (: tanθ->orient (-> flomap Orient)) (define (tanθ->orient fm) |