Round towards positive infintity
(defun round-ceiling (number &optional (precision *precision*)) "Round towards positive infintity" (/ (ceiling (* number precision)) precision))