Class: Numeric

Inherits:
Object show all
Includes:
Comparable
Defined in:
opal/opal/corelib/numeric.rb

Direct Known Subclasses

Complex, Float, Integer, Number, Rational

Instance Method Summary collapse

Methods included from Comparable

#<, #<=, #==, #>, #>=, #between?, #clamp

Instance Method Details

#%(other) ⇒ Object Also known as: modulo

[View source]

44
45
46
 
# File 'opal/opal/corelib/numeric.rb', line 44

def %(other)
  self - other * div(other)
end

#+@ ⇒ Object

[View source]

36
37
38
 
# File 'opal/opal/corelib/numeric.rb', line 36

def +@
  self
end

#-@ ⇒ Object

[View source]

40
41
42
 
# File 'opal/opal/corelib/numeric.rb', line 40

def -@
  0 - self
end

#<=>(other) ⇒ Object

[View source]

28
29
30
31
32
33
34
 
# File 'opal/opal/corelib/numeric.rb', line 28

def <=>(other)
  if equal? other
    return 0
  end

  nil
end

#__coerced__(method, other) ⇒ Object

[View source]

14
15
16
17
18
19
20
21
22
23
24
25
26
 
# File 'opal/opal/corelib/numeric.rb', line 14

def __coerced__(method, other)
  if other.respond_to?(:coerce)
    a, b = other.coerce(self)
    a.__send__ method, b
  else
    case method
    when :+, :-, :*, :/, :%, :&, :|, :^, :**
      ::Kernel.raise ::TypeError, "#{other.class} can't be coerced into Numeric"
    when :>, :>=, :<, :<=, :<=>
      ::Kernel.raise ::ArgumentError, "comparison of #{self.class} with #{other.class} failed"
    end
  end
end

#abs ⇒ Object Also known as: magnitude

[View source]

48
49
50
 
# File 'opal/opal/corelib/numeric.rb', line 48

def abs
  self < 0 ? -self : self
end

#abs2 ⇒ Object

[View source]

52
53
54
 
# File 'opal/opal/corelib/numeric.rb', line 52

def abs2
  self * self
end

#angle ⇒ Object Also known as: arg

[View source]

56
57
58
 
# File 'opal/opal/corelib/numeric.rb', line 56

def angle
  self < 0 ? ::Math::PI : 0
end

#ceil(ndigits = 0) ⇒ Object

[View source]

60
61
62
 
# File 'opal/opal/corelib/numeric.rb', line 60

def ceil(ndigits = 0)
  to_f.ceil(ndigits)
end

#clone(freeze: true) ⇒ Object

[View source]

328
329
330
 
# File 'opal/opal/corelib/numeric.rb', line 328

def clone(freeze: true)
  self
end

#coerce(other) ⇒ Object

[View source]

6
7
8
9
10
11
12
 
# File 'opal/opal/corelib/numeric.rb', line 6

def coerce(other)
  if other.instance_of? self.class
    return [other, self]
  end

  [::Kernel.Float(other), ::Kernel.Float(self)]
end

#conj ⇒ Object Also known as: conjugate

[View source]

64
65
66
 
# File 'opal/opal/corelib/numeric.rb', line 64

def conj
  self
end

#denominator ⇒ Object

[View source]

68
69
70
 
# File 'opal/opal/corelib/numeric.rb', line 68

def denominator
  to_r.denominator
end

#div(other) ⇒ Object

[View source]

72
73
74
75
76
 
# File 'opal/opal/corelib/numeric.rb', line 72

def div(other)
  ::Kernel.raise ::ZeroDivisionError, 'divided by o' if other == 0

  (self / other).floor
end

#divmod(other) ⇒ Object

[View source]

78
79
80
 
# File 'opal/opal/corelib/numeric.rb', line 78

def divmod(other)
  [div(other), self % other]
end

#dup ⇒ Object

[View source]

324
325
326
 
# File 'opal/opal/corelib/numeric.rb', line 324

def dup
  self
end

