ravensat 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 4096e2cf92f90de177d68da91023a52126e1c585ecb4adb4bebd03f98d4d7eb2
+  data.tar.gz: ed1650dda444677d788404feb1a08af0c95d11adcc9ed50863fdd4148784da63
+SHA512:
+  metadata.gz: ec26889a68bf4114d3bf0ed6c56c2e8368b31e09ac1865f31272f70bdc1415f319b291f677bfdf730f71b1ed9bcc1e56ffabddbcdbcba1a11c6441e64d888bd1
+  data.tar.gz: b174cd6db0867ab511a558a19a23a372cab7d293429ed434c4892817505f6a6d12cc1e15f2a67431bfa52c7376575b8a057ba536c7315fe14fc452d7a71fcd25

data/.gitignore

@@ -0,0 +1,14 @@
+/.bundle/
+/.yardoc
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/
+.ruby-version
+Gemfile.lock
+
+test.rb
+# rspec failure tracking
+.rspec_status

data/.rspec

@@ -0,0 +1,3 @@
+--format documentation
+--color
+--require spec_helper

data/.ruby-version

@@ -0,0 +1 @@
+3.0.0

data/Gemfile

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+source "https://rubygems.org"
+
+# Specify your gem's dependencies in ravensat.gemspec
+gemspec
+
+gem "rake", "~> 13.0"
+
+gem "rspec", "~> 3.0"
+
+gem "pry"
+gem "pry-byebug"

data/Gemfile.lock

@@ -0,0 +1,45 @@
+PATH
+  remote: .
+  specs:
+    ravensat (0.1.0)
+
+GEM
+  remote: https://rubygems.org/
+  specs:
+    byebug (11.1.3)
+    coderay (1.1.3)
+    diff-lcs (1.4.4)
+    method_source (1.0.0)
+    pry (0.14.0)
+      coderay (~> 1.1)
+      method_source (~> 1.0)
+    pry-byebug (3.8.0)
+      byebug (~> 11.0)
+      pry (~> 0.10)
+    rake (13.0.3)
+    rspec (3.10.0)
+      rspec-core (~> 3.10.0)
+      rspec-expectations (~> 3.10.0)
+      rspec-mocks (~> 3.10.0)
+    rspec-core (3.10.1)
+      rspec-support (~> 3.10.0)
+    rspec-expectations (3.10.1)
+      diff-lcs (>= 1.2.0, < 2.0)
+      rspec-support (~> 3.10.0)
+    rspec-mocks (3.10.2)
+      diff-lcs (>= 1.2.0, < 2.0)
+      rspec-support (~> 3.10.0)
+    rspec-support (3.10.2)
+
+PLATFORMS
+  x86_64-linux
+
+DEPENDENCIES
+  pry
+  pry-byebug
+  rake (~> 13.0)
+  ravensat!
+  rspec (~> 3.0)
+
+BUNDLED WITH
+   2.2.24

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2021 rikuto matsuda
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

data/README.md

