Changeset 1dc0144 in git for Singular


Ignore:
Timestamp:
Jul 6, 2022, 3:49:04 PM (22 months ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
Children:
c894d1ba0b692e54f6dddf08d4b09e06c446a8dc
Parents:
da3bc3a8b3c9da1c97db491be78d56461b87c72d
Message:
Wolrams comments to doc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/integralbasis.lib

    rda3bc3a r1dc0144  
    4343        - \"normal\" -> the integral basis is computed using the general
    4444        normalization algorithm.@*
    45         - \"hensel\" -> the integral bases is computed using an algorithm
    46         based on Puiseux expansions and Hensel lifting. (Default option.)
    47         @*Options for normal algorithm:@*
    48         - \"global\" -> computes the normalization of R / <f> and put the
     45        - \"hensel\" -> the integral bases is computed using an algorithm
     46        based on Puiseux expansions and Hensel lifting. (only available for
     47        polynomials with rational coefficients; default option in that case)@*
     48        Options for normal algorithm:@*
     49        - \"global\" -> computes the normalization of R / <f> and puts the
    4950        results in integral basis shape.@*
    5051        - \"local\" -> computes the normalization at each component of
    51         the singular locus of R/<f> and puts everything together. 
     52        the singular locus of R/<f> and puts everything together.
    5253        (Default option for normal algorithm.)
    5354        @*Other options:@*
     
    5960        - \"nonModular\" -> do not uses modular algorithms. (Default option for
    6061        ground fields of positive charecteristic.)@*
    61         - \"atOrigin\" -> will compute the local contribution at the origin
    62         to the integral basis, assuming that the curve has a singularity at
    63         the origin.@*
     62        - \"atOrigin\" -> will compute the local contribution to the integral
     63        basis at the origin only (naturally, this contribution is only relevant
     64        if the curve defined by f has a singularity at the origin).@*
    6465        - \"isIrred\" -> assumes that the input polynomial f is irreducible,
    6566        and therefore will not check this. If this option is given but f is not
     
    8889        the degree of f as a polynomial in y.@*
    8990THEORY:  We compute the integral basis of the integral closure of k[x] in k(x,y).
    90          When option \"normal\" is selected, the normalization of the affine 
     91         When option \"normal\" is selected, the normalization of the affine
    9192         ring k[x,y]/<f> is computed using procedure normal from normal.lib,
    9293         which implements a general algorithm for normalization of rings
    93          by G. Greuel, S. Laplagne and F. Seelisch, and the k[x,y]-module 
     94         by G. Greuel, S. Laplagne and F. Seelisch, and the k[x,y]-module
    9495         generators are converted into a k[x]-basis.
    95          When option \"Hensel\" is selected, the algorithm by J. Boehm, W. Decker, 
     96         When option \"Hensel\" is selected, the algorithm by J. Boehm, W. Decker,
    9697         S. Laplagne and G. Pfister is used. @*
    9798KEYWORDS: integral basis; normalization.
     
    12651266    list classesNew;
    12661267    list classesTemp;
    1267    
    1268    
     1268
     1269
    12691270    int clInd = 1;
    1270    
     1271
    12711272    for(i = 1; i <= size(I2Lifted)-1; i++)
    12721273    {
     
    13741375    "Maximum degree required for merging: ", mdm;
    13751376  }
    1376  
     1377
    13771378  list ifOut = irreducibleFactors(f, classes, blocks, mdm);
    13781379  list I2LiftedFull = ifOut[1];
    1379  
     1380
    13801381  // The classes are reordered in the same order as the irreducible factors
    13811382  classes = ifOut[5];
    1382  
     1383
    13831384  if((ifOut[4] == 1))  // Wrong number of factors, recompute orders
    13841385  {
     
    30533054    def R = basering;
    30543055    int blInd;
    3055    
     3056
    30563057    for(i = 2; i <= size(I2Lifted); i++)
    30573058    {
     
    30633064      newL = puiseux(I2Lifted[i], -1, 1);
    30643065      classes2 = getClasses(newL);
    3065      
     3066
    30663067      blInd = 1;
    30673068      for(j =1; j <= size(classes); j++)
     
    30743075      }
    30753076
    3076      
     3077
    30773078      if(size(classes2) > 1)
    30783079      {
     
    31453146    wrongNumber = 1;
    31463147  }
    3147   list ll = list(I2Lifted, gfCheckList, gfCheck, wrongNumber, updatedClasses); 
     3148  list ll = list(I2Lifted, gfCheckList, gfCheck, wrongNumber, updatedClasses);
    31483149
    31493150  return(ll);
Note: See TracChangeset for help on using the changeset viewer.