ba8dbe7ce133 — Benjamin Weber 2 years ago 
fix detNoOfJobsRequiringRework not using decimal probability
patch browse 
1 files changed, 1 insertions(+), 2 deletions(-)

M src/Rework.elm

M src/Rework.elm +1 -2
@@ 2,7 2,6 @@ module Rework exposing (..)
 
 import Field exposing (..)
 import Random
-import Random.Extra
 import Random.List
 import Types exposing (..)
 

          
@@ 54,7 53,7 @@ detNoOfJobsRequiringRework : ProbPerRoun
 detNoOfJobsRequiringRework p w0Count =
     let
         reworkJobs =
-            p * toFloat w0Count
+            p / 100 * toFloat w0Count
 
         nonDecimal =
             round reworkJobs