Changeset 41f495 in git for Singular/iparith.cc
 Timestamp:
 Mar 5, 2001, 7:25:47 PM (23 years ago)
 Branches:
 (u'spielwiese', '9bfa4dc4755d071a0d1290dd0e3cda52bac9f27e')
 Children:
 65b27c5c9be783dc3dacb25081a2b1227c9d5425
 Parents:
 e4743bc491fb7b8defc40d2bed3417da0c567fba
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

Singular/iparith.cc
re4743bc r41f495 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: iparith.cc,v 1.2 59 20010305 16:43:14mschulze Exp $ */4 /* $Id: iparith.cc,v 1.260 20010305 18:25:47 mschulze Exp $ */ 5 5 6 6 /* … … 4163 4163 if (!pIsUnit((poly)v>Data())) 4164 4164 { 4165 WerrorS("2 rd argument must be a unit");4165 WerrorS("2nd argument must be a unit"); 4166 4166 return TRUE; 4167 4167 } … … 4179 4179 if (!mpIsDiagUnit((matrix)v>Data())) 4180 4180 { 4181 WerrorS("2 rd argument must be a diagonal matrix of units");4181 WerrorS("2nd argument must be a diagonal matrix of units"); 4182 4182 return TRUE; 4183 4183 } … … 4426 4426 static BOOLEAN jjREDUCE3_CP(leftv res, leftv u, leftv v, leftv w) 4427 4427 { 4428 assumeStdFlag( v);4429 if (!idIsZeroDim((ideal) v>Data()))4428 assumeStdFlag(w); 4429 if (!idIsZeroDim((ideal)w>Data())) 4430 4430 { 4431 4431 Werror("`%s` must be 0dimensional",v>Name()); … … 4438 4438 static BOOLEAN jjREDUCE3_CID(leftv res, leftv u, leftv v, leftv w) 4439 4439 { 4440 assumeStdFlag( v);4441 if (!idIsZeroDim((ideal) v>Data()))4440 assumeStdFlag(w); 4441 if (!idIsZeroDim((ideal)w>Data())) 4442 4442 { 4443 4443 Werror("`%s` must be 0dimensional",v>Name()); … … 5017 5017 (u4>Typ()==INT_CMD)) 5018 5018 { 5019 assumeStdFlag(u3); 5019 5020 if(!mpIsDiagUnit((matrix)u2>Data())) 5020 5021 { 5021 Werror("2 rd argument must be a diagonal matrix of units");5022 Werror("2nd argument must be a diagonal matrix of units"); 5022 5023 return TRUE; 5023 5024 } … … 5031 5032 (u4>Typ()==INT_CMD)) 5032 5033 { 5034 assumeStdFlag(u3); 5033 5035 if(!pIsUnit((poly)u2>Data())) 5034 5036 { 5035 Werror("2 rd argument must be a unit");5037 Werror("2nd argument must be a unit"); 5036 5038 return TRUE; 5037 5039 } … … 5057 5059 (u4>Typ()==INT_CMD)&&(u5>Typ()==INTVEC_CMD)) 5058 5060 { 5061 assumeStdFlag(u3); 5059 5062 if(!mpIsDiagUnit((matrix)u2>Data())) 5060 5063 { 5061 Werror("2 rd argument must be a diagonal matrix of units");5064 Werror("2nd argument must be a diagonal matrix of units"); 5062 5065 return TRUE; 5063 5066 } … … 5072 5075 (u4>Typ()==INT_CMD)&&(u5>Typ()==INTVEC_CMD)) 5073 5076 { 5077 assumeStdFlag(u3); 5074 5078 if(!pIsUnit((poly)u2>Data())) 5075 5079 { 5076 Werror("2 rd argument must be a unit");5080 Werror("2nd argument must be a unit"); 5077 5081 return TRUE; 5078 5082 }
Note: See TracChangeset
for help on using the changeset viewer.