Index: trunk/Ohana/src/opihi/cmd.data/init.c
===================================================================
--- trunk/Ohana/src/opihi/cmd.data/init.c	(revision 10072)
+++ trunk/Ohana/src/opihi/cmd.data/init.c	(revision 10073)
@@ -100,4 +100,5 @@
 int vgrid            PROTO((int, char **));
 int vgauss           PROTO((int, char **));
+int vmaxwell         PROTO((int, char **));
 int vload            PROTO((int, char **));
 int vstat            PROTO((int, char **));
@@ -211,4 +212,5 @@
   {"select",	   vect_select,	     "selective vector assignment"},
   {"vgauss",       vgauss,	     ""},
+  {"vmaxwell",     vmaxwell,	     ""},
   {"vgrid",        vgrid,	     ""},
   {"vload",        vload,	     "load vectors on Kii"},
Index: trunk/Ohana/src/opihi/lib.shell/expand_vars.c
===================================================================
--- trunk/Ohana/src/opihi/lib.shell/expand_vars.c	(revision 10072)
+++ trunk/Ohana/src/opihi/lib.shell/expand_vars.c	(revision 10073)
@@ -38,5 +38,5 @@
     if (*L == 0) break;
 
-    V1 = aftervar (L);           /* V1 points to the first non-whitespace after the variable */
+    V1 = aftervar (L);           /* V1 points to the first non-WHITESPACE after the variable */
     V0 = thisvar (L);            /* V0 points to the name of the var */
     /* note: V1 points to a fraction of L, it does not need to be freed */
Index: trunk/Ohana/src/opihi/lib.shell/expand_vectors.c
===================================================================
--- trunk/Ohana/src/opihi/lib.shell/expand_vectors.c	(revision 10072)
+++ trunk/Ohana/src/opihi/lib.shell/expand_vectors.c	(revision 10073)
@@ -50,5 +50,5 @@
 
     /* find vector name */
-    for (w = p - 1; (w >= line) && !whitespace(*w) && (isalnum(*w) || (*w == ':') || (*w == '_')); w--);
+    for (w = p - 1; (w >= line) && !OHANA_WHITESPACE(*w) && (isalnum(*w) || (*w == ':') || (*w == '_')); w--);
     w ++;
     n = (int)(p - w);
Index: trunk/Ohana/src/opihi/lib.shell/isolate_elements.c
===================================================================
--- trunk/Ohana/src/opihi/lib.shell/isolate_elements.c	(revision 10072)
+++ trunk/Ohana/src/opihi/lib.shell/isolate_elements.c	(revision 10073)
@@ -121,5 +121,5 @@
       }
       /* not an operator, not a quoted string */
-      if (!whitespace (in[i][j])) {
+      if (!OHANA_WHITESPACE (in[i][j])) {
 	InsertValue (in[i][j]);
       } else {
Index: trunk/Ohana/src/opihi/lib.shell/opihi.c
===================================================================
--- trunk/Ohana/src/opihi/lib.shell/opihi.c	(revision 10072)
+++ trunk/Ohana/src/opihi/lib.shell/opihi.c	(revision 10073)
@@ -33,4 +33,5 @@
       continue;
     }
+
     Nbad = 0;
     ohana_memregister (line);
Index: trunk/Ohana/src/opihi/lib.shell/parse.c
===================================================================
--- trunk/Ohana/src/opihi/lib.shell/parse.c	(revision 10072)
+++ trunk/Ohana/src/opihi/lib.shell/parse.c	(revision 10073)
@@ -51,5 +51,5 @@
     if (*V1 != '=') goto error;
 
-    /* find first non-whitespace character after = */
+    /* find first non-WHITESPACE character after = */
     V1 ++;
     while (isspace (*V1)) V1++;
@@ -93,5 +93,5 @@
       val = dvomath (1, &V1, &size, 0);
       if (val == NULL) { 
-	while (whitespace (*V1)) V1++;
+	while (OHANA_WHITESPACE (*V1)) V1++;
 	val = strcreate (V1);
       } 
Index: trunk/Ohana/src/opihi/lib.shell/string.c
===================================================================
--- trunk/Ohana/src/opihi/lib.shell/string.c	(revision 10072)
+++ trunk/Ohana/src/opihi/lib.shell/string.c	(revision 10073)
@@ -3,7 +3,7 @@
 /**********************************************************************/
 /* returns a pointer to an isolated string containing the first word,
-   removing leading whitespace.  A "word" is a contiguous set of 
+   removing leading WHITESPACE.  A "word" is a contiguous set of 
    characters from the set: alphanumerics, and any of: / . _ -
-   Any other single, non-whitespace characters are considered to be 
+   Any other single, non-WHITESPACE characters are considered to be 
    complete words in themselves.  Any characters surrounded by quotes 
    make a single word 
@@ -17,5 +17,5 @@
   if (string == (char *) NULL) return ((char *) NULL);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *)NULL);
   if (string[i] == ';') {
@@ -63,5 +63,5 @@
 
 
-  for (j = i; (string[j] != 0) && (string[j] != ';') && !whitespace(string[j]); j++);
+  for (j = i; (string[j] != 0) && (string[j] != ';') && !OHANA_WHITESPACE(string[j]); j++);
   word = strncreate (&string[i], j - i);
   return (word);
@@ -70,5 +70,5 @@
 
 /* returns a pointer to an isolated string containing the first command,
-   removing leading whitespace.  A command ends with the first non whitespace */
+   removing leading WHITESPACE.  A command ends with the first non WHITESPACE */
 char *thiscomm (char *string) {
 
@@ -78,8 +78,8 @@
   if (string == (char *) NULL) return ((char *) NULL);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *)NULL);
 
