# General Lua Libraries for Lua 5.1, 5.2 & 5.3
# Copyright (C) 2011-2018 stdlib authors

before:
  base_module  = 'math'
  this_module  = 'std.math'
  global_table = '_G'

  extend_base  = {'floor', 'round'}

  M = require(this_module)


specify std.math:
- context when required:
  - context by name:
    - it does not touch the global table:
        expect(show_apis {added_to=global_table, by=this_module}).
           to_equal {}
    - it does not touch the core math table:
        expect(show_apis {added_to=base_module, by=this_module}).
           to_equal {}
    - it contains apis from the core math table:
        expect(show_apis {from=base_module, not_in=this_module}).
           to_contain.a_permutation_of(extend_base)

  - context via the std module:
    - it does not touch the global table:
        expect(show_apis {added_to=global_table, by='std'}).
           to_equal {}
    - it does not touch the core math table:
        expect(show_apis {added_to=base_module, by='std'}).
           to_equal {}


- describe floor:
  - before:
      f = M.floor

  - context with bad arguments:
      badargs.diagnose(f, 'std.math.floor(number, ?int)')

  - it rounds to the nearest smaller integer:
      expect(f(1.2)).to_be(1)
      expect(f(1.9)).to_be(1)
      expect(f(999e-2)).to_be(9)
      expect(f(999e-3)).to_be(0)
  - it rounds down to specified number of decimal places:
      expect(f(1.2345, 0)).to_be(1.0)
      expect(f(1.2345, 1)).to_be(1.2)
      expect(f(1.2345, 2)).to_be(1.23)
      expect(f(9.9999, 2)).to_be(9.99)
      expect(f(99999e-3, 3)).to_be(99999e-3)
      expect(f(99999e-4, 3)).to_be(9999e-3)
      expect(f(99999e-5, 3)).to_be(999e-3)


- describe round:
  - before:
      f = M.round

  - context with bad arguments:
      badargs.diagnose(f, 'std.math.round(number, ?int)')

  - it rounds to the nearest integer:
      expect(f(1.2)).to_be(1)
      expect(f(1.9)).to_be(2)
      expect(f(949e-2)).to_be(9)
      expect(f(999e-2)).to_be(10)
  - it rounds to specified number of decimal places:
      expect(f(1.234, 0)).to_be(1.0)
      expect(f(5.678, 0)).to_be(6.0)
      expect(f(1.234, 1)).to_be(1.2)
      expect(f(5.678, 1)).to_be(5.7)
      expect(f(1.234, 2)).to_be(1.23)
      expect(f(5.678, 2)).to_be(5.68)
      expect(f(9.999, 2)).to_be(10)
      expect(f(11111e-2, 3)).to_be(11111e-2)
      expect(f(99999e-2, 3)).to_be(99999e-2)
      expect(f(11111e-3, 3)).to_be(11111e-3)
      expect(f(99999e-3, 3)).to_be(99999e-3)
      expect(f(11111e-4, 3)).to_be(1111e-3)
      expect(f(99999e-4, 3)).to_be(10)
      expect(f(99999e-5, 3)).to_be(1)
  - it rounds negative values correctly:
      expect(f(-1.234, 0)).to_be(-1.0)
      expect(f(-5.678, 0)).to_be(-6.0)
      expect(f(-1.234, 1)).to_be(-1.2)
      expect(f(-5.678, 1)).to_be(-5.7)
      expect(f(-1.234, 2)).to_be(-1.23)
      expect(f(-5.678, 2)).to_be(-5.68)
      expect(f(-9.999, 2)).to_be(-10)
      expect(f(-11111e-2, 3)).to_be(-11111e-2)
      expect(f(-99999e-2, 3)).to_be(-99999e-2)
      expect(f(-11111e-3, 3)).to_be(-11111e-3)
      expect(f(-99999e-3, 3)).to_be(-99999e-3)
      expect(f(-11111e-4, 3)).to_be(-1111e-3)
      expect(f(-99999e-4, 3)).to_be(-10)
      expect(f(-99999e-5, 3)).to_be(-1)