rtrsmrawavcoefrs.cpp

Go to the documentation of this file.

// rtrsmrawavcoefrs.cpp
//////////////////////////////////////////////////////////////////////
//          (c) Copyright 2000-2002 Brown Deer Technology, LLC.
//                        All rights reserved.
//////////////////////////////////////////////////////////////////////

#ifdef STORM_USEF
#include "rtrsmrawavcoefrs_.h"
#include "drtrsmrawavcoefrs_.h"
#include "irtrsmrawavcoefrs_.h"
#include "artrsmrawavcoefrs1_.h"
#include "dartrsmrawavcoefrs1_.h"
#include "iartrsmrawavcoefrs1_.h"
#endif


void rtrsmrawavcoefrs( 
          const int& Msize,
          const int& mmax,
          const int& mrastep,
          const float* mracoef,
          const float* mracoefrs,
          const int& m,
                float& wavcoefrs
) 
{ 
#ifdef STORM_USEF
   rtrsmrawavcoefrs_( 
     &Msize, 
     &mmax, 
     &mrastep, mracoef, mracoefrs,
     &m, &wavcoefrs
   );
#else
//   if ( ( m >= 0 ) && ( m <= mmax ) ) { 
      wavcoefrs = mracoefrs[ 2*m +1 ]; 
//   } else { 
//      wavcoefrs = 1.0/0; 
//   }
#endif
} 


void rtrsmrawavcoefrs( 
          const int& Msize,
          const int& mmax,
          const int& mrastep,
          const double* mracoef,
          const double* mracoefrs,
          const int& m,
                double& wavcoefrs
) 
{ 
#ifdef STORM_USEF
   drtrsmrawavcoefrs_( 
     &Msize, 
     &mmax, 
     &mrastep, mracoef, mracoefrs,
     &m, &wavcoefrs
   );
#else
//   if ( ( m >= 0 ) && ( m <= mmax ) ) { 
      wavcoefrs = mracoefrs[ 2*m +1 ]; 
//   } else { 
//      wavcoefrs = 1.0/0; 
//   }
#endif
}


void rtrsmrawavcoefrs( 
          const int& Msize,
          const int& mmax,
          const int& mrastep,
          const int* mracoef,
          const int* mracoefrs,
          const int& m,
                int& wavcoefrs
) 
{ 
#ifdef STORM_USEF
   irtrsmrawavcoefrs_( 
     &Msize, 
     &mmax, 
     &mrastep, mracoef, mracoefrs,
     &m, &wavcoefrs
   );
#else
//   if ( ( m >= 0 ) && ( m <= mmax ) ) { 
      wavcoefrs = mracoefrs[ 2*m +1 ]; 
//   } else { 
//      wavcoefrs = 1/0; 
//   }
#endif
}


void rtrsmrawavcoefrs(
          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& wavcoefrs
)
{
#ifdef STORM_USEF
   artrsmrawavcoefrs1_(
     &Asize, &Msize,
     &amax, &mmax,
     &mrastep, mracoef, mracoefrs,
     &a, &m, &wavcoefrs
   );
#else
//   if ( ( a >= 0 ) && ( a <= amax ) && (m >=0 ) && ( m <= mmax ) ) {
      wavcoefrs = mracoefrs[ Msize*2*a + 2*m +1 ];
//   } else {
//      wavcoefrs = 1.0/0;
//   }
#endif
}

void rtrsmrawavcoefrs(
          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& wavcoefrs
)
{
#ifdef STORM_USEF
   dartrsmrawavcoefrs1_(
     &Asize, &Msize,
     &amax, &mmax,
     &mrastep, mracoef, mracoefrs,
     &a, &m, &wavcoefrs
   );
#else
//   if ( ( a >= 0 ) && ( a <= amax ) && ( m >=0 ) && ( m <= mmax ) ) {
      wavcoefrs = mracoefrs[ Msize*2*a + 2*m + 1 ];
//   } else {
//      wavcoefrs = 1.0/0;
//   }
#endif
}


void rtrsmrawavcoefrs(
          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& wavcoefrs
)
{
#ifdef STORM_USEF
   iartrsmrawavcoefrs1_(
     &Asize, &Msize,
     &amax, &mmax,
     &mrastep, mracoef, mracoefrs,
     &a, &m, &wavcoefrs
   );
#else
//   if ( ( a >= 0 ) && ( a <= amax ) && ( m >=0 ) && ( m <= mmax ) ) {
      wavcoefrs = mracoefrs[ Msize*2*a + 2*m + 1 ];
//   } else {
//      wavcoefrs = 1/0;
//   }
#endif
}
 

---