source: CIVL/examples/experimental/sequential/dummyMpiTest.c@ fffb3b88

1.23 2.0 main test-branch
Last change on this file since fffb3b88 was 9d7c12b, checked in by Ziqing Luo <ziqing@…>, 10 years ago

add translation of MPI_Collective block

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@3017 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100644
File size: 255 bytes
Line 
1#include<mpi.h>
2
3double * u;
4int nx = 10;
5
6/*@
7 @ requires \valid(u + (0 .. 10));
8 @ requires nx == 10;
9 @*/
10void update(int x) {
11 for (int i = 0; i < nx; i++)
12 u[i] = u[i]*2;
13}
14
15
16int main() {
17 int dummy = 7;
18 update(0);
19 dummy=8;
20 return 0;
21}
Note: See TracBrowser for help on using the repository browser.