Changeset e2af3af in git
- Timestamp:
- Jul 1, 2019, 4:07:30 PM (5 years ago)
- Branches:
- (u'spielwiese', '4a9821a93ffdc22a6696668bd4f6b8c9de3e6c5f')
- Children:
- 2050058328d464a197ff417b127e85fe08b3a3cd
- Parents:
- 77006ca97061dca7e90bdacf1fbaff76644280a24142c906ad243d17ff54542115db04d9e8264de7
- git-author:
- Hans Schoenemann <hannes@mathematik.uni-kl.de>2019-07-01 16:07:30+02:00
- git-committer:
- GitHub <noreply@github.com>2019-07-01 16:07:30+02:00
- Files:
-
- 4 deleted
- 26 edited
Legend:
- Unmodified
- Added
- Removed
-
.gitattributes
r4142c90 re2af3af 5 5 /factory/old/ export-ignore 6 6 /old_modgen/ export-ignore 7 /clone_autogen_generated_stuff.sh export-ignore8 7 /git-archive export-ignore 9 -
Singular/LIB/ainvar.lib
r77006c re2af3af 21 21 LIB "general.lib"; 22 22 LIB "algebra.lib"; 23 LIB "ring.lib"; 23 24 /////////////////////////////////////////////////////////////////////////////// 24 25 … … 102 103 103 104 //changes the basering bsr to bsr[@t] 104 execute("ring s="+charstr(basering)+",("+varstr(basering)+",@t),dp;");105 ring s = create_ring(ringlist(basering)[1],"("+varstr(basering)+",@t)","dp","no_minpoly"); 105 106 poly inv,delta,tee,j; 106 107 ideal id=imap(bsr,id); … … 214 215 215 216 //------------- changes the basering bsr to bsr[@(0),...,@(z)] ---------- 216 execute("ring s="+charstr(basering)+",("+varstr(basering)+",@(0..z)),dp;"); 217 217 list l2 = ringlist(basering)[2]; 218 for (int ii = 0; ii <= z; ii++) 219 { 220 l2[size(l2)+1] = "@("+string(ii)+")"; 221 } 222 ring s = create_ring(ringlist(basering)[1], l2, "dp", "no_minpoly"); 218 223 //constructs the leading ideal of dom=(p-@(0),dom[1]-@(1),...,dom[z]-@(z)) 219 224 ideal dom=imap(bsr,dom); -
Singular/LIB/alexpoly.lib
r77006c re2af3af 34 34 /////////////////////////////////////////////////////////////////////////////////////////// 35 35 LIB "hnoether.lib"; 36 LIB "ring.lib"; 36 37 /////////////////////////////////////////////////////////////////////////////////////////// 37 38 … … 657 658 int e=ncols(gr); 658 659 // Define the Ring for the Alexander Polynomial and the Zeta Function of the Monodromy. 659 execute("ring ALEXring=("+charstr(basering)+"),(t,t(1..r)),dp;"); 660 list l2 = "t"; 661 for (int ii = 1; ii <= r; ii++) 662 { 663 l2[ii+1] = "t("+string(ii)+")"; 664 } 665 ring ALEXring = create_ring(ringlist(basering)[1], l2, "dp", "no_minpoly"); 660 666 poly hilfspoly=1; 661 667 poly alexnumerator=1; // numerator of the Alexander polynomial -
Singular/LIB/ehv.lib
r77006c re2af3af 742 742 poly g1 = L[1][1]; 743 743 //..and insert f in g1... 744 execute("ring newR = (" + charstr(R) + "),(y(1)),(" + ordstr(R) + ");");744 ring newR = create_ring(ringlist(R)[1], "(y(1))", "(" + ordstr(R) + ")", "no_minpoly"); 745 745 poly g2 = imap(R,g1); 746 746 setring base; … … 1039 1039 ideal homoJ = fetch(base,K); 1040 1040 homoJ = groebner(homoJ); 1041 execute("ring newR = (" + charstr(base) + "),(x(1..n),t),dp;"); 1041 list l2; 1042 for (int ii = 1; ii <= n; ii++) 1043 { 1044 l2[i] = "x("+string(ii)+")"; 1045 } 1046 l2[n+1] = "t"; 1047 ring newR = create_ring(ringlist(base)[1], l2, "dp", "no_minpoly"); 1042 1048 ideal homoK = fetch(homoR,homoJ); 1043 1049 homoK = homog(homoK,t); -
Singular/LIB/freegb.lib
r77006c re2af3af 3472 3472 } 3473 3473 3474 // obsolete3475 static proc lshift(module M, int s, string varing, def lpring)3476 {3477 // FINALLY IMPLEMENTED AS A PART OT THE C CODE3478 // shifts a polynomial from the ring R to s positions3479 // M lives in varing, the result in lpring3480 // to be run from varing3481 int i, j, k, sm, sv;3482 vector v;3483 setring lpring;3484 poly @@p;3485 ideal I;3486 execute("setring "+varing);3487 sm = ncols(M);3488 for (i=1; i<=s; i++)3489 {3490 // modules, e.g. free polynomials3491 for (j=1; j<=sm; j++)3492 {3493 //vectors, e.g. free monomials3494 v = M[j];3495 sv = size(v);3496 sp = "@@p = @@p + ";3497 for (k=2; k<=sv; k++)3498 {3499 sp = sp + string(v[k])+"("+string(k-1+s)+")*";3500 }3501 sp = sp + string(v[1])+";"; // coef;3502 setring lpring;3503 // execute("setring "+lpring);3504 execute(sp);3505 execute("setring "+varing);3506 }3507 setring lpring;3508 // execute("setring "+lpring);3509 I = I,@@p;3510 @@p = 0;3511 }3512 setring lpring;3513 //execute("setring "+lpring);3514 export(I);3515 // setring varing;3516 execute("setring "+varing);3517 }3518 3519 3474 static proc skip0(vector v) 3520 3475 { -
Singular/LIB/general.lib
r77006c re2af3af 37 37 LIB "poly.lib"; 38 38 LIB "matrix.lib"; 39 LIB "ring.lib"; 39 40 /////////////////////////////////////////////////////////////////////////////// 40 41 … … 709 710 if ( typeof(#[1])=="string" ) 710 711 { 711 execute("ring r1 =("+charstr(P)+"),("+varstr(P)+"),("+#[1]+");");712 ring r1 = create_ring(ringlist(P)[1],"("+varstr(P)+")","("+#[1]+")","no_minpoly"); 712 713 def i = imap(P,id); 713 714 v = sortvec(i); -
Singular/LIB/gitfan.lib
r77006c re2af3af 79 79 LIB "multigrading.lib"; 80 80 LIB "parallel.lib"; 81 LIB "ring.lib"; 81 82 82 83 static proc mod_init() … … 266 267 newVars = newVars+string(var(k)); 267 268 newWeightVector[n]=weightVector[k]; 268 execute("ring ringForSaturation = ("+charstr(origin)+"),("+newVars+"),(wp(newWeightVector));"); 269 269 ring ringForSaturation = create_ring(ringlist(origin)[1],"("+newVars+")","(wp(newWeightVector))","no_minpoly"); 270 270 ideal I = satstd(imap(origin,I)); 271 271 I = simplify(I,2+4+32); -
Singular/LIB/grwalk.lib
r77006c re2af3af 18 18 ZSEE ALSO: rwalk_lib; swalk_lib 19 19 "; 20 21 LIB "ring.lib"; 20 22 21 23 ////////////////////////////////////////////////////////////////////////////// … … 236 238 def xR = basering; 237 239 238 execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");240 ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly"); 239 241 def old_ring = basering; 240 242 … … 292 294 def xR = basering; 293 295 294 execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");296 ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly"); 295 297 def old_ring = basering; 296 298 //print("//** help ring = " + string(basering)); … … 328 330 option(redSB); 329 331 def xR = basering; 330 331 execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";"); 332 ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly"); 332 333 def old_ring = basering; 333 334 //print("//** help ring = " + string(basering)); … … 377 378 option(redSB); def xR = basering; 378 379 379 execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");380 ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly"); 380 381 def old_ring = basering; 381 382 … … 435 436 def xR = basering; 436 437 437 execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");438 ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly"); 438 439 def old_ring = basering; 439 440 … … 483 484 def xR = basering; 484 485 485 execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");486 ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly"); 486 487 def old_ring = basering; 487 488 -
Singular/LIB/hnoether.lib
r77006c re2af3af 281 281 //if ((char(basering)!=0) and (charstr(basering)!=string(char(basering)))) 282 282 int gcd_ok= ! hasGFCoefficient(basering); 283 execute("ring rsqrf = ("+charstr(altring)+"),(x,y),dp;");283 ring rsqrf = create_ring(ringlist(altring)[1],"(x,y)","dp","no_minpoly"); 284 284 if ((gcd_ok!=0) && (mipl!="0")) { execute("minpoly="+mipl+";"); } 285 285 poly f=fetch(altring,f); … … 365 365 ERROR(" Sorry -- not implemented for this ring (gcd doesn't work)"); 366 366 } 367 execute("ring rsqrf = ("+charstr(altring)+"),(x,y),dp;");367 ring rsqrf = create_ring(ringlist(altring)[1],"(x,y)","dp","no_minpoly"); 368 368 if (mipl!="0") { execute("minpoly="+mipl+";"); } 369 369 poly f=fetch(altring,f); … … 552 552 if (ringwechsel) { 553 553 string mipl=string(minpoly); 554 execute("ring guenstig = ("+charstr(altring)+"),(x,y),ls;");554 ring guenstig = create_ring(ringlist(altring)[1],"(x,y)","ls","no_minpoly"); 555 555 if ((char(basering)==0) && (mipl!="0")) { 556 556 execute("minpoly="+mipl+";"); … … 2168 2168 { 2169 2169 def @Rold=basering; 2170 execute("ring @RR=("+charstr(basering)+"),("+varstr(basering)+"),ls;");2170 ring @RR = create_ring(ringlist(basering)[1],"("+varstr(basering)+")","ls","no_minpoly"); 2171 2171 poly f=imap(@Rold,f); 2172 2172 } … … 2457 2457 { 2458 2458 if (npars(basering)>1) { // ring (p,a,..),... 2459 execute("ring extdguenstig=("+charstr(basering)+"),(x,y),ls;");2459 ring extdguenstig = create_ring(ringlist(basering)[1],"(x,y)","ls","no_minpoly"); 2460 2460 } 2461 2461 else { // ring (p,a),... … … 2466 2466 } 2467 2467 else { 2468 execute("ring extdguenstig=("+charstr(basering)+"),(x,y),ls;");2468 ring extdguenstig = create_ring(ringlist(basering)[1],"(x,y)","ls","no_minpoly"); 2469 2469 } 2470 2470 } … … 2922 2922 "// ** extension occurs during the calculation, we cannot proceed with"; 2923 2923 "// ** the corresponding branches."; 2924 execute("ring HNEring=("+charstr(basering)+"),(x,y),ls;");2924 ring HNEring = create_ring(ringlist(basering)[1],"(x,y)","ls","no_minpoly"); 2925 2925 } 2926 2926 else { … … 4053 4053 { // Ringwechsel hatte stattgefunden 4054 4054 string mipl_alt = string(minpoly); 4055 execute("ring tempRing = ("+charstr(basering)+"),("+varstr(basering)+ 4056 "),("+ordstr(basering)+");"); 4055 ring tempRing = create_ring(ringlist(basering)[1],"("+varstr(basering)+")","("+ordstr(basering)+")","no_minpoly"); 4057 4056 execute("minpoly="+ mipl_alt +";"); 4058 4057 list HNEs=imap(EXTHNEring(EXTHNEnumber),HNEs); -
Singular/LIB/linalg.lib
r77006c re2af3af 370 370 def BR=basering; 371 371 //setze R[t] 372 execute("ring rt=("+charstr(basering)+"),(@t,"+varstr(basering)+"),lp;");372 ring rt = create_ring(ringlist(basering)[1], "(@t,"+varstr(basering)+")", "lp", "no_minpoly"); 373 373 execute("minpoly="+mp+";"); 374 374 matrix A=imap(BR,A); -
Singular/LIB/matrix.lib
r77006c re2af3af 1068 1068 1069 1069 //------------------------- create ring container for symmetric power basis- 1070 execute("ring @@@SYM_POWER_RING_NAME=(0),("+S+"(1.."+string(n)+")),dp;"); 1071 1070 list l2; 1071 for (int ii = 1; ii <= n; ii++) 1072 { 1073 l2[ii] = S+"("+string(ii)+")"; 1074 } 1075 ring @@@SYM_POWER_RING_NAME = create_ring(0, l2, "dp"); 1072 1076 //------------------------- choose symmetric basis ------------------------- 1073 1077 ideal symBasis = maxideal(k); … … 1116 1120 1117 1121 //------------------------- create ring container for symmetric power basis- 1118 execute("ring @@@EXT_POWER_RING_NAME=(0),("+S+"(1.."+string(n)+")),dp;"); 1122 list l2; 1123 for (int ii = 1; ii <= n; ii++) 1124 { 1125 l2[ii] = S+"("+string(ii)+")"; 1126 } 1127 ring @@@EXT_POWER_RING_NAME = create_ring(0, l2, "dp"); 1119 1128 1120 1129 //------------------------- choose exterior basis ------------------------- -
Singular/LIB/modwalk.lib
r77006c re2af3af 29 29 LIB "grwalk.lib"; 30 30 LIB "modular.lib"; 31 LIB "ring.lib"; 31 32 32 33 proc modWalk(ideal I, list #) … … 481 482 ideal xI = args[1]; 482 483 ring xR = basering; 483 execute("ring yR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");484 ring yR = create_ring(ringlist(xR)[1], "("+varstr(xR)+")", ord_str, "no_minpoly"); 484 485 ideal yI = fetch(xR,xI); 485 486 ideal yresult = fetch(xR,result); -
Singular/LIB/mprimdec.lib
r77006c re2af3af 283 283 284 284 @U[size(@U)]=")"; // we compute the extractor (w.r.t. @U) 285 execute("ring RAU="+charstr(basering)+",("+@A+@U+",(C,dp("+string(szA)+"),dp);");285 ring RAU = create_ring(ringlist(basering)[1],"("+@A+@U,"(C,dp("+string(szA)+"),dp)","no_minpoly"); 286 286 module @N=std(imap(BAS,@N)); 287 287 // this is also a standard basis in (R[U])[A] … … 670 670 } 671 671 @U[size(@U)]=")"; // we compute the extractor (w.r.t. @U) 672 execute("ring RAU="+charstr(basering)+",("+@A+@U+",(C,dp("+string(szA)+"),dp);");672 ring RAU = create_ring(ringlist(basering)[1],"("+@A+@U,"(C,dp("+string(szA)+"),dp)","no_minpoly"); 673 673 module @N=std(imap(BAS,@N)); // this is also a standard basis in (R[U])[A] 674 674 @A[size(@A)]=")"; … … 773 773 } 774 774 } 775 execute("ring PRing="+string(char(basering))+",("+strg+varstr(basering)+"),dp");775 ring PRing = create_ring(char(basering), "("+strg+varstr(basering)+")", "dp"); 776 776 ideal @a=ideal(imap(LBAS,@i),imap(LBAS,@j)); 777 777 poly @p=lcm(@a); … … 1494 1494 newva[size(newva)]=")"; 1495 1495 newma[size(newma)]=";"; 1496 execute("ring @deirf=("+charstr(BAS)+"),("+newva+",(C,lp);");1496 ring @deirf = create_ring(ringlist(BAS)[1],"("+newva,"(C,lp)","no_minpoly"); 1497 1497 execute("map @kappa=BAS,"+newma); 1498 1498 ideal @j = @kappa(ann); … … 1551 1551 for (@k2=1;@k2<=szIndep;@k2++) 1552 1552 { 1553 execute("ring RAU=("+charstr(basering)+"),("+indep[@k1][@k2][1]+","+indep[@k1][@k2][2]+"),"+indep[@k1][@k2][3]+";");1553 ring RAU = create_ring(ringlist(basering)[1], "("+indep[@k1][@k2][1]+","+indep[@k1][@k2][2]+")", indep[@k1][@k2][3], "no_minpoly"); 1554 1554 module @N=std(imap(BAS,@N)); // the standard basis in (R[U])[A] 1555 1555 execute("ring Rloc=("+charstr(basering)+","+indep[@k1][@k2][2]+"),("+indep[@k1][@k2][1]+"),(C,dp);"); … … 2153 2153 if(ordstr(basering)[1,2]!="dp") 2154 2154 { 2155 execute("ring @Phelp=("+charstr(@P)+"),("+varstr(@P)+"),(C,dp);");2155 ring @Phelp = create_ring(ringlist(@P)[1],"("+varstr(@P)+")","(C,dp)","no_minpoly"); 2156 2156 module inew=std(imap(@P,id)); 2157 2157 ideal @h=imap(@P,h1); -
Singular/LIB/normal.lib
r77006c re2af3af 2417 2417 poly p=I[1]; 2418 2418 2419 execute("ring S=("+charstr(R)+"),(x,y,t),dp;");2419 ring S = create_ring(ringlist(R)[1],"(x,y,t)","dp","no_minpoly"); 2420 2420 ideal L=maxideal(1); 2421 execute("ring C=("+charstr(R)+"),(x,y),ds;");2421 ring C = create_ring(ringlist(R)[1], "(x,y)", "ds", "no_minpoly"); 2422 2422 ideal I; 2423 execute("ring A=("+charstr(R)+"),(x,t),dp;");2423 ring A = create_ring(ringlist(R)[1], "(x,t)", "dp", "no_minpoly"); 2424 2424 map phi=S,1,x,t; 2425 2425 map psi=S,x,1,t; 2426 2426 poly g,h; 2427 2427 ideal I,I1; 2428 execute("ring B=("+charstr(R)+"),(x,t),ds;"); 2429 2428 ring B = create_ring(ringlist(R)[1], "(x,t)", "ds", "no_minpoly"); 2430 2429 setring S; 2431 2430 if(o) … … 2505 2504 "singularities at (x,y,1):";""; 2506 2505 } 2507 execute("ring newR=("+charstr(R)+"),(x,y),dp;");2506 ring newR = create_ring(ringlist(R)[1], "(x,y)", "dp", "no_minpoly"); 2508 2507 //the singularities at the affine part 2509 2508 map sigma=S,var(1),var(2),1; … … 2720 2719 } 2721 2720 2722 execute("ring B=("+charstr(S)+"),a,dp;");2721 ring B = create_ring(ringlist(R)[1], "(a)", "dp", "no_minpoly"); 2723 2722 map beta=S,a,a; 2724 2723 poly p=beta(p); 2725 2724 2726 execute("ring C=("+charstr(S)+",a),(x,y),ds;"); 2725 list L1 = char(S), list("a"), list(list("lp", intvec(1))), ideal(0); 2726 ring C = create_ring(L1, "(x,y)", "ds"); 2727 2727 minpoly=number(imap(B,p)); 2728 2728 … … 3327 3327 map backmap = S(k),maxi; 3328 3328 3329 //mapstr=" map backmap = S(k),";3330 //for (l=1;l<=nvars(R(k));l++)3331 //{3332 // mapstr=mapstr+"0,";3333 //}3334 3329 poly p; 3335 3330 } … … 3507 3502 maxi = maxi,maxideal(1); 3508 3503 map backmap = S(k),maxi; 3509 3510 //mapstr=" map backmap = S(k),";3511 //for (l=1;l<=nvars(R(k));l++)3512 //{3513 // mapstr=mapstr+"0,";3514 //}3515 3504 3516 3505 poly p; -
Singular/LIB/poly.lib
r77006c re2af3af 730 730 if (attrib(br,"global")==1) 731 731 { 732 execute("ring R=("+charstr(br)+"),(@x(1..n),@z),dp;"); 732 list l2; 733 for (int ii = 1; ii <= n; ii++) 734 { 735 l2[ii] = "@x("+string(ii)+")"; 736 } 737 l2[n+1] = "@z"; 738 ring R = create_ring(ringlist(br)[1], l2, "dp", "no_minpoly"); 733 739 } 734 740 else -
Singular/LIB/primdec.lib
r77006c re2af3af 2564 2564 2565 2565 indep=maxIndependSet(j); 2566 2567 execute("ring gnir1 = ("+charstr(basering)+"),("+indep[1][1]+"),(" 2568 +indep[1][2]+");"); 2566 ring gnir1 = create_ring(ringlist(basering)[1],"("+indep[1][1]+")","("+indep[1][2]+")","no_minpoly"); 2569 2567 if(homo==1) 2570 2568 { … … 3112 3110 newva[size(newva)]=")"; 3113 3111 newma[size(newma)]=";"; 3114 execute("ring @deirf=("+charstr(gnir)+"),("+newva+",lp;");3112 ring @deirf = create_ring(ringlist(gnir)[1],"("+newva,"lp","no_minpoly"); 3115 3113 execute("map @kappa=gnir,"+newma); 3116 3114 ideal @j= @kappa(@j); … … 3337 3335 @j=fetch(@P,i); 3338 3336 } 3339 execute("ring gnir1 = ("+charstr(basering)+"),("+indep[@m][1]+"),(" 3340 +indep[@m][2]+");"); 3337 ring gnir1 = create_ring(ringlist(basering)[1],"("+indep[@m][1]+")","("+indep[@m][2]+")","no_minpoly"); 3341 3338 execute("map phi=gnir,"+@va+";"); 3342 3339 op=option(get); … … 3646 3643 { 3647 3644 @va=string(maxideal(1)); 3648 execute("ring gnir1 = ("+charstr(basering)+"),("+ 3649 restindep[@m][1]+"),(" +restindep[@m][2]+");"); 3645 ring gnir1 = create_ring(ringlist(basering)[1],"("+restindep[@m][1]+")","("+restindep[@m][2]+")","no_minpoly"); 3650 3646 execute("map phi=gnir,"+@va+";"); 3651 3647 op=option(get); … … 4614 4610 def oldring=basering; 4615 4611 string n=system("neworder",PS); 4616 execute("ring r=("+charstr(oldring)+"),("+n+"),dp;");4612 ring r = create_ring(ringlist(oldring)[1],"("+n+")","dp","no_minpoly"); 4617 4613 ideal PS=imap(oldring,PS); 4618 4614 matrix m=char_series(PS); // We compute an irreducible … … 4629 4625 for(i=1;i<nvars(oldring);i++) { n=n+","+string(var(i)); } 4630 4626 kill r; 4631 execute("ring r=("+charstr(oldring)+"),("+n+"),dp;");4627 ring r = create_ring(ringlist(oldring)[1],"("+n+")","dp","no_minpoly"); 4632 4628 ideal PS=imap(oldring,PS); 4633 4629 matrix m=char_series(PS); … … 5272 5268 5273 5269 U[size(U)]=")"; // we compute the extractor of I (w.r.t. U) 5274 execute("ring RAU=("+charstr(basering)+"),("+A+U+",(dp("+string(a)+"),dp);");5270 ring RAU = create_ring(ringlist(basering)[1],"("+A+U,"(dp("+string(a)+"),dp)","no_minpoly"); 5275 5271 ideal I=imap(R,SI); 5276 5272 //I=std(I,hv); // the standard basis in (R[U])[A] … … 6763 6759 @va = string(maxideal(1)); 6764 6760 6765 execute("ring gnir1 = (" + charstr(basering) + "), (" + indep[@m][1] + "),(" 6766 + indep[@m][2] + ");"); 6761 ring gnir1 = create_ring(ringlist(basering)[1],"(" + indep[@m][1] + ")","(" + indep[@m][2] + ")","no_minpoly"); 6767 6762 execute("map phi = @P," + @va + ";"); 6768 6763 ideal @j = groebner(phi(I)); … … 7325 7320 string(timer-time)); 7326 7321 //---------------- compute characteristic polynomial of matrix -------------- 7327 execute("ring P1=("+charstr(R)+"),T,dp;");7322 ring P1 = create_ring(ringlist(R)[1],"T","dp","no_minpoly"); 7328 7323 matrix n=imap(R,n); 7329 7324 time = timer; … … 7355 7350 //Hence it is better to simultaneously reduce with I. For this we need a new 7356 7351 //ring. 7357 execute("ring P=("+charstr(R)+"),(T,"+varstr(R)+"),(dp(1),dp);");7352 ring P = create_ring(ringlist(R)[1],"(T,"+varstr(R)+")","(dp(1),dp)","no_minpoly"); 7358 7353 list rfac=imap(P1,fac); 7359 7354 intvec ov=option(get);; … … 7652 7647 newva[size(newva)]=")"; 7653 7648 newma[size(newma)]=";"; 7654 execute("ring @deirf=("+charstr(gnir)+"),("+newva+",lp;");7649 ring @deirf = create_ring(ringlist(gnir)[1],"("+newva,"lp","no_minpoly"); 7655 7650 execute("map @kappa=gnir,"+newma); 7656 7651 ideal @j= @kappa(@j); … … 8043 8038 { 8044 8039 @va=string(maxideal(1)); 8045 execute("ring gnir1 = ("+charstr(basering)+"),("+ 8046 restindep[@m][1]+"),(" +restindep[@m][2]+");"); 8040 ring gnir1 = create_ring(ringlist(basering)[1],"(" +restindep[@m][1]+")","(" +restindep[@m][2]+")","no_minpoly"); 8047 8041 execute("map phi=gnir,"+@va+";"); 8048 8042 op=option(get); … … 8387 8381 //} 8388 8382 //======================= 8389 execute("ring gnir1 = ("+charstr(basering)+"),("+indepInfo[1]+"),(" 8390 +indepInfo[2]+");"); 8383 ring gnir1 = create_ring(ringlist(basering)[1],"("+indepInfo[1]+")","(" +indepInfo[2]+")","no_minpoly"); 8391 8384 execute("map phi=gnir,"+@va+";"); 8392 8385 op=option(get); -
Singular/LIB/primdecint.lib
r77006c re2af3af 32 32 33 33 LIB "primdec.lib"; 34 LIB "ring.lib"; 34 35 35 36 //////////////////////////////////////////////////////////////////////////////// … … 1241 1242 //=== K[i]/f; does not work in rings with integer! This should be replaced 1242 1243 //=== later 1243 execute("ring Rhelp=0,("+varstr(R)+"),dp;");1244 ring Rhelp = create_ring(0, "("+varstr(R)+")", "dp"); 1244 1245 ideal K=imap(R,K); 1245 1246 poly f=imap(R,f); … … 1282 1283 if (not attrib(I,"isSB") ) { print ("// ** I is no standard basis"); } 1283 1284 def R=basering; 1284 execute("ring Rhelp=0,("+varstr(R)+"),dp;");1285 ring Rhelp = create_ring(0, "("+varstr(R)+")", "dp"); 1285 1286 ideal I=imap(R,I); 1286 1287 poly f=imap(R,f); -
Singular/LIB/primitiv.lib
r77006c re2af3af 13 13 14 14 LIB "random.lib"; 15 LIB "ring.lib"; 15 16 /////////////////////////////////////////////////////////////////////////////// 16 17 … … 40 41 { 41 42 def altring=basering; 42 execute("ring deglexring=("+charstr(altring)+"),("+varstr(altring)+"),dp;");43 ring deglexring = create_ring(ringlist(altring)[1],"("+varstr(altring)+")","dp","no_minpoly"); 43 44 ideal j; 44 execute("ring lexring=("+charstr(altring)+"),("+varstr(altring)+"),lp;");45 ring lexring = create_ring(ringlist(altring)[1],"("+varstr(altring)+")","lp","no_minpoly"); 45 46 ideal i=fetch(altring,i); 46 47 -
Singular/LIB/ring.lib
r77006c re2af3af 1406 1406 } 1407 1407 1408 static proc parse_var(string v) 1409 { 1410 if (v[1, 4] == "var(" && defined(basering)) 1411 { 1412 int i = int(v[5,size(v)-5]); 1413 v = ringlist(basering)[2][i]; 1414 } 1415 return(v); 1416 } 1417 1408 1418 /* 1409 1419 * parses … … 1415 1425 if (find(l2, "(", 1) == 0) // no parentheses 1416 1426 { 1417 return(list( l2));1427 return(list(parse_var(l2))); 1418 1428 } 1419 1429 list V = tuple_to_tokens(l2); 1430 for (int i = size(V); i > 0; i--) 1431 { 1432 V[i] = parse_var(V[i]); 1433 } 1420 1434 return(V); 1421 1435 } … … 1527 1541 1528 1542 /* L[1] */ 1529 if (typeof(l 2) == "list")1543 if (typeof(l1) == "list") 1530 1544 { 1531 1545 if (no_minpoly) … … 1542 1556 } 1543 1557 } 1558 } 1559 if (typeof(l1) == "list" || typeof(l1) == "int") 1560 { 1544 1561 L[1] = l1; 1545 1562 } -
Singular/LIB/schubert.lib
r77006c re2af3af 111 111 LIB "homolog.lib"; 112 112 LIB "parallel.lib"; 113 LIB "ring.lib"; 113 114 114 115 //////////////////////////////////////////////////////////////////////////////// … … 1907 1908 variety P; 1908 1909 P.dimension = n; 1909 execute("ring r = 0, ("+h+"), wp(1);");1910 ring r = create_ring(0, "("+h+")", "wp(1)"); 1910 1911 setring r; 1911 1912 P.baseRing = r; … … 1965 1966 A.dimension = r - 1 + B.dimension; 1966 1967 poly c = totalChernClass(S); 1967 execute("ring P = 0, ("+z+"), wp(1);");1968 ring P = create_ring(0, "("+z+")", "wp(1)"); 1968 1969 def CR = P + R; 1969 1970 setring CR; -
Singular/LIB/teachstd.lib
r77006c re2af3af 33 33 34 34 LIB "poly.lib"; 35 LIB "ring.lib"; 35 36 36 37 /////////////////////////////////////////////////////////////////////////////// … … 757 758 int ii; 758 759 def bas = basering; 759 execute("ring @r_locstd 760 =("+charstr(bas)+"),(local@t,"+varstr(bas)+"),(dp(1),dp);"); 760 ring @r_locstd = create_ring(ringlist(bas)[1],"(local@t,"+varstr(bas)+")","(dp(1),dp)","no_minpoly"); 761 761 ideal id = imap(bas,id); 762 762 ideal hid = homog(id,local@t); -
Tst/BuchDL/Ex_L3.res.gz.uu
r77006c re2af3af 1 begin 6 40 Ex_L3.res.gz2 M'XL(" -!EW5P"`T5X7TPS+G)E<P#4/&USXS:/W_TK./M)7DN.^")*2FYSUVZO1 begin 600 Ex_L3.res.gz 2 M'XL("$`,&ET"`T5X7TPS+G)E<P#4/&USXS:/W_TK./M)7DN.^")*2FYSUVZO 3 3 MV^RTS\S&S_1+)NW*MISHZK?'5A+)O_X`2B(I6W:\W=S-G7<C2R0(`B`(`B#E 4 4 MT3]_NOD'(81>DU]O?B3O\FT^G&?C=U>]45W#K@D4_IDML]SI7_7PFUQ?D_\L … … 127 127 MWQ2%Z\1>:D8Y'7M1LUN^/[^=5)/SLS/43[_AU3UY0Z;V!4G@/.3&K@\Y3OM% 128 128 MRK6@7,@!DS=L&212KB7EX<LV+U(N"S<%Y9KE<G>0I:ZKM=/4M=@'J+$/D*+N 129 M;+@R,>D?>*QQ-O#\C-CN^NZPO2)^2+WQZI38[^CH;W&W'4V.>^V3OZ>" .`08130 M `:&BGHL;K[F;5>SF]5[.+;`#K7("M6;.22,@S@/FM"!Z(6\0UK;*UPI3)]MQ131 M .]YZW(F$VO8/M[6[;;/%[&SV=M9MN/6WVVI;[((_Z.E"(_;&6SV]U],3_GVG132 M IQ]P?W+.4W'ZJYZ>\F^R^][@1T)5W-9YN)\N3@C1W?3^P_3D-:$YFW[X=?KZ133 M E)"LIJ=O9I.3Z>OIZ?3-=$$IT[?3NREN:"5DQ96>#]-?I_?3!\&^UJUOJV]L134 M \NQ=K]%^NV"P06[-=#OM[]+\S=OJ43$03U_)`UL=FHV;/[5+HNE%-P-S]3CW135 M V-]N?R'$QPFQPMNKR9\*KT`JG&36MXC,<7%^2>O[.](FLY/7IS2SWMY]^/5>136 M [*C7./+X;=I0_W;V+NG![EQ:;FXJ4[>[A-]*R>`&YA`\(-^2#OQBPT$Z]-_B137 M ?S]$]X)O*NWU2KD'Y6C)I+1KO^PT?5GD.6NJJ@Z<5\]=5=%ZIN8\F_-J@IR2138 M *5!YY2(H+2N<LHTV$4\]S9\UBF9@@[+*...JQG%938L>&ZQN=.#"9FZL<C5_139 M UL`EL@THSJ4U2-:T_L,JIV)L:FJTUJ2/7<78]-QJHH7JKAB=F8IO@T8*>`WT140 M `I\"L<9X[UP=T5=SUVC?&%/'7E'3H&CU9SOT-&UM<)6B!D1RC030W*D9@>(!141 M 2/@K5&=I3:AH=<?U-?,0;%`-K:ZXNHH6D<IZY4.(O:/F&G75-+XUUZ>G,D&C142 M .V41A0X5."N,3JZRX0Y5SE,'5TQ!P&*SL96VD82&QM(3QSCNL!HD$6)-?$*2143 M @RE0\U`'[T@6H(0&21)"@22)HP))HI(&)&4:`DCR0=<-+4B9)#^E%JJ*A@@\144 M 8!_"7-/ZP07B8B:IH2&TM@F.ULQ,444\8JA'""KVB9K*!(5ADT4J#)O`V6#8145 M 1)T!PY9)\CP=J$F$+?*TFY.=Y9HJ$-^#0J*XJKS1C?+`7S/)-C2>*E0:-#9@146 MV ZJRU.:6QFJ.HX45+=Q#VVVJA*F8;(&F`=FRH@"Z!24>=&="(0RFCE;Y5`$0147 M N@<[I[5Z4#06/-9N'K0.--T:)MI/B44<31T=>2W,%0TA+39I=@;0W*#3FLI5148 ME ME7<<_+E`J-D(4:M$%@#3QA4J4>K)%)<BR%$L$LL$C=&QS(9/KK*75'\(J8149 M F_O=PLEC%:74<;[0;":>(U$2Y[MY\'.:&E4PFN0)3]``9JU#TQ"#<AN:>4.\150 M :PEC"+$)50'2@.,ED@".E]5XGH2"$,A622E+U]R0FH4T#IWJEI_,G$1(9:F7151 M >%SJJ:L"#JQZRP*6I@O9R]I1Q]7<*I(BWI-0JTA@\\CX.;&JJD@[VBAW`DE1152 M K0T)*DID9FKF14J#=LI"(;8SH_4L;$3%K`<$9:P(,N$U"[O4+%8$VCA:VK)H153 M =P_$S;ZRZ"?-LANBDT1E0PS._%>#F8P/)%<:GMC$S"1$(":T96U`@J)Q#0U$154 M "%`]BEB6!HGX)^BFYE8&.+A`1$4:"8/7%!`!+"MQ>'"LK,7%69?IL%'&)T*A155 M LF1#6&7E=NHXZ0*.&K,TFP:2UD:KJ/TT\;>E]9.KHNXD.>3AYJMPLAAMKN>>156 M 3&1M:](R/+2D#VE42%U6BD6^HEX@#6="Q6>0N=6>^CV88)Q'M=3J,"\2`J:N157 M +./1#P5>5JVR:M:MDCA6KH)Z5JZY<3I.WK;A8'%K#$X_HQ>F7E/]SL2!)TXD158 M _G'&8\QJ,IVI$AJ-.",-]0GI#L+J61]HZA(2$:3@@`WMI^XF_6I)5G,751#'159 M BC0P406IV%!W6&("$NW$BYX:'XI\C\X0"%CKBQI8ZPL*:IX'F4+#TSVW0/,T160 M 2.UCA=NVG"<Z=0\MB-`4(CR8F@PE&^<U\2K-K:8QK7(GL1(420FKVFE-]50X161 M =TXRL9W7I$F)FPD!GR%'XTFFTYI>*QQ;9W$%7446%#6`&JVI^7Y>)'@2#D41162 M F"$%UFB(R)K9$I'$L24BR6=+1#2/)7O7=/2))^36LHE08\99Z[6QK!SG)#6=163 M AA&H>)KK:1U,0_*3YS"U&N+5\WE\U<16PZ+0GDRKVEMN-74#"3=(HU"SD"95164 M X$WE`D%`)GOJA@(BFCX"!VR?HAHV?B0E;/Q(6MGX$6U!'Z1VLNU)F$T3;5&:165 M M=2[3<.6HWZ`I4=V&LU*Q:(,VQ*DZ9NF8HN\PC2HM,%=`F<J"&RR44CO5S2.166 M CMB1F@BY0_T=",88,#9)!IG`II0L`ENJ0`IC2E;+QI0D+!I3F7#6?5VCV!ZA167 M X59DMG"CJ*C6Q/RJ<6R+3EWM(7`,S^R*VJC(IJIQ98+6_-0D,R7F(4G<T&)*168 M 03S7X-6:Y%0DV$,'D$'04$H(#I/5E1`PO@H<,+Z*6F!\23IT;&,FE.=[:@:W169 M T-'PDEIC[J->;RS]SUO'TH8F*55'-D_-HI8D.@E1FED64R=@V$@%D7YP*FI1170 M F)9`3Z,`N\Y!HLL$V&%%$5AB$B<L,5DG##%)$\NO1'$TP:RQA)#%(RFORN-B171 M 2P`3S4F6!QI]ZAI02Y-8>Y**-7@&U!*;5B0<::8TBM4AS31'FI`P6*@2&%T%172 M !(RN`@<;7:(2MKDR"2`^D<>DD\U-=C";BV17D6UA*EX^A8<YR2O<OB%K$686173 M $4L3E20K\2/S`A%+MAO--:<-RRV(!9$`TZDH`M-)XH3E)*N$:$SDD#RPT.K!174 M 6D-JA%`3XH:E!1$SQXJ'K$*R`M!-1!N83`6L&8@26N569$@UN'$$'5(7^89[175 M ,9<GTZ9`CRY,53-#@VA>87N:P22>:,GIV63&_*T)K8DRC-;#I*()MX:.AH$A176 M OV%?2'@V+P0ZC&6JBMB0[!P2?:J!EN!Y0#J#UU"6I@&:HW0->X*4.$G7NJ&R177 M M#1$/YLB7[/PRL4ANA)JM-T2N]#J"\;R''7KBJ5V'<4D"5?',UG/Q2?IQZF`178 M A?V8T$!NT(C"IJ?>G\+`HX668=+(V*8!#^U<TC*3,*9BA(_&@,0]R7X<3<"=179 M ,%)W;.K,Q1=A2'`8=E=Y"R-[1>MB&C[%G/V0TZD1`;V-_I]VOQ[F;*!6R24J180 M 8CY]"N=.0BLN_^_C[_GI\>/'+Q,2X:+UE?B=H\"ENQ+)6^;U.+>M'^>V]68@181 M QKDIO96X[YJW*1#`^F?W"-&K?]9S1+).7[E$BD6I9V=F=E9WY4PL8&;MYS1_182 M $@*3$?1"5JY`5MTCRW\I_/PI-;E.'Q8WUU\,^ON04[PI4/LFAH)\_PX!=W^8183 M G:E91WK"C/,V:U=[:ARK>7^S.+\\>;LX/)X1@AG0)U\IZOOKXN9J<8%-.\IN184 M =^VXW8]6W&SZ3XW.7'&?),S]\S@CBHC=MU#WMD$VQHVJ`PU7/.N4F^76MT-.185 M +MX^Z\(#YST12EV\OCGI;XO@(B7BX;)_698\C#MPHH>QP8CK17^FKL*&]N)B186 M <=E>L47O,1:.<GD2>8(/EJ9`C<Q),YI7L^7AU=$,B!!I<]6EK@XOC]`4H.HB187 M \T_>G=Q.K@0.E&AA(E\@1.3MY(SZG9&<_73Y\C$3>!,O`E_=G9Q?W8K]0QKC188 M R?V[\]-W;0CEV\GU58S4>QWWXU>'YT=<3^NG7\32-XL+]CW?(F+&_6+1;M[_189 M =/[R,0H_?[QX'#WCYW<?[E`WXWF]8I#)ZGQQ0555#/OGZ\G)Z2E->!RLN^MH190 M 194X*0$"5]<?XF8W=@P$",>_Y*Y;/'[[^/.#8M+0\/,TO.#=\SP#@#''<DGC191 M 3O/O1=_?CDN@.(XPH6&]66%@7^1=,9"1HYG>XMY@=NDCI-F0V[[E.FRCD9A)192 M4 :N[8N*,3T*%HSE=6U[$DP#M,1(:SC<]TCI6XQ'MACMATAN(NA+,P+,&.-"^193 M 1&X:[X3+/!Z0*KB>R]U+?T;._29O?NQ1*%_1JW$(*/T.(A#IBTQ6,T[YC+ND194 M 9W$5=X?RL962(3P[W0.E,Y>:R.4">DU;F5C"S-.75#86%W'S9G918KJA1-W?195 M _&\I9SVEC_(;(?17'QWE@G;M(BCO^/.PS,1&^AR#EXLY&:HEG9/Z1D#DLR0I196 M XNWLORD?B!^M<AA+6^6S(>MYV2*Q""TF]$>K'[;I$8M+N`-*`YS_JIU#ER-T197 M A\4=W8%RAV<SH3N.XIW4W`:5BAL9@'RMD2(\6"YBHVQHE=6.FOD\`BK_;`#V198 M L\GIS8+$^YM.AI"JV:#5'G=:;UVIB/#.\:Q2IUO..'K(L$P9H04BLH_2`ULT199 M `6-=TP46IZ`*B9LR_(`I97%J*6+:%NUZEUQ='^]F,\.+8&I6*_%;#\D_J\TX200 M ^=>,DW^ZBQ_UU6"H["1"\C37A?PXG;\FTUF?3%\[1#GTK^<G'*+Y5,\?<A&W201 M X=*HU7SCO(W")(2*V.F/%DH;J:&%B%>^^53:-]&87<)EI9?LJ7)+=E!I72WA202 M ER*UM(0[BE;%2WBA&ETO'6]`Z"5\3LCG?3Z"9P^36T;'DE["`Q/W3G#8#YL)203 M RV9%"]DJ5$LL%[%XK)8>BTUXB9<.2U>X=I86"V-.JU=PY@'.K'A[D7[1\IRW204 M 0I<KWHF#WP<;<H236D'K:!Q1I89X#93Z@<]%4[;EA3(VQ(&65^*<;GCUS^#P205 M \[F(`RX18&6W#7SYA,O,:4T/1(9:04#`@[4X=K^`AUWVG!X]#`P-'P<C8*>+206 M "=PHJAO;FU2&5O9PT:`(5L0QF?T5)CK=ZZE3-2X'8)./>F()GP.2X.28UC@?207 M X.:TB@E-17C:P&.G<_4$?C.]I"J?\&'K)?8;;)N*S0;[!$>D:=!,3J=>2?#P208 M &<5DZA,3@>L5LHW7&(YY\T1[)@T>^YB\PLJ?83&8;2)?;'CB@D.OMHEQ8)Z8209 M FKHMOJ+W&M6%I9ZJ)ZI>/O`7PWA<=*A?/CU!TE)&"K.Z=TYR#T:6*WFK>T<J210 M Q_1?@<!4Y<MTVQK3%9$OW0TWS^2#F1;Q`?JZ^?SVU>V'&[S_0FI@IU8VG='S211 M AXWARZSI@HW\U\:G)BSB!`P\S@-AUH42*9X`3.7:)RK>WV*-_H=6\+5B#T(O212 M UP`?@&S;(941!X6LB">8TD0\02N.$]H43_"_9G^8?97C\=MZG#(PXZ()V'I,213 M G&1;V^)<*OT?;_/Q$XAD/^.Q0_H/S9+[5=8`90R"7#`#^!1\^?V[<SZ2N7H0214 M I_!MG6(;(Y\?'YR@)H3R1LT'.(TG%+]XRS!"=AFVDM&YN6B7D]D9R%)R=Y$+215 M %''E[<G=^\Z6N7MW<@<]=;/@B#-7UY-WYV_I$VU8O<7!M"HA6S_3;6T^TVUQ216 M YN]F<7M]\8&C%/T1W75%"4482XN3?W@<Z?KL\(\X7UX<5OLLYGS6A66[C>\H217 M (9(<']*+SRT=2.>3M=E'6::'+HIJ6\]!'.>#.,X'[3@G<&'G:-FUX@JH?`[3218 M BDN</52XB)F;J%%UY(\$D'NREU$+FKG@#E819_9*5A%7%WNL(BXF2E81\?EM219 M CL\?XY#^\?GV^+,QF.K!QIOJZW&$UX,CST5$UB)Z[7Q'*-KU@+2JB`#;-4J\220 M *+"Q!1VHVA+CM3CX;+W>$BVY"%1KO1F*F5RVNP.MAP+?S@?BT5KQQ-].6MU0221 M 5%HU$"_7^NS-L#[TN6%7/.)/S0]JG1_4WOQ@6JI2LYK1_"#>2]C5QT&-YH>@222 M =_%#&HY@-O.#ZH'6XVFUF_G!]'H@>[IL$+P1UEY1L6&<E\O8<8J]J<8H=@0(223 M _#0/(-A&?Z('$&QCQC^`8.&S_#=_`,$*)^KN!Q!LX_9X`,$V?O\'$&P3]GH`224 M P3;-'@\@.#A@U]\K<)5:,X\=(AJ.>J_`56;C>P4.+RX4%A;,JR$KR\%36LIL225 M P/P6<EL70FD][K_(,!\KT-M`ZE%0':0VN[$"W8D+G3N$I!,O).X0Z*YJMCR*226 M 4$AIIZHM3R/T0-66!Q)ZH'ITL\13$!L[M@,51BFXJ#/:6P?7VO69?TO9Y=0^227 M LLNI?6274Q\ANYS:3W8YM9?L@NNV&%2=!K4+B=VM`+LMV+6!CBT'8@P%=J"P228 M 4J'_4KWWJUG7^[S::G\N5[R$:0ED6"HIAD'>D&W1IZSB-9M87<HK7JZ)]:>\229 M NM<Q\WM1T/8SEZ*DDTNE2KQ%Y;0O*E3II2R'ERUXS=WUK'DI[P`[\2)D2H,#230 M JQ#LEU&P7ZX)=K[T6@CVRW^!8)^O"_9Z_9&1_5=NMA"`J<UZM&#?^CI'*0%-231 M /5JP&[M+L&?0+6_>U#W0+2_?E(L\9\+X9FUY!:>G66HA`R[7!3NL\U*LDQR<232 M 2,'(\Q>6<2L&HBBX3[\[(=>*AXF482A;R#0A!&HE97&OU@2DBQE8D)%@3%_P233 M %F1U4'5/L$C"$E`A*`K*$XCK]>=NF=KK8^Y`1!\Z8(\-"U&25KECQ+7E3%D0234 M #JJ<*E[_$X)2N!"%B+3R=;&'E$H]W"ZJOL.JZOW-AZN%<&PZ>`2E,/KNG_9H235 M UL![1A_Q:%:<@"X)%EOO?JG(6;O[P1]GW>Y'LYSUF\5(!@J;WSRR":C9_6B6236 M <]4(PH47<Z"C.B#=,?9W&/W[Y<-T%9>PF'1FNM1QEG89V&G"0Y71"F/+HS/L237 MN GF:,HB_XQ>"]Q+W+:<PH*+5$C/F;!5U")82V[TP&><PZ1+%>14UDMJNH)`%238 M N^E/I02/C&M.5["P(W<V,!7SI;WP76$P?%=8#"[T+(;O?F.38;YI!G\2DZ$6239 M ?[/)X$8[]YP?[=QS?K1SSWF]9:[W0,WF&=\S&7I^X6TFPWB_L!OV"Y<=VX'Z240 M I.*^RS;#`:MHFD7=E%J9^3**@+C"*:92M/NC%F[GQ/T2D).#>['`R0.69K5X241 M ZW93C1VD?/NV3T,'%(H7.`<(2H!YW-<H3#"ZWS-Q_P8J_#YI=*G,Q<,Q0F\+242 M _ZU0T,)5*[5Y<$-Z.ZQ)A]LH'6Z%=.!`5G%?$V&O3OIO$NP3<8MJ_'SREUU5243 M _B71%\HP7$-41"*Z`LT>\;>T[T[4N:;TLNQ!(DZ[;@9.N^ZD#J6HQ<G6GJB]244 M '2UJA=N]/A@5`'J3#!HECL>(YG7!/N!]LFN66RV!ZK76J8$G)F5VBVE4%_3E245 M E>(N56IP'=F8G4JA&(2NV.X=E2&IVMB=RF)(&S1NI^(8+.9W*9%!-=6$7<Y%246 M .V3)-LW0<YJ;!SP6\U6UY8'-`1;HBJF/&0`O7C\>Q29=L7P+Q`\ZW"])WI"E247 M =<Y>]YB41(`?=KP3\/]K%XT?[WOWXWWO?KSOW>_VO2?0;;[WN@>JQMI;?KSO248 M W6_SO?>84=5#>JCDP)B665#902WTF_+@O\#F]VH\#ZKQ/*C&\Z!JQMK\7E=C249 M ;7ZOQ_.@'L^#VHRU^;W.9[R\MN*WZ^_]>YR)QM'\7T]N#N,%@[O;NU=DT]U]250 M N'UU=GZQZ%_[^:EZB><.>(/_Z^6K%^;QU>+^,0HDE.,"@]?5H3H:=:+`I\>M251 M GIG>_9,W\;_%T0)OXNMID_/9+SE-I;#<7_WD7M*_.8ML0!SN/CQ_JKZ8G/_G252 M 4T=_I].CR=]B\B]/SZ>4\0MG_!(SOOJ)D+\D8BCC[^G(J$=TRK:6/_5KJ;^D253 M -#6KVU+TH6<V?YB9BQ^I@(V7"7[_P].KTU?M&=7#KQ!)+MTE^/T/&=RE5Z*\254 M Z1X?>V9:;^9\XR46SX='>P=EOUYRO/N;?$;VZO3N^OKBMG=&UILN*NBXD4$H255 MR ]@F\_1_%JN+PZ(M)L.IW!AXC;M[C,R@XE72V\\GWW]_4+PV2XQ\._E\XI#:256 M _O/ZXOKTKSQ9/Z?5T)MX(_+->P&1__F<KX3<LEL'_(EK47Q9=_(&GV_P^88^257 M !]!KB?XKINKZZO3Z\I)?@?Q57'W\O"T-E*CE*?X\PM=4I2Q]A+J?XL\C?(DL258 M <P2*GN+/(WQ-T\ROBZM`D_S:+DWQ\U,BL$J0V49FR($>["!M";FU3[LR;J#,259 M 1_1RA\YO(:'7[UV1T&O?QK'H"C2].@9'IP463ODMX]4!JS7@S2-H\QEV'U^S260 M V2I$Z\DA[E&=7WV@9?4N.8JSOR*H.:[Z::;U9QTOIFLFYF<=KZO'9H#&-#&M261 M W7"YQMMTZ/K%P#-W'F=^*>.+`_K#-P\*_)R*EQ:X=OXR+V-7(HGO,7)JW99,262 M A6P$:PNYE*UCMH\)/R<[PF9/QC`E'5SFAI*V-E^XZH>I[>!4`5?0WX'H`B2W263 M J,LW17[1Q@ZD+D#66NW:ZW[/S*OK]^]I=.CO]>WYW>*0I&X>)+QNWHGC"-JJ264 M CY/3.&F0<1YOXW48NBMID!R$+*&B\?XG2.V374+[&83(,\B/9Y`D/^+S1WS^265 M B$$9+MP]WI<,NL$_NR3^Q>VGHJU#;_96*$")6I[BSZ,?HV#ILO01ZGZ*/X]^266 M E`H%U8.BI_CSZ,="T+DP5J&X9JQ"\=58A7*2BJBQ^F1[)W?H]`YT(UFB0V?&267 M JJ>+VU2F_K0MVJ:DS:"&]&Y/#>G[6GB0W3K@L`8\P(`=<+,&O)DEL0F0M1C+268 M (99C;2AR0H!;4\_YM:6>D$HH5*>LCG]XWHK$GL)"-)(ATS084337'\7EK$4G269 M T)#9?PR]=SRH;8X+W7+<TR1\&Y]3"[UQ7&B)X[Y..![2`"$?ECO>IO?$_L3Q270 M D-X3[\4/4]O!A0)N2.^)/8+C(;TG]@*.-^B]1A4@:ZUN=/G"`P'-2$$>B<._271 M 7OB8<UHRE'B,[^ZO>]R!<],8U=B5N5QV:/1S\A%\WP3QNVF7:K2>G#TSLY:/272 M !,>%JAJ[GM;CUM,![MD=<2@"PDKT%M&A,F(1;5[2OSFK[BVBS:9%M%E?1,^+273 M 572`1S:MHGO5N&X!N755_$,ND"+/?Y],WMDD,EH;A4EG8%)VW^?Q_CX_3](]274 M $$PY\UO"U[\=GC`TW5W/K[$@3I<G@\J/.`?5Q;OZVLR.=R[0`[_@_I$+](#8275 M $+N&&D^\HU.9Y`[SX5'.%V^\?YWY$MZ[_4T\\ZD7YI]D);[DY1OIFWF6,5V.276 M *7-,F:,Y1^><XB[OY.SF^K*]Y1AO7$=I&M^5B^+N592B0FX%Y4=:74&%'5:7277 M 29#-WLOXH*N/6\:G\FK?=7O0>C^K).B^\34TEAULO0:[/KH=K!V$+<>[@RU,278 M J8T<T$'[Q^4M?*EA@PZ]UP>E4@S%S?LUOC'Y3G>(]^6W:@RWA_,@X'+]P,M"279 M ^0&>`.\GY,C-\_(@-'7)HT>3LP\D\<3.R/G5Y*25E9<G*SQ'=7Z%2"=WBQFD280 M S5W,6$XN%E=O[][!FK.IHEI.C_UP)QS]X=U5IROO5-X\W_>(0'L@<(_WHM>V281 M +R(F)S9$>?=)JWVP;K@Y.(0U-=[OM0]?''T,(XY";]SU"*;9O)FSF>ZV<%W]282 M `S77:M==RVTUI[-%-[`#9[\#DV">SS"=9\)2#L)ENP&@%KCB$:4$%^^(()96283 M .O-XT*8-@QSDLY$]N*)*.T#36ET)NG<D<KA(@O8E]$Y:LK4<Q"-/(3WR!,N9284 M +:F4L^VEI^/%Y<G-7TGZV7%O18;BH:?#:G9RM![_;/;0CX-V__Y0S^S1["*O285 M !0,.7U^>7W$XBZ>3DY_U5.6\6@8)@?7)@>LTZR6!PGZ9HTP"'!\P5!.`:Q\*286 M >D%I=4K-\S>G4;]RX,(#^L.AKZH#8B_^U:70/R<'I&;ZB>(G_7/QODO6,ED=287 M T+*/OUG+'7*#T["*Z`V,K4UVQ39K,G.$&Y4KZ9*+,YL%GO*(YB2YDH+PE7++288 M NF2[$97KH2HR_>,UR7B1["<7^D4E\<UZT21`A(^,>[%++K:6A_H5KBW$'J/%289 M \!<'#\+V$8]!%\DUX(U@`S&X;WADQ;#B>JL:8I/[/B1Q_Q#G7`Q@3'PBX+[J290 M @25.\':0;[S;-'R^/T+9O/7%\,BQ\?VQB0UO<\4Q5%FHC"0@:>@%#N#NZK+,291 M )AI"W2N$+NWR["`3AXV]$/J]D)DT;.R%,-`+75XSS*#-QCYH^GV03/YF8Q<T292 M _2Y(;("S>B^HXB^Z954;4S+;PL(7LQ'$1Q&(Z:+@B/@=ULYE)#ZH"*QRTJND293 M [VDI=KF@M5C"PA%@"45@%/>_^V(@4NI[!&Q%P$%"UX7AC8%]&?E]0M9\R=,1294 M _VK@B^_2'3+_M:&`;D[.;V,40TCZ+L#BW;MS'`7&XJI%UL!SM/4?1.N-I2^O295 M VW"#O")+"$0(66@;UBI=GAZ(:=C`1;35*?#3ZY=/#E]'D37D'PB_M7_@?B<^296 M ,,UDE5T"VS8+=#1]=_C@+W;6^8`Z(:>)-=:1U6L.CEU>AS[O-U4]TL705+V5297 M DLI3(!+].D'V=A0Z8R<UKQOX#M[O<%Z$!!GV=EXT5?,/.2\:58UU7B1IWJC1298 M ^U29J;JB^^Q):;G":I09N_ESD2D=O?\D6;$KO&VWJ1[RZS1J'Q=)H]9<)&L,299 ?K/*ZH%%Y7="($*<-_$_Y/!M\%?]Q\'_3"F?WOL4`````129 M;+@R,>D?>*QQ-O#\C-CN^NZPO2)^2+WQZI38[^CH;W&W'4V.>^V3OZ>"Z.8( 130 M"!7U7-QXS=VL8C>O]W)N@1UH%=B[0ZV9<]((B/.`.2V(7L@;A+6M\K7"U,EV 131 MW(ZW'G<BH;;]PVWM;MML,3N;O9UU&V[][;;:%KO@#WJZT(B]\59/[_7TA'_? 132 MZ>D'W)^<\U2<_JJGI_R;[+XW^)%0%;=U'NZGBQ-"=#>]_S`]>4UHSJ8??IV^ 133 M/B4DJ^GIF]GD9/IZ>CI],UU0RO3M]&Z*&UH)67&EY\/TU^G]]$&PKW7KV^H; 134 MFSQ[UVNTWRX8;)!;,]U.^[LT?_.V>E0,Q--7\L!6AV;CYD_MDFAZT<W`7#W. 135 M/?:WVU\(\7%"K/#V:O*GPBN0"B>9]2TB<UR<7]+Z_HZTR>SD]2G-K+=W'WZ] 136 M%SOJ-8X\?ILVU+^=O4MZL#N7EIN;RM3M+N&W4C*X@3D$#\BWI`._V'"0#OVW 137 M^-\/T;W@FTI[O5+N03E:,BGMVB\[35\6><Z:JJH#Y]5S5U6TGJDYS^:\FB"G 138 M9`I47KD(2LL*IVRC3<133_-GC:(9V*"L,LZXJG%<5M.BQP:K&QVXL)D;JUS- 139 MGS5PB6P#BG-I#9(UK?^PRJD8FYH:K37I8U<Q-CVWFFBANBM&9Z;BVZ"1`EX# 140 MO<"G0*PQWCM71_35W#7:-\;4L5?4-"A:_=D./4U;&UREJ`&17",!-'=J1J!X 141 M`!+^"M596A,J6MUQ?<T\!!M40ZLKKJZB1:2R7OD08N^HN49=-8UOS?7IJ4S0 142 MZ$Y91*%#!<X*HY.K;+A#E?/4P153$+#8;&RE;22AH;'TQ#&..ZP&2818$Y^0 143 MY&`*U#S4P3N2!2BA09*$4"!)XJA`DJBD`4F9A@"2?-!U0PM2)LE/J86JHB$" 144 M#]B',->T?G"!N)A):F@(K6V"HS4S4U01CQCJ$8**?:*F,D%AV&21"L,F<#88 145 M-E%GP+!EDCQ/!VH288L\[>9D9[FF"L3WH)`HKBIO=*,\\-=,L@V-IPJ5!HT- 146 MV+:J++6YI;&:XVAA10OWT':;*F$J)EN@:4"VK"B`;D&)!]V94`B#J:-5/E4` 147 MA.[!SFFM'A2-!8^UFP>M`TVWAHGV4V(11U-'1UX+<T5#2(M-FIT!-#?HM*9R 148 ME67V5=SS,J5"(V2A!FT06`-/F%2I!VMDDAQ+H40P"RQ2]P8',IG^>DK=$;PB 149 MYN9^MW#R6$4I=9PO-)N)YTB4Q/EN'OR<ID85C"9YPA,T@%GKT#3$H-R&9MX0 150 M[UK"&$)L0E6`-.!XB22`XV4UGB>A(`2R55+*TC4WI&8AC4.GNN4G,R<14EGJ 151 M)1Z7>NJJ@`.KWK*`I>E"]K)VU'$UMXJDB/<DU"H2V#PR?DZLJBK2CC;*G4!2 152 M5&M#@HH2F9F:>9'2H)VR4(CMS&@]"QM1,>L!01DK@DQXS<(N-8L5@3:.EK8L 153 MVMT#<;.O+/I)L^R&Z"11V1"#,__58";C`\F5AB<V,3,)$8@);5D;D*!H7$,# 154 M$0)4CR*6I4$B_@FZJ;F5`0XN$%&11L+@-05$`,M*'!X<*VMQ<=9E.FR4\8E0 155 MJ"S9$%99N9TZ3KJ`H\8LS::!I+71*FH_3?QM:?WDJJ@[20YYN/DJG"Q&F^NY 156 M)Q-9VYJT#`\MZ4,:%5*7E6*1KZ@72,.94/$99&ZUIWX/)ACG42VU.LR+A("I 157 M*\MX]$.!EU6KK)IUJR2.E:N@GI5K;IR.D[=M.%C<&H/3S^B%J==4OS-QX(D3 158 MB7^<\1BSFDQGJH1&(\Y(0WU"NH.P>M8'FKJ$1`0I.&!#^ZF[2;]:DM7<117$ 159 ML2(-3%1!*C;4'9:8@$0[\:*GQH<BWZ,S!`+6^J(&UOJ"@IKG0:;0\'3/+=`\ 160 M#5+[6.&V+>>)3MU#"R(TA0@/IB9#R<9Y3;Q*<ZMI3*O<2:P$15+"JG9:4ST5 161 MSIV33&SG-6E2XF9"P&?(T7B2Z;2FUPK'UEE<05>1!44-H$9K:KZ?%PF>A$-1 162 M!&9(@34:(K)FMD0D<6R)2/+9$A'-8\G>-1U]X@FYM6PBU)AQUGIM+"O'.4E- 163 MIV$$*I[F>EH'TY#\Y#E,K89X]7P>7S6QU;`HM"?3JO:66TW=0,(-TBC4+*1) 164 M%7A3N4`0D,F>NJ&`B*:/P`';IZB&C1])"1L_DE8V?D1;T`>IG6Q[$F;31%N4 165 M9BWU;M.PY:@?8.F1G4:S4K$HP[8$:?JFJ=@BKS`-*FUPE\"9"@*;;!32^Q6- 166 MHR-VI"9"[E!_!X(Q!HQ-DD$FL"DEB\"6*I#"F)+5LC$E"8O&5":<=5_7*+9' 167 M:+@5F2W<*"JJ-3&_:AS;HE-7>P@<PS.[HC8JLJEJ7)F@-3\UR4R)>4@2-[28 168 M4A#/-7BU)CD5"?;0`600-)02@L-D=24$C*\"!XROHA887Y(.'=N8">7YGIK! 169 M+70TO*36F/NHUQM+__/6L;2A24K5D<U3LZ@EB4Y"E&:6Q=0)Θ:0?G(I: 170 M%*8ET-,HP*YSD.@R`7984026F,0)2TS6"4-,TL3R*U$<33!K+"%D\4C*J_*X 171 MV!+`1'.2Y8%&G[H&U-(DUIZD8@V>`;7$IA4)1YHIC6)U2#/-D28D#!:J!$97 172 M`0&CJ\#!1I>HA&VN3`*(3^0QZ61SDQW,YB+9561;F(J73^%A3O(*MV_(6H29 173 M1<321"7)2OS(O$#$DNU&<\UIPW(+8D$DP'0JBL!TDCAA.<DJ(1H3.20/++1Z 174 ML-:0&B'4A+AA:4'$S+'B(:N0K`!T$]$&)E,!:P:BA%:Y%1E2#6X<08?41;[A 175 M7LSER;0IT*,+4]7,T"":5]B>9C"))UIR>C:9,7]K0FNB#*/U,*EHPJVAHV%@ 176 MR&_8%Q*>S0N!#F.9JB(V)#N'1)]JH"5X'I#.X#64I6F`YBA=PYX@)4[2M6ZH 177 M+"T-T<^FR-<LO')QB*Z$&FVWQ"ZT^H*Q/$?=NF*I74<Q2<+5\4S6<_%)^G$J 178 M8&$_)C20&S2BL.FI]Z<P\&BA99@T,K9IP$,[E[3,)(RI&.&C,2!Q3[(?1Q-P 179 M)XS4'9LZ<_%%&!(<AMU5WL+(7M&ZF(9/,6<_Y'1J1$!OH_^GW:^'.1NH57*) 180 MBIA/G\*YD]"*R__[^'M^>OSX\<N$1+AH?25^YRAPZ:Y$\I9Y/<YMZ\>Y;;T9 181 MB'%N2F\E[KOF;0H$L/[9/4+TZI_U')<U<ND6)1ZMF9F9W573D3"YA9^SG- 182 MGX3`9`2]D)4KD%7WR/)?"C]_2DVNTX?%S?47@_X^Y!1O"M2^B:$@W[]#P-T? 183 M9F=JUI&>,..\S=K5GAK':M[?+,XO3]XN#H]GA&`&],E7BOK^NKBY6EQ@TXZR 184 MVUT[;O>C%3>;_E.C,U?<)PES_SS.B")B]RW4O6V0C7&CZD##%<\ZY6:Y]>V0 185 MDXNWS[KPP'E/A%(7KV].^MLBN$B)>+CL7Y8E#^,.G.AA;##B>M&?J:NPH;VX 186 M6%RV5VS1>XR%HUR>1)[@@Z4I4"-STHSFU6QY>'4T`R)$VEQUJ:O#RR,T!:BZ 187 MR/R3=R>WDRN!`R5:F,@7"!%Y.SFC?F<D9S]=OGS,!-[$B\!7=R?G5[=B_Y#& 188 M>'+_[OST71M"^79R?14C]5['_?C5X?D1U]/ZZ1>Q],WB@GW/MXB8<;]8M)OW 189 M/YV_?(S"SQ\O'D?/^/G=ASO4S7A>KQADLCI?7%!5%</^^7IR<GI*$QX'Z^XZ 190 M6E$E3DJ`P-7UA[C9C1T#`<+Q+[GK%H_?/O[\H)@T-/P\#2]X]SS/`&#,L5S2 191 MN-/\>]'WM^,2*(XC3&A8;U88V!=Y5PQDY&BFM[@WF%WZ"&DVY+9ON0[;:"1F 192 M4M3JKI@XXY-0X6A.UY87\21`>XR$AO--C[2.U7A$N^%.F/0&HJX$,_"L`0ZT 193 M+Y&;QCOA,H\'I`JNYW+WTI^1<[_)FQ][%,I7]&H<`DJ_@PA$^B*3U8Q3/N,N 194 MZ5E<Q=VA?&RE9`C/3O=`Z<RE)G*Y@%[35B:6,//T)96-Q47<O)E=E)AN*%'W 195 M-_];REE/Z:/\1@C]U4='N:!=NPC*._X\+#.QD3['X.5B3H9J2>>DOA$0^2Q) 196 MBG@[^V_*!^)'JQS&TE;Y;,AZ7K9(+$*+"?W1ZH=M>L3B$NZ`T@#GOVKGT.4( 197 MW6%Q1W>@W.'93.B.HW@G-;=!I>)&!B!?:Z0(#Y:+V"@;6F6UHV8^CX#*/QN` 198 M_6QR>K,@\?ZFDR&D:C9HM<>=UEM7*B*\<SRKU.F6,XX>,BQ31FB!B.RC],`6 199 M3<!8UW2!Q2FH0N*F##]@2EF<6HJ8MD6[WB57U\>[V<SP(IB:U4K\UD/RSVHS 200 M3OXUX^2?[N)'?348*CN)D#S-=2$_3N>OR736)]/7#E$._>OY"8=H/M7SAUS$ 201 M;;@T:C7?.&^C,`FA(G;ZHX721FIH(>*5;SZ5]DTT9I=P6>DE>ZK<DAU46E=+ 202 M^*5(+2WACJ)5\1)>J$;72\<;$'H)GQ/R>9^/X-G#Y);1L:27\,#$O1,<]L-F 203 MPK)9T4*V"M42RT4L'JNEQV(37N*EP](5KIVEQ<*8T^H5G'F`,RO>7J1?M#SG 204 MK=#EBG?BX/?!AASAI%;0.AI'5*DA7@.E?N!ST91M>:&,#7&@Y94XIQM>_3,X 205 M_'PNXH!+!%C9;0-?/N$R<UK3`Y&A5A`0\&`MCMTOX&&7/:='#P-#P\?!"-CI 206 M8@(WBNK&]B:5H94]7#0H@A5Q3&9_A8E.]WKJ5(W+`=CDHYY8PN>`)#@YIC7. 207 M![@YK6)"4Q&>-O#8Z5P]@=],+ZG*)WS8>HG]!MNF8K/!/L$1:1HTD].I5Q(\ 208 M?$8QF?K$1.!ZA6SC-89CWCS1GDF#QSXFK[#R9U@,9IO(%QN>N.#0JVUB')@G 209 MIJ9NBZ_HO49U8:FGZHFJEP_\Q3`>%QWJET]/D+24D<*L[IV3W(.1Y4K>ZMZ1 210 MRC']5R`P5?DRW;;&=$7D2W?#S3/Y8*9%?("^;CZ_?77[X0;OOY`:V*F536?T 211 M_&%C^#)KNF`C_[7QJ0F+.`$#C_-`F'6A1(HG`%.Y]HF*][=8H_^A%7RMV(/0 212 MRS7`!R#;=DAEQ$$A*^()IC013]"*XX0VQ1/\K]D?9E_E>/RV'J<,S+AH`K8> 213 M$R?9UK8XETK_Q]M\_`0BV<]X[)#^0[/D?I4U0!F#(!?,`#X%7W[_[IR/9*X> 214 MQ"E\6Z?8QLCGQP<GJ`FAO%'S`4[C"<4OWC*,D%V&K61T;B[:Y61V!K*4W%WD 215 M`D5<>7MR][ZS9>[>G=Q!3]TL..+,U?7DW?E;^D0;5F]Q,*U*R-;/=%N;SW1; 216 MG/F[6=Q>7WS@*$5_1'==44(1QM+BY!\>1[H^._PCSI<7A]4^BSF?=6'9;N,[ 217 M2H@DQX?TXG-+!]+Y9&WV49;IH8NBVM9S$,?Y(([S03O."5S8.5IVK;@"*I_# 218 MM.(29P\5+F+F)FI4'?DC`>2>[&74@F8NN(-5Q)F]DE7$U<4>JXB+B9)51'Q^ 219 MF^/SQSBD?WR^/?YL#*9ZL/&F^GH<X?7@R',1D;6(7CO?$8IV/2"M*B+`=HT2 220 M+PIL;$$'JK;$>"T./ENOMT1++@+56F^&8B:7[>Y`ZZ'`M_.!>+16//&WDU8W 221 M%)56#<3+M3Y[,ZP/?6[8%8_X4_.#6N<'M3<_F):JU*QF-#^(]Q)V]7%0H_DA 222 MZ%W\D(8CF,W\H'J@]7A:[69^,+T>R)XN&P1OA+575&P8Y^4R=IQB;ZHQBAT! 223 M`C_-`PBVT9_H`03;F/$/(%CX+/_-'T"PPHFZ^P$$V[@]'D"PC=__`03;A+T> 224 M0+!-L\<#"`X.V/7W"EREULQCAXB&H]XK<)79^%Z!PXL+A84%\VK(RG+PE)8R 225 M&S"_A=S6A5!:C_LO,LS'"O0VD'H45`>IS6ZL0'?B0N<.(>G$"XD[!+JKFBV/ 226 M(A12VJEJR],(/5"UY8&$'J@>W2SQ%,3&CNU`A5$*+NJ,]M;!M79]YM]2=CFU 227 MC^QR:A_9Y=1'R"ZG]I-=3NTEN^"Z+095IT'M0F)W*\!N"W9MH&/+@1A#@1TH 228 MK%3HOU3O_6K6]3ZOMMJ?RQ4O85H"&99*BF&0-V1;]"FK>,TF5I?RBI=K8OTI 229 MK^YUS/Q>%+3]S*4HZ>12J1)O43GMBPI5>BG+X64+7G-W/6M>RCO`3KP(F=+@ 230 MP"H$^V44[)=K@ITOO1:"_?)?(-CGZX*]7G]D9/^5FRT$8&JS'BW8M[[.44I` 231 M4X\6[,;N$NP9=,N;-W4/=,O+-^4BSYDPOEE;7L'I:99:R(#+=<$.Z[P4ZR0' 232 M)U(P\OR%9=R*@2@*[M/O3LBUXF$B91C*%C)-"(%:25G<JS4!Z6(&%F0D&-,7 233 MO`59'53=$RR2L`14"(J"\@3B>OVY6Z;V^I@[$-&'#MACPT*4I%7N&'%M.5,6 234 MA(,JIXK7_X2@%"Y$(2*M?%WL(:52#[>+JN^PJGI_\^%J(1R;#AY!*8R^^Z<] 235 MFC7PGM%'/)H5)Z!+@L76NU\J<M;N?O#'6;?[T2QG_68QDH'"YC>/;`)J=C^: 236 MY5PU@G#AQ1SHJ`Y(=XS]'4;_?ODP7<4E+":=F2YUG*5=!G::\%!EM,+8\N@, 237 MNVZ>I@SB[_B%X+W$?<LI#*AHM<2,.5M%'8*EQ'8O3,8Y3+I$<5Y%C:2V*RAD 238 MP6[Z4RG!(^.:TQ4L[,B=#4S%?&DO?%<8#-\5%H,+/8OAN]_89)AOFL&?Q&2H 239 MQ=]L,KC1SCWG1SOWG!_MW'->;YGK/5"S><;W3(:>7WB;R3#>+^R&_<)EQW:@ 240 M/JFX[[+-<,`JFF91-Z569KZ,(B"N<(JI%.W^J(7;.7&_!.3DX%XL</*`I5DM 241 MWKK=5&,'*=^^[=/0`87B!<X!@A)@'O<U"A.,[O=,W+^!"K]/&ETJ<_%PC-#; 242 MPG\K%+1PU4IM'MR0W@YKTN$V2H=;(1TXD%7<UT38JY/^FP3[1-RB&C^?_&57 243 ME7])](4R#-<0%9&(KD"S1_PM[;L3=:XIO2Q[D(C3KIN!TZX[J4,I:G&RM2=J 244 M;T>+6N%VKP]&!8#>)(-&B>,QHGE=L`]XG^R:Y59+H'JM=6K@B4F9W6(:U05] 245 M>:6X2Y4:7$<V9J=2*`:A*[9[1V5(JC9VI[(8T@:-VZDX!HOY74ID4$TU89=S 246 MT0Y9LDTS])SFY@&/Q7Q5;7E@<X`%NF+J8P;`B]>/1[%)5RS?`O&##O=+DC=D 247 M:9VSUSTF)1'@AQWO!/S_VD7CQ_O>_7C?NQ_O>_>[?>\)=)OOO>Z!JK'VEA_O 248 M>_?;?.\]9E3UD!XJ.3"F9194=E`+_:8\^"^P^;T:SX-J/`^J\3RHFK$VO]?5 249 M6)O?Z_$\J,?SH#9C;7ZO\QDOKZWX[?I[_QYGHG$T_]>3F\-XP>#N]NX5V71W 250 M'VY?G9U?+/K7?GZJ7N*Y`][@_WKYZH5Y?+6X?XP"">6XP.!U=:B.1ITH\.EQ 251 MJV>F=__D3?QO<;3`F_AZVN1\]DM.4RDL]U<_N9?T;\XB&Q"'NP_/GZHO)N?_ 252 M^=31W^GT:/*WF/S+T_,I9?S"&;_$C*]^(N0OB1C*^'LZ,NH1G;*MY4_]6NHO 253 M*4W-ZK84?>B9S1]FYN)'*F#C98+?__#TZO15>T;U\"M$DDMW"7[_0P9WZ94H 254 M;[K'QYZ9UILYWWB)Q?/AT=Y!V:^7'._^)I^1O3J]N[Z^N.V=D?6FBPHZ;F00 255 MRC*VR3S]G\7JXK!HB\EP*C<&7N/N'B,SJ'B5]/;SR???'Q2OS1(CWTX^GSBD 256 MMO^\OK@^_2M/UL]I-?0FWHA\\UY`Y'\^YRLAM^S6`7_B6A1?UIV\P><;?+ZA 257 MSP'T6J+_BJFZOCJ]OKSD5R!_%5<?/V]+`R5J>8H_C_`U52E+'Z'NI_CS"%\B 258 MRQR!HJ?X\PA?TS3SZ^(JT"2_MDM3_/R4"*P29+:1&7*@!SM(6T)N[=.NC!LH 259 M\Q&]W*'S6TCH]7M7)/3:MW$LN@)-KX[!T6F!A5-^RWAUP&H->/,(VGR&W<?7 260 M;+8*T7IRB'M4YU<?:%F]2X[B[*\(:HZK?III_5G'B^F:B?E9Q^OJL1F@,4U, 261 M:S=<KO$V';I^,?#,G<>97\KXXH#^\,V#`C^GXJ4%KIV_S,O8E4CB>XR<6K<E 262 M4R$;P=I"+F7KF.UCPL_)CK#9DS%,20>7N:&DK<T7KOIA:CLX5<`5]'<@N@#) 263 M+>KR39%?M+$#J0N0M5:[]KK?,_/J^OU[&AWZ>WU[?K<X)*F;!PFOFW?B.(*V 264 MZN/D-$X:9)S'VW@=ANY*&B0'(4NH:+S_"5+[9)?0?@8A\@SRXQDDR8_X_!&? 265 M/V)0A@MWC_<E@V[PSRZ)?W'[J6CKT)N]%0I0HI:G^//HQRA8NBQ]A+J?XL^C 266 M'Z5"0?6@Z"G^//JQ$'0NC%4HKAFK4'PU5J&<I")JK#[9WLD=.KT#W4B6Z-"9 267 ML>KIXC:5J3]MB[8I:3.H(;W;4T/ZOA8>9+<..*P!#S!@!]RL`6]F26P"9"W& 268 M<HCE6!N*G!#@UM1S?FVI)Z02"M4IJ^,?GK<BL:>P$(UDR#0-1A3-]4=Q.6O1 269 M"31D]A]#[QT/:IOC0K<<]S0)W\;GU$)O'!=:XKBO$XZ'-$#(A^6.M^D]L3]Q 270 M/*3WQ'OQP]1V<*&`&])[8H_@>$COB;V`XPUZKU$%R%JK&UV^\$!`,U*01^+P 271 MKQ<^YIR6#"4>X[O[ZQYWX-PT1C5V92Z7'1K]G'P$WS=!_&[:I1JM)V?/S*SE 272 M(\%QH:K&KJ?UN/5T@'MV1QR*@+`2O45TJ(Q81)N7]&_.JGN+:+-I$6W6%]'S 273 M8A4=X)%-J^A>-:Y;0&Y=%?^0"Z3(\]\GDW<VB8S61F'2&9B4W?=YO+_/SY-T 274 M#P13SOR6\/5OAR<,37?7\VLLB-/ER:#R(\Y!=?&NOC:SXYT+],`ON'_D`CT@ 275 M-L2NH<83[^A4)KG#?'B4\\4;[U]GOH3W;G\3SWSJA?DG68DO>?E&^F:>94R7 276 M8\H<4^9HSM$YI[C+.SF[N;YL;SG&&]=1FL9WY:*X>Q6EJ)!;0?F15E=088?5 277 M91)DL_<R/NCJXY;QJ;S:=]T>M-[/*@FZ;WP-C64'6Z_!KH]N!VL'8<OQ[F`+ 278 M4VHC!W30_G%Y"U]JV*!#[_5!J11#<?-^C6],OM,=XGWYK1K#[>$\"+A</_"R 279 M4'Z`)\#["3ER\[P\"$U=\NC1Y.P#23RQ,W)^-3EI9>7ER0K/49U?(=+)W6(& 280 M:7,7,Y:3B\75V[MWL.9LJJB6TV,_W`E'?WAWU>G*.Y4WS_<](M`>"-SCO>BU 281 M[8N(R8D-4=Y]TFH?K!MN#@YA38WW>^W#%T<?PXBCT!MW/8)I-F_F;*:[+5Q7 282 M_T#-M=IUUW);S>ELT0WLP-GOP"28YS-,YYFPE(-PV6X`J`6N>$0IP<4[(HBE 283 ME<X\'K1IPR`'^6QD#ZZHT@[0M%97@NX=B1PNDJ!]";V3EFPM!_'(4TB//,%R 284 M9DLJY6Q[Z>EX<7ER\U>2?G;<6Y&A>.CIL)J='*W'/YL]]..@W;\_U#-[-+O( 285 M:\&`P]>7YU<<SN+IY.1G/54YKY9!0F!]<N`ZS7I)H+!?YBB3`,<'#-4$X-J' 286 M@EY06IU2\_S-:=2O'+CP@/YPZ*OJ@-B+?W4I],_)`:F9?J+X2?]<O.^2M4Q6 287 M![3LXV_6<H?<X#2L(GH#8VN37;'-FLP<X4;E2KKDXLQF@:<\HCE)KJ0@?*7< 288 MLB[9;D3E>JB*3/]X33)>)/O)A7Y127RS7C0)$.$CXU[LDHNMY:%^A6L+L<=H 289 M,?S%P8.P?<1CT$5R#7@CV$`,[AL>63&LN-ZJAMCDO@])W#_$.1<#&!.?"+BO 290 M>F")$[P=Y!OO-@V?[X]0-F]],3QR;'Q_;&+#VUQQ#%46*B,)2!IZ@0.XN[HL 291 MLXF&4/<*H4N[/#O(Q&%C+X1^+V0F#1M[(0ST0I?7##-HL[$/FGX?))._V=@% 292 M3;\+$AO@K-X+JOB+;EG5QI3,MK#PQ6P$\5$$8KHH.")^A[5S&8D/*@*KG/0J 293 MZ7M:BETN:"V6L'`$6$(1&,7][[X8B)3Z'@%;$7"0T'5A>&-@7T9^GY`U7_)T 294 MQ+\:^.*[=(?,?VTHH)N3\]L8Q1"2O@NP>/?N'$>!L;AJD37P'&W]!]%Z8^G+ 295 MZS;<(*_($@(10A;:AK5*EZ<'8AHV<!%M=0K\]/KED\/7460-^0?";^T?N-^) 296 M#TPS6667P+;-`AU-WQT^^(N==3Z@3LAI8HUU9/6:@V.7UZ'/^TU5CW0Q-%5O 297 MI:3R%(A$OTZ0O1V%SMA)S>L&OH/W.YP7(4&&O9T73=7\0\Z+1E5CG1=)FC=J 298 M]#Y59JJNZ#Y[4EJNL!IEQF[^7&1*1^\_25;L"F_;;:J'_#J-VL=%TJ@U%\D: 299 @`ZN\+FA47A<T(L1I`_]3/L\&7\5_'/P?QDVV4[[%```` 300 300 ` 301 301 end -
Tst/BuchDL/Ex_L3.stat
r77006c re2af3af 1 1 >> tst_memory_0 :: 15 58013392:4120, 64 bit:4.1.2:x86_64-Linux:nepomuck:13924322 1 >> tst_memory_1 :: 15 58013392:4120, 64 bit:4.1.2:x86_64-Linux:nepomuck:371425283 1 >> tst_memory_2 :: 15 58013392:4120, 64 bit:4.1.2:x86_64-Linux:nepomuck:392396804 1 >> tst_timer_1 :: 15 58013392:4120, 64 bit:4.1.2:x86_64-Linux:nepomuck:82561 1 >> tst_memory_0 :: 1561988160:4120, 64 bit:4.1.2:x86_64-Linux:aermel:1362664 2 1 >> tst_memory_1 :: 1561988160:4120, 64 bit:4.1.2:x86_64-Linux:aermel:35123200 3 1 >> tst_memory_2 :: 1561988160:4120, 64 bit:4.1.2:x86_64-Linux:aermel:39317504 4 1 >> tst_timer_1 :: 1561988160:4120, 64 bit:4.1.2:x86_64-Linux:aermel:3738 -
Tst/Short/bug_529.res.gz.uu
r77006c re2af3af 1 begin 640 bug_529.res.gz 2 M'XL(")QC15@``V)U9U\U,CDN<F5S`'5276O",!1][Z^XZ!X2UU43[?RBQ6V^ 3 M%,80'/@@(MI&R:9I32*6C?WW1:MME2V0Y"3WXYR;W/'[,'@#`.+#:_`,%:VT 4 ML^'+2M\:GRW4!W,YYX)KA/O6<0??A^5^/7=IUQ'LX"B]T+E_TX<<MQR($\UC 5 M@0X+*7"1U#W1H4HB^39BX8FR9'XLY6@[D,@XA"T73TJ-3`!3$Q2Q%00X=^HX 6 M\)T?NHY90#*]EP*-,H9>KQR/`@P8<CY"'/C)#[0@)\TSN:ERR,)XFXPU2R:( 7 M1VRQ`6[#ABL-U5P':95T$/=/'5>I4&!7KZ6TRU(Z)2FF*LG%&J29'FI@&Z6A 8 MG:[M=&=@E*`FME^*)Z0-'S*5`7B0[HQG83.??5-08"+K=:C5@(M0LH5BYV@" 9 M#SY0<PN7L9*<15/%OQ@Z07Q/9M[@8SKXG/6M*9GU+.,T-\!+=QFD!JXML_UG 10 LNN@R+W_]RVU\DY+DOJ4VHT6;B?BZT:B;=>^Q0_<*$=R'.^L775#X]?0"```` 1 begin 600 bug_529.res.gz 2 M'XL("`D,&ET"`V)U9U\U,CDN<F5S`(U3;6_:,!#^GE]QHOM@=R'%!D8+(NJV 3 M?HF$IDI4[8<((9JXR!LXP39JU&G_?9<7\M(5:9$<GWW//?><[5L^W`4_`(#Y 4 ML`B^0<\:Z^WD<V_F+"L/]P$WUU))2^C,R6?P?7@^;M=C?N,I\>H9N[$U?NA# 5 M;8\\2%(K$T5>-UK1AG1<I".]5,M]+*(B9<O]I<4Q\2#5201[J;X:<X\!PCR1 6 M6+Q`0&O0M0>_Z\6-AS_0PAZU(O=EANFT'4\""A3J?(QY\*=>\"8Y&U;)L<H[ 7 M$27[=&E%^D1D+#8[D"[LI+%P4>M@HY8.-OY01X>*!.Y%5\JD+>6Z)06KTE)M 8 M0>.8DP%U21:YV=;-#FC&*1E2]WMSA'S@0ZDR@#ED!T0V/KSL=P4%&'EU!9>7 9 M(%6DQ<:(*II!WP>.NW#Z7K04<6CDFR"%23^SU?SV9WC[:_4/1W$\_8)C<.)8 10 MA&R%DG;L/]"+4*I89#G>V+QZ8L+HJ+4+17Y#^_EJ13^F&N1,K&2J;N'Q#+1; 11 M9@7./61!SX3P/&1XTCDJ:AK-'*QNZN#6&HUY=BA-CN;6P>F<ZW0S^/:Z[WQ" 12 DWU&R&MMJ--XTFDJZK<;'9?_F/7HTA-$9?'+^`J$%"U#V`P`` 11 13 ` 12 14 end -
Tst/Short/bug_529.stat
r77006c re2af3af 1 1 >> tst_memory_0 :: 1 480942444:4100, 64 bit:4.1.0:x86_64-Linux:nepomuck:2321842 1 >> tst_memory_1 :: 1 480942444:4100, 64 bit:4.1.0:x86_64-Linux:nepomuck:23429123 1 >> tst_memory_2 :: 1 480942444:4100, 64 bit:4.1.0:x86_64-Linux:nepomuck:23715844 1 >> tst_timer_1 :: 1 480942444:4100, 64 bit:4.1.0:x86_64-Linux:nepomuck:21 1 >> tst_memory_0 :: 1561988105:4120, 64 bit:4.1.2:x86_64-Linux:aermel:217032 2 1 >> tst_memory_1 :: 1561988105:4120, 64 bit:4.1.2:x86_64-Linux:aermel:2273280 3 1 >> tst_memory_2 :: 1561988105:4120, 64 bit:4.1.2:x86_64-Linux:aermel:2404352 4 1 >> tst_timer_1 :: 1561988105:4120, 64 bit:4.1.2:x86_64-Linux:aermel:5 -
factory/ffops.h
r4142c90 re2af3af 152 152 return ff_biginv( a ); 153 153 else { 154 registerint b;154 int b; 155 155 if ( (b = (int)(ff_invtab[a])) ) 156 156 return b;
Note: See TracChangeset
for help on using the changeset viewer.