Changeset 777d4b in git
- Timestamp:
- Aug 14, 2019, 5:44:45 PM (4 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '0604212ebb110535022efecad887940825b97c3f')
- Children:
- 90adf835dc71164859b8ea099e6a6728206e2fb3
- Parents:
- b258e2adb78434353acc85388a6c40c626c4b5ee
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/iparith.cc
rb258e2a r777d4b 1023 1023 } 1024 1024 res->data = (char *)(pp_Mult_qq( a, b, currRing)); 1025 pNormalize((poly)res->data);1026 1025 return FALSE; 1027 1026 } … … 1036 1035 } 1037 1036 res->data = (char *)(pMult( a, b)); 1038 pNormalize((poly)res->data);1039 1037 return jjOP_REST(res,u,v); 1040 1038 } … … 1051 1049 } 1052 1050 res->data = (char *)(pMult( a, b)); 1053 pNormalize((poly)res->data);1054 1051 return jjOP_REST(res,u,v); 1055 1052 } … … 1057 1054 { 1058 1055 res->data = (char *)idMult((ideal)u->Data(),(ideal)v->Data()); 1059 id_Normalize((ideal)res->data,currRing);1060 1056 if ((v->next!=NULL) || (u->next!=NULL)) 1061 1057 return jjOP_REST(res,u,v); … … 1106 1102 ideal I= (ideal)mp_MultP((matrix)u->CopyD(MATRIX_CMD),p,currRing); 1107 1103 if (r>0) I->rank=r; 1108 id_Normalize(I,currRing);1109 1104 res->data = (char *)I; 1110 1105 return FALSE; … … 1116 1111 ideal I= (ideal)pMultMp(p,(matrix)v->CopyD(MATRIX_CMD),currRing); 1117 1112 if (r>0) I->rank=r; 1118 id_Normalize(I,currRing);1119 1113 res->data = (char *)I; 1120 1114 return FALSE; … … 1125 1119 poly p=pNSet(n); 1126 1120 res->data = (char *)mp_MultP((matrix)u->CopyD(MATRIX_CMD),p,currRing); 1127 id_Normalize((ideal)res->data,currRing);1128 1121 return FALSE; 1129 1122 } … … 1135 1128 { 1136 1129 res->data = (char *)mp_MultI((matrix)u->CopyD(MATRIX_CMD),(int)(long)v->Data(),currRing); 1137 id_Normalize((ideal)res->data,currRing);1138 1130 return FALSE; 1139 1131 } … … 1152 1144 return TRUE; 1153 1145 } 1154 id_Normalize((ideal)res->data,currRing);1155 1146 if ((v->next!=NULL) || (u->next!=NULL)) 1156 1147 return jjOP_REST(res,u,v); … … 1167 1158 return TRUE; 1168 1159 } 1169 id_Normalize((ideal)res->data,currRing);1170 1160 if ((v->next!=NULL) || (u->next!=NULL)) 1171 1161 return jjOP_REST(res,u,v); … … 1317 1307 } 1318 1308 } 1319 id_Normalize((ideal)mm,currRing);1320 1309 res->data=(char *)mm; 1321 1310 return FALSE;
Note: See TracChangeset
for help on using the changeset viewer.