source: git/factory/int_cf.cc @ 493c477

fieker-DuValspielwiese
Last change on this file since 493c477 was 493c477, checked in by Jens Schmidt <schmidt@…>, 27 years ago
o header fixed git-svn-id: file:///usr/local/Singular/svn/trunk@404 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 1.4 KB
Line 
1/* emacs edit mode for this file is -*- C++ -*- */
2/* $Id: int_cf.cc,v 1.3 1997-06-19 12:22:51 schmidt Exp $ */
3
4#include <config.h>
5
6#include "assert.h"
7
8#include "cf_defs.h"
9#include "int_cf.h"
10#include "canonicalform.h"
11
12
13CanonicalForm
14InternalCF::lc()
15{
16    return CanonicalForm( copyObject() );
17}
18
19CanonicalForm
20InternalCF::LC()
21{
22    return CanonicalForm( copyObject() );
23}
24
25int
26InternalCF::degree()
27{
28    if ( isZero() )
29        return -1;
30    else
31        return 0;
32}
33
34CanonicalForm
35InternalCF::tailcoeff()
36{
37    return CanonicalForm( copyObject() );
38}
39
40int
41InternalCF::taildegree()
42{
43    return 0;
44}
45
46CanonicalForm
47InternalCF::coeff( int i )
48{
49    if ( i == 0 )
50        return CanonicalForm( copyObject() );
51    else
52        return 0;
53}
54
55int
56InternalCF::intval() const
57{
58    ASSERT1( 0, "illegal conversion: not implemented for class %s", this->classname() );
59    return 0;
60}
61
62int
63InternalCF::sign() const
64{
65    return 1;
66}
67
68InternalCF*
69InternalCF::invert()
70{
71    ASSERT1( 0, "internal factory error: not implemented for class %s", this->classname() );
72    return 0;
73}
74
75InternalCF*
76InternalCF::num()
77{
78    return copyObject();
79}
80
81InternalCF*
82InternalCF::den()
83{
84    return genOne();
85}
86
87int
88InternalCF::comparecoeff ( InternalCF* )
89{
90    ASSERT1( 0, "fatal error: not implemented for class %s", this->classname() );
91    return 0;
92}
93
94InternalCF*
95InternalCF::sqrt()
96{
97    ASSERT1( 0, "fatal error: not implemented for class %s", this->classname() );
98    return 0;
99}
Note: See TracBrowser for help on using the repository browser.