TBCI Numerical high perf. C++ Library: bveclib.cc Source File

00001 
00006 /* $Id: bveclib.cc,v 1.5.2.15 2005/04/21 09:35:24 garloff Exp $ */
00007 
00008 #ifndef NUM
00009 # define NUM double
00010 #endif
00011 
00012 #ifdef PRAGMA_I
00013 # pragma implementation "bvector.h"
00014 #endif
00015 #include "bvector.h"
00016 
00017 // explicit instantiation of all those things ...
00018 //NAMESPACE_TBCI
00019 
00020 #define T NUM
00021 #define U NUM
00022 #include "bvector_inst.h"
00023 
00024 //NAMESPACE_END
00025 
00026 // We need to explicitly instatiate this helper function templates from basics ?
00027 
00028 NAMESPACE_TBCI
00029 #ifndef PTR
00030 template int sign < NUM > (const NUM&);
00031 //template double fabssqr < NUM > (const NUM&);
00032 template NUM sqr < NUM > (const NUM&);
00033 # if !defined(HAVE_WIN_32) && !defined (NO_NS) // Problems with other dot
00034 template NUM dot < NUM > (const NUM&, const NUM&);
00035 # endif
00036 # define NUMP NUM
00037 #else
00038 typedef NUM _numptr;
00039 # define NUMP _numptr
00040 #endif
00041 
00042 # if !defined(C_MEMALLOC) && !defined(ALLOW_MEMCPY)
00043 template void _tbci_copy < NUMP > (const unsigned long, NUMP * const, const NUMP * const);
00044 # endif
00045 # if !defined(C_MEMALLOC) && !defined(ALLOW_MEMSET)
00046 template void _tbci_fill < NUMP > (const unsigned long, NUMP * const, tbci_traits<NUMP>::loop_const_refval_type);
00047 # endif
00048 
00049 template void SWAP < NUMP > (NUMP &, NUMP &);
00050 #if !defined(C_MEMALLOC) && !defined(ALLOW_MEMCMP) && !defined(__GNUG__)
00051 template int _tbci_comp < NUMP > (NUMP const *, NUMP const *, const unsigned long);
00052 #endif
00053 
00054 NAMESPACE_END