/[escript]/branches/windows_from_1456_trunk_1580_merged_in/paso/src/SolverFCT.c
ViewVC logotype

Diff of /branches/windows_from_1456_trunk_1580_merged_in/paso/src/SolverFCT.c

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

revision 1616 by phornby, Wed Jun 4 07:10:43 2008 UTC revision 1617 by ksteube, Mon Jun 23 23:01:27 2008 UTC
# Line 122  Paso_FCTransportProblem* Paso_FCTranspor Line 122  Paso_FCTransportProblem* Paso_FCTranspor
122                      out->u[i]=0.;                      out->u[i]=0.;
123                   }                   }
124                   /* identify the main diagonals */                   /* identify the main diagonals */
125                   #pragma omp for schedule(static) private(i,iptr,iptr_main,k)                   #pragma omp for schedule(static) private(i,iptr,iptr_main)
126                   for (i = 0; i < n; ++i) {                   for (i = 0; i < n; ++i) {
127                          iptr_main=pattern->mainPattern->ptr[0]-1;                          iptr_main=pattern->mainPattern->ptr[0]-1;
128                          for (iptr=pattern->mainPattern->ptr[i];iptr<pattern->mainPattern->ptr[i+1]; iptr++) {                          for (iptr=pattern->mainPattern->ptr[i];iptr<pattern->mainPattern->ptr[i+1]; iptr++) {

Legend:
Removed from v.1616  
changed lines
  Added in v.1617

  ViewVC Help
Powered by ViewVC 1.1.26