ravensat 0.1.0 → 0.2.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 4096e2cf92f90de177d68da91023a52126e1c585ecb4adb4bebd03f98d4d7eb2
-  data.tar.gz: ed1650dda444677d788404feb1a08af0c95d11adcc9ed50863fdd4148784da63
+  metadata.gz: 2206c8010f299d713c19b74682a2c46470d0c4cc7e27ade7e429ee0de09622de
+  data.tar.gz: 14b05657764ab053b091da8f0ddb339201ea2cd469d2828eccc04fd0b3c4e49e
 SHA512:
-  metadata.gz: ec26889a68bf4114d3bf0ed6c56c2e8368b31e09ac1865f31272f70bdc1415f319b291f677bfdf730f71b1ed9bcc1e56ffabddbcdbcba1a11c6441e64d888bd1
-  data.tar.gz: b174cd6db0867ab511a558a19a23a372cab7d293429ed434c4892817505f6a6d12cc1e15f2a67431bfa52c7376575b8a057ba536c7315fe14fc452d7a71fcd25
+  metadata.gz: ba52ce15498089d710d8e7ded3b8f35da11364a74a6f72241482ceb794cec83164423142e5b3d3feb90b0a444d8ec62327d7be830cac6d4390844fb9ce10cb6e
+  data.tar.gz: 83509b606c6693373ce2918fe4ae9feda5aafbd241bca5510ed795cc52aae6dc0120cfc0e0294dd76a53004dbb825c1a9b0aa27664c47ff04a5e311ebf7bb167

data/Gemfile.lock

@@ -1,7 +1,7 @@
 PATH
   remote: .
   specs:
-    ravensat (0.1.0)
+    ravensat (0.1.1)
 
 GEM
   remote: https://rubygems.org/

data/README.md

@@ -1,10 +1,11 @@
 # Ravensat
 
-Welcome to your new gem! In this directory, you'll find the files you need to be able to package up your Ruby library into a gem. Put your Ruby code in the file `lib/ravensat`. To experiment with that code, run `bin/console` for an interactive prompt.
+Ravensat is an interface to SAT Solver .
+In order to use Ravensat, you need to install SAT Solver and specify the name of the Solver .
+(If you do not specify SAT Solver, it will use the one bundled in the gem .)
 
-TODO: Delete this and the text above, and describe your gem
 
-## Installation(Not implemented)
+## Installation
 
 Add this line to your application's Gemfile:
 
@@ -25,8 +26,8 @@ Or install it yourself as:
 ```ruby
 require 'ravensat'
 
-a = Ravensat::PropVar.new
-b = Ravensat::PropVar.new
+a = Ravensat::VarNode.new
+b = Ravensat::VarNode.new
 
 a.value #=> nil
 b.value #=> nil
@@ -40,7 +41,7 @@ a.value #=> true
 b.value #=> true
 ```
 
-## Development(Not implemented)
+## Development
 
 After checking out the repo, run `bin/setup` to install dependencies. Then, run `rake spec` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.
 

data/example/magic_square_3x3.rb

@@ -0,0 +1,48 @@
+require 'bundler/setup'
+require 'ravensat'
+require 'pry'
+
+# | ---- | ---- | ---- |
+# |  X1  |  X2  |  X3  |
+# |  X4  |  X5  |  X6  |
+# |  X7  |  X8  |  X9  |
+# | ---- | ---- | ---- |
+
+x1 = Array.new(9){ Ravensat::VarNode.new }
+x2 = Array.new(9){ Ravensat::VarNode.new }
+x3 = Array.new(9){ Ravensat::VarNode.new }
+x4 = Array.new(9){ Ravensat::VarNode.new }
+x5 = Array.new(9){ Ravensat::VarNode.new }
+x6 = Array.new(9){ Ravensat::VarNode.new }
+x7 = Array.new(9){ Ravensat::VarNode.new }
+x8 = Array.new(9){ Ravensat::VarNode.new }
+x9 = Array.new(9){ Ravensat::VarNode.new }
+x = [x1, x2, x3, x4, x5, x6, x7, x8, x9]
+
+logic = x1[4]
+
+# one square, one number
+9.times do |i|
+  logic &= Ravensat::RavenClaw.alo [x[i][0], x[i][1], x[i][2], x[i][3], x[i][4], x[i][5], x[i][6], x[i][7], x[i][8]]
+  logic &= Ravensat::RavenClaw.amo [x[i][0], x[i][1], x[i][2], x[i][3], x[i][4], x[i][5], x[i][6], x[i][7], x[i][8]]
+end
+
+# x1 ~ x9 are all different numbers
+9.times do |i|
+  logic &= Ravensat::RavenClaw.alo [x[0][i], x[1][i], x[2][i], x[3][i], x[4][i], x[5][i], x[6][i], x[7][i], x[8][i]]
+  logic &= Ravensat::RavenClaw.amo [x[0][i], x[1][i], x[2][i], x[3][i], x[4][i], x[5][i], x[6][i], x[7][i], x[8][i]]
+end
+
+# TODO: generate constraint that sum to 15 in a row
+# sum to 15 in a row
+
+solver = Ravensat::Solver.new
+solver.solve logic
+
+puts <<~"MAGIC_SQUARE"
+| --- | --- | --- |
+|  #{x1.index{|x| x.value} + 1}  |  #{x2.index{|x| x.value} + 1}  |  #{x3.index{|x| x.value} + 1}  |
+|  #{x4.index{|x| x.value} + 1}  |  #{x5.index{|x| x.value} + 1}  |  #{x6.index{|x| x.value} + 1}  |
+|  #{x7.index{|x| x.value} + 1}  |  #{x8.index{|x| x.value} + 1}  |  #{x9.index{|x| x.value} + 1}  |
+| --- | --- | --- |
+MAGIC_SQUARE

