Changeset 3c1bbe in git


Ignore:
Timestamp:
Feb 26, 2002, 10:01:50 AM (22 years ago)
Author:
Mathias Schulze <mschulze@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '648d28f488f6ff08f5607ff229b9ad9e4a5b93c2')
Children:
cdb1d713645356207569d4ec376d2b78acb53f9d
Parents:
3b851548b988d13c8e7b18ce671762fd31a0cb75
Message:
*** empty log message ***


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/gaussman.lib

    r3b8515 r3c1bbe  
    11///////////////////////////////////////////////////////////////////////////////
    2 version="$Id: gaussman.lib,v 1.71 2002-02-25 18:35:43 mschulze Exp $";
     2version="$Id: gaussman.lib,v 1.72 2002-02-26 09:01:38 mschulze Exp $";
    33category="Singularities";
    44
     
    358358
    359359  dbprint(printlevel-voice+2,"// transform A to saturation of H''");
    360   matrix A=division(module(A0*H+s^2*diff(matrix(H),s)),H,K+1,intvec(1))[1]/s;
     360  matrix A=division(A0*H+s^2*diff(matrix(H),s),H,K+1,intvec(1))[1]/s;
    361361
    362362  return(A,A0,r);
     
    12001200
    12011201  dbprint(printlevel-voice+2,"// compute matrix A0+sA1 of t");
    1202   A=division(module(s*A*H+s^2*diff(matrix(H),s)),H,1,intvec(1))[1];
     1202  A=division(s*A*H+s^2*diff(matrix(H),s),H,1,intvec(1))[1];
    12031203  A0=jet(A,0);
    12041204  A=jet(A,1)/s;
Note: See TracChangeset for help on using the changeset viewer.