#fdiv(other) ⇒ Object

[View source]

82
83
84
 
# File 'opal/opal/corelib/numeric.rb', line 82

def fdiv(other)
  to_f / other
end

#finite? ⇒ Boolean

Returns:

[View source]

332
333
334
 
# File 'opal/opal/corelib/numeric.rb', line 332

def finite?
  true
end

#floor(ndigits = 0) ⇒ Object

[View source]

86
87
88
 
# File 'opal/opal/corelib/numeric.rb', line 86

def floor(ndigits = 0)
  to_f.floor(ndigits)
end

#i ⇒ Object

[View source]

90
91
92
 
# File 'opal/opal/corelib/numeric.rb', line 90

def i
  ::Kernel.Complex(0, self)
end

#imag ⇒ Object Also known as: imaginary

[View source]

94
95
96
 
# File 'opal/opal/corelib/numeric.rb', line 94

def imag
  0
end

#infinite? ⇒ Boolean

Returns:

[View source]

336
337
338
 
# File 'opal/opal/corelib/numeric.rb', line 336

def infinite?
  nil
end

#integer? ⇒ Boolean

Returns:

[View source]

98
99
100
 
# File 'opal/opal/corelib/numeric.rb', line 98

def integer?
  false
end

#negative? ⇒ Boolean

Returns:

[View source]

320
321
322
 
# File 'opal/opal/corelib/numeric.rb', line 320

def negative?
  self < 0
end

#nonzero? ⇒ Boolean

Returns:

[View source]

102
103
104
 
# File 'opal/opal/corelib/numeric.rb', line 102

def nonzero?
  zero? ? nil : self
end

#numerator ⇒ Object

[View source]

106
107
108
 
# File 'opal/opal/corelib/numeric.rb', line 106

def numerator
  to_r.numerator
end

#polar ⇒ Object

[View source]

110
111
112
 
# File 'opal/opal/corelib/numeric.rb', line 110

def polar
  [abs, arg]
end

#positive? ⇒ Boolean

Returns:

[View source]

316
317
318
 
# File 'opal/opal/corelib/numeric.rb', line 316

def positive?
  self > 0
end

#quo(other) ⇒ Object

[View source]

114
115
116
 
# File 'opal/opal/corelib/numeric.rb', line 114

def quo(other)
  ::Opal.coerce_to!(self, ::Rational, :to_r) / other
end

#real ⇒ Object

[View source]

118
119
120
 
# File 'opal/opal/corelib/numeric.rb', line 118

def real
  self
end

#real? ⇒ Boolean

Returns:

[View source]

122
123
124
 
# File 'opal/opal/corelib/numeric.rb', line 122

def real?
  true
end

#rect ⇒ Object Also known as: rectangular

[View source]

126
127
128
 
# File 'opal/opal/corelib/numeric.rb', line 126

def rect
  [self, 0]
end

#round(digits = undefined) ⇒ Object

[View source]

130
131
132
 
# File 'opal/opal/corelib/numeric.rb', line 130

def round(digits = undefined)
  to_f.round(digits)
end

#step(limit = undefined, step = undefined, to: undefined, by: undefined, &block) ⇒ Object

[View source]

134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
 
# File 'opal/opal/corelib/numeric.rb', line 134

