y_petri 2.0.15 → 2.1.3

data/lib/y_petri/manipulator/petri_net_related_methods.rb

@@ -1,74 +0,0 @@
-# -*- coding: utf-8 -*-
-# Public command interface of YPetri.
-# 
-module YPetri::Manipulator::PetriNetRelatedMethods
-  # Net selection class.
-  # 
-  NetSelection = Class.new YPetri::Manipulator::Selection
-
-  # Net point
-  # 
-  attr_reader :net_point
-
-  # Net selection.
-  # 
-  attr_reader :net_selection
-
-  def initialize
-    net_point_reset
-    @net_selection = NetSelection.new
-    super
-  end
-
-  delegate :place, :transition, :pl, :tr,
-           :places, :transitions, :nets,
-           :pp, :tt, :nn, to: :workspace
-
-  # Place constructor: Creates a new place in the current workspace.
-  # 
-  def Place( *ordered_args, **named_args, &block )
-    fail ArgumentError, "If block is given, :guard named argument " +
-      "must not be given!" if named_args.has? :guard if block
-    named_args.update( guard: block ) if block # use block as a guard
-    named_args.may_have :default_marking, syn!: :m!
-    named_args.may_have :marking, syn!: :m
-    workspace.Place.new *ordered_args, **named_args
-  end
-
-  # Transiton constructor: Creates a new transition in the current workspace.
-  # 
-  def Transition( *aa, **oo, &b )
-    workspace.Transition.new *aa, **oo, &b
-  end
-
-  # Net constructor: Creates a new Net instance in the current workspace.
-  # 
-  def Net *aa, **oo, &b
-    workspace.Net.new *aa, **oo, &b
-  end
-
-  # Returns the net identified, or the net at point (if no argument given).
-  # 
-  def net id=nil
-    id.nil? ? @net_point : workspace.net( id )
-  end
-
-  # Returns the name of the identified net, or of the net at point (if no
-  # argument given).
-  # 
-  def ne id=nil
-    net( id ).name
-  end
-
-  # Sets net point to workspace.Net::Top
-  # 
-  def net_point_reset
-    net_point_set( workspace.Net::Top )
-  end
-
-  # Sets net point to the net identified by the argument (by name or instance).
-  # 
-  def net_point_set id
-    @net_point = workspace.net( id )
-  end
-end # module YPetri::Manipulator::PetriNetRelatedMethods

data/lib/y_petri/manipulator.rb

@@ -1,20 +0,0 @@
-#encoding: utf-8
-
-# Public command interface of YPetri.
-# 
-class YPetri::Manipulator
-  attr_reader :workspace
-
-  def initialize
-    @workspace = YPetri::Workspace.new
-    super
-  end
-
-  require_relative 'manipulator/selection'
-  require_relative 'manipulator/hash_key_pointer'
-  require_relative 'manipulator/petri_net_related_methods'
-  require_relative 'manipulator/simulation_related_methods'
-
-  include YPetri::Manipulator::PetriNetRelatedMethods
-  include YPetri::Manipulator::SimulationRelatedMethods
-end # class YPetri::Manipulator

data/lib/y_petri/net/selections.rb

