X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemia%2FGranulometry.fs;h=0ef862b05d1a020574cff7ac666ca53e6dc655be;hp=b18f53c2d59050d55bd9a59398ea286cb1dc9e69;hb=044b0ae69df3ac565432545b2fa934589016f9bd;hpb=d0c85068bb98a7999ed994f02669befa70edd5f9

diff --git a/Parasitemia/Parasitemia/Granulometry.fs b/Parasitemia/Parasitemia/Granulometry.fs
index b18f53c..0ef862b 100644
--- a/Parasitemia/Parasitemia/Granulometry.fs
+++ b/Parasitemia/Parasitemia/Granulometry.fs
@@ -11,7 +11,7 @@ open Utils
 // 'range': a minimum and maximum radius.
 // 'scale': <= 1.0, to speed up the process.
 let findRadius (img: Image<Gray, 'TDepth>) (range: int * int) (scale: float) : int =
-    use scaledImg = if scale = 1.0 then img else img.Resize(scale, CvEnum.Inter.Area)
+    use scaledImg = if scale = 1. then img else img.Resize(scale, CvEnum.Inter.Area)
 
     let r1, r2 = range
     let r1', r2' = roundInt (float r1 * scale), roundInt (float r2 * scale)