Changeset f27ab81 in git for Singular/LIB/reszeta.lib


Ignore:
Timestamp:
Sep 29, 2010, 9:51:53 AM (14 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
Children:
268a430602af3e8f6acf561cfe439410f00a5630
Parents:
a4314497fa8a79cff4821b3eb6eb9eaf61f3db15
Message:
format fix

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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/reszeta.lib

    ra431449 rf27ab81  
    99@*        G. Pfister,           pfister@mathematik.uni-kl.de
    1010
    11 MAIN PROCEDURES:
     11PROCEDURES:
    1212intersectionDiv(L)   computes intersection form and genera of exceptional
    1313                     divisors (isolated singularities of surfaces)
     
    1717zetaDL(L,d)          computes Denef-Loeser zeta function
    1818                     (hypersurface singularity of dimension 2)
    19 
    20 AUXILLIARY PROCEDURES:
    2119collectDiv(L[,iv])   identify exceptional divisors in different charts
    2220                     (embedded and non-embedded case)
     
    2927LIB "normal.lib";
    3028///////////////////////////////////////////////////////////////////////////////
    31 static
    32 proc spectral1(poly h,list re, list DL,intvec v, intvec n)
     29static proc spectral1(poly h,list re, list DL,intvec v, intvec n)
    3330"Internal procedure - no help and no example available
    3431"
     
    140137
    141138///////////////////////////////////////////////////////////////////////////////
    142 static
    143 proc ordE(ideal J,ideal E,ideal W)
     139static proc ordE(ideal J,ideal E,ideal W)
    144140"Internal procedure - no help and no example available
    145141"
     
    161157
    162158///////////////////////////////////////////////////////////////////////////////
    163 static
    164 proc computeV(list re, list DL)
     159static proc computeV(list re, list DL)
    165160"Internal procedure - no help and no example available
    166161"
     
    216211
    217212///////////////////////////////////////////////////////////////////////////////
    218 static
    219 proc jacobDet(ideal I, ideal J)
     213static proc jacobDet(ideal I, ideal J)
    220214"Internal procedure - no help and no example available
    221215"
     
    318312
    319313///////////////////////////////////////////////////////////////////////////////
    320 static
    321 proc computeH(ideal h,list re,list DL)
     314static proc computeH(ideal h,list re,list DL)
    322315"Internal procedure - no help and no example available
    323316"
     
    368361
    369362//////////////////////////////////////////////////////////////////////////////
    370 static
    371 proc computeN(list re,list DL)
     363static proc computeN(list re,list DL)
    372364"Internal procedure - no help and no example available
    373365"
     
    423415}
    424416//////////////////////////////////////////////////////////////////////////////
    425 static
    426 proc countEijk(list re,list iden,intvec iv,list #)
     417static proc countEijk(list re,list iden,intvec iv,list #)
    427418"Internal procedure - no help and no example available
    428419"
     
    546537}
    547538//////////////////////////////////////////////////////////////////////////////
    548 static
    549 proc chiEij(list re, list iden, intvec iv)
     539static proc chiEij(list re, list iden, intvec iv)
    550540"Internal procedure - no help and no example available
    551541"
     
    689679//////////////////////////////////////////////////////////////////////////////
    690680//////////////////////////////////////////////////////////////////////////////
    691 static
    692 proc chiEij_local(list re, list iden, intvec iv)
     681static proc chiEij_local(list re, list iden, intvec iv)
    693682"Internal procedure - no help and no example available
    694683"
     
    847836}
    848837//////////////////////////////////////////////////////////////////////////////
    849 static
    850 proc computeChiE(list re, list iden)
     838static proc computeChiE(list re, list iden)
    851839"Internal procedure - no help and no example available
    852840"
     
    10201008}
    10211009//////////////////////////////////////////////////////////////////////////////
    1022 static
    1023 proc computeChiE_local(list re, list iden)
     1010static proc computeChiE_local(list re, list iden)
    10241011"Internal procedure - no help and no example available
    10251012"
     
    13481335}
    13491336//////////////////////////////////////////////////////////////////////////////
    1350 static
    1351 proc chi_ast(list re,list iden,list #)
     1337static proc chi_ast(list re,list iden,list #)
    13521338"Internal procedure - no help and no example available
    13531339"
     
    15151501}
    15161502//////////////////////////////////////////////////////////////////////////////
    1517 static
    1518 proc chi_ast_local(list re,list iden,list #)
     1503static proc chi_ast_local(list re,list iden,list #)
    15191504"Internal procedure - no help and no example available
    15201505"
     
    20722057}
    20732058//////////////////////////////////////////////////////////////////////////////
    2074 static
    2075 proc decompE(list BO)
     2059static proc decompE(list BO)
    20762060"Internal procedure - no help and no example available
    20772061"
     
    23082292}
    23092293///////////////////////////////////////////////////////////////////////////////
    2310 static
    2311 proc decompEinX(list BO)
     2294static proc decompEinX(list BO)
    23122295"Internal procedure - no help and no example available
    23132296"
     
    23712354}
    23722355//////////////////////////////////////////////////////////////////////////////
    2373 static
    2374 proc getMinpoly(poly p)
     2356static proc getMinpoly(poly p)
    23752357"Internal procedure - no help and no example available
    23762358"
     
    25612543}
    25622544//////////////////////////////////////////////////////////////////////////////
    2563 static
    2564 proc getNumZeros(poly p)
     2545static proc getNumZeros(poly p)
    25652546"Internal procedure - no help and no example available
    25662547"
     
    26182599}
    26192600///////////////////////////////////////////////////////////////////////////////
    2620 static
    2621 proc grad(ideal I)
     2601static proc grad(ideal I)
    26222602"Internal procedure - no help and no example available
    26232603"
     
    27972777}
    27982778////////////////////////////////////////////////////////////////////////////
    2799 static
    2800 proc Kontakt(ideal I, ideal K)
     2779static proc Kontakt(ideal I, ideal K)
    28012780"Internal procedure - no help and no example available
    28022781"
     
    29342913}
    29352914//////////////////////////////////////////////////////////////////////////////
    2936 static
    2937 proc abstractNC(list BO)
     2915static proc abstractNC(list BO)
    29382916"Internal procedure - no help and no example available
    29392917"
     
    30172995}
    30182996//////////////////////////////////////////////////////////////////////////////
    3019 static
    3020 proc nodes(ideal J)
     2997static proc nodes(ideal J)
    30212998"Internal procedure - no help and no example available
    30222999"
     
    34873464}
    34883465//////////////////////////////////////////////////////////////////////////////
    3489 static
    3490 proc intersComp(string str1,
     3466static proc intersComp(string str1,
    34913467                string mp1,
    34923468                list null1,
     
    35943570}
    35953571/////////////////////////////////////////////////////////////////////////////
    3596 static
    3597 proc addSelfInter(list re,intmat Inters,list iden,list iden0,intvec endiv)
     3572static proc addSelfInter(list re,intmat Inters,list iden,list iden0,intvec endiv)
    35983573"Internal procedure - no help and no example available
    35993574"
     
    38013776}
    38023777//////////////////////////////////////////////////////////////////////////////
    3803 static
    3804 proc invSort(list re, list #)
     3778static proc invSort(list re, list #)
    38053779"Internal procedure - no help and no example available
    38063780"
     
    40253999}
    40264000/////////////////////////////////////////////////////////////////////////////
    4027 static
    4028 proc addToRE(intvec v,int x,list RE)
     4001static proc addToRE(intvec v,int x,list RE)
    40294002"Internal procedure - no help and no example available
    40304003"
     
    44374410}
    44384411//////////////////////////////////////////////////////////////////////////////
    4439 static
    4440 proc cleanUpDiv(list re,intmat M,list divList)
     4412static proc cleanUpDiv(list re,intmat M,list divList)
    44414413"Internal procedure - no help and no example available
    44424414"
     
    45584530}
    45594531/////////////////////////////////////////////////////////////////////////////
    4560 static
    4561 proc findTrans(ideal Z, ideal E, list notE, list #)
     4532static proc findTrans(ideal Z, ideal E, list notE, list #)
    45624533"Internal procedure - no help and no example available
    45634534"
     
    46734644}
    46744645/////////////////////////////////////////////////////////////////////////////
    4675 static
    4676 proc compareE(list L, int m, int o, list DivL)
     4646static proc compareE(list L, int m, int o, list DivL)
    46774647"Internal procedure - no help and no example available
    46784648"
     
    53925362}
    53935363/////////////////////////////////////////////////////////////////////////////
    5394 static
    5395 proc findInIVList(int pos, int val, list ivl)
     5364static proc findInIVList(int pos, int val, list ivl)
    53965365"Internal procedure - no help and no example available
    53975366"
     
    54295398}
    54305399//////////////////////////////////////////////////////////////////////////////
    5431 static
    5432 proc Vielfachheit(ideal J,ideal I)
     5400static proc Vielfachheit(ideal J,ideal I)
    54335401"Internal procedure - no help and no example available
    54345402"
     
    54545422}
    54555423/////////////////////////////////////////////////////////////////////////////
    5456 static
    5457 proc genus_E(list re, list iden0, intvec Eindex)
     5424static proc genus_E(list re, list iden0, intvec Eindex)
    54585425"Internal procedure - no help and no example available
    54595426"
Note: See TracChangeset for help on using the changeset viewer.