X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemiaCore%2FUnitsOfMeasure.fs;h=8202b8e28da7ed81e3ae6dc429dab74ef933dd60;hp=ec343eaaf83df55272bb16ff9ae4ae1d24b2f474;hb=b87b35b922551f122228df1fd9c530bbb807935a;hpb=2e3cd07dd099944059ef5e7a7f5ef57ffe3d677b diff --git a/Parasitemia/ParasitemiaCore/UnitsOfMeasure.fs b/Parasitemia/ParasitemiaCore/UnitsOfMeasure.fs index ec343ea..8202b8e 100644 --- a/Parasitemia/ParasitemiaCore/UnitsOfMeasure.fs +++ b/Parasitemia/ParasitemiaCore/UnitsOfMeasure.fs @@ -9,9 +9,9 @@ let μmPerInch = 25.4e3<μm/inch> let mmPerInch = 25.4 -let μmToInch(x: float<μm>) : float = x / μmPerInch -let inchToμm(x: float) : float<μm> = x * μmPerInch +let μmToInch(x : float<μm>) : float = x / μmPerInch +let inchToμm(x : float) : float<μm> = x * μmPerInch -let mmToInch(x: float) : float = x / mmPerInch -let inchTomm(x: float) : float = x * mmPerInch +let mmToInch(x : float) : float = x / mmPerInch +let inchTomm(x : float) : float = x * mmPerInch