projects
/
master-thesis.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Replace "for [..] in [..]" by "for [..] to [..]" for consistency.
[master-thesis.git]
/
Parasitemia
/
ParasitemiaCore
/
ImgTools
/
Edges.fs
diff --git
a/Parasitemia/ParasitemiaCore/ImgTools/Edges.fs
b/Parasitemia/ParasitemiaCore/ImgTools/Edges.fs
index
3980120
..
df5858d
100644
(file)
--- a/
Parasitemia/ParasitemiaCore/ImgTools/Edges.fs
+++ b/
Parasitemia/ParasitemiaCore/ImgTools/Edges.fs
@@
-51,8
+51,8
@@
let find (img: Image<Gray, float32>) : Matrix<byte> * Matrix<float32> * Matrix<f
let xGradientData = xGradient.Data
let yGradientData = yGradient.Data
let xGradientData = xGradient.Data
let yGradientData = yGradient.Data
- for i
in 1 ..
h - 2 do
- for j
in 1 ..
w - 2 do
+ for i
= 1 to
h - 2 do
+ for j
= 1 to
w - 2 do
let vx = xGradientData.[i, j]
let vy = yGradientData.[i, j]
if vx <> 0.f || vy <> 0.f
let vx = xGradientData.[i, j]
let vy = yGradientData.[i, j]
if vx <> 0.f || vy <> 0.f
@@
-92,8
+92,8
@@
let find (img: Image<Gray, float32>) : Matrix<byte> * Matrix<float32> * Matrix<f
// Hysteresis thresholding.
let toVisit = Stack<Point>()
// Hysteresis thresholding.
let toVisit = Stack<Point>()
- for i
in 0 ..
h - 1 do
- for j
in 0 ..
w - 1 do
+ for i
= 0 to
h - 1 do
+ for j
= 0 to
w - 1 do
if nmsData.[i, j] = 1uy && magnitudesData.[i, j] >= thresholdHigh
then
nmsData.[i, j] <- 0uy
if nmsData.[i, j] = 1uy && magnitudesData.[i, j] >= thresholdHigh
then
nmsData.[i, j] <- 0uy
@@
-101,8
+101,8
@@
let find (img: Image<Gray, float32>) : Matrix<byte> * Matrix<float32> * Matrix<f
while toVisit.Count > 0 do
let p = toVisit.Pop()
edgesData.[p.Y, p.X] <- 1uy
while toVisit.Count > 0 do
let p = toVisit.Pop()
edgesData.[p.Y, p.X] <- 1uy
- for i'
in -1 ..
1 do
- for j'
in -1 ..
1 do
+ for i'
= -1 to
1 do
+ for j'
= -1 to
1 do
if i' <> 0 || j' <> 0
then
let ni = p.Y + i'
if i' <> 0 || j' <> 0
then
let ni = p.Y + i'