def step(limit = undefined, step = undefined, to: undefined, by: undefined, &block)
  %x{
    if (limit !== undefined && to !== undefined) {
      #{::Kernel.raise ::ArgumentError, 'to is given twice'}
    }

    if (step !== undefined && by !== undefined) {
      #{::Kernel.raise ::ArgumentError, 'step is given twice'}
    }

    if (to !== undefined) {
      limit = to;
    }

    if (by !== undefined) {
      step = by;
    }

    if (limit === undefined) {
      limit = nil;
    }

    function validateParameters() {
      if (step === nil) {
        #{::Kernel.raise ::TypeError, 'step must be numeric'}
      }

      if (step != null && #{step == 0}) {
        #{::Kernel.raise ::ArgumentError, "step can't be 0"}
      }

      if (step === nil || step == null) {
        step = 1;
      }

      var sign = #{step <=> 0};

      if (sign === nil) {
        #{::Kernel.raise ::ArgumentError, "0 can't be coerced into #{step.class}"}
      }

      if (limit === nil || limit == null) {
        limit = sign > 0 ? #{::Float::INFINITY} : #{-::Float::INFINITY};
      }

      #{::Opal.compare(self, limit)}
    }

    function stepFloatSize() {
      if ((step > 0 && self > limit) || (step < 0 && self < limit)) {
        return 0;
      } else if (step === Infinity || step === -Infinity) {
        return 1;
      } else {
        var abs = Math.abs, floor = Math.floor,
            err = (abs(self) + abs(limit) + abs(limit - self)) / abs(step) * #{::Float::EPSILON};

        if (err === Infinity || err === -Infinity) {
          return 0;
        } else {
          if (err > 0.5) {
            err = 0.5;
          }

          return floor((limit - self) / step + err) + 1
        }
      }
    }

    function stepSize() {
      validateParameters();

      if (step === 0) {
        return Infinity;
      }

      if (step % 1 !== 0) {
        return stepFloatSize();
      } else if ((step > 0 && self > limit) || (step < 0 && self < limit)) {
        return 0;
      } else {
        var ceil = Math.ceil, abs = Math.abs,
            lhs = abs(self - limit) + 1,
            rhs = abs(step);

        return ceil(lhs / rhs);
      }
    }

  }

  unless block_given?
    if (!limit || limit.is_a?(::Numeric)) &&
       (!step || step.is_a?(::Numeric))

      return ::Enumerator::ArithmeticSequence.new(
        [limit, step, ('to: ' if to), ('by: ' if by)], self
      )
    else
      return enum_for(:step, limit, step, &`stepSize`)
    end
  end

  %x{
    validateParameters();

    var isDesc = #{step.negative?},
        isInf = #{step == 0} ||
                (limit === Infinity && !isDesc) ||
                (limit === -Infinity && isDesc);

    if (self.$$is_number && step.$$is_number && limit.$$is_number) {
      if (self % 1 === 0 && (isInf || limit % 1 === 0) && step % 1 === 0) {
        var value = self;

        if (isInf) {
          for (;; value += step) {
            block(value);
          }
        } else if (isDesc) {
          for (; value >= limit; value += step) {
            block(value);
          }
        } else {
          for (; value <= limit; value += step) {
            block(value);
          }
        }

        return self;
      } else {
        var begin = #{to_f}.valueOf();
        step = #{step.to_f}.valueOf();
        limit = #{limit.to_f}.valueOf();

        var n = stepFloatSize();

        if (!isFinite(step)) {
          if (n !== 0) block(begin);
        } else if (step === 0) {
          while (true) {
            block(begin);
          }
        } else {
          for (var i = 0; i < n; i++) {
            var d = i * step + self;
            if (step >= 0 ? limit < d : limit > d) {
              d = limit;
            }
            block(d);
          }
        }

        return self;
      }
    }
  }

  counter = self

  while `isDesc ? #{counter >= limit} : #{counter <= limit}`
    yield counter
    counter += step
  end
end

#to_c ⇒ Object

[View source]

300
301
302
 
# File 'opal/opal/corelib/numeric.rb', line 300

def to_c
  ::Kernel.Complex(self, 0)
end

#to_int ⇒ Object

[View source]

304
305
306
 
# File 'opal/opal/corelib/numeric.rb', line 304

def to_int
  to_i
end

#truncate(ndigits = 0) ⇒ Object

[View source]

308
309
310
 
# File 'opal/opal/corelib/numeric.rb', line 308

def truncate(ndigits = 0)
  to_f.truncate(ndigits)
end

#zero? ⇒ Boolean

Returns:

[View source]

312
313
314
 
# File 'opal/opal/corelib/numeric.rb', line 312

def zero?
  self == 0
end