source:
CIVL/mods/dev.civl.com/examples/languageFeatures/civlParfor.cvl@
cb4d4f4
| Last change on this file since cb4d4f4 was aad342c, checked in by , 3 years ago | |
|---|---|
|
|
| File size: 333 bytes | |
| Rev | Line | |
|---|---|---|
| [e6b02c8] | 1 | #include <civlc.cvh> |
| [a28bfea] | 2 | #include <stdio.h> |
| [3f8afc7] | 3 | |
| 4 | void main(){ | |
| 5 | $range r1 = 1 .. 2; | |
| 6 | $range r2 = 1 .. 2#1; | |
| 7 | $range r3 = 1 .. 2#1; | |
| 8 | $domain(3) dom = ($domain){r1, r2, r3}; | |
| 9 | int sum = 0; | |
| 10 | ||
| 11 | $parfor(int i,j,k : dom){ | |
| [a28bfea] | 12 | printf("This is proc %s, my i,j,k: %d, %d, %d\n", $self, i, j, k); |
| [3f8afc7] | 13 | sum += i * j * k; |
| 14 | } | |
| [d980649] | 15 | $assert(sum == 27); |
| [3f8afc7] | 16 | } |
Note:
See TracBrowser
for help on using the repository browser.