data/lib/ravensat/ast/and_node.rb

@@ -0,0 +1,4 @@
+module Ravensat
+  class AndNode < OprNode
+  end
+end

data/lib/ravensat/ast/node.rb

@@ -0,0 +1,51 @@
+module Ravensat
+  class Node
+    include Enumerable
+
+    attr_reader :children
+    def initialize
+      @children = []
+    end
+
+    def each
+      yield(self)
+      @children.each do |child|
+        child.each {|c| yield(c)}
+      end
+    end
+
+    def &(object)
+      AndNode.new(self, object)
+    end
+
+    def |(object)
+      OrNode.new(self, object)
+    end
+
+    # def tree_text
+    #   self.each do |child|
+    #     child.to_s
+    #   end
+    # end
+
+    def to_s
+      self.class.name
+    end
+
+    def cnf?
+      @children.map(&:cnf?).reduce(:&)
+    end
+
+    def vars
+      self.select{|node| node.is_a? VarNode}.uniq
+    end
+
+    def vars_size
+      self.vars.size
+    end
+
+    def clauses_size
+      self.count{|node| node.is_a? AndNode} + 1
+    end
+  end
+end

data/lib/ravensat/ast/not_node.rb

@@ -0,0 +1,4 @@
+module Ravensat
+  class NotNode < OprNode
+  end
+end

data/lib/ravensat/ast/opr_node.rb

@@ -0,0 +1,7 @@
+module Ravensat
+  class OprNode < Node
+    def initialize(*nodes)
+      @children = nodes
+    end
+  end
+end

data/lib/ravensat/ast/or_node.rb

@@ -0,0 +1,8 @@
+module Ravensat
+  class OrNode < OprNode
+    def cnf?
+      return false if @children.any?{|node| node.is_a? AndNode}
+      @children.map(&:cnf?).reduce(:&)
+    end
+  end
+end

data/lib/ravensat/ast/var_node.rb

@@ -0,0 +1,17 @@
+module Ravensat
+  class VarNode < Node
+    attr_accessor :value
+    def initialize
+      @value
+      @children = []
+    end
+
+    def ~@
+      NotNode.new(self)
+    end
+
+    def cnf?
+      true
+    end
+  end
+end

data/lib/ravensat/dimacs_decoder.rb

@@ -0,0 +1,24 @@
+module Ravensat
+  class DimacsDecoder
+    def decode(model, name_table)
+      inverted_name_table = name_table.invert
+      case model.first
+      when "SAT"
+        model.last.split.each do |e|
+          if e == '0'
+            next
+          elsif e[0] == "-"
+            index = e.slice(1..-1)
+            inverted_name_table[index].value = false
+          else
+            index = e
+            inverted_name_table[index].value = true
+          end
+        end
+        true
+      when "UNSAT"
+        false
+      end
+    end
+  end
+end

data/lib/ravensat/dimacs_encoder.rb

