source: git/libpolys/polys/nc/ncSACache.cc @ ba5e9e

spielwiese
Last change on this file since ba5e9e was ba5e9e, checked in by Oleksandr Motsak <motsak@…>, 11 years ago
Changed configure-scripts to generate individual public config files for each package: resources, libpolys, singular (main) fix: sources should include correct corresponding config headers.
  • Property mode set to 100644
File size: 1.8 KB
Line 
1/****************************************
2*  Computer Algebra System SINGULAR     *
3****************************************/
4/***************************************************************
5 *  File:    ncSACache.cc
6 *  Purpose: implementation of special Cache+Hash for Multiplier
7 *  Author:  motsak
8 *  Created:
9 *******************************************************************/
10
11#define MYTEST 0
12
13#if MYTEST
14#define OM_CHECK 4
15#define OM_TRACK 5
16// these settings must be before "mod2.h" in order to work!!!
17#endif
18
19
20#ifdef HAVE_CONFIG_H
21#include "libpolysconfig.h"
22#endif /* HAVE_CONFIG_H */
23#include <misc/auxiliary.h>
24
25#ifndef NDEBUG
26#define OUTPUT MYTEST
27#else
28#define OUTPUT 0
29#endif
30
31#if OUTPUT
32namespace 
33{
34  static const char* m_Typenames[2] = {"lookup", "store"};
35}
36#endif
37
38#include <coeffs/numbers.h>
39#include "coeffrings.h"
40
41#include "nc/ncSACache.h" // for CCacheHash etc classes
42
43#include "monomials/ring.h"
44#include "monomials/p_polys.h"
45
46
47void CGlobalCacheHash::History(const EHistoryType t, const CGlobalCacheHash::CExponent a, const CGlobalCacheHash::CExponent b, const poly p)
48{
49#if OUTPUT
50  Print("History: GlobalPair, Action: %s", m_Typenames[(int)(t)]);
51  PrintLn();
52  PrintS("Left : "); p_Write(a, GetBasering());
53  PrintS("Right: "); p_Write(b, GetBasering());
54  if( t == MULT_STORE )
55  {
56    PrintS("Result: "); p_Write(p, GetBasering());
57  }
58#endif
59}
60
61
62void  CSpecialPairCacheHash::History(const EHistoryType t, const CSpecialPairCacheHash::CExponent a, const CSpecialPairCacheHash::CExponent b, const poly p)
63{
64#if OUTPUT
65  Print("History: SpecialPair, Action: %s", m_Typenames[(int)(t)]);
66  PrintLn();
67  Print("Left : %d, Right: %d", a, b);
68  PrintLn();
69  if( t == MULT_STORE )
70  {
71    PrintS("Result: "); p_Write(p, GetBasering());
72  }
73#endif
74}
75
76
77template class CCacheHash<int>;
78template class CCacheHash<spolyrec*>;
Note: See TracBrowser for help on using the repository browser.