Cleaning and some little tweaks.

[master-thesis.git] / Parasitemia / ParasitemiaUI / DPICalculator.fs

diff --git a/Parasitemia/ParasitemiaUI/DPICalculator.fs b/Parasitemia/ParasitemiaUI/DPICalculator.fs
index dbd7251..5e9c19b 100644 (file)
--- a/Parasitemia/ParasitemiaUI/DPICalculator.fs
+++ b/Parasitemia/ParasitemiaUI/DPICalculator.fs
@@ -1,4 +1,4 @@
-module ParasitemiaUI.DPICalculator
+module ParasitemiaUI.PPICalculator
 
 open System
 open System.Windows
@@ -19,7 +19,7 @@ type SensorSize = {
         sprintf "%g mm × %g mm%s" this.w this.h (if this.txt = "" then "" else " (" + this.txt + ")")
 
 let showWindow (parent: Window) : int option =
-    let win = Views.DPICalculatorWindow()
+    let win = Views.PPICalculatorWindow()
     win.Root.Owner <- parent
     win.Root.Left <- parent.Left + parent.ActualWidth / 2. - win.Root.Width / 2.
     win.Root.Top <- parent.Top + parent.ActualHeight / 2. - win.Root.Height / 2.