You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
220 lines
9.3 KiB
220 lines
9.3 KiB
#include "gtest/gtest.h"
|
|
#include "storm-config.h"
|
|
|
|
#include "src/utility/Settings.h"
|
|
#include "src/modelchecker/GmmxxMdpPrctlModelChecker.h"
|
|
#include "src/parser/AutoParser.h"
|
|
|
|
TEST(GmmxxMdpPrctModelCheckerTest, AsynchronousLeader) {
|
|
storm::settings::Settings* s = storm::settings::instance();
|
|
storm::parser::AutoParser<double> parser(STORM_CPP_BASE_PATH "/examples/mdp/asynchronous_leader/leader7.tra", STORM_CPP_BASE_PATH "/examples/mdp/asynchronous_leader/leader7.lab", "", STORM_CPP_BASE_PATH "/examples/mdp/asynchronous_leader/leader7.trans.rew");
|
|
|
|
ASSERT_EQ(parser.getType(), storm::models::MDP);
|
|
|
|
std::shared_ptr<storm::models::Mdp<double>> mdp = parser.getModel<storm::models::Mdp<double>>();
|
|
|
|
ASSERT_EQ(mdp->getNumberOfStates(), 2095783u);
|
|
ASSERT_EQ(mdp->getNumberOfTransitions(), 7714385u);
|
|
|
|
storm::modelchecker::GmmxxMdpPrctlModelChecker<double> mc(*mdp);
|
|
|
|
storm::property::prctl::Ap<double>* apFormula = new storm::property::prctl::Ap<double>("elected");
|
|
storm::property::prctl::Eventually<double>* eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
|
|
storm::property::prctl::ProbabilisticNoBoundOperator<double>* probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula, true);
|
|
|
|
std::vector<double>* result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[0] - 1), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("elected");
|
|
eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
|
|
probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula, false);
|
|
|
|
result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[0] - 1), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("elected");
|
|
storm::property::prctl::BoundedEventually<double>* boundedEventuallyFormula = new storm::property::prctl::BoundedEventually<double>(apFormula, 25);
|
|
probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(boundedEventuallyFormula, true);
|
|
|
|
result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[0] - 0), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("elected");
|
|
boundedEventuallyFormula = new storm::property::prctl::BoundedEventually<double>(apFormula, 25);
|
|
probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(boundedEventuallyFormula, false);
|
|
|
|
result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[0] - 0), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("elected");
|
|
storm::property::prctl::ReachabilityReward<double>* reachabilityRewardFormula = new storm::property::prctl::ReachabilityReward<double>(apFormula);
|
|
storm::property::prctl::RewardNoBoundOperator<double>* rewardFormula = new storm::property::prctl::RewardNoBoundOperator<double>(reachabilityRewardFormula, true);
|
|
|
|
result = mc.checkNoBoundOperator(*rewardFormula);
|
|
|
|
ASSERT_LT(std::abs((*result)[0] - 6.172433512), s->get<double>("precision"));
|
|
|
|
delete rewardFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("elected");
|
|
reachabilityRewardFormula = new storm::property::prctl::ReachabilityReward<double>(apFormula);
|
|
rewardFormula = new storm::property::prctl::RewardNoBoundOperator<double>(reachabilityRewardFormula, false);
|
|
|
|
result = mc.checkNoBoundOperator(*rewardFormula);;
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[0] - 6.1724344), s->get<double>("precision"));
|
|
|
|
delete rewardFormula;
|
|
delete result;
|
|
}
|
|
|
|
TEST(GmmxxMdpPrctModelCheckerTest, Consensus) {
|
|
storm::settings::Settings* s = storm::settings::instance();
|
|
storm::parser::AutoParser<double> parser(STORM_CPP_BASE_PATH "/examples/mdp/consensus/coin4_6.tra", STORM_CPP_BASE_PATH "/examples/mdp/consensus/coin4_6.lab", STORM_CPP_BASE_PATH "/examples/mdp/consensus/coin4_6.steps.state.rew", "");
|
|
|
|
ASSERT_EQ(parser.getType(), storm::models::MDP);
|
|
|
|
std::shared_ptr<storm::models::Mdp<double>> mdp = parser.getModel<storm::models::Mdp<double>>();
|
|
|
|
ASSERT_EQ(mdp->getNumberOfStates(), 63616u);
|
|
ASSERT_EQ(mdp->getNumberOfTransitions(), 213472u);
|
|
|
|
storm::modelchecker::GmmxxMdpPrctlModelChecker<double> mc(*mdp);
|
|
|
|
storm::property::prctl::Ap<double>* apFormula = new storm::property::prctl::Ap<double>("finished");
|
|
storm::property::prctl::Eventually<double>* eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
|
|
storm::property::prctl::ProbabilisticNoBoundOperator<double>* probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula, true);
|
|
|
|
std::vector<double>* result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[31168] - 1), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("finished");
|
|
storm::property::prctl::Ap<double>* apFormula2 = new storm::property::prctl::Ap<double>("all_coins_equal_0");
|
|
storm::property::prctl::And<double>* andFormula = new storm::property::prctl::And<double>(apFormula, apFormula2);
|
|
eventuallyFormula = new storm::property::prctl::Eventually<double>(andFormula);
|
|
probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula, true);
|
|
|
|
result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[31168] - 0.4370098591707694546393), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("finished");
|
|
apFormula2 = new storm::property::prctl::Ap<double>("all_coins_equal_1");
|
|
andFormula = new storm::property::prctl::And<double>(apFormula, apFormula2);
|
|
eventuallyFormula = new storm::property::prctl::Eventually<double>(andFormula);
|
|
probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula, false);
|
|
|
|
result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[31168] - 0.5282872761373342829216), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("finished");
|
|
apFormula2 = new storm::property::prctl::Ap<double>("agree");
|
|
storm::property::prctl::Not<double>* notFormula = new storm::property::prctl::Not<double>(apFormula2);
|
|
andFormula = new storm::property::prctl::And<double>(apFormula, notFormula);
|
|
eventuallyFormula = new storm::property::prctl::Eventually<double>(andFormula);
|
|
probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula, false);
|
|
|
|
result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[31168] - 0.10343451035775527713), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("finished");
|
|
storm::property::prctl::BoundedEventually<double>* boundedEventuallyFormula = new storm::property::prctl::BoundedEventually<double>(apFormula, 50);
|
|
probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(boundedEventuallyFormula, true);
|
|
|
|
result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[31168] - 0), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("finished");
|
|
boundedEventuallyFormula = new storm::property::prctl::BoundedEventually<double>(apFormula, 50);
|
|
probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(boundedEventuallyFormula, false);
|
|
|
|
result = mc.checkNoBoundOperator(*probFormula);
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[31168] - 0), s->get<double>("precision"));
|
|
|
|
delete probFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("finished");
|
|
storm::property::prctl::ReachabilityReward<double>* reachabilityRewardFormula = new storm::property::prctl::ReachabilityReward<double>(apFormula);
|
|
storm::property::prctl::RewardNoBoundOperator<double>* rewardFormula = new storm::property::prctl::RewardNoBoundOperator<double>(reachabilityRewardFormula, true);
|
|
|
|
result = mc.checkNoBoundOperator(*rewardFormula);
|
|
|
|
ASSERT_LT(std::abs((*result)[31168] - 1725.5933133943854045), s->get<double>("precision"));
|
|
|
|
delete rewardFormula;
|
|
delete result;
|
|
|
|
apFormula = new storm::property::prctl::Ap<double>("finished");
|
|
reachabilityRewardFormula = new storm::property::prctl::ReachabilityReward<double>(apFormula);
|
|
rewardFormula = new storm::property::prctl::RewardNoBoundOperator<double>(reachabilityRewardFormula, false);
|
|
|
|
result = mc.checkNoBoundOperator(*rewardFormula);;
|
|
|
|
ASSERT_NE(nullptr, result);
|
|
|
|
ASSERT_LT(std::abs((*result)[31168] - 2179.014847073392047605011), s->get<double>("precision"));
|
|
|
|
delete rewardFormula;
|
|
delete result;
|
|
|
|
}
|