diff options
| author |  ArenBabikian <aren.babikian@mail.mcgill.ca> | 2020-04-26 18:23:13 -0400 |
|---|---|---|
| committer | ArenBabikian <aren.babikian@mail.mcgill.ca> | 2020-04-26 18:23:13 -0400 |
| commit | c0a758eedd457a5d8eb9f1a6c17fc24143aabb3e (patch) | |
| tree | 0c2e212e4e95c1d2311629128641d5cd561210f3 /Tests/MODELS2020-CaseStudies/case.study.pledge.queries/ocl | |
| parent | Merge branch 'Attribute-Solver' (diff) | |
| download | VIATRA-Generator-c0a758eedd457a5d8eb9f1a6c17fc24143aabb3e.tar.gz VIATRA-Generator-c0a758eedd457a5d8eb9f1a6c17fc24143aabb3e.tar.zst VIATRA-Generator-c0a758eedd457a5d8eb9f1a6c17fc24143aabb3e.zip | |
Add PLEDGE case study files
Diffstat (limited to 'Tests/MODELS2020-CaseStudies/case.study.pledge.queries/ocl')
| -rw-r--r-- | Tests/MODELS2020-CaseStudies/case.study.pledge.queries/ocl/queries.ocl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/Tests/MODELS2020-CaseStudies/case.study.pledge.queries/ocl/queries.ocl b/Tests/MODELS2020-CaseStudies/case.study.pledge.queries/ocl/queries.ocl new file mode 100644 index 00000000..de770240 --- /dev/null +++ b/Tests/MODELS2020-CaseStudies/case.study.pledge.queries/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 | ||