Changeset 78f84b8 in git for Singular/LIB


Ignore:
Timestamp:
Dec 6, 2010, 2:18:47 PM (13 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
62dc18e64e0afd2619c26b9da6ea6a56f9dfa2f5
Parents:
77352a3db5f5906df3f03cc2f8772002814963fc
Message:
some format fixes

git-svn-id: file:///usr/local/Singular/svn/trunk@13732 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/jacobson.lib

    r77352a r78f84b8  
    787787}
    788788
    789 //static 
     789//static
    790790proc triangle(matrix MA, int B)
    791791{
     
    888888        p=0;
    889889        i=1;
    890         while(STD_EX[j-1][i]==0){i++;};
     890        while(STD_EX[j-1][i]==0){i++;}
    891891        p=i-1;
    892892        nextp=1;
     
    959959        {
    960960         TrafoL=transpose(LT)*TrafoL;
    961         dbprint(ppl-1,"Left transformation matrix:");
    962         dbprint(ppl-1,TrafoL);
    963         @s = texobj("",matrix(TrafoL));
    964         dbprint(ppl-2,"Left transformation matrix in TeX format:");
    965         dbprint(ppl-2,@s);
    966         }
     961        dbprint(ppl-1,"Left transformation matrix:");
     962        dbprint(ppl-1,TrafoL);
     963        @s = texobj("",matrix(TrafoL));
     964        dbprint(ppl-2,"Left transformation matrix in TeX format:");
     965        dbprint(ppl-2,@s);
     966        }
    967967       else
    968968        {
    969969         TrafoR=TrafoR*involution(LT,inv);
    970         dbprint(ppl-1,"Right transformation matrix:");
    971         dbprint(ppl-1,matrix(TrafoR));
    972         @s = texobj("",TrafoR);
    973         dbprint(ppl-2,"Right transformation matrix in TeX format:");
    974         dbprint(ppl-2,@s);
     970        dbprint(ppl-1,"Right transformation matrix:");
     971        dbprint(ppl-1,matrix(TrafoR));
     972        @s = texobj("",TrafoR);
     973        dbprint(ppl-2,"Right transformation matrix in TeX format:");
     974        dbprint(ppl-2,@s);
    975975        }
    976976
     
    11591159matrix m[2][3] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+1)^3;
    11601160matrix m[2][3] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+s)^2; // variation
    1161 matrix m[2][4] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+1)^3, (x+s)^2, x*s; // bug (matrix sizes 
     1161matrix m[2][4] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+1)^3, (x+s)^2, x*s; // bug (matrix sizes
    11621162matrix m[3][4] = s,x^2*s,x^3*s,s*x^2,s*x+1,(x+1)^3, (x+s)^2, x*s; // here the last row contains zeros
    11631163
Note: See TracChangeset for help on using the changeset viewer.