-  for (j = i; ((string[j] != 0) && !whitespace (string[j])); j++);
+  for (j = i; ((string[j] != 0) && !OHANA_WHITESPACE (string[j])); j++);
   if (i == j) return ((char *) NULL);
 
@@ -122,5 +122,5 @@
   if (string == (char *) NULL) return ((char *) NULL);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *)NULL);
 
@@ -134,5 +134,5 @@
     }
     i++;
-    for (; (string[i] != 0) && whitespace (string[i]); i++);
+    for (; (string[i] != 0) && OHANA_WHITESPACE (string[i]); i++);
     if (string[i] == 0) return ((char *) NULL);
     return (&string[i]);
@@ -155,5 +155,5 @@
       return ((char *)NULL);
     }
-    for (; (string[i] != 0) && whitespace (string[i]); i++);
+    for (; (string[i] != 0) && OHANA_WHITESPACE (string[i]); i++);
     if (string[i] == 0) return ((char *) NULL);
     return (&string[i]);
@@ -161,6 +161,6 @@
 
   if (string[i] == ';') i++;
-  for (; (string[i] != 0) && (string[i] != ';') && !whitespace(string[i]); i++);
-  for (; (string[i] != 0) && whitespace (string[i]); i++);
+  for (; (string[i] != 0) && (string[i] != ';') && !OHANA_WHITESPACE(string[i]); i++);
+  for (; (string[i] != 0) && OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *) NULL);
 
@@ -169,5 +169,5 @@
 
 /* returns a pointer to the next command, or (char *) NULL 
-   if there is not a next command.  A command is bounded by whitespace */
+   if there is not a next command.  A command is bounded by WHITESPACE */
 char *nextcomm (char *string) {
 
@@ -176,8 +176,8 @@
   if (string == (char *) NULL) return ((char *) NULL);
   
-  for (i = 0; (string[i] != 0) && !whitespace (string[i]); i++);
+  for (i = 0; (string[i] != 0) && !OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *) NULL);
   
-  for (; whitespace (string[i]); i++);
+  for (; OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *) NULL);
 
@@ -193,11 +193,11 @@
   if (c == (char *) NULL) return ((char *) NULL);
 
-  for (; !whitespace(*c) && (c >= string); c--);
+  for (; !OHANA_WHITESPACE(*c) && (c >= string); c--);
   if (c < string) return ((char *)NULL);
 
-  for (; whitespace(*c) && (c >= string); c--);
+  for (; OHANA_WHITESPACE(*c) && (c >= string); c--);
   if (c < string)
     return ((char *)NULL);
-  for (; !whitespace(*c) && (c >= string); c--);
+  for (; !OHANA_WHITESPACE(*c) && (c >= string); c--);
   c++;
   return (c);
@@ -207,5 +207,5 @@
 
 /* take a pointer to the beginning of a variable (ie $fred) and return
-   a pointer to the next thing (non whitespace) which is not part of the
+   a pointer to the next thing (non WHITESPACE) which is not part of the
    variable extract only the variable name */
 
@@ -224,5 +224,5 @@
   if (i == start) return ((char *) NULL);
 
-  for (j = i; whitespace (string[j]); j++);
+  for (j = i; OHANA_WHITESPACE (string[j]); j++);
   if (string[j] == 0) return ((char *)NULL);
 
@@ -240,5 +240,5 @@
   if (c == (char *) NULL) return ((char *) NULL);
 
-  for (; (c >= string) && whitespace(*c); c--);
+  for (; (c >= string) && OHANA_WHITESPACE(*c); c--);
   if (c < string) return ((char *)NULL);