Changeset 571625 in git
- Timestamp:
- Nov 19, 1999, 4:17:47 PM (24 years ago)
- Branches:
- (u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')
- Children:
- 0e002da8a20c1e86452db907f05d4b354bc64f88
- Parents:
- 907843c581db7c2f7e790c3019a2c3aebee2f6b7
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/ring.cc
r907843 r571625 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: ring.cc,v 1.8 7 1999-11-19 15:07:51Singular Exp $ */4 /* $Id: ring.cc,v 1.88 1999-11-19 15:17:47 Singular Exp $ */ 5 5 6 6 /* … … 2790 2790 rO_WDegree(j,r->block0[i],r->block1[i],tmp_ordsgn,tmp_typ[typ_i], 2791 2791 r->wvhdl[i]); 2792 if (r->OrdIndex== -1)2793 {2794 r->OrdIndex= (j-1)*sizeof(Exponent_t)/sizeof(long);2795 }2796 2792 r->pVarLowIndex=j; 2797 2793 typ_i++; … … 2816 2812 typ_i++; 2817 2813 } 2818 if (r->OrdIndex== -1)2819 {2820 r->OrdIndex= (j-1)*sizeof(Exponent_t)/sizeof(long);2821 }2822 2814 r->pVarLowIndex=j; 2823 2815 break; … … 2826 2818 case ringorder_lp: 2827 2819 rO_LexVars(j, r->block0[i],r->block1[i], prev_ordsgn,tmp_ordsgn,v); 2828 if (r->OrdIndex== -1)2829 {2830 r->OrdIndex= (j-1)*sizeof(Exponent_t)/sizeof(long);2831 }2832 2820 break; 2833 2821 2834 2822 case ringorder_ls: 2835 2823 rO_LexVars_neg(j, r->block0[i],r->block1[i], prev_ordsgn,tmp_ordsgn,v); 2836 if (r->OrdIndex== -1)2837 {2838 r->OrdIndex= (j-1)*sizeof(Exponent_t)/sizeof(long);2839 }2840 2824 break; 2841 2825
Note: See TracChangeset
for help on using the changeset viewer.