Top
Back: vwfilt
Forward: endvfilt
FastBack: equising_lib
FastForward: hnoether_lib
Up: gaussman_lib
Top: Singular Manual
Contents: Table of Contents
Index: Index
About: About this document

D.5.4.10 tmatrix

Procedure from library gaussman.lib (see gaussman_lib).

Usage:
tmatrix(t); poly t

Assume:
characteristic 0; local degree ordering;
isolated critical point 0 of t

Return:
list A; t-matrix A[1]+s*A[2] on H"

Example:
 
LIB "gaussman.lib";
ring R=0,(x,y),ds;
poly t=x5+x2y2+y5;
list A=tmatrix(t);
print(A[1]);
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 0,0,0,0,0,0,0,0,0,0,0,
==> 1,0,0,0,0,0,0,0,0,0,0 
print(A[2]);
==> 1/2,0,   0,   0,   0,   0,0,    0,    0,    0,    0, 
==> 0,  7/10,0,   0,   0,   0,0,    0,    0,    0,    0, 
==> 0,  0,   7/10,0,   0,   0,0,    0,    0,    0,    0, 
==> 0,  0,   0,   9/10,0,   0,0,    0,    0,    0,    0, 
==> 0,  0,   0,   0,   9/10,0,0,    0,    0,    0,    0, 
==> 0,  0,   0,   0,   0,   1,0,    0,    0,    0,    0, 
==> 0,  0,   0,   0,   0,   0,11/10,0,    0,    0,    0, 
==> 0,  0,   0,   0,   0,   0,0,    11/10,0,    0,    0, 
==> 0,  0,   0,   0,   0,   0,0,    0,    13/10,0,    0, 
==> 0,  0,   0,   0,   0,   0,0,    0,    0,    13/10,0, 
==> 0,  0,   0,   0,   0,   0,0,    0,    0,    0,    3/2


Top Back: vwfilt Forward: endvfilt FastBack: equising_lib FastForward: hnoether_lib Up: gaussman_lib Top: Singular Manual Contents: Table of Contents Index: Index About: About this document
            User manual for Singular version 2-0-2, August 2001, generated by texi2html.