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

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

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

revision 1639 by gross, Mon Jul 14 08:55:25 2008 UTC revision 1651 by phornby, Tue Jul 15 09:33:48 2008 UTC
# Line 59  err_t Paso_Function_LinearSystem_call(Pa Line 59  err_t Paso_Function_LinearSystem_call(Pa
59      Paso_SystemMatrix* A=(Paso_SystemMatrix*)(F->more);      Paso_SystemMatrix* A=(Paso_SystemMatrix*)(F->more);
60  printf("F B\n");  printf("F B\n");
61      Paso_Copy(F->n,F->tmp,F->b); /* tmp=b */      Paso_Copy(F->n,F->tmp,F->b); /* tmp=b */
62  printf("F C %d %d %d\n",A,arg,F->tmp);  printf("F C %#lx %#lx %#lx\n",A,arg,F->tmp);
63      Paso_SystemMatrix_MatrixVector_CSR_OFFSET0(-ONE, A, arg,ONE, F->tmp); /* tmp=(tmp-A*arg) */      Paso_SystemMatrix_MatrixVector_CSR_OFFSET0(-ONE, A, arg,ONE, F->tmp); /* tmp=(tmp-A*arg) */
64  printf("F D \n");  printf("F D \n");
65      Paso_Solver_solvePreconditioner(A,value,F->tmp); /* value=P*tmp */      Paso_Solver_solvePreconditioner(A,value,F->tmp); /* value=P*tmp */

Legend:
Removed from v.1639  
changed lines
  Added in v.1651

  ViewVC Help
Powered by ViewVC 1.1.26