Changeset 4bde6b in git for Singular/LIB/reszeta.lib


Ignore:
Timestamp:
May 15, 2020, 3:20:00 PM (4 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
Children:
a1b40ab8675488c2a4f8e225d9d748ba70340727
Parents:
538e06d0809adf9f75fea000cf70d354bb674ab5
Message:
spelling p1
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/reszeta.lib

    r538e06 r4bde6b  
    13681368//--- compute the Euler characteristic of the Ei,Eij,Eijk and the
    13691369//--- corresponding Ei^*,Eij^*,Eijk^* by preparing the input to the
    1370 //--- specialized auxilliary procedures and then recombining the results
     1370//--- specialized auxiliary procedures and then recombining the results
    13711371
    13721372//----------------------------------------------------------------------------
     
    15341534//--- compute the Euler characteristic of the Ei,Eij,Eijk and the
    15351535//--- corresponding Ei^*,Eij^*,Eijk^* by preparing the input to the
    1536 //--- specialized auxilliary procedures and then recombining the results
     1536//--- specialized auxiliary procedures and then recombining the results
    15371537
    15381538//----------------------------------------------------------------------------
     
    17161716@*        L    = list of rings
    17171717ASSUME:   L is the output of resolution of singularities
    1718 RETRUN:   discrepancies of the given resolution"
     1718RETURN:   discrepancies of the given resolution"
    17191719{
    17201720//----------------------------------------------------------------------------
     
    17801780                     ast[2]=chi(Eij^*)
    17811781                     ast[3]=chi(Eijk^*)
    1782           l[3]: intvec nu of multiplicites as needed in computation of zeta
     1782          l[3]: intvec nu of multiplicities as needed in computation of zeta
    17831783                function
    1784           l[4]: intvec N of multiplicities as needed in compuation of zeta
     1784          l[4]: intvec N of multiplicities as needed in computation of zeta
    17851785                function
    17861786          l[5]: string specifying characteristic polynomial of monodromy,
     
    40304030"
    40314031{
    4032 //--- auxilliary procedure for collectDiv,
     4032//--- auxiliary procedure for collectDiv,
    40334033//--- inserting an entry at the correct place
    40344034   int i=1;
     
    48024802      algext=attrib(idname,"algext");
    48034803   }
    4804 //--- check wheter comPa is in the history of m1
     4804//--- check whether comPa is in the history of m1
    48054805//--- same test for o1 can be done later on (on the fly)
    48064806   if(m1==comPa)
     
    54235423"
    54245424{
    5425 //--- auxilliary procedure for addSelfInter
     5425//--- auxiliary procedure for addSelfInter
    54265426//--- compute multiplicity, suitable for the special situation there
    54275427  int d=1;
Note: See TracChangeset for help on using the changeset viewer.