Source code for pytableaux.logics.s5

# -*- coding: utf-8 -*-
# pytableaux, a multi-logic proof generator.
# Copyright (C) 2014-2023 Doug Owings.
# 
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU Affero General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
# 
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU Affero General Public License for more details.
# 
# You should have received a copy of the GNU Affero General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
from __future__ import annotations

from ..lang import Marking
from ..proof import AccessNode, adds
from ..proof.helpers import FilterHelper, MaxWorlds, WorldIndex
from ..tools import group
from . import k as K
from . import s4 as S4
from . import LogicType


class Meta(S4.Meta):
    name = 'S5'
    title = 'S5 Normal Modal Logic'
    description = (
        'Normal modal logic with a reflexive, symmetric, and transitive '
        'access relation')
    category_order = 5
    extension_of = ('S4', 'S5K3', 'S5LP', 'S5L3', 'S5RM3', 'S5K3W', 'S5B3E', 'S5G3')

class Model(S4.Model):

    def finish(self):
        self._check_not_finished()
        self._ensure_global_access()
        return super().finish()

    def _ensure_global_access(self):
        R = self.R
        while True:
            self._ensure_reflexive_transitive()
            to_add = set()
            add = to_add.add
            for w1 in self.frames:
                for w2 in R[w1]:
                    if w1 not in R[w2]:
                        add((w2, w1))
            if not to_add:
                break
            for _ in map(R.add, to_add): pass

class System(K.System): pass

[docs] class Rules(LogicType.Rules): closure = K.Rules.closure
[docs] class Symmetric(System.DefaultNodeRule): """ .. _symmetric-rule: For any world *w* appearing on a branch *b*, for each world *w'* on *b*, if *wRw'* appears on *b*, but *w'Rw* does not appear on *b*, then add *w'Rw* to *b*. """ Helpers = (MaxWorlds, WorldIndex) NodeType = AccessNode ticking = False marklegend = [(Marking.tableau, ('access', 'symmetric'))] defaults = dict(is_rank_optim = False) def _get_node_targets(self, node: AccessNode, branch,/): if self[MaxWorlds].is_exceeded(branch): self[FilterHelper].release(node, branch) return pair = node.pair().reversed() if self[WorldIndex].has(branch, pair): self[FilterHelper].release(node, branch) return nnode = pair.tonode() yield adds(group(nnode), **nnode)
groups = ( *S4.Rules.groups, group(Symmetric))
# TODO: # Some problematic arguments for S5: # # VxLUFxMSyLGy |- b or ∀x◻(Fx → ◇∃y◻Gy) |- B (also bad for S4)