@@ -0,0 +1,34 @@
+module Ravensat
+  class DimacsEncoder
+    attr_reader :name_table
+    def initialize
+      @name_table = {}
+    end
+
+    def to_dimacs(formula)
+      return nil unless formula.cnf?
+
+      dimacs_header = "p cnf #{formula.vars_size} #{formula.clauses_size}\n"
+      dimacs_body = ""
+      create_table(formula)
+      formula.each do |node|
+        case node
+        when AndNode
+        when OrNode then dimacs_body << "\n"
+        when NotNode then dimacs_body << "-"
+        when VarNode then dimacs_body << @name_table[node] << " "
+        end
+      end
+
+      # dimacs_body formatting
+      dimacs_body.strip! << ' '
+      dimacs_body.gsub!(/\n{2,}/, "\n").gsub!(/\n/, "0\n") << '0'
+
+      dimacs_header + dimacs_body
+    end
+
+    def create_table(formula)
+      @name_table = formula.vars.zip((1..formula.vars.size).map(&:to_s)).to_h
+    end
+  end
+end

data/lib/ravensat/ravenclaw.rb

@@ -1,5 +1,15 @@
-def amo(proposal_values)
-end
+module Ravensat
+  class RavenClaw
+    def initialize; end
+
+    def self.alo(prop_vars)
+      prop_vars.reduce(:|)
+    end
 
-def alo(proposal_values)
+    def self.amo(prop_vars)
+      prop_vars.combination(2).map do |e|
+        e.map(&:~@).reduce(:|)
+      end.reduce(:&)
+    end
+  end
 end

data/lib/ravensat/solver.rb

@@ -15,10 +15,11 @@ module Ravensat
     # end
 
     def solve( cnf )
+      encoder = DimacsEncoder.new
       @input_file = Tempfile.open(["ravensat",".cnf"])
       @output_file = Tempfile.open(["ravensat",".mdl"])
 
-      @input_file.write cnf.to_dimacs
+      @input_file.write encoder.to_dimacs(cnf)
       @input_file.flush
 
       case @name
@@ -28,18 +29,9 @@ module Ravensat
         system("#{@name} #{@input_file.to_path} #{@output_file.to_path}")
       end
 
+      decoder = DimacsDecoder.new
       model = @output_file.read.split("\n")
-
-      case model.first
-      when "SAT"
-        model.last.split.each do |e|
-          next if e == '0'
-          cnf.name_table.find{|key,value| value == e.to_i.abs.to_s}.first.value = !e.start_with?('-')
-        end
-        Arcteryx::SAT
-      when "UNSAT"
-        Arcteryx::UNSAT
-      end
+      decoder.decode(model, encoder.name_table)
     end
 
   end

data/lib/ravensat/version.rb

@@ -1,5 +1,5 @@
 # frozen_string_literal: true
 
 module Ravensat
-  VERSION = "0.1.0"
+  VERSION = "0.2.2"
 end

data/lib/ravensat.rb

@@ -4,11 +4,20 @@ require_relative "ravensat/version"
 
 module Ravensat
   ravensat = File.dirname(__FILE__) + '/ravensat'
+  ast = File.dirname(__FILE__) + '/ravensat/ast'
   arcteryx = File.dirname(__FILE__) + '/arcteryx'
 
   autoload :Solver, ravensat + '/solver.rb'
-  autoload :PropVar, ravensat + '/prop_var.rb'
-  autoload :PropLogic, ravensat + '/prop_logic.rb'
+  autoload :DimacsEncoder, ravensat + '/dimacs_encoder.rb'
+  autoload :DimacsDecoder, ravensat + '/dimacs_decoder.rb'
+  autoload :RavenClaw, ravensat + '/ravenclaw.rb'
+
+  autoload :Node, ast + '/node.rb'
+  autoload :VarNode, ast + '/var_node.rb'
+  autoload :OprNode, ast + '/opr_node.rb'
+  autoload :AndNode, ast + '/and_node.rb'
+  autoload :OrNode, ast + '/or_node.rb'
+  autoload :NotNode, ast + '/not_node.rb'
 
   autoload :Arcteryx, arcteryx + '/arcteryx.rb'
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: ravensat
 version: !ruby/object:Gem::Version
-  version: 0.1.0
+  version: 0.2.2
 platform: ruby
 authors:
 - rikuto matsuda
 autorequire:
 bindir: exe
 cert_chain: []
-date: 2021-12-03 00:00:00.000000000 Z
+date: 2022-05-16 00:00:00.000000000 Z
 dependencies: []
 description:
 email:
@@ -27,11 +27,18 @@ files:
 - Rakefile
 - bin/console
 - bin/setup
