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

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

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

revision 3311 by jfenwick, Mon Oct 11 01:48:14 2010 UTC revision 3312 by gross, Tue Oct 26 07:54:58 2010 UTC
# Line 23  Line 23 
23  /**************************************************************/  /**************************************************************/
24    
25  #include "SystemMatrixPattern.h"  #include "SystemMatrixPattern.h"
26    #include "Paso.h"
27  #include "esysUtils/error.h"  #include "esysUtils/error.h"
28    
29  /**************************************************************/  /**************************************************************/
# Line 37  Paso_SystemMatrixPattern* Paso_SystemMat Line 38  Paso_SystemMatrixPattern* Paso_SystemMat
38    Paso_Distribution* new_output_distribution=NULL, *new_input_distribution=NULL;    Paso_Distribution* new_output_distribution=NULL, *new_input_distribution=NULL;
39    Paso_Connector *new_col_connector=NULL, *new_row_connector=NULL;    Paso_Connector *new_col_connector=NULL, *new_row_connector=NULL;
40    
41    if ( ( output_block_size == 1 ) && (input_block_size == 1) && ((pattern->type & PATTERN_FORMAT_OFFSET1) == (type & PATTERN_FORMAT_OFFSET1) ) ) {    if ( ( output_block_size == 1 ) && (input_block_size == 1) && ((pattern->type & MATRIX_FORMAT_OFFSET1) == (type & MATRIX_FORMAT_OFFSET1) ) ) {
42       out = Paso_SystemMatrixPattern_getReference(pattern);       out = Paso_SystemMatrixPattern_getReference(pattern);
43    } else {    } else {
44       new_mainPattern=Paso_Pattern_unrollBlocks(pattern->mainPattern,type,output_block_size,input_block_size);       new_mainPattern=Paso_Pattern_unrollBlocks(pattern->mainPattern,type,output_block_size,input_block_size);
Legend:
Removed from v.3311  
changed lines
  Added in v.3312
  ViewVC Help
Powered by ViewVC 1.1.26