Changeset 8c4958f in git for Singular/gring.cc
- Timestamp:
- Feb 23, 2001, 5:44:13 PM (23 years ago)
- Branches:
- (u'spielwiese', '2a584933abf2a2d3082034c7586d38bb6de1a30a')
- Children:
- 5c14fb7194ca91cc3153512e1a20d8785c79d972
- Parents:
- b042a4a104eea2c1b17647a34ab7f6b6e2662e7e
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/gring.cc
rb042a4a r8c4958f 7 7 * Author: levandov (Viktor Levandovsky) 8 8 * Created: 8/00 - 11/00 9 * Version: $Id: gring.cc,v 1. 6 2001-02-23 16:40:08levandov Exp $9 * Version: $Id: gring.cc,v 1.7 2001-02-23 16:44:13 levandov Exp $ 10 10 *******************************************************************/ 11 11 #include "mod2.h" … … 605 605 if ((a==0)||(b==0)||(i<=j)) return(out);//zero exeptions and usual case 606 606 607 if ( r->nc->COM[UPMATELEM(i,j,r->N)]!=0) //commutative or quasicommutative case608 { 609 if (p GetCoeff(r->nc->COM[UPMATELEM(i,j,r->N)])!=n_Init(1,r)) //commutative case607 if (p_GetCoeff(r->nc->COM[UPMATELEM(i,j,r->N)],r)!=0) //commutative or quasicommutative case 608 { 609 if (p_GetCoeff(r->nc->COM[UPMATELEM(i,j,r->N)],r)!=n_Init(1,r)) //commutative case 610 610 { 611 611 return(out);
Note: See TracChangeset
for help on using the changeset viewer.