/[escript]/trunk/paso/src/SolverFCT_solve.c
ViewVC logotype

Diff of /trunk/paso/src/SolverFCT_solve.c

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

revision 1562 by gross, Wed May 21 13:04:40 2008 UTC revision 1570 by gross, Sat May 24 21:31:04 2008 UTC
# Line 16  Line 16 
16  /* Paso: Flux correction transport solver  /* Paso: Flux correction transport solver
17   *   *
18   * solves Mu_t=Ku+q   * solves Mu_t=Ku+q
19   *        u(0) >= u_min   *        u(0) >=0
20   *   *
21   * Warning: the program assums sum_{j} k_{ij}=0!!!   * Warning: the program assums sum_{j} k_{ij}=0!!!
22   *   *
# Line 358  void Paso_SolverFCT_solve(Paso_FCTranspo Line 358  void Paso_SolverFCT_solve(Paso_FCTranspo
358                 } /* end of time integration */                 } /* end of time integration */
359                 options->tolerance=tolerance;                 options->tolerance=tolerance;
360                 #pragma omp parallel for schedule(static) private(i)                 #pragma omp parallel for schedule(static) private(i)
361                 for (i=0;i<n_rows;++i) u[i]=fctp->u[i]+fctp->u_min;                 for (i=0;i<n_rows;++i) u[i]=fctp->u[i];
362          }          }
363          /*          /*
364           *  clean-up:           *  clean-up:

Legend:
Removed from v.1562  
changed lines
  Added in v.1570

  ViewVC Help
Powered by ViewVC 1.1.26