@@ -0,0 +1,55 @@
+# 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.
+
+TODO: Delete this and the text above, and describe your gem
+
+## Installation(Not implemented)
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem 'ravensat'
+```
+
+And then execute:
+
+    $ bundle install
+
+Or install it yourself as:
+
+    $ gem install ravensat
+
+## Usage
+
+```ruby
+require 'ravensat'
+
+a = Ravensat::PropVar.new
+b = Ravensat::PropVar.new
+
+a.value #=> nil
+b.value #=> nil
+
+logic = (a | b) & (~a | b) & (a | ~b)
+
+solver = Ravensat::Solver.new
+solver.solve logic #=> true(SAT)
+
+a.value #=> true
+b.value #=> true
+```
+
+## Development(Not implemented)
+
+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.
+
+To install this gem onto your local machine, run `bundle exec rake install`. To release a new version, update the version number in `version.rb`, and then run `bundle exec rake release`, which will create a git tag for the version, push git commits and the created tag, and push the `.gem` file to [rubygems.org](https://rubygems.org).
+
+## Contributing
+
+Bug reports and pull requests are welcome on GitHub at https://github.com/matsuda0528/ravensat.
+
+## License
+
+The gem is available as open source under the terms of the [MIT License](https://opensource.org/licenses/MIT).

data/Rakefile

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+require "bundler/gem_tasks"
+require "rspec/core/rake_task"
+
+RSpec::Core::RakeTask.new(:spec)
+
+task default: :spec

data/bin/console

@@ -0,0 +1,15 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+require "bundler/setup"
+require "ravensat"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+require "pry"
+Pry.start
+
+# require "irb"
+# IRB.start(__FILE__)

data/bin/setup

@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+set -euo pipefail
+IFS=$'\n\t'
+set -vx
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/lib/arcteryx/arcteryx.rb

@@ -0,0 +1,40 @@
+require_relative './cnf.rb'
+module Arcteryx
+  SAT = true
+  UNSAT = false
+
+  def DPLL(cnf)
+    if cnf.empty? then return SAT end
+    cnf.unit_propagation
+    if cnf.exist_empty_clause? then return UNSAT end
+    x = cnf.choose_variable
+    dup_cnf = cnf.deep_dup
+    return DPLL(cnf.append x) || DPLL(dup_cnf.append -1*x)
+  end
+
+  def solve( input_file, output_file = nil )
+    cnf = Arcteryx::CNF.new
+    cnf.parse(input_file)
+    case DPLL(cnf)
+    when SAT
+      if output_file
+        File.open(output_file,"w") do |f|
+          f.write("SAT\n"+cnf.result)
+        end
+      else
+        puts "SAT"
+        puts cnf.result
+      end
+    when UNSAT
+      if output_file
+        File.open(output_file,"w") do |f|
+          f.write("UNSAT")
+        end
+      else
+        puts "UNSAT"
+      end
+    end
+  end
+  module_function :solve
+  module_function :DPLL
+end

data/lib/arcteryx/cnf.rb

@@ -0,0 +1,74 @@
+module Arcteryx
+  class CNF
+    def initialize(formula=[],truth={})
+      @formula = formula
+      @truth_assignment = truth
+    end
+
+    def parse(file_path)
+      header = ""; clauses = [];
+      File.open(file_path,"r") do |f|
+        header = f.readline
+        clauses = f.readlines
+      end
+      header.split[2].to_i.times do |i|
+        @truth_assignment["#{i+1}".to_sym] = nil
+      end
+      clauses.each do |e|
+        clause = e.split.map{|i| i.to_i}
+        clause.pop
+        @formula.append clause
+      end
+    end
+
+    def unit_propagation
+      while !self.exist_empty_clause? and l = self.find_unit_clause
+        @truth_assignment["#{l.abs}".to_sym] = l > 0
+        self.simplify(l)
+      end
+    end
+
+    def simplify(l)
+      @formula.delete_if do |cls|
+        cls.include?(l)
+      end
+      @formula.map{|cls| if cls.include?(-1*l) then cls.delete(-1*l) end}
+    end
+
+    def empty?
+      @formula.empty?
+    end
+
+    def find_unit_clause
+      @formula.map{|cls| if cls.size == 1 then return cls.first end}
+      return false
+    end
+
+    def exist_empty_clause?
+      @formula.map{|cls| if cls.empty? then return true end}
+      return false
+    end
+
+    def choose_variable
+      @truth_assignment.map{|key,value| if value == nil then return key.to_s.to_i end}
+      return false
+    end
+
+    def append l
+      @formula.append [l] if l
+      return self
+    end
+
+    def deep_dup
+      tmp_formula = Marshal.load(Marshal.dump(@formula))
+      tmp_truth = Marshal.load(Marshal.dump(@truth_assignment))
+      CNF.new(tmp_formula,tmp_truth)
+    end
+
+    def result
+      str = ""
+      @truth_assignment.map{|key,value| unless value then str<<"-" end; str<<key.to_s+" "}
+      return str << "0"
+    end
+  end
+end

data/lib/ravensat/prop_logic.rb

@@ -0,0 +1,92 @@
+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

@@ -0,0 +1,45 @@
+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

data/lib/ravensat/ravenclaw.rb

@@ -0,0 +1,5 @@
+def amo(proposal_values)
+end
+
+def alo(proposal_values)
+end

data/lib/ravensat/solver.rb

@@ -0,0 +1,46 @@
+require 'tempfile'
+
+module Ravensat
+  class Solver
+    attr_accessor :name
+    def initialize( default_solver_name = "arcteryx" )
+      @name = default_solver_name
+      # @cnf = Array.new
+      # @nr_vars
+      # @nr_clses
+    end
+
+    # def <<( clause )
+    #   'this is << method'
+    # end
+
+    def solve( cnf )
+      @input_file = Tempfile.open(["ravensat",".cnf"])
+      @output_file = Tempfile.open(["ravensat",".mdl"])
+
+      @input_file.write cnf.to_dimacs
+      @input_file.flush
+
+      case @name
+      when "arcteryx"
+        Arcteryx.solve(@input_file.to_path, @output_file.to_path)
+      else
+        system("#{@name} #{@input_file.to_path} #{@output_file.to_path}")
+      end
+
+      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
+    end
+
+  end
+end

data/lib/ravensat/version.rb

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

data/lib/ravensat.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+require_relative "ravensat/version"
+
+module Ravensat
+  ravensat = File.dirname(__FILE__) + '/ravensat'
+  arcteryx = File.dirname(__FILE__) + '/arcteryx'
+
+  autoload :Solver, ravensat + '/solver.rb'
+  autoload :PropVar, ravensat + '/prop_var.rb'
+  autoload :PropLogic, ravensat + '/prop_logic.rb'
+
+  autoload :Arcteryx, arcteryx + '/arcteryx.rb'
+end

data/ravensat.gemspec

@@ -0,0 +1,37 @@
+# frozen_string_literal: true
+
+require_relative "lib/ravensat/version"
+
+Gem::Specification.new do |spec|
+  spec.name          = "ravensat"
+  spec.version       = Ravensat::VERSION
+  spec.authors       = ["rikuto matsuda"]
+  spec.email         = ["p99y92og@s.okayama-u.ac.jp"]
+
+  spec.summary       = "An interface to the SAT solver for Ruby"
+  # spec.description   = "TODO: Write a longer description or delete this line."
+  spec.homepage      = "https://github.com/matsuda0528/ravensat"
+  spec.license       = "MIT"
+  spec.required_ruby_version = Gem::Requirement.new(">= 2.4.0")
+
+  # spec.metadata["allowed_push_host"] = "TODO: Set to 'http://mygemserver.com'"
+
+  # spec.metadata["homepage_uri"] = spec.homepage
+  # spec.metadata["source_code_uri"] = "TODO: Put your gem's public repo URL here."
+  # spec.metadata["changelog_uri"] = "TODO: Put your gem's CHANGELOG.md URL here."
+
+  # Specify which files should be added to the gem when it is released.
+  # The `git ls-files -z` loads the files in the RubyGem that have been added into git.
+  spec.files = Dir.chdir(File.expand_path(__dir__)) do
+    `git ls-files -z`.split("\x0").reject { |f| f.match(%r{\A(?:test|spec|features)/}) }
+  end
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{\Aexe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  # Uncomment to register a new dependency of your gem
+  # spec.add_dependency "example-gem", "~> 1.0"
+
+  # For more information and examples about making a new gem, checkout our
+  # guide at: https://bundler.io/guides/creating_gem.html
+end

metadata

@@ -0,0 +1,62 @@
+--- !ruby/object:Gem::Specification
+name: ravensat
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- rikuto matsuda
+autorequire:
+bindir: exe
+cert_chain: []
+date: 2021-12-03 00:00:00.000000000 Z
+dependencies: []
+description:
+email:
+- p99y92og@s.okayama-u.ac.jp
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- ".rspec"
+- ".ruby-version"
+- Gemfile
+- Gemfile.lock
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/console
+- bin/setup
+- lib/arcteryx/arcteryx.rb
+- lib/arcteryx/cnf.rb
+- lib/ravensat.rb
+- lib/ravensat/prop_logic.rb
+- lib/ravensat/prop_var.rb
+- lib/ravensat/ravenclaw.rb
+- lib/ravensat/solver.rb
+- lib/ravensat/version.rb
+- ravensat.gemspec
+homepage: https://github.com/matsuda0528/ravensat
+licenses:
+- MIT
+metadata: {}
+post_install_message:
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: 2.4.0
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.2.3
+signing_key:
+specification_version: 4
+summary: An interface to the SAT solver for Ruby
+test_files: []