(defn calc-coins [price amount-tendered] {:amount-tendered {:mod (mod price amount-tendered), :dividend (int (/ price amount-tendered))}})