Pedantry: The last extraneous ';'s
[charm.git] / examples / charm++ / RedExample / RedExample.C
1 #include <stdio.h>
2 #include "RedExample.decl.h"
3 #include <math.h>
4
5
6 /*readonly*/ CProxy_main mainProxy;
7 /*readonly*/ int units;
8 /*readonly*/ double dOne;
9 /*readonly*/ double dTwo;
10 #include "RedExample.h"
11
12 /*mainchare*/
13
14 main::main(CkArgMsg* m)
15   {
16     //Process command-line arguments
17     //Start the computation
18
19     mainProxy = thishandle;
20     if(m->argc<2)
21       {
22         CkExit();
23       }
24     units=atoi(m->argv[1]);
25     dOne=atof(m->argv[2]);
26     dTwo=atof(m->argv[3]);
27     
28     arr = CProxy_RedExample::ckNew(units);
29
30     CkPrintf("RedExample for %d pes on %d units for %f and %f\n",
31              CkNumPes(),units,dOne, dTwo);
32
33     CkCallback *cb = new CkCallback(CkIndex_main::reportIn(NULL),  mainProxy);
34     arr.ckSetReductionClient(cb);
35     arr.dowork();
36   }
37
38
39
40 #include "RedExample.def.h"