diff options
author | ArenBabikian <aren.babikian@mail.mcgill.ca> | 2020-04-28 00:29:00 -0400 |
---|---|---|
committer | ArenBabikian <aren.babikian@mail.mcgill.ca> | 2020-04-28 00:29:00 -0400 |
commit | 68a0667e862f0714410aafbb499a95a03f5bee23 (patch) | |
tree | 34b7d690dae5b9dd8f188fc44802a02f8dd9a64a /Tests/MODELS2020-CaseStudies/case.study.pledge.run/ocl | |
parent | rename Pledge Case Studies and add familyTree case study (diff) | |
download | VIATRA-Generator-68a0667e862f0714410aafbb499a95a03f5bee23.tar.gz VIATRA-Generator-68a0667e862f0714410aafbb499a95a03f5bee23.tar.zst VIATRA-Generator-68a0667e862f0714410aafbb499a95a03f5bee23.zip |
Able to run Pledge Case Study
Diffstat (limited to 'Tests/MODELS2020-CaseStudies/case.study.pledge.run/ocl')
-rw-r--r-- | Tests/MODELS2020-CaseStudies/case.study.pledge.run/ocl/queries.ocl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/Tests/MODELS2020-CaseStudies/case.study.pledge.run/ocl/queries.ocl b/Tests/MODELS2020-CaseStudies/case.study.pledge.run/ocl/queries.ocl new file mode 100644 index 00000000..de770240 --- /dev/null +++ b/Tests/MODELS2020-CaseStudies/case.study.pledge.run/ocl/queries.ocl | |||
@@ -0,0 +1,14 @@ | |||
1 | import 'file:/Users/Aren Babikian/git/VIATRA-Attributes/original.PLEDGE.case.studies/model/CD_Case_A.uml' | ||
2 | --e.g., import 'file:/Users/User_X/CD_Case_A.uml' | ||
3 | |||
4 | package Taxation | ||
5 | |||
6 | context Income inv x: | ||
7 | let involved_details:Set(Income_Detail)=self.details->select(i:Income_Detail| i.is_worked=true) in | ||
8 | involved_details.amount->sum() | ||
9 | |||
10 | context Expense inv inv11: | ||
11 | let max:Real = if((self.income.income_amount / 2)>50) then self.income.income_amount / 2 else 50 endif in | ||
12 | self.declared_amount >= 50 and self.declared_amount <= max | ||
13 | |||
14 | endpackage \ No newline at end of file | ||