##### 7.7.8.0. fullSerreRelations

Procedure from library `freegb.lib` (see freegb_lib).

Usage:
  fullSerreRelations(A,N,C,P,d); A an intmat, N,C,P ideals, d an int

Return:
  ring (and ideal)

Purpose:
  compute the inhomogeneous Serre's relations associated to A in given
  variable names

Assume:
  three ideals in the input are of the same sizes and contain merely
  variables which are interpreted as follows: N resp. P stand for negative
  resp. positive roots, C stand for Cartan elements. d is the degree bound for
  letterplace ring, which will be returned.
  The matrix A is a generalized Cartan matrix with integer entries
  The result is the ideal called 'fsRel' in the returned ring.

Example:

    LIB "freegb.lib";
    intmat A[2][2] =
    2, -1,
    -1, 2; // A_2 = sl_3 Cartan matrix
    ring r = 0,(f1,f2,h1,h2,e1,e2),dp;
    ideal negroots = f1,f2; ideal cartans = h1,h2; ideal posroots = e1,e2;
    int uptodeg = 5;
    def RS = fullSerreRelations(A,negroots,cartans,posroots,uptodeg);
    setring RS; fsRel;
    ==> fsRel[1]=f1(1)*f2(2)*f2(3)-2*f2(1)*f1(2)*f2(3)+f2(1)*f2(2)*f1(3)
    ==> fsRel[2]=f1(1)*f1(2)*f2(3)-2*f1(1)*f2(2)*f1(3)+f2(1)*f1(2)*f1(3)
    ==> fsRel[3]=e1(1)*e2(2)*e2(3)-2*e2(1)*e1(2)*e2(3)+e2(1)*e2(2)*e1(3)
    ==> fsRel[4]=e1(1)*e1(2)*e2(3)-2*e1(1)*e2(2)*e1(3)+e2(1)*e1(2)*e1(3)
    ==> fsRel[5]=f2(1)*e1(2)-e1(1)*f2(2)
    ==> fsRel[6]=f1(1)*e2(2)-e2(1)*f1(2)
    ==> fsRel[7]=-f1(1)*e1(2)+e1(1)*f1(2)-h1(1)
    ==> fsRel[8]=-f2(1)*e2(2)+e2(1)*f2(2)-h2(1)
    ==> fsRel[9]=h1(1)*h2(2)-h2(1)*h1(2)
    ==> fsRel[10]=h1(1)*e1(2)-e1(1)*h1(2)-2*e1(1)
    ==> fsRel[11]=f1(1)*h1(2)-h1(1)*f1(2)-2*f1(1)
    ==> fsRel[12]=h1(1)*e2(2)-e2(1)*h1(2)+e2(1)
    ==> fsRel[13]=f2(1)*h1(2)-h1(1)*f2(2)+f2(1)
    ==> fsRel[14]=h2(1)*e1(2)-e1(1)*h2(2)+e1(1)
    ==> fsRel[15]=f1(1)*h2(2)-h2(1)*f1(2)+f1(1)
    ==> fsRel[16]=h2(1)*e2(2)-e2(1)*h2(2)-2*e2(1)
    ==> fsRel[17]=f2(1)*h2(2)-h2(1)*f2(2)-2*f2(1)

User manual for Singular version 4-0-3, 2016, generated by texi2html.