- added function List.hasSeveralElements

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@19210 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Feb 20, 2014 · 39f3649 · 39f3649
1 parent a0184e0
commit 39f3649
Showing 1 changed file with 14 additions and 0 deletions.
diff --git a/Compiler/Util/List.mo b/Compiler/Util/List.mo
@@ -8506,6 +8506,20 @@ algorithm
   end match;
 end hasOneElement;
 
+public function hasSeveralElements
+"author:waurich
+ returns true if the list has more than one element, otherwise false"
+  input list<ElementType> inList;
+  output Boolean b;
+algorithm
+  b := match(inList)
+    local ElementType x;
+    case ({x}) then false;
+    case ({}) then false;
+    else then true;
+  end match;
+end hasSeveralElements;
+
 public function lengthListElements
   input list<list<Type_a>> inListList;
   output Integer outLength;