Main Page | Class Hierarchy | Alphabetical List | Data Structures | File List | Data Fields | Globals

rtrsdetectle.h File Reference

Go to the source code of this file.

Functions

void rtrsdetectle (const int &Asize, const int &Msize, const int &amax, const int &mmax, const int &mrastep, const int *mracoef, const int *mracoefrs, const int *thresh, int *hit)
void rtrsdetectle (const int &Asize, const int &Msize, const int &amax, const int &mmax, const int &mrastep, const double *mracoef, const double *mracoefrs, const double *thresh, int *hit)
void rtrsdetectle (const int &Asize, const int &Msize, const int &amax, const int &mmax, const int &mrastep, const float *mracoef, const float *mracoefrs, const float *thresh, int *hit)
void rtrsdetectle (const int &Msize, const int &mmax, const int &mrastep, const int *mracoef, const int *mracoefrs, const int *thresh, int *hit)
void rtrsdetectle (const int &Msize, const int &mmax, const int &mrastep, const double *mracoef, const double *mracoefrs, const double *thresh, int *hit)
void rtrsdetectle (const int &Msize, const int &mmax, const int &mrastep, const float *mracoef, const float *mracoefrs, const float *thresh, int *hit)

Function Documentation

void rtrsdetectle (  const int &  Asize,
const int &  Msize,
const int &  amax,
const int &  mmax,
const int &  mrastep,
const int *  mracoef,
const int *  mracoefrs,
const int *  thresh,
int *  hit
) 
 

Definition at line 175 of file rtrsdetectle.cpp.

References iartrsdetectle_().

Referenced by Rtrsmra< Data_t, scalar >.detectle(), and Rtrsmra< Data_t, array >.detectle(). 

00186 {
00187 #ifdef STORM_USEF
00188    iartrsdetectle_(
00189      &Asize, &Msize,
00190      &amax, &mmax,
00191      &mrastep, mracoef, mracoefrs,
00192      thresh, hit
00193    );
00194 #else
00195    for( int m = 0; m <= mmax; m++ ) {   
00196       hit[m] = 0;
00197       for( int a = 0; a <= amax; a++ ) {
00198          if ( abs( mracoef[ Msize*2*a + 2*m + 1 ]
00199            + mracoefrs[ Msize*2*a + 2*m + 1 ] ) <= thresh[m] ) { hit[m]++; }
00200       }
00201    }
00202 #endif
00203 }

void rtrsdetectle (  const int &  Asize,
const int &  Msize,
const int &  amax,
const int &  mmax,
const int &  mrastep,
const double *  mracoef,
const double *  mracoefrs,
const double *  thresh,
int *  hit
) 
 

Definition at line 145 of file rtrsdetectle.cpp.

References dartrsdetectle_(). 

00156 {
00157 #ifdef STORM_USEF
00158    dartrsdetectle_(
00159      &Asize, &Msize,
00160      &amax, &mmax,
00161      &mrastep, mracoef, mracoefrs,
00162      thresh, hit
00163    );
00164 #else
00165    for( int m = 0; m <= mmax; m++ ) {   
00166       hit[m] = 0;
00167       for( int a = 0; a <= amax; a++ ) {
00168          if ( abs( mracoef[ Msize*2*a + 2*m + 1 ]
00169            + mracoefrs[ Msize*2*a + 2*m + 1 ] ) <= thresh[m] ) { hit[m]++; }
00170       }
00171    }
00172 #endif
00173 }

void rtrsdetectle (  const int &  Asize,
const int &  Msize,
const int &  amax,
const int &  mmax,
const int &  mrastep,
const float *  mracoef,
const float *  mracoefrs,
const float *  thresh,
int *  hit
) 
 

Definition at line 114 of file rtrsdetectle.cpp.

References artrsdetectle_(). 

00125 {
00126 #ifdef STORM_USEF
00127    artrsdetectle_(
00128      &Asize, &Msize,
00129      &amax, &mmax,
00130      &mrastep, mracoef, mracoefrs,
00131      thresh, hit
00132    );
00133 #else
00134    for( int m = 0; m <= mmax; m++ ) {   
00135       hit[m] = 0;
00136       for( int a = 0; a <= amax; a++ ) {
00137          if ( abs( mracoef[ Msize*2*a + 2*m + 1 ]
00138            +mracoefrs[ Msize*2*a + 2*m + 1 ]) <= thresh[m] ) { hit[m]++; }
00139       }
00140    }
00141 #endif
00142 }

void rtrsdetectle (  const int &  Msize,
const int &  mmax,
const int &  mrastep,
const int *  mracoef,
const int *  mracoefrs,
const int *  thresh,
int *  hit
) 
 

Definition at line 84 of file rtrsdetectle.cpp.

References irtrsdetectle_(). 

00093 { 
00094 #ifdef STORM_USEF
00095    irtrsdetectle_( 
00096      &Msize, 
00097      &mmax, 
00098      &mrastep, mracoef, mracoefrs,
00099      thresh, hit
00100    );
00101 #else
00102    for( int m = 0; m <= mmax; m++ ) {
00103       if ( abs( mracoef[ 2*m + 1 ] + mracoefrs[ 2*m + 1 ]) <= thresh[m] ) { 
00104          hit[m] = 1; 
00105       }
00106       else { 
00107          hit[m] = 0; 
00108       }
00109    }
00110 #endif
00111 }

void rtrsdetectle (  const int &  Msize,
const int &  mmax,
const int &  mrastep,
const double *  mracoef,
const double *  mracoefrs,
const double *  thresh,
int *  hit
) 
 

Definition at line 54 of file rtrsdetectle.cpp.

References drtrsdetectle_(). 

00063 { 
00064 #ifdef STORM_USEF
00065    drtrsdetectle_( 
00066      &Msize, 
00067      &mmax, 
00068      &mrastep, mracoef, mracoefrs,
00069      thresh, hit
00070    );
00071 #else
00072    for( int m = 0; m <= mmax; m++ ) {
00073       if ( abs( mracoef[ 2*m + 1 ] + mracoefrs[ 2*m + 1 ]) <= thresh[m] ) { 
00074          hit[m] = 1; 
00075       }
00076       else { 
00077          hit[m] = 0; 
00078       }
00079    }
00080 #endif
00081 }

void rtrsdetectle (  const int &  Msize,
const int &  mmax,
const int &  mrastep,
const float *  mracoef,
const float *  mracoefrs,
const float *  thresh,
int *  hit
) 
 

Definition at line 24 of file rtrsdetectle.cpp.

References rtrsdetectle_(). 

00033 { 
00034 #ifdef STORM_USEF
00035    rtrsdetectle_( 
00036      &Msize, 
00037      &mmax, 
00038      &mrastep, mracoef, mracoefrs,
00039      thresh, hit
00040    );
00041 #else
00042    for( int m = 0; m <= mmax; m++ ) {
00043       if ( abs( mracoef[ 2*m + 1 ] + mracoefrs[ 2*m + 1 ] ) <= thresh[m] ) { 
00044          hit[m] = 1; 
00045       }
00046       else { 
00047          hit[m] = 0; 
00048       }
00049    }
00050 #endif
00051 }

Generated on Mon May 31 21:40:34 2004 for SR2k4 Assembler by doxygen 1.3.6