//Title: Supplemental Rounding Utilities Snippet
//Credit to: Jtgibson (slightly modified by Hiead)
//Contributed by: Jtgibson

/*
These are a couple of supplemental rounding aliases designed to add to the
already extremely useful round() proc.  You can use these in situations where
you want to fudge the number upwards or downwards as desired.

Remember that these are what would be called "inline" functions.  They are more
efficient than standard functions because the code in them is copied and pasted
in the line whereever they are used, rather than "jumped to", run separately,
and then "jumped back from".  This prevents the CPU from having to spend effort
hopping around inside your code -- though, in BYOND's case, this is unlikely to
matter much.

Note that these defines also work in most other full programming languages!
*/


#define ceiling(X) ( (round(X) != (X)) ? (round(X) + 1) : (X) )
#define floor(X) round(X)
#define round_near(X) round((X),1)


///*
//Testing code/sample implementation:

mob/verb/test_rounding()
    var/num = rand(1,1000) + (rand(1,1000)/1000)
    if(prob(50)) num *= -1 //allow negative numbers

    usr << "<b>Number: [num]</b>"
    usr << "--> Rounded up: [ceiling(num)]"
    usr << "--> Rounded down: [floor(num)]"
    usr << "--> Rounded to the nearest: [round_near(num)]"
//*/