Changeset 1d362c in git
- Timestamp:
- Feb 8, 2023, 4:17:46 PM (15 months ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- fc7edb2dd8b3fd27b7ac780defd65f0da922df2a
- Parents:
- ea0e9b848347ac64e4c0787bb03474c465e27ced
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/toric.lib
rea0e9b r1d362c 1 1 /////////////////////////////////////////////////////////////////////////// 2 version="version toric.lib 4. 2.1.3 Dec_2021"; // $Id$2 version="version toric.lib 4.3.1.3 Feb_2023 "; // $Id$ 3 3 category="Commutative Algebra"; 4 4 info=" … … 129 129 pos++; 130 130 } 131 execute("weightvec[i]="+number_string);131 weightvec[i]=`number_string`; 132 132 } 133 133 test_ord="wp("+string(weightvec)+"),"; … … 150 150 pos++; 151 151 } 152 execute("weightvec[i]="+number_string);152 weightvec[i]=`number_string`; 153 153 } 154 154 test_ord="wp("+string(weightvec)+"),"; … … 172 172 pos++; 173 173 } 174 execute("weightvec[i]="+number_string);174 weightvec[i]=`number_string`; 175 175 } 176 176 test_ord="Wp("+string(weightvec)+"),"; … … 193 193 pos++; 194 194 } 195 execute("weightvec[i]="+number_string);195 weightvec[i]=`number_string`; 196 196 } 197 197 test_ord="Wp("+string(weightvec)+"),"; … … 303 303 pos++; 304 304 } 305 execute("generators="+number_string+";");305 generators=`number_string`; 306 306 307 307 intvec v; … … 330 330 pos++; 331 331 } 332 execute("v[j]="+number_string+";");332 v[j]=`number_string`; 333 333 if(v[j]<0) 334 334 { … … 473 473 pos++; 474 474 } 475 execute("weightvec[i]="+number_string);475 weightvec[i]=`number_string`; 476 476 } 477 477 test_ord="wp("+string(weightvec)+"),"; … … 494 494 pos++; 495 495 } 496 execute("weightvec[i]="+number_string);496 weightvec[i]=`number_string`; 497 497 } 498 498 test_ord="wp("+string(weightvec)+"),"; … … 516 516 pos++; 517 517 } 518 execute("weightvec[i]="+number_string);518 weightvec[i]=`number_string`; 519 519 } 520 520 test_ord="Wp("+string(weightvec)+"),"; … … 537 537 pos++; 538 538 } 539 execute("weightvec[i]="+number_string);539 weightvec[i]=`number_string`; 540 540 } 541 541 test_ord="Wp("+string(weightvec)+"),"; … … 623 623 pos++; 624 624 } 625 execute("generators="+number_string+";");625 generators=`number_string`; 626 626 627 627 intvec v; … … 650 650 pos++; 651 651 } 652 execute("v[j]="+number_string+";");652 v[j]=`number_string`; 653 653 if(v[j]<0) 654 654 { … … 862 862 pos++; 863 863 } 864 execute("weightvec["+string(i)+"]="+number_string+";");864 weightvec[i]=`number_string`; 865 865 } 866 866 test_ord="wp("+string(weightvec)+"),"; … … 884 884 pos++; 885 885 } 886 execute("weightvec[i]="+number_string);886 weightvec[i]=`number_string`; 887 887 } 888 888 test_ord="wp("+string(weightvec)+"),"; … … 906 906 pos++; 907 907 } 908 execute("weightvec[i]="+number_string);908 weightvec[i]=`number_string`; 909 909 } 910 910 test_ord="Wp("+string(weightvec)+"),"; … … 927 927 pos++; 928 928 } 929 execute("weightvec[i]="+number_string);929 weightvec[i]=`number_string`; 930 930 } 931 931 test_ord="Wp("+string(weightvec)+"),"; … … 1043 1043 pos++; 1044 1044 } 1045 execute("generators="+number_string+";");1045 generators=`number_string`; 1046 1046 1047 1047 pos=find(toric_id,"basis"); … … 1066 1066 pos++; 1067 1067 } 1068 execute("v[i]="+number_string+";");1068 v[i]=`number_string`; 1069 1069 if(v[i]<0) 1070 1070 {
Note: See TracChangeset
for help on using the changeset viewer.