/cln-1.3.2/src/real/division/cl_R_ffloor1.cc

# · C++ · 36 lines · 24 code · 8 blank · 4 comment · 0 complexity · 0dfda52e349453a15ae8d58fc839d2a2 MD5 · raw file 

    

  1. // ffloor().
    2. 

  2. 

  3. // General includes.
    4. 

  4. #include "base/cl_sysdep.h"
    5. 

  5. 

  6. // Specification.
    7. 

  7. #include "cln/real.h"
    8. 

  8. 

  9. 

  10. // Implementation.
    11. 

  11. 

  12. #include "real/cl_R.h"
    13. 

  13. #include "rational/cl_RA.h"
    14. 

  14. #include "cln/integer.h"
    15. 

  15. #include "cln/sfloat.h"
    16. 

  16. #include "cln/ffloat.h"
    17. 

  17. #include "cln/dfloat.h"
    18. 

  18. #include "cln/lfloat.h"
    19. 

  19. 

  20. namespace cln {
    21. 

  21. 

  22. const cl_F ffloor (const cl_R& x)
    23. 

  23. {
    24. 

  24. 	realcase6(x
    25. 

  25. 	,	return cl_float(x);
    26. 

  26. 	,	var const cl_I& a = numerator(x);
    27. 

  27. 		var const cl_I& b = denominator(x);
    28. 

  28. 		return cl_float(floor1(a,b));
    29. 

  29. 	,	return ffloor(x);
    30. 

  30. 	,	return ffloor(x);
    31. 

  31. 	,	return ffloor(x);
    32. 

  32. 	,	return ffloor(x);
    33. 

  33. 	);
    34. 

  34. }
    35. 

  35. 

  36. }  // namespace cln
    37.