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

rtrsmrascalcoef.h File Reference

Go to the source code of this file.

Functions

void rtrsmrascalcoef (const int &Asize, const int &Msize, const int &amax, const int &mmax, const int &mrastep, const int *mracoef, const int *mracoefrs, const int &a, const int &m, int &scalcoef)
void rtrsmrascalcoef (const int &Asize, const int &Msize, const int &amax, const int &mmax, const int &mrastep, const double *mracoef, const double *mracoefrs, const int &a, const int &m, double &scalcoef)
void rtrsmrascalcoef (const int &Asize, const int &Msize, const int &amax, const int &mmax, const int &mrastep, const float *mracoef, const float *mracoefrs, const int &a, const int &m, float &scalcoef)
void rtrsmrascalcoef (const int &Msize, const int &mmax, const int &mrastep, const int *mracoef, const int *mracoefrs, const int &m, int &scalcoef)
void rtrsmrascalcoef (const int &Msize, const int &mmax, const int &mrastep, const double *mracoef, const double *mracoefrs, const int &m, double &scalcoef)
void rtrsmrascalcoef (const int &Msize, const int &mmax, const int &mrastep, const float *mracoef, const float *mracoefrs, const int &m, float &scalcoef)

Function Documentation

void rtrsmrascalcoef (  const int &  Asize,
const int &  Msize,
const int &  amax,
const int &  mmax,
const int &  mrastep,
const int *  mracoef,
const int *  mracoefrs,
const int &  a,
const int &  m,
int &  scalcoef
) 
 

Definition at line 157 of file rtrsmrascalcoef.cpp.

References iartrsmrascalcoef1_().

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

00169 {
00170 #ifdef STORM_USEF
00171    iartrsmrascalcoef1_(
00172      &Asize, &Msize,
00173      &amax, &mmax,
00174      &mrastep, mracoef, mracoefrs,
00175      &a, &m, &scalcoef
00176    );
00177 #else
00178 //   if ( ( a >= 0 ) && ( a <= amax ) && ( m >= 0 ) && ( m <= mmax ) ) {
00179       scalcoef = mracoef[ Msize*2*a + 2*m ];
00180 //   } else { 
00181 //      scalcoef = 1/0;
00182 //   }
00183 #endif
00184 }

void rtrsmrascalcoef (  const int &  Asize,
const int &  Msize,
const int &  amax,
const int &  mmax,
const int &  mrastep,
const double *  mracoef,
const double *  mracoefrs,
const int &  a,
const int &  m,
double &  scalcoef
) 
 

Definition at line 127 of file rtrsmrascalcoef.cpp.

References dartrsmrascalcoef1_(). 

00139 {
00140 #ifdef STORM_USEF
00141    dartrsmrascalcoef1_(
00142      &Asize, &Msize,
00143      &amax, &mmax,
00144      &mrastep, mracoef, mracoefrs,
00145      &a, &m, &scalcoef
00146    );
00147 #else
00148 //   if ( ( a >= 0 ) && ( a <= amax ) && ( m >= 0 ) && ( m <= mmax ) ) {
00149       scalcoef = mracoef[ Msize*2*a + 2*m ];
00150 //   } else { 
00151 //      scalcoef = 1.0/0;
00152 //   }
00153 #endif
00154 }

void rtrsmrascalcoef (  const int &  Asize,
const int &  Msize,
const int &  amax,
const int &  mmax,
const int &  mrastep,
const float *  mracoef,
const float *  mracoefrs,
const int &  a,
const int &  m,
float &  scalcoef
) 
 

Definition at line 98 of file rtrsmrascalcoef.cpp.

References artrsmrascalcoef1_(). 

00110 {
00111 #ifdef STORM_USEF
00112    artrsmrascalcoef1_(
00113      &Asize, &Msize,
00114      &amax, &mmax,
00115      &mrastep, mracoef, mracoefrs,
00116      &a, &m, &scalcoef
00117    );
00118 #else
00119 //   if ( ( a >= 0 ) && ( a <= amax ) && ( m >= 0 ) && ( m <= mmax ) ) {
00120       scalcoef = mracoef[ Msize*2*a + 2*m ];
00121 //   } else {
00122 //      scalcoef = 1.0/0;
00123 //   }
00124 #endif
00125 }

void rtrsmrascalcoef (  const int &  Msize,
const int &  mmax,
const int &  mrastep,
const int *  mracoef,
const int *  mracoefrs,
const int &  m,
int &  scalcoef
) 
 

Definition at line 71 of file rtrsmrascalcoef.cpp.

References irtrsmrascalcoef_(). 

00080 { 
00081 #ifdef STORM_USEF
00082    irtrsmrascalcoef_( 
00083      &Msize, 
00084      &mmax, 
00085      &mrastep, mracoef, mracoefrs,
00086      &m, &scalcoef
00087    );
00088 #else
00089 //   if ( ( m >= 0 ) && ( m <= mmax ) ) { 
00090       scalcoef = mracoef[ 2*m ]; 
00091 //   } else { 
00092 //      scalcoef = 1/0; 
00093 //   }
00094 #endif
00095 }

void rtrsmrascalcoef (  const int &  Msize,
const int &  mmax,
const int &  mrastep,
const double *  mracoef,
const double *  mracoefrs,
const int &  m,
double &  scalcoef
) 
 

Definition at line 44 of file rtrsmrascalcoef.cpp.

References drtrsmrascalcoef_(). 

00053 { 
00054 #ifdef STORM_USEF
00055    drtrsmrascalcoef_( 
00056      &Msize, 
00057      &mmax, 
00058      &mrastep, mracoef, mracoefrs,
00059      &m, &scalcoef
00060    );
00061 #else
00062 //   if ( ( m >= 0 ) && ( m <= mmax ) ) { 
00063       scalcoef = mracoef[ 2*m ]; 
00064 //   } else { 
00065 //      scalcoef = 1.0/0; 
00066 //   }
00067 #endif
00068 }

void rtrsmrascalcoef (  const int &  Msize,
const int &  mmax,
const int &  mrastep,
const float *  mracoef,
const float *  mracoefrs,
const int &  m,
float &  scalcoef
) 
 

Definition at line 17 of file rtrsmrascalcoef.cpp.

References rtrsmrascalcoef_(). 

00026 { 
00027 #ifdef STORM_USEF
00028    rtrsmrascalcoef_( 
00029      &Msize, 
00030      &mmax, 
00031      &mrastep, mracoef, mracoefrs,
00032      &m, &scalcoef
00033    );
00034 #else
00035 //   if ( ( m >= 0 ) && ( m <= mmax ) ) { 
00036       scalcoef = mracoef[ 2*m ]; 
00037 //   } else { 
00038 //      scalcoef = 1.0/0; 
00039 //   }
00040 #endif
00041 }

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