Changeset 1f9a84 in git for Singular/LIB/dmodapp.lib

Timestamp:

May 5, 2011, 2:19:42 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

750e704356a16e0d46bd540f5fe07a831a40cded

Parents:

d44974deb309558594f4d26a7d11c490304c77cf

Message:

more int division from the manual

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

File:

• Singular/LIB/dmodapp.lib (modified) (12 diffs)

Singular/LIB/dmodapp.lib

@@ -210 +210 @@
   // wrong sequence of vars
   int i,n;
-  n = nvars(basering)/2;
+  n = nvars(basering) div 2;
   for (i=1; i<=n; i++)
   {
@@ -920 +920 @@
   setring @R2;
   // now supply with Weyl algebra relations
-  int N = nvars(@R2)/2;
+  int N = nvars(@R2) div 2;
   matrix @D[2*N][2*N];
   for(i=1; i<=N; i++)
@@ -1259 +1259 @@
     def @R4@ = ring(L);
     setring @R4@;
-    int N = Nnew/2;
+    int N = Nnew div 2;
     matrix @D[Nnew][Nnew];
     for (i=1; i<=N; i++)
@@ -1570 +1570 @@
   int ppl = printlevel - voice +2;
   def save = basering;
-  int n = nvars(save)/2;
+  int n = nvars(save) div 2;
   int whichengine = 0;           // default
   int methodord   = 0;           // default
@@ -1992 +1992 @@
   int ppl = printlevel;
   int i,j,k;
-  int n = nvars(basering)/2;
+  int n = nvars(basering) div 2;
   if (w == 0:size(w))
   {
@@ -2122 +2122 @@
 // returns ring, which contains module "str"
 {
-  int n = nvars(basering)/2;
+  int n = nvars(basering) div 2;
   int i,j;
   def save = basering;
@@ -2379 +2379 @@
     }
   }
-  int n = nvars(basering)/2;
+  int n = nvars(basering) div 2;
   int i;
   if(v <> 0:size(v))
@@ -2448 +2448 @@
     }
   }
-  int n = nvars(basering)/2;
+  int n = nvars(basering) div 2;
   int i;
   if(v <> 0:size(v))
@@ -2551 +2551 @@
   int ppl = printlevel;
   int i;
-  int n = nvars(basering)/2;
+  int n = nvars(basering) div 2;
   intvec v;
   for (i=1; i<=n; i++)
@@ -2690 +2690 @@
 "
 {
-  intvec w = 1:(nvars(basering)/2);
+  intvec w = 1:(nvars(basering) div 2);
   int l0,l0set,Gset;
   ideal G;
@@ -2734 +2734 @@
   int ppl = printlevel;
   int i,j;
-  int n = nvars(basering)/2;
+  int n = nvars(basering) div 2;
   intvec v;
   for (i=1; i<=n; i++)
@@ -3050 +3050 @@
   int ppl = printlevel - voice + 2;
   def save = basering;
-  int n = nvars(save)/2;
+  int n = nvars(save) div 2;
   intvec u = 0:n;
   intvec v = 1:n;