Commit 8e086805 authored by D'azevedo, Ed's avatar D'azevedo, Ed
Browse files

debug snapshot

parent b711782a
Loading
Loading
Loading
Loading
+4 −4
Original line number Diff line number Diff line
@@ -21,12 +21,12 @@ void setup_matrix( const int noperator,
    Abatch_[ (((ipatch)-1) + ( (jpatch)-1)*nrow_Abatch) + \
            ( (long) ((ioperator)-1)*(nrow_Abatch) * (ncol_Abatch) )]

#define Amatrix(inPatch,outPatch,ioperator)    \
   Amatrix_[ (((outPatch)-1) + ((inPatch)-1)*npatches) +  \
#define Amatrix(ipatch,jpatch,ioperator)    \
   Amatrix_[ (((ipatch)-1) + ((jpatch)-1)*npatches) +  \
             ((ioperator)-1)*( npatches ) *(npatches) ]

#define ld_Amatrix(inPatch,outPatch,ioperator)    \
   ld_Amatrix_[ (((outPatch)-1) + ((inPatch)-1)*npatches) +  \
#define ld_Amatrix(ipatch,jpatch,ioperator)    \
   ld_Amatrix_[ (((ipatch)-1) + ((jpatch)-1)*npatches) +  \
             ((ioperator)-1)*( npatches ) *(npatches) ]


+12 −6
Original line number Diff line number Diff line
@@ -221,6 +221,11 @@ int main(int argc, char *argv[])

 FpType *Abatch_ = NULL;
 FpType *Bbatch_ = NULL;
 FpType **pAbatch_ = NULL;
 FpType **pBbatch_ = NULL;
 int *ld_pAbatch_ = NULL;
 int *ld_pBbatch_ = NULL;

 IntegerType *left_patch_start_ = NULL;
 IntegerType *right_patch_start_ = NULL;
 IntegerType *xy_patch_start_ = NULL;
@@ -256,15 +261,15 @@ int main(int argc, char *argv[])
                  &(right_patch_size_[0]),

                  Amatrix, ld_Amatrix,  
                  Bmatrix, ld_Bmatrix 
                  Bmatrix, ld_Bmatrix,
   
                  &left_patch_start_, 
                  &right_patch_start_, 
                  &xy_patch_start_, 
   
                  &nC_,
                  &Abatch_, &ld_Abatch, 
                  &Bbatch_, &ld_Bbatch
                  &pAbatch_, &ld_pAbatch_, 
                  &pBbatch_, &ld_pBbatch_
                  );

   }
@@ -336,7 +341,7 @@ int main(int argc, char *argv[])
     apply_Htarget_sparse( noperator, npatches,
                           left_patch_start_, right_patch_start_, xy_patch_start_,
                           nC_,
                           Abatch_, ld_Abatch, Bbatch_, ld_Bbatch, X_, Y_ );
                           pAbatch_, ld_pAbatch_, pBbatch_, ld_pBbatch_, X_, Y_ );

     }
   else {
@@ -390,9 +395,10 @@ int main(int argc, char *argv[])
                    &right_patch_start_,
                    &xy_patch_start_,
                    &nC_,
                    &Abatch_,
                    &Bbatch_ 
                    &pAbatch_, &ld_pAbatch_,
                    &pBbatch_, &ld_pBbatch_
                    );

     }
  else {
    unsetup_vbatch(