+- example/magic_square_3x3.rb
 - lib/arcteryx/arcteryx.rb
 - lib/arcteryx/cnf.rb
 - lib/ravensat.rb
-- lib/ravensat/prop_logic.rb
-- lib/ravensat/prop_var.rb
+- lib/ravensat/ast/and_node.rb
+- lib/ravensat/ast/node.rb
+- lib/ravensat/ast/not_node.rb
+- lib/ravensat/ast/opr_node.rb
+- lib/ravensat/ast/or_node.rb
+- lib/ravensat/ast/var_node.rb
+- lib/ravensat/dimacs_decoder.rb
+- lib/ravensat/dimacs_encoder.rb
 - lib/ravensat/ravenclaw.rb
 - lib/ravensat/solver.rb
 - lib/ravensat/version.rb

data/lib/ravensat/prop_logic.rb

@@ -1,92 +0,0 @@
-module Ravensat
-  class PropLogic
-    attr_reader :formula
-    attr_reader :name_table
-
-    def initialize( init_formula )
-      @formula = init_formula
-         # (a | b) & (~a | b) & (a | ~b) & (~a | ~b)
-
-         # [:and,
-         #    [:or, a, b],
-         #    [:or, [:not, a], b],
-         #    [:or, a, [:not, b]],
-         #    [:or, [:not, a], [:not, b]]
-         # ]
-    end
-
-    def to_cnf
-
-    end
-
-    def to_dimacs
-      cnf_text = String.new
-      tmp_name_table = @formula.flatten.uniq.reject{|e| e.class == Symbol}
-      @name_table = tmp_name_table.zip((1..tmp_name_table.size).to_a.map{|e| e.to_s}).to_h
-
-      nr_vars = tmp_name_table.size
-      nr_clses = @formula.size - 1
-      cnf_header = 'p cnf ' << nr_vars.to_s << ' ' << nr_clses.to_s << "\n"
-      # @formula.is_cnf?
-      @formula.each do |clause|
-        # next if clause.first != :and
-        case clause
-        when Symbol
-          next
-        when Array
-          case clause.first
-          when :or
-            clause.each do |literal|
-              case literal
-              when Symbol
-                next
-              when Ravensat::PropVar
-                cnf_text << @name_table[literal] << ' '
-              when Array #&& literal.first == :not
-                cnf_text << '-' << @name_table[literal.last] << ' '
-              end
-            end
-          when :not
-            cnf_text << '-' << @name_table[clause.last] << ' '
-          end
-        when Ravensat::PropVar
-          cnf_text << @name_table[clause] << ' '
-        end
-        cnf_text << '0' << "\n"
-      end
-      cnf_header + cnf_text
-    end
-
-    def &( object )
-      if @formula.first == :and
-        @formula.append object.formula
-      else
-        @formula = [:and, @formula, object.formula]
-      end
-      self
-      # Ravensat::PropLogic.new [:and, @formula, object]
-      # formulaがcnfである前提の実装
-      # @formula & other_formula
-    end
-
-    def |( object )
-      if @formula.first == :or
-        @formula.append object.formula
-      else
-        @formula = [:or, @formula, object.formula]
-      end
-      self
-      # Ravensat::PropLogic.new [:or, @formula, object]
-      # 木構造に落とすのが難しそう，実装見送り
-      # @formula | other_formula
-    end
-
-    # def to_a
-    #   @formula.each do |f|
-    #     if f.class == PropLogic
-    #       f = f.to_a
-    #     end
-    #   end
-    # end
-  end
-end

data/lib/ravensat/prop_var.rb

@@ -1,45 +0,0 @@
-module Ravensat
-  class PropVar
-    attr_accessor :value
-
-    def initialize
-      @value # => true | false | undef
-    end
-
-    # def +@
-    #   # unuse?
-    #   # return PropLogic object
-    #   'this is +@ method'
-    # end
-
-    # def -@
-    #   # return PropLogic object
-    #   'this is -@ method'
-    # end
-
-    def ~@
-      Ravensat::PropLogic.new [:not, self]
-      # return PropLogic object
-    end
-
-    def &( object )
-      Ravensat::PropLogic.new [:and, self, object.formula]
-      # return PropLogic object
-    end
-
-    def |( object )
-      Ravensat::PropLogic.new [:or, self, object.formula]
-      # return PropLogic object
-    end
-
-    def formula
-      # $BIU$1>F?O%a%=%C%I(B
-      self
-    end
-
-    # def self
-    #   'this is self method'
-    # end
-
-  end
-end