Changeset 8ad293 in git


Ignore:
Timestamp:
Nov 10, 2021, 4:51:44 PM (2 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
251720808cd4b2d2eb0def40181a771e71b6f001
Parents:
a00aa7153c2eabb85384a5dccf133c9f5347d8e2
git-author:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2021-11-10 16:51:44+01:00
git-committer:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2021-11-10 17:05:05+01:00
Message:
printing is optional (finvar.lib)
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/finvar.lib

    ra00aa7 r8ad293  
    11//////////////////////////////////////////////////////////////////////////////
    2 version="version finvar.lib 4.1.2.0 Feb_2019 "; // $Id$
     2version="version finvar.lib 4.2.1.0 Nov=2021 "; // $Id$
    33category="Invariant theory";
    44info="
     
    282282  if (ch<>0)
    283283  { if ((g%ch)==0)
    284     { if (voice==2)
    285       { "WARNING: The characteristic of the coefficient field divides the group order.";
    286         "         Proceed without the Reynolds operator!";
    287       }
    288       else
    289       { if (v)
    290         { "  The characteristic of the base field divides the group order.";
    291           "  We have to continue without Reynolds operator...";
    292           "";
    293         }
     284    {
     285      if (v)
     286      { "  The characteristic of the base field divides the group order.";
     287        "  We have to continue without Reynolds operator...";
     288        "";
    294289      }
    295290      kill REY;
     
    436431  if (ch<>0)
    437432  { if ((g%ch)==0)
    438     { if (voice==2)
    439       { "WARNING: The characteristic of the coefficient field divides the group";
    440         "         order. Proceed without the Molien series!";
    441       }
    442       else
    443       { if (v)
    444         { "  The characteristic of the base field divides the group order.";
    445           "  We have to continue without Molien series...";
    446           "";
    447         }
     433    {
     434      if (v)
     435      { "  The characteristic of the base field divides the group order.";
     436        "  We have to continue without Molien series...";
     437        "";
    448438      }
    449439    }
    450440    if (minpoly<>0 && mol_flag==0)
    451     { if (voice==2)
    452       { "WARNING: It is impossible for this program to calculate the Molien series";
    453         "         for finite groups over extension fields of prime characteristic.";
    454       }
    455       else
    456       { if (v)
    457         { "  Since it is impossible for this program to calculate the Molien series for";
    458           "  invariant rings over extension fields of prime characteristic, we have to";
    459           "  continue without it.";
    460           "";
    461         }
     441    {
     442      if (v)
     443      { "  Since it is impossible for this program to calculate the Molien series for";
     444        "  invariant rings over extension fields of prime characteristic, we have to";
     445        "  continue without it.";
     446        "";
    462447      }
    463448      return();
     
    926911  { list L=group_reynolds(#[1..gen_num],v);
    927912    if (L[1]==0)
    928     { if (voice==2)
    929       { "WARNING: The characteristic of the coefficient field divides the group order.";
    930         "         Proceed without the Reynolds operator or the Molien series!";
    931         return();
    932       }
     913    {
    933914      if (v)
    934915      { "  The characteristic of the base field divides the group order.";
     
    938919    }
    939920    if (minpoly<>0)
    940     { if (voice==2)
    941       { "WARNING: It is impossible for this program to calculate the Molien series";
    942         "         for finite groups over extension fields of prime characteristic.";
     921    {
     922      if (v)
     923      { "  Since it is impossible for this program to calculate the Molien series for";
     924        "  invariant rings over extension fields of prime characteristic, we have to";
     925        "  continue without it.";
    943926        return(L[1]);
    944       }
    945       else
    946       { if (v)
    947         { "  Since it is impossible for this program to calculate the Molien series for";
    948           "  invariant rings over extension fields of prime characteristic, we have to";
    949           "  continue without it.";
    950           return(L[1]);
    951         }
    952927      }
    953928    }
     
    58525827  }
    58535828  else
    5854   { "WARNING: In char 0, secondary_char0 should be faster";
    5855   }
    5856   if (v && voice==2)
    5857   { "";
     5829  { if (v && voice==2) {"WARNING: In char 0, secondary_char0 should be faster";}
    58585830  }
    58595831  int j, m, d;
     
    60896061  }
    60906062  else
    6091   { "WARNING: In char 0, secondary_char0 should be faster";
     6063  { if (v && voice==2) {"WARNING: In char 0, secondary_char0 should be faster";}
    60926064  }
    60936065  if (v && voice==2)
Note: See TracChangeset for help on using the changeset viewer.