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

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

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

revision 4285 by jfenwick, Wed Jan 23 00:05:03 2013 UTC revision 4286 by caltinay, Thu Mar 7 04:28:11 2013 UTC
# Line 188  Paso_Solver_GS* Paso_Solver_getGSMPI(Pas Line 188  Paso_Solver_GS* Paso_Solver_getGSMPI(Pas
188    if (Paso_noError()) {    if (Paso_noError()) {
189        if (verbose) {        if (verbose) {
190           printf("GS_MPI: %d color used \n",out->num_colors);           printf("GS_MPI: %d color used \n",out->num_colors);
191           printf("timing: GS_MPI: coloring/elemination : %e/%e\n",time_color,time_fac);           printf("timing: GS_MPI: coloring/elimination : %e/%e\n",time_color,time_fac);
192       }       }
193       return out;       return out;
194    } else  {    } else  {
# Line 374  void Paso_Solver_GS_local(Paso_SystemMat Line 374  void Paso_Solver_GS_local(Paso_SystemMat
374    
375       /* step 1: forward iteration       /* step 1: forward iteration
376                 x{k} = D{-1}(b - E*x{k} - F*x{k-1}) */                 x{k} = D{-1}(b - E*x{k} - F*x{k-1}) */
377       /* One Guass-Seidel iteration       /* One Gauss-Seidel iteration
378          In case of forward iteration x{k} = D{-1}(b - E*x{k} - F*x{k-1})          In case of forward iteration x{k} = D{-1}(b - E*x{k} - F*x{k-1})
379             => into a loop (without coloring):             => into a loop (without coloring):
380              for i in [0,n-1] do                  for i in [0,n-1] do    

Legend:
Removed from v.4285  
changed lines
  Added in v.4286

  ViewVC Help
Powered by ViewVC 1.1.26