Changeset 3c1bbe in git
- Timestamp:
- Feb 26, 2002, 10:01:50 AM (21 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'f875bbaccd0831e36aaed09ff6adeb3eb45aeb94')
- Children:
- cdb1d713645356207569d4ec376d2b78acb53f9d
- Parents:
- 3b851548b988d13c8e7b18ce671762fd31a0cb75
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/gaussman.lib
r3b8515 r3c1bbe 1 1 /////////////////////////////////////////////////////////////////////////////// 2 version="$Id: gaussman.lib,v 1.7 1 2002-02-25 18:35:43mschulze Exp $";2 version="$Id: gaussman.lib,v 1.72 2002-02-26 09:01:38 mschulze Exp $"; 3 3 category="Singularities"; 4 4 … … 358 358 359 359 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; 361 361 362 362 return(A,A0,r); … … 1200 1200 1201 1201 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]; 1203 1203 A0=jet(A,0); 1204 1204 A=jet(A,1)/s;
Note: See TracChangeset
for help on using the changeset viewer.