factbase 0.16.8 → 0.17.0

data/lib/factbase/terms/math.rb

@@ -1,103 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../../factbase'
-
-# Math terms.
-#
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-module Factbase::Math
-  def plus(fact, maps, fb)
-    _arithmetic(:+, fact, maps, fb)
-  end
-
-  def minus(fact, maps, fb)
-    _arithmetic(:-, fact, maps, fb)
-  end
-
-  def times(fact, maps, fb)
-    _arithmetic(:*, fact, maps, fb)
-  end
-
-  def div(fact, maps, fb)
-    _arithmetic(:/, fact, maps, fb)
-  end
-
-  def zero(fact, maps, fb)
-    assert_args(1)
-    vv = _values(0, fact, maps, fb)
-    return false if vv.nil?
-    vv.any? { |v| (v.is_a?(Integer) || v.is_a?(Float)) && v.zero? }
-  end
-
-  def eq(fact, maps, fb)
-    _cmp(:==, fact, maps, fb)
-  end
-
-  def lt(fact, maps, fb)
-    _cmp(:<, fact, maps, fb)
-  end
-
-  def gt(fact, maps, fb)
-    _cmp(:>, fact, maps, fb)
-  end
-
-  def lte(fact, maps, fb)
-    _cmp(:<=, fact, maps, fb)
-  end
-
-  def gte(fact, maps, fb)
-    _cmp(:>=, fact, maps, fb)
-  end
-
-  def _cmp(op, fact, maps, fb)
-    assert_args(2)
-    lefts = _values(0, fact, maps, fb)
-    return false if lefts.nil?
-    rights = _values(1, fact, maps, fb)
-    return false if rights.nil?
-    lefts.any? do |l|
-      l = l.floor if l.is_a?(Time) && op == :==
-      rights.any? do |r|
-        r = r.floor if r.is_a?(Time) && op == :==
-        l.send(op, r)
-      end
-    end
-  end
-
-  def _arithmetic(op, fact, maps, fb)
-    assert_args(2)
-    lefts = _values(0, fact, maps, fb)
-    return nil if lefts.nil?
-    raise 'Too many values at first position, one expected' unless lefts.size == 1
-    rights = _values(1, fact, maps, fb)
-    return nil if rights.nil?
-    raise 'Too many values at second position, one expected' unless rights.size == 1
-    v = lefts[0]
-    r = rights[0]
-    if v.is_a?(Time) && r.is_a?(String)
-      (num, units) = r.split
-      num = num.to_i
-      r =
-        case units
-        when 'seconds', 'second'
-          num
-        when 'minutes', 'minute'
-          num * 60
-        when 'hours', 'hour'
-          num * 60 * 60
-        when 'days', 'day'
-          num * 60 * 60 * 24
-        when 'weeks', 'week'
-          num * 60 * 60 * 24 * 7
-        else
-          raise "Unknown time unit '#{units}' in '#{r}"
-        end
-    end
-    v.send(op, r)
-  end
-end

data/lib/factbase/terms/meta.rb

@@ -1,58 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../../factbase'
-
-# Meta terms.
-#
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-module Factbase::Meta
-  def exists(fact, _maps, _fb)
-    assert_args(1)
-    !_by_symbol(0, fact).nil?
-  end
-
-  def absent(fact, _maps, _fb)
-    assert_args(1)
-    _by_symbol(0, fact).nil?
-  end
-
-  def size(fact, _maps, _fb)
-    assert_args(1)
-    v = _by_symbol(0, fact)
-    return 0 if v.nil?
-    return 1 unless v.respond_to?(:to_a)
-    v.size
-  end
-
-  def type(fact, _maps, _fb)
-    assert_args(1)
-    v = _by_symbol(0, fact)
-    return 'nil' if v.nil?
-    v = v[0] if v.respond_to?(:each) && v.size == 1
-    v.class.to_s
-  end
-
-  def nil(fact, maps, fb)
-    assert_args(1)
-    _values(0, fact, maps, fb).nil?
-  end
-
-  # The property has many (more than one) values.
-  def many(fact, maps, fb)
-    assert_args(1)
-    v = _values(0, fact, maps, fb)
-    !v.nil? && v.size > 1
-  end
-
-  # The property has exactly one value.
-  def one(fact, maps, fb)
-    assert_args(1)
-    v = _values(0, fact, maps, fb)
-    !v.nil? && v.size == 1
-  end
-end

data/lib/factbase/terms/ordering.rb

@@ -1,34 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../../factbase'
-
-# Ordering terms.
-#
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-module Factbase::Ordering
-  def prev(fact, maps, fb)
-    assert_args(1)
-    before = @prev
-    v = _values(0, fact, maps, fb)
-    @prev = v
-    before
-  end
-
-  def unique(fact, maps, fb)
-    @seen = Set.new if @seen.nil?
-    raise "Too few operands for 'unique' (at least 1 expected)" if @operands.empty?
-    vv = (0..(@operands.size - 1)).map { |i| _values(i, fact, maps, fb) }
-    return false if vv.any?(nil)
-    pass = true
-    Enumerator.product(*vv).to_a.each do |t|
-      pass = false if @seen.include?(t)
-      @seen << t
-    end
-    pass
-  end
-end

data/lib/factbase/terms/system.rb

@@ -1,19 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../../factbase'
-
-# System-level terms.
-#
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-module Factbase::System
-  def env(fact, maps, fb)
-    assert_args(2)
-    n = _values(0, fact, maps, fb)[0]
-    ENV.fetch(n.upcase) { _values(1, fact, maps, fb)[0] }
-  end
-end