def test_au(self):
auspec = au(sptrue(), spfalse())
self.assertEqual(auspec.type, parser.AU)
self.assertIsNotNone(auspec.car)
self.assertIsNotNone(auspec.cdr)
with self.assertRaises(ValueError):
auspec = au(None, None)
def test_car_cdr(self):
spec = au(atom("s", type_checking=False), atom("t",
type_checking=False))
self.assertEqual(spec.car, spec.car)
self.assertNotEqual(spec.car, spec.cdr)
parsed_spec = parse_ctl_spec("A [s U s]")
spec = Spec(parsed_spec)
self.assertNotEqual(spec.car, spec.cdr)
self.assertEqual(spec.car, spec.car)
newspec = au(spec.car, spec.cdr)
self.assertEqual(spec.car, newspec.car)
self.assertEqual(spec.cdr, newspec.cdr)
self.assertNotEqual(spec, newspec)
newspec2 = au(spec.car, spec.cdr)
self.assertEqual(newspec, newspec2)
s = {spec.car, spec.car, spec.cdr}
self.assertEqual(len(s), 2)
def test_car_cdr(self):
spec = au(atom("s", type_checking=False),
atom("t", type_checking=False))
self.assertEqual(spec.car, spec.car)
self.assertNotEqual(spec.car, spec.cdr)
parsed_spec = parse_ctl_spec("A [s U s]")
spec = Spec(parsed_spec)
self.assertNotEqual(spec.car, spec.cdr)
self.assertEqual(spec.car, spec.car)
newspec = au(spec.car, spec.cdr)
self.assertEqual(spec.car, newspec.car)
self.assertEqual(spec.cdr, newspec.cdr)
self.assertNotEqual(spec, newspec)
newspec2 = au(spec.car, spec.cdr)
self.assertEqual(newspec, newspec2)
s = {spec.car, spec.car, spec.cdr}
self.assertEqual(len(s), 2)
def test_types(self):
spec = au(ex(sptrue()), ag(spfalse() & sptrue()))
self.assertEqual(spec.type, parser.AU)
exspec = spec.car
self.assertEqual(exspec.type, parser.EX)
self.assertIsNone(exspec.cdr)
self.assertEqual(exspec.car.type, parser.TRUEEXP)
agspec = spec.cdr
self.assertEqual(agspec.type, parser.AG)
self.assertIsNone(agspec.cdr)
andspec = agspec.car
self.assertEqual(andspec.type, parser.AND)
self.assertEqual(andspec.car.type, parser.FALSEEXP)
self.assertEqual(andspec.cdr.type, parser.TRUEEXP)
def test_types(self):
spec = au(ex(sptrue()), ag(spfalse() & sptrue()))
self.assertEqual(spec.type, parser.AU)
exspec = spec.car
self.assertEqual(exspec.type, parser.EX)
self.assertIsNone(exspec.cdr)
self.assertEqual(exspec.car.type, parser.TRUEEXP)
agspec = spec.cdr
self.assertEqual(agspec.type, parser.AG)
self.assertIsNone(agspec.cdr)
andspec = agspec.car
self.assertEqual(andspec.type, parser.AND)
self.assertEqual(andspec.car.type, parser.FALSEEXP)
self.assertEqual(andspec.cdr.type, parser.TRUEEXP)
def countex(fsm, state, spec, context):
"""
Return a TLACE node explaining why state of fsm violates spec.
fsm -- a pynusmv.fsm.BddFsm representing the system.
state -- a pynusmv.dd.BDD representing a state of fsm.
spec -- a pynusmv.spec.spec.Spec node representing the specification.
context -- a pynusmv.spec.spec.Spec representing the context of spec in fsm.
Return a tlacenode.Tlacenode explaining why state of fsm violates spec.
"""
if spec.type == parser.CONTEXT:
return countex(fsm, state, spec.cdr, spec.car)
elif spec.type == parser.FALSEEXP:
newspec = sptrue()
elif spec.type == parser.NOT:
newspec = spec.car
elif spec.type == parser.OR:
newspec = (~spec.car) & (~spec.cdr)
elif spec.type == parser.AND:
newspec = (~spec.car) | (~spec.cdr)
elif spec.type == parser.IMPLIES:
newspec = spec.car & (~spec.cdr)
elif spec.type == parser.IFF:
newspec = (spec.car & (~spec.cdr)) | ((~spec.car) & spec.cdr)
elif spec.type == parser.EX:
newspec = ax(~spec.car)
elif spec.type == parser.EF:
newspec = ag(~spec.car)
elif spec.type == parser.EG:
newspec = af(~spec.car)
elif spec.type == parser.EU:
newspec = aw(~spec.cdr, (~spec.car) & (~spec.cdr))
elif spec.type == parser.EW:
newspec = au(~spec.cdr, (~spec.car) & (~spec.cdr))
elif spec.type == parser.AX:
newspec = ex(~spec.car)
elif spec.type == parser.AF:
newspec = eg(~spec.car)
elif spec.type == parser.AG:
newspec = ef(~spec.car)
elif spec.type == parser.AU:
newspec = ew(~spec.cdr, (~spec.car) & (~spec.cdr))
elif spec.type == parser.AW:
newspec = eu(~spec.cdr, (~spec.car) & (~spec.cdr))
else:
if spec.type == parser.NOT:
newspec = spec.car
else:
newspec = ~spec
return Tlacenode(state, (newspec,), None, None)
return witness(fsm, state, newspec, context)
def countex(fsm, state, spec, context):
"""
Return a TLACE node explaining why state of fsm violates spec.
fsm -- a pynusmv.fsm.BddFsm representing the system.
state -- a pynusmv.dd.BDD representing a state of fsm.
spec -- a pynusmv.spec.spec.Spec node representing the specification.
context -- a pynusmv.spec.spec.Spec representing the context of spec in fsm.
Return a tlacenode.Tlacenode explaining why state of fsm violates spec.
"""
if spec.type == parser.CONTEXT:
return countex(fsm, state, spec.cdr, spec.car)
elif spec.type == parser.FALSEEXP:
newspec = sptrue()
elif spec.type == parser.NOT:
newspec = spec.car
elif spec.type == parser.OR:
newspec = (~spec.car) & (~spec.cdr)
elif spec.type == parser.AND:
newspec = (~spec.car) | (~spec.cdr)
elif spec.type == parser.IMPLIES:
newspec = spec.car & (~spec.cdr)
elif spec.type == parser.IFF:
newspec = (spec.car & (~spec.cdr)) | ((~spec.car) & spec.cdr)
elif spec.type == parser.EX:
newspec = ax(~spec.car)
elif spec.type == parser.EF:
newspec = ag(~spec.car)
elif spec.type == parser.EG:
newspec = af(~spec.car)
elif spec.type == parser.EU:
newspec = aw(~spec.cdr, (~spec.car) & (~spec.cdr))
elif spec.type == parser.EW:
newspec = au(~spec.cdr, (~spec.car) & (~spec.cdr))
elif spec.type == parser.AX:
newspec = ex(~spec.car)
elif spec.type == parser.AF:
newspec = eg(~spec.car)
elif spec.type == parser.AG:
newspec = ef(~spec.car)
elif spec.type == parser.AU:
newspec = ew(~spec.cdr, (~spec.car) & (~spec.cdr))
elif spec.type == parser.AW:
newspec = eu(~spec.cdr, (~spec.car) & (~spec.cdr))
else:
if spec.type == parser.NOT:
newspec = spec.car
else:
newspec = ~spec
return Tlacenode(state, (newspec, ), None, None)
return witness(fsm, state, newspec, context)
def test_au(self):
auspec = au(sptrue(), spfalse())
self.assertEqual(auspec.type, parser.AU)
self.assertIsNotNone(auspec.car)
self.assertIsNotNone(auspec.cdr)
def ast_to_spec(ast):
"""
Return a PyNuSMV specification representing `ast`.
:param ast: an AST-based CTL formula
:return: a PyNuSMV specification representing `ast`
:rtype: :class:`pynusmv.prop.Spec`
:raise: a :exc:`NotImplementedError` if an operator is not implemented
"""
if isinstance(ast, TrueExp):
return true()
elif isinstance(ast, FalseExp):
return false()
elif isinstance(ast, Atom):
return atom(ast.value)
elif isinstance(ast, Not):
return not_(ast_to_spec(ast.child))
elif isinstance(ast, And):
return and_(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, Or):
return or_(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, Imply):
return imply(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, Iff):
return iff(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, AX):
return ax(ast_to_spec(ast.child))
elif isinstance(ast, AF):
return af(ast_to_spec(ast.child))
elif isinstance(ast, AG):
return ag(ast_to_spec(ast.child))
elif isinstance(ast, AU):
return au(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, AW):
return aw(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, EX):
return ex(ast_to_spec(ast.child))
elif isinstance(ast, EF):
return ef(ast_to_spec(ast.child))
elif isinstance(ast, EG):
return eg(ast_to_spec(ast.child))
elif isinstance(ast, EU):
return eu(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, EW):
return ew(ast_to_spec(ast.left), ast_to_spec(ast.right))
# A(phi oU psi) <=> A(phi U (phi & psi))
elif isinstance(ast, AoU):
return au(ast_to_spec(ast.left),
and_(ast_to_spec(ast.left), ast_to_spec(ast.right)))
# A(phi oW psi) <=> A(phi W (phi & psi))
elif isinstance(ast, AoW):
return aw(ast_to_spec(ast.left),
and_(ast_to_spec(ast.left), ast_to_spec(ast.right)))
# A(phi dU psi) <=> A(phi U (!phi & psi))
elif isinstance(ast, AdU):
return au(ast_to_spec(ast.left),
and_(not_(ast_to_spec(ast.left)), ast_to_spec(ast.right)))
# A(phi dW psi) <=> A(phi W (!phi & psi))
elif isinstance(ast, AdW):
return aw(ast_to_spec(ast.left),
and_(not_(ast_to_spec(ast.left)), ast_to_spec(ast.right)))
# E(phi oU psi) <=> E(phi U (phi & psi))
elif isinstance(ast, EoU):
return eu(ast_to_spec(ast.left),
and_(ast_to_spec(ast.left), ast_to_spec(ast.right)))
# E(phi oW psi) <=> E(phi W (phi & psi))
elif isinstance(ast, EoW):
return ew(ast_to_spec(ast.left),
and_(ast_to_spec(ast.left), ast_to_spec(ast.right)))
# E(phi dU psi) <=> E(phi U (!phi & psi))
elif isinstance(ast, EdU):
return eu(ast_to_spec(ast.left),
and_(not_(ast_to_spec(ast.left)), ast_to_spec(ast.right)))
# E(phi dW psi) <=> E(phi W (!phi & psi))
elif isinstance(ast, EdW):
return ew(ast_to_spec(ast.left),
and_(not_(ast_to_spec(ast.left)), ast_to_spec(ast.right)))
else:
raise NotImplementedError(NOT_IMPLEMENTED_MSG.format(op=type(ast)))
def ast_to_spec(ast):
"""
Return a PyNuSMV specification representing `ast`.
:param ast: an AST-based CTL formula
:return: a PyNuSMV specification representing `ast`
:rtype: :class:`pynusmv.prop.Spec`
:raise: a :exc:`NotImplementedError` if an operator is not implemented
"""
if isinstance(ast, TrueExp):
return true()
elif isinstance(ast, FalseExp):
return false()
elif isinstance(ast, Atom):
return atom(ast.value)
elif isinstance(ast, Not):
return not_(ast_to_spec(ast.child))
elif isinstance(ast, And):
return and_(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, Or):
return or_(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, Imply):
return imply(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, Iff):
return iff(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, AX):
return ax(ast_to_spec(ast.child))
elif isinstance(ast, AF):
return af(ast_to_spec(ast.child))
elif isinstance(ast, AG):
return ag(ast_to_spec(ast.child))
elif isinstance(ast, AU):
return au(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, AW):
return aw(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, EX):
return ex(ast_to_spec(ast.child))
elif isinstance(ast, EF):
return ef(ast_to_spec(ast.child))
elif isinstance(ast, EG):
return eg(ast_to_spec(ast.child))
elif isinstance(ast, EU):
return eu(ast_to_spec(ast.left), ast_to_spec(ast.right))
elif isinstance(ast, EW):
return ew(ast_to_spec(ast.left), ast_to_spec(ast.right))
# A(phi oU psi) <=> A(phi U (phi & psi))
elif isinstance(ast, AoU):
return au(ast_to_spec(ast.left),
and_(ast_to_spec(ast.left), ast_to_spec(ast.right)))
# A(phi oW psi) <=> A(phi W (phi & psi))
elif isinstance(ast, AoW):
return aw(ast_to_spec(ast.left),
and_(ast_to_spec(ast.left), ast_to_spec(ast.right)))
# A(phi dU psi) <=> A(phi U (!phi & psi))
elif isinstance(ast, AdU):
return au(ast_to_spec(ast.left),
and_(not_(ast_to_spec(ast.left)), ast_to_spec(ast.right)))
# A(phi dW psi) <=> A(phi W (!phi & psi))
elif isinstance(ast, AdW):
return aw(ast_to_spec(ast.left),
and_(not_(ast_to_spec(ast.left)), ast_to_spec(ast.right)))
# E(phi oU psi) <=> E(phi U (phi & psi))
elif isinstance(ast, EoU):
return eu(ast_to_spec(ast.left),
and_(ast_to_spec(ast.left), ast_to_spec(ast.right)))
# E(phi oW psi) <=> E(phi W (phi & psi))
elif isinstance(ast, EoW):
return ew(ast_to_spec(ast.left),
and_(ast_to_spec(ast.left), ast_to_spec(ast.right)))
# E(phi dU psi) <=> E(phi U (!phi & psi))
elif isinstance(ast, EdU):
return eu(ast_to_spec(ast.left),
and_(not_(ast_to_spec(ast.left)), ast_to_spec(ast.right)))
# E(phi dW psi) <=> E(phi W (!phi & psi))
elif isinstance(ast, EdW):
return ew(ast_to_spec(ast.left),
and_(not_(ast_to_spec(ast.left)), ast_to_spec(ast.right)))
else:
raise NotImplementedError(NOT_IMPLEMENTED_MSG.format(op=type(ast)))
