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.

182 lines
7.9 KiB

  1. #include "gtest/gtest.h"
  2. #include "storm-config.h"
  3. #include "src/solver/GmmxxLinearEquationSolver.h"
  4. #include "src/modelchecker/prctl/SparseDtmcPrctlModelChecker.h"
  5. #include "src/settings/Settings.h"
  6. #include "src/parser/AutoParser.h"
  7. TEST(GmmxxDtmcPrctlModelCheckerTest, Die) {
  8. storm::settings::Settings* s = storm::settings::Settings::getInstance();
  9. s->set("fixDeadlocks");
  10. storm::parser::AutoParser<double> parser(STORM_CPP_BASE_PATH "/examples/dtmc/die/die.tra", STORM_CPP_BASE_PATH "/examples/dtmc/die/die.lab", "", STORM_CPP_BASE_PATH "/examples/dtmc/die/die.coin_flips.trans.rew");
  11. ASSERT_EQ(parser.getType(), storm::models::DTMC);
  12. std::shared_ptr<storm::models::Dtmc<double>> dtmc = parser.getModel<storm::models::Dtmc<double>>();
  13. ASSERT_EQ(dtmc->getNumberOfStates(), 13u);
  14. ASSERT_EQ(dtmc->getNumberOfTransitions(), 27u);
  15. storm::modelchecker::prctl::SparseDtmcPrctlModelChecker<double> mc(*dtmc, new storm::solver::GmmxxLinearEquationSolver<double>());
  16. storm::property::prctl::Ap<double>* apFormula = new storm::property::prctl::Ap<double>("one");
  17. storm::property::prctl::Eventually<double>* eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
  18. storm::property::prctl::ProbabilisticNoBoundOperator<double>* probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula);
  19. std::vector<double>* result = probFormula->check(mc);
  20. ASSERT_NE(nullptr, result);
  21. ASSERT_LT(std::abs((*result)[0] - ((double)1/6)), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  22. delete probFormula;
  23. delete result;
  24. apFormula = new storm::property::prctl::Ap<double>("two");
  25. eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
  26. probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula);
  27. result = probFormula->check(mc);
  28. ASSERT_NE(nullptr, result);
  29. ASSERT_LT(std::abs((*result)[0] - ((double)1/6)), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  30. delete probFormula;
  31. delete result;
  32. apFormula = new storm::property::prctl::Ap<double>("three");
  33. eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
  34. probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula);
  35. result = probFormula->check(mc);
  36. ASSERT_NE(nullptr, result);
  37. ASSERT_LT(std::abs((*result)[0] - ((double)1/6)), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  38. delete probFormula;
  39. delete result;
  40. storm::property::prctl::Ap<double>* done = new storm::property::prctl::Ap<double>("done");
  41. storm::property::prctl::ReachabilityReward<double>* reachabilityRewardFormula = new storm::property::prctl::ReachabilityReward<double>(done);
  42. storm::property::prctl::RewardNoBoundOperator<double>* rewardFormula = new storm::property::prctl::RewardNoBoundOperator<double>(reachabilityRewardFormula);
  43. result = rewardFormula->check(mc);
  44. ASSERT_NE(nullptr, result);
  45. ASSERT_LT(std::abs((*result)[0] - ((double)11/3)), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  46. delete rewardFormula;
  47. delete result;
  48. }
  49. TEST(GmmxxDtmcPrctlModelCheckerTest, Crowds) {
  50. storm::settings::Settings* s = storm::settings::Settings::getInstance();
  51. s->set("fixDeadlocks");
  52. storm::parser::AutoParser<double> parser(STORM_CPP_BASE_PATH "/examples/dtmc/crowds/crowds5_5.tra", STORM_CPP_BASE_PATH "/examples/dtmc/crowds/crowds5_5.lab", "", "");
  53. ASSERT_EQ(parser.getType(), storm::models::DTMC);
  54. std::shared_ptr<storm::models::Dtmc<double>> dtmc = parser.getModel<storm::models::Dtmc<double>>();
  55. ASSERT_EQ(dtmc->getNumberOfStates(), 8607u);
  56. ASSERT_EQ(dtmc->getNumberOfTransitions(), 22460u);
  57. storm::modelchecker::prctl::SparseDtmcPrctlModelChecker<double> mc(*dtmc, new storm::solver::GmmxxLinearEquationSolver<double>());
  58. storm::property::prctl::Ap<double>* apFormula = new storm::property::prctl::Ap<double>("observe0Greater1");
  59. storm::property::prctl::Eventually<double>* eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
  60. storm::property::prctl::ProbabilisticNoBoundOperator<double>* probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula);
  61. std::vector<double>* result = probFormula->check(mc);
  62. ASSERT_NE(nullptr, result);
  63. ASSERT_LT(std::abs((*result)[0] - 0.3328800375801578281), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  64. delete probFormula;
  65. delete result;
  66. apFormula = new storm::property::prctl::Ap<double>("observeIGreater1");
  67. eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
  68. probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula);
  69. result = probFormula->check(mc);
  70. ASSERT_NE(nullptr, result);
  71. ASSERT_LT(std::abs((*result)[0] - 0.1522194965), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  72. delete probFormula;
  73. delete result;
  74. apFormula = new storm::property::prctl::Ap<double>("observeOnlyTrueSender");
  75. eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
  76. probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula);
  77. result = probFormula->check(mc);
  78. ASSERT_NE(nullptr, result);
  79. ASSERT_LT(std::abs((*result)[0] - 0.32153724292835045), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  80. delete probFormula;
  81. delete result;
  82. }
  83. TEST(GmmxxDtmcPrctlModelCheckerTest, SynchronousLeader) {
  84. storm::settings::Settings* s = storm::settings::Settings::getInstance();
  85. s->set("fixDeadlocks");
  86. storm::parser::AutoParser<double> parser(STORM_CPP_BASE_PATH "/examples/dtmc/synchronous_leader/leader4_8.tra", STORM_CPP_BASE_PATH "/examples/dtmc/synchronous_leader/leader4_8.lab", "", STORM_CPP_BASE_PATH "/examples/dtmc/synchronous_leader/leader4_8.pick.trans.rew");
  87. ASSERT_EQ(parser.getType(), storm::models::DTMC);
  88. std::shared_ptr<storm::models::Dtmc<double>> dtmc = parser.getModel<storm::models::Dtmc<double>>();
  89. ASSERT_EQ(dtmc->getNumberOfStates(), 12400u);
  90. ASSERT_EQ(dtmc->getNumberOfTransitions(), 28894u);
  91. storm::modelchecker::prctl::SparseDtmcPrctlModelChecker<double> mc(*dtmc, new storm::solver::GmmxxLinearEquationSolver<double>());
  92. storm::property::prctl::Ap<double>* apFormula = new storm::property::prctl::Ap<double>("elected");
  93. storm::property::prctl::Eventually<double>* eventuallyFormula = new storm::property::prctl::Eventually<double>(apFormula);
  94. storm::property::prctl::ProbabilisticNoBoundOperator<double>* probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(eventuallyFormula);
  95. std::vector<double>* result = probFormula->check(mc);
  96. ASSERT_NE(nullptr, result);
  97. ASSERT_LT(std::abs((*result)[0] - 1), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  98. delete probFormula;
  99. delete result;
  100. apFormula = new storm::property::prctl::Ap<double>("elected");
  101. storm::property::prctl::BoundedUntil<double>* boundedUntilFormula = new storm::property::prctl::BoundedUntil<double>(new storm::property::prctl::Ap<double>("true"), apFormula, 20);
  102. probFormula = new storm::property::prctl::ProbabilisticNoBoundOperator<double>(boundedUntilFormula);
  103. result = probFormula->check(mc);
  104. ASSERT_NE(nullptr, result);
  105. ASSERT_LT(std::abs((*result)[0] - 0.9999965911265462636), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  106. delete probFormula;
  107. delete result;
  108. apFormula = new storm::property::prctl::Ap<double>("elected");
  109. storm::property::prctl::ReachabilityReward<double>* reachabilityRewardFormula = new storm::property::prctl::ReachabilityReward<double>(apFormula);
  110. storm::property::prctl::RewardNoBoundOperator<double>* rewardFormula = new storm::property::prctl::RewardNoBoundOperator<double>(reachabilityRewardFormula);
  111. result = rewardFormula->check(mc);
  112. ASSERT_NE(nullptr, result);
  113. ASSERT_LT(std::abs((*result)[0] - 1.044879046), s->getOptionByLongName("precision").getArgument(0).getValueAsDouble());
  114. delete rewardFormula;
  115. delete result;
  116. }