/[escript]/trunk-mpi-branch/finley/src/Assemble_getAssembleParameters.c
ViewVC logotype

Diff of /trunk-mpi-branch/finley/src/Assemble_getAssembleParameters.c

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

revision 1095 by gross, Tue Mar 6 04:41:55 2007 UTC revision 1096 by ksteube, Mon Apr 16 22:59:33 2007 UTC
# Line 39  void Assemble_getAssembleParameters(Finl Line 39  void Assemble_getAssembleParameters(Finl
39    }    }
40    /*  check the dimensions of S and F */    /*  check the dimensions of S and F */
41    if (S!=NULL && !isEmpty(F)) {    if (S!=NULL && !isEmpty(F)) {
     printf("ksteube S->myNumRows=%d S->row_block_size=%d S->logical_row_block_size=%d\n", S->myNumRows, S->row_block_size, S->logical_row_block_size);  
42      if (! numSamplesEqual(F,1,(S->myNumRows*S->row_block_size)/S->logical_row_block_size)) {      if (! numSamplesEqual(F,1,(S->myNumRows*S->row_block_size)/S->logical_row_block_size)) {
43        Finley_setError(TYPE_ERROR,"Assemble_getAssembleParameters: number of rows of matrix and length of right hand side don't match.");        Finley_setError(TYPE_ERROR,"Assemble_getAssembleParameters: number of rows of matrix and length of right hand side don't match.");
44        return;        return;
# Line 71  void Assemble_getAssembleParameters(Finl Line 70  void Assemble_getAssembleParameters(Finl
70    parm->col_DOF=nodes->degreeOfFreedom;    parm->col_DOF=nodes->degreeOfFreedom;
71    parm->row_DOF=nodes->degreeOfFreedom;    parm->row_DOF=nodes->degreeOfFreedom;
72    /* get the information for the labeling of the degrees of freedom from matrix */    /* get the information for the labeling of the degrees of freedom from matrix */
   /* printf("ksteube in Assemble_getAssembleParameters cpu=%d NR=%d BS=%d DOF=%d\n", elements->elementDistribution->MPIInfo->rank, S->myNumRows, S->row_block_size, parm->numEqu*nodes->degreeOfFreedomDistribution->numLocal); */  
73    if (S!=NULL) {    if (S!=NULL) {
74        /* Make sure # rows in matrix == num DOF for one of: full or reduced (use numLocalDOF for MPI) */        /* Make sure # rows in matrix == num DOF for one of: full or reduced (use numLocalDOF for MPI) */
75  #ifndef PASO_MPI  #ifndef PASO_MPI

Legend:
Removed from v.1095  
changed lines
  Added in v.1096

  ViewVC Help
Powered by ViewVC 1.1.26