@@ -1,209 +0,0 @@
-# Selections of various kinds of places / transitions (place names / transition
-# names) in a Petri net.
-# 
-class YPetri::Net
-  # Names of places in the net.
-  # 
-  def pp
-    places.map &:name
-  end
-
-  # Names of transitions in the net.
-  # 
-  def tt
-    transitions.map &:name
-  end
-
-  # Array of _ts_ transitions in the net.
-  # 
-  def timeless_nonstoichiometric_transitions
-    transitions.select { |t| t.timeless? && t.nonstoichiometric? }
-  end
-  alias ts_transitions timeless_nonstoichiometric_transitions
-
-  # Names of _ts_ transitions in the net.
-  # 
-  def timeless_nonstoichiometric_tt
-    timeless_nonstoichiometric_transitions.map &:name
-  end
-  alias ts_tt timeless_nonstoichiometric_tt
-
-  # Array of _tsa_ transitions in the net.
-  # 
-  def timeless_nonstoichiometric_nonassignment_transitions
-    transitions.select { |t|
-      t.timeless? && t.nonstoichiometric? && ! t.assignment_action?
-    }
-  end
-  alias tsa_transitions timeless_nonstoichiometric_nonassignment_transitions
-
-  # Names of _tsa_ transitions in the net.
-  # 
-  def timeless_nonstoichiometric_nonassignment_tt
-    timeless_nonstoichiometric_nonassignment_transitions.map &:name
-  end
-  alias tsa_tt timeless_nonstoichiometric_nonassignment_tt
-
-  # Array of _tS_ transitions in the net.
-  # 
-  def timeless_stoichiometric_transitions
-    transitions.select { |t| t.timeless? && t.stoichiometric? }
-  end
-  alias tS_transitions timeless_stoichiometric_transitions
-
-  # Names of _tS_ transitions in the net.
-  # 
-  def timeless_stoichiometric_tt
-    timeless_stoichiometric_transitions.map &:name
-  end
-  alias tS_tt timeless_stoichiometric_tt
-
-  # Array of _Tsr_ transitions in the net.
-  # 
-  def timed_nonstoichiometric_transitions_without_rate
-    transitions.select { |t| t.timed? && t.nonstoichiometric? && t.rateless? }
-  end
-  alias timed_rateless_nonstoichiometric_transitions \
-        timed_nonstoichiometric_transitions_without_rate
-  alias Tsr_transitions timed_nonstoichiometric_transitions_without_rate
-
-  # Names of _Tsr_ transitions in the net.
-  # 
-  def timed_nonstoichiometric_tt_without_rate
-    timed_nonstoichiometric_transitions_without_rate.map &:name
-  end
-  alias timed_rateless_nonstoichiometric_tt \
-        timed_nonstoichiometric_tt_without_rate
-  alias Tsr_tt timed_nonstoichiometric_tt_without_rate
-
-  # Array of _TSr_ transitions in the net.
-  # 
-  def timed_stoichiometric_transitions_without_rate
-    transitions.select { |t| t.timed? && t.stoichiometric? && t.rateless? }
-  end
-  alias timed_rateless_stoichiometric_transitions \
-        timed_stoichiometric_transitions_without_rate
-  alias TSr_transitions timed_stoichiometric_transitions_without_rate
-
-  # Names of _TSr_ transitions in the net.
-  # 
-  def timed_stoichiometric_tt_without_rate
-    timed_stoichiometric_transitions_without_rate.map &:name
-  end
-  alias timed_rateless_stoichiometric_tt timed_stoichiometric_tt_without_rate
-  alias Tsr_tt timed_stoichiometric_tt_without_rate
-
-  # Array of _sR_ transitions in the net.
-  # 
-  def nonstoichiometric_transitions_with_rate
-    transitions.select { |t| t.has_rate? && t.nonstoichiometric? }
-  end
-  alias sR_transitions nonstoichiometric_transitions_with_rate
-
-  # Names of _sR_ transitions in the net.
-  # 
-  def nonstoichiometric_tt_with_rate
-    nonstoichiometric_transitions_with_rate.map &:name
-  end
-  alias sR_tt nonstoichiometric_tt_with_rate
-
-  # Array of _SR_ transitions in the net.
-  # 
-  def stoichiometric_transitions_with_rate
-    transitions.select { |t| t.has_rate? and t.stoichiometric? }
-  end
-  alias SR_transitions stoichiometric_transitions_with_rate
-
-  # Names of _SR_ transitions in the net.
-  # 
-  def stoichiometric_tt_with_rate
-    stoichiometric_transitions_with_rate.map &:name
-  end
-  alias SR_tt stoichiometric_tt_with_rate
-
-  # Array of transitions with _explicit assignment action_ (_A transitions_)
-  # in the net.
-  # 
-  def assignment_transitions
-    transitions.select { |t| t.assignment_action? }
-  end
-  alias A_transitions assignment_transitions
-
-  # Names of transitions with _explicit assignment action_ (_A transitions_)
-  # in the net.
-  # 
-  def assignment_tt
-    assignment_transitions.map &:name
-  end
-  alias A_tt assignment_tt
-
-  # Array of _stoichiometric_ transitions in the net.
-  # 
-  def stoichiometric_transitions
-    transitions.select &:stoichiometric?
-  end
-  alias S_transitions stoichiometric_transitions
-
-  # Names of _stoichiometric_ transitions in the net.
-  # 
-  def stoichiometric_tt
-    stoichiometric_transitions.map &:name
-  end
-  alias S_tt stoichiometric_tt
-
-  # Array of _nonstoichiometric_ transitions in the net.
-  # 
-  def nonstoichiometric_transitions
-    transitions.select &:nonstoichiometric?
-  end
-  alias s_transitions nonstoichiometric_transitions
-
-  # Names of _nonstoichimetric_ transitions in the net.
-  # 
-  def nonstoichiometric_tt
-    nonstoichiometric_transitions.map &:name
-  end
-  alias s_tt nonstoichiometric_tt
-
-  # Array of _timed_ transitions in the net.
-  #
-  def timed_transitions; transitions.select &:timed? end
-  alias T_transitions timed_transitions
-
-  # Names of _timed_ transitions in the net.
-  # 
-  def timed_tt; timed_transitions.map &:name end
-  alias T_tt timed_tt
-
-  # Array of _timeless_ transitions in the net.
-  # 
-  def timeless_transitions; transitions.select &:timeless? end
-  alias t_transitions timeless_transitions
-
-  # Names of _timeless_ transitions in the net.
-  # 
-  def timeless_tt; timeless_transitions.map &:name end
-  alias t_tt timeless_tt
-
-  # Array of _transitions with rate_ in the net.
-  # 
-  def transitions_with_rate; transitions.select &:has_rate? end
-  alias R_transitions transitions_with_rate
-
-  # Names of _transitions with rate_ in the net.
-  # 
-  def tt_with_rate; transitions_with_rate.map &:name end
-  alias R_tt tt_with_rate
-
-  # Array of _rateless_ transitions in the net.
-  # 
-  def rateless_transitions; transitions.select &:rateless? end
-  alias transitions_without_rate rateless_transitions
-  alias r_transitions rateless_transitions
-
-  # Names of _rateless_ transitions in the net.
-  # 
-  def rateless_tt; rateless_transitions.map &:name end
-  alias tt_without_rate rateless_tt
-  alias r_tt rateless_tt
-end # class YPetri::Net