diff options
| -rw-r--r-- | elm/cost-of-meeting/elm.js | 3 | ||||
| -rw-r--r-- | elm/cost-of-meeting/src/Main.elm | 8 |
2 files changed, 8 insertions, 3 deletions
diff --git a/elm/cost-of-meeting/elm.js b/elm/cost-of-meeting/elm.js index c8f6587..6ae797c 100644 --- a/elm/cost-of-meeting/elm.js +++ b/elm/cost-of-meeting/elm.js @@ -5387,6 +5387,7 @@ var $elm$core$Maybe$withDefault = F2( } }); var $author$project$Main$viewResults = function (model) { + var workingHoursPerYear = (50 * 5) * 8; var salary = A2( $elm$core$Maybe$withDefault, 0, @@ -5402,7 +5403,7 @@ var $author$project$Main$viewResults = function (model) { 0, $elm$core$String$toFloat( A3($elm$core$String$replace, ',', '', model.minutes))); - var hourlyRate = salary / 2080; + var hourlyRate = salary / workingHoursPerYear; var costPerMinute = hourlyRate / 60; var totalCost = (costPerMinute * minutes) * participants; return ((participants > 0) && ((salary > 0) && ((minutes > 0) && $elm$core$List$isEmpty(model.errors)))) ? A2( diff --git a/elm/cost-of-meeting/src/Main.elm b/elm/cost-of-meeting/src/Main.elm index d62fd95..864515b 100644 --- a/elm/cost-of-meeting/src/Main.elm +++ b/elm/cost-of-meeting/src/Main.elm @@ -175,9 +175,13 @@ viewResults model = minutes = String.toFloat (String.replace "," "" model.minutes) |> Maybe.withDefault 0 - -- Calculate hourly rate (assuming 2080 working hours per year) + -- Calculate working hours per year (50 weeks * 5 days * 8 hours) + workingHoursPerYear = + 50 * 5 * 8 + + -- Calculate hourly rate hourlyRate = - salary / 2080 + salary / workingHoursPerYear -- Calculate cost per minute costPerMinute = |