Changeset e8f898 in git

Timestamp:

Feb 25, 2014, 1:56:06 PM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

137883ef0bd378a1afb5d49f2c94c48dc06e8c9c

Parents:

be7a5d1166e45033b6b760b23ded5cc68cb2fe00

git-author:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2014-02-25 13:56:06+01:00

git-committer:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2014-02-25 13:57:00+01:00

Message:

fix: types in assign (normal.lib)

File:

• Singular/LIB/normal.lib (modified) (4 diffs)

Singular/LIB/normal.lib

@@ -2807 +2807 @@
       }
       list HNEXP=hnexpansion(f);
-      if (typeof(HNEXP[1])=="ring") {
+      if (typeof(HNEXP[1])=="ring")
+      {
         def altring = basering;
         def HNEring = HNEXP[1]; setring HNEring;
@@ -6617 +6618 @@
     a = is_injective(Qnormap,QAS);          //a. Test for injectivity of Qnormap
     dbprint ( prl, "injective: "+string(a) );
-    if ( n==1 ) { 
-     def result = intvec(a);
+    if ( n==1 )
+    {
+     intvec result = intvec(a);
      setring BAS;
-     return (result); 
+     return (result);
    }
    a;
@@ -6628 +6630 @@
     b = mapIsFinite(normap,BAS,lnorid[2]);  //b. Test for finiteness of normap
     dbprint ( prl, "finite: "+string(b) );
-    if ( n==2 ) { 
-       def result = intvec(a,b);
+    if ( n==2 )
+    {
+       intvec result = intvec(a,b);
        setring BAS;
-       return (result); 
+       return (result);
     }
    b;
@@ -6649 +6652 @@
     int d1 = (d==0);                           //d1=1 if delta=0
     dbprint ( prl, "delta: "+string(d) );
-    def result = intvec(a,b,d1);
+    intvec result = intvec(a,b,d1);
     setring BAS;
     return(result);