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

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

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

revision 4154 by jfenwick, Tue Jan 22 09:30:23 2013 UTC revision 4286 by caltinay, Thu Mar 7 04:28:11 2013 UTC
# Line 172  Paso_Preconditioner_AMG* Paso_Preconditi Line 172  Paso_Preconditioner_AMG* Paso_Preconditi
172          Paso_SystemMatrix_copyRemoteCoupleBlock(A_p, FALSE);          Paso_SystemMatrix_copyRemoteCoupleBlock(A_p, FALSE);
173    
174      /*      /*
175            set splitting of unknows:            set splitting of unknowns:
176                    
177           */           */
178       time0=Esys_timer();       time0=Esys_timer();
# Line 202  Paso_Preconditioner_AMG* Paso_Preconditi Line 202  Paso_Preconditioner_AMG* Paso_Preconditi
202          for (i = 0; i < n; ++i) F_marker[i]=(F_marker[i] ==  PASO_AMG_IN_F);          for (i = 0; i < n; ++i) F_marker[i]=(F_marker[i] ==  PASO_AMG_IN_F);
203            
204          /*          /*
205             count number of unkowns to be eliminated:             count number of unknowns to be eliminated:
206          */          */
207          my_n_F=Paso_Util_cumsum_maskedTrue(my_n,counter, F_marker);          my_n_F=Paso_Util_cumsum_maskedTrue(my_n,counter, F_marker);
208          n_F=Paso_Util_cumsum_maskedTrue(n,counter, F_marker);          n_F=Paso_Util_cumsum_maskedTrue(n,counter, F_marker);
# Line 308  Paso_Preconditioner_AMG* Paso_Preconditi Line 308  Paso_Preconditioner_AMG* Paso_Preconditi
308                          }                          }
309    
310              /*              /*
311                 constructe courser level:                 construct coarser level:
312                                
313              */              */
314              if ( Esys_noError()) {              if ( Esys_noError()) {

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

  ViewVC Help
Powered by ViewVC 1.1.26