Changeset 1dd938 in git

Timestamp:

Apr 17, 2015, 10:51:08 AM (8 years ago)

Author:

Yue Ren <ren@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

7cb9b47e0c889244f467795deb33c7c8156369b4

Parents:

7203f75e9a4e317e9e009db8a853ed8c0e6be635

Message:

chg: min and max now take more than 2 inputs

File:

• Singular/LIB/standard.lib (modified) (3 diffs)

Singular/LIB/standard.lib

@@ -17 +17 @@
  par2varRing([i])       create a ring making pars to vars, together with i
  datetime()             return date and time as a string
- max(i,j)               maximum of i and j
- min(i,j)               minimum of i and j
+ max(i_1,...,i_k)       maximum of i_1, ..., i_k
+ min(i_1,...,i_k)       minimum of i_1, ..., i_k
 
 ";
@@ -2185 +2185 @@
 
 ///////////////////////////////////////////////////////////////////////////////
-proc max(def i,def j)
-"SYNTAX: max (i, j)
-TYPE:    same as type of i resp. j
-PURPOSE: returns the maximum for any 2 arguments of a type
+proc max(def i,list #)
+"SYNTAX: max (i_1, ..., i_k)
+TYPE:    same as type of i_1, ..., i_k resp.
+PURPOSE: returns the maximum for any arguments of a type
          for which '>' is defined
 SEE ALSO: min
 EXAMPLE: example max; shows an example"
 {
-  if(i>j){return(i);}
-  return(j);
+  def maximum = i;
+  for (int j=1; j<=size(#); j++)
+  {
+    if(#[j]>maximum)
+    {
+      maximum = #[j];
+    }
+  }
+  return(maximum);
 }
 example
@@ -2202 +2209 @@
 }
 ///////////////////////////////////////////////////////////////////////////////
-proc min(def i,def j)
-"SYNTAX: min (i, j)
-TYPE:    same as type of i resp. j
-PURPOSE: returns the minimum for any 2 arguments of a type
+proc min(def i,list #)
+"SYNTAX: min (i_1, ..., i_k)
+TYPE:    same as type of i_1, ..., i_k resp.
+PURPOSE: returns the minimum for any arguments of a type
          for which '>' is defined
 SEE ALSO: max
 EXAMPLE: example min; shows an example"
 {
-  if(i>j){return(j);}
-  return(i);
+  def minimum = i;
+  for (int j=1; j<=size(#); j++)
+  {
+    if(#[j]<minimum)
+    {
+      minimum = #[j];
+    }
+  }
+  return(minimum);
 }
 example