/[escript]/trunk/paso/profiling/Test.c
ViewVC logotype

Diff of /trunk/paso/profiling/Test.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2165 by artak, Tue Dec 16 05:32:43 2008 UTC revision 2168 by artak, Wed Dec 17 00:50:37 2008 UTC
# Line 14  int main (int argc, char *argv[]) { Line 14  int main (int argc, char *argv[]) {
14          return -1;              return -1;    
15      }      }
16    
17      if (argc==3) {      if (argc>2) {
18        level=atoi(argv[2]);        level=atoi(argv[2]);
19      }      }
20            
# Line 28  int main (int argc, char *argv[]) { Line 28  int main (int argc, char *argv[]) {
28      n=Paso_SystemMatrix_getTotalNumRows(A);      n=Paso_SystemMatrix_getTotalNumRows(A);
29      b=MEMALLOC(n,double);      b=MEMALLOC(n,double);
30      x=MEMALLOC(n,double);      x=MEMALLOC(n,double);
31      for(i=0;i<n;i++)      
32      {      if(argc==4) {
33       b[i]=1;          Paso_RHS_loadMM_toCSR(argv[3],b,n);
34        }
35        else {
36            for(i=0;i<n;i++) {
37              b[i]=1;
38            }    
39      }      }
40            
41        
42      Paso_test_run(A,b,level);      Paso_test_run(A,b,level);
43      MEMFREE(b);      MEMFREE(b);
44      MEMFREE(x);      MEMFREE(x);

Legend:
Removed from v.2165  
changed lines
  Added in v.2168

  ViewVC Help
Powered by ViewVC 1.1.26