Index: tol/stdlib/various/_tools.tol
===================================================================
--- tol/stdlib/various/_tools.tol	(revision 18d02f2ec6d24592c55388b359742b72c6500ff2)
+++ tol/stdlib/various/_tools.tol	(revision 0dce4cb71aee61b70445cb3d83c1f58e9a7c2e1b)
@@ -14,6 +14,5 @@
     Real hasName = And
     (
-      name!="",
-      name==ToName(name),
+      name!="",      name==ToName(name),
       name!="Empty"
     );
@@ -55,11 +54,5 @@
   Text g = Grammar(optArgs);
   Case(
-    g=="Set",
-    If(!Card(optArgs), defValue,
-    {
-      Real Do If(Card(optArgs),!HasIndexByName(optArgs),SetIndexByName(optArgs));
-      Real idx = FindIndexByName(optArgs,name);
-      If(!idx, defValue, optArgs[idx])
-    }),
+    g=="Set", Element(optArgs, name, defValue),
     g=="NameBlock",
     If(!ObjectExist("Anything","optArgs::"+name), defValue,
