Changeset 92b7f0 in git


Ignore:
Timestamp:
Oct 14, 2014, 10:55:52 AM (10 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
Children:
34022565884d80f321b77cf39d8f121a0f5b46059816f392b7b239b26d4d6f3758f36db684ebdb07f279fb7d51f5a927276ae06add0fb34f7e3b57a5
Parents:
512076c24612a4f6261287b0c91e8c78547cd81e
Message:
algemodstd.lib: format, tests
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/algemodstd.lib

    r512076c r92b7f0  
    1 //////////////////////////////////////////////////////////////////////////////////////////////
    2 version="$Id$";
     1////////////////////////////////////////////////////////////////////////////////
     2version="version algemodstd.lib 4.0.1.0 Sep_2014 ";  // $Id$
    33category="Commutative Algebra";
    44info="
     
    1111
    1212OVERVIEW:
    13 
    1413  A library for computing the Groebner basis of an ideal in the polynomial
    1514  ring over an algebraic number field Q(t) using the modular methods, where t is
     
    3938LIB "modstd.lib";
    4039
    41 /////////////////////////////////////////////////////////////////////////////////////
     40////////////////////////////////////////////////////////////////////////////////
    4241
    4342static proc testPrime(int p, ideal I)
     
    8180}
    8281
    83 /////////////////////////////////////////////////////////////////////////////////////
     82////////////////////////////////////////////////////////////////////////////////
    8483/* return 1 if the number of factors are in the required bound , 0 else */
    8584
     
    113112}
    114113
    115 /////////////////////////////////////////////////////////////////////////////////////
     114////////////////////////////////////////////////////////////////////////////////
    116115/* return 1 if both testPrime(p,J) and minpolyTask(f,p) is true, 0 else */
    117116
     
    131130}
    132131
    133 /////////////////////////////////////////////////////////////////////////////////////
     132////////////////////////////////////////////////////////////////////////////////
    134133/* compute factors of f mod p with multiplicity */
    135134
     
    150149}
    151150
    152 /////////////////////////////////////////////////////////////////////////////////////
     151////////////////////////////////////////////////////////////////////////////////
    153152/* set a bound for number of factors w.r.t degree nr*/
    154153
     
    188187}
    189188
    190 /////////////////////////////////////////////////////////////////////////////////////
     189///////////////////////////////////////////////////////////////////////////////
    191190// return 1 if v[i]>1 , 0 else
    192191
     
    203202}
    204203
    205 /////////////////////////////////////////////////////////////////////////////////////
     204////////////////////////////////////////////////////////////////////////////////
    206205//chinese remaindering for polynomials only for input of size two  ///
    207206
     
    221220}
    222221
    223 /////////////////////////////////////////////////////////////////////////////////////////////////
     222////////////////////////////////////////////////////////////////////////////////
    224223
    225224proc chinrempoly(list l,list m)
     
    287286}
    288287
    289 /////////////////////////////////////////////////////////////////////////////////////
     288////////////////////////////////////////////////////////////////////////////////
    290289
    291290static proc LiftPolyCRT(ideal I)
     
    320319}
    321320
    322 /////////////////////////////////////////////////////////////////////////////////////
     321////////////////////////////////////////////////////////////////////////////////
    323322
    324323static proc PtestStd(string command, list args, ideal result, int p)
     
    366365}
    367366
    368 /////////////////////////////////////////////////////////////////////////////////////
     367////////////////////////////////////////////////////////////////////////////////
    369368
    370369static proc cleardenomIdeal(ideal I)
     
    385384}
    386385
    387 //////////////////////////////////////////////////////////////////////////////////////////////////
     386////////////////////////////////////////////////////////////////////////////////
    388387
    389388static proc modStdparallelized(ideal I)
     
    397396}
    398397
    399 //////////////////////////////////////////////////////////////////////////////////////////////////
     398////////////////////////////////////////////////////////////////////////////////
    400399/* main procedure */
    401400proc algemodStd(ideal I, list #)
  • Tst/Long/ok_l2.lst

    r512076c r92b7f0  
     1algemodstd_l
    12bug_tr642
    23king_3_colors_l
  • Tst/Short.lst

    r512076c r92b7f0  
    22Short/alexpoly.tst
    33Short/algebralib.tst
     4Short/algemodstd_s
    45Short/allres_s.tst
    56Short/arcAtPoint.tst
Note: See TracChangeset for help on using the changeset viewer.