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

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

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

revision 3021 by gross, Tue May 4 10:14:12 2010 UTC revision 3022 by gross, Wed May 5 00:14:45 2010 UTC
# Line 44  err_t  Paso_ReactiveSolver_solve(Paso_Re Line 44  err_t  Paso_ReactiveSolver_solve(Paso_Re
44       dim_t i;       dim_t i;
45       const dim_t n=Paso_SystemMatrix_getTotalNumRows(fctp->transport_matrix);       const dim_t n=Paso_SystemMatrix_getTotalNumRows(fctp->transport_matrix);
46            
47       #pragma omp parallel for schedule(static) private(i, d_ii, m_i, x_i, e_i, u_i. F_i)       #pragma omp parallel for schedule(static) private(i, d_ii, m_i, x_i, e_i, u_i, F_i)
48       for (i=0;i<n;++i) {       for (i=0;i<n;++i) {
49          d_ii=fctp->reactive_matrix[i];          d_ii=fctp->reactive_matrix[i];
50          m_i=fctp->lumped_mass_matrix[i];          m_i=fctp->lumped_mass_matrix[i];

Legend:
Removed from v.3021  
changed lines
  Added in v.3022

  ViewVC Help
Powered by ViewVC 1.1.26