Add an arity 3 version which takes a symbol and dispatches on it. You can
choose the position that you like best; to keep in line with your current
scheme:

(defn get-percentage
  ([place total-count] (get-percentage :normal place total-count))
  ([mode place total-count]
    (condp = mode
      :low (... floor ...)
      :normal (... round ...)
      :high (... ceil ...))))

On Tuesday, 25 November 2014, Cecil Westerhof <cldwester...@gmail.com>
wrote:

> I started playing with Clojure again. I made the following three functions:
>     (defn get-percentage [place total-count]
>       (int (Math/round (double (/ (* place 100) total-count)))))
>
>     (defn get-percentage-low [place total-count]
>       (int (Math/floor (/ (* place 100) total-count))))
>
>     (defn get-percentage-high [place total-count]
>       (int (Math/ceil (/ (* place 100) total-count))))
>
> Put I would like to give get-percentage an optional type to change its
> behaviour. Type could have the values 'normal', 'high' and 'low'. If there
> is no type, it has its current behaviour.
>
> What would the best way to do this?
>
>
> Later on I probably should use clojure.math.numeric-tower.
>
> --
> Cecil Westerhof
>
> --
> You received this message because you are subscribed to the Google
> Groups "Clojure" group.
> To post to this group, send email to clojure@googlegroups.com
> <javascript:_e(%7B%7D,'cvml','clojure@googlegroups.com');>
> Note that posts from new members are moderated - please be patient with
> your first post.
> To unsubscribe from this group, send email to
> clojure+unsubscr...@googlegroups.com
> <javascript:_e(%7B%7D,'cvml','clojure%2bunsubscr...@googlegroups.com');>
> For more options, visit this group at
> http://groups.google.com/group/clojure?hl=en
> ---
> You received this message because you are subscribed to the Google Groups
> "Clojure" group.
> To unsubscribe from this group and stop receiving emails from it, send an
> email to clojure+unsubscr...@googlegroups.com
> <javascript:_e(%7B%7D,'cvml','clojure%2bunsubscr...@googlegroups.com');>.
> For more options, visit https://groups.google.com/d/optout.
>

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
--- 
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

Reply via email to