Index: tol/stdlib/math/optim/LP/Rglpk.tol
===================================================================
--- tol/stdlib/math/optim/LP/Rglpk.tol	(revision 64f04d229d12c2fee3e28943c0a2f6118c8f04d1)
+++ tol/stdlib/math/optim/LP/Rglpk.tol	(revision e5ac79b7232e38651a15d194c1a12d6d6b75abae)
@@ -61,5 +61,5 @@
   "   A: a matrix of the constraint coefficients.\n"
   "\n"
-  "   RHS: the right hand side of the constraints.\n"
+  "   rhs: the right hand side of the constraints.\n"
   "\n"
   "with the following extra args given in the Set optArgs:\n"
@@ -142,5 +142,5 @@
   "};\n"
   ;
-  Set solveLP(Matrix C, Matrix A, Matrix RHS, Set optArgs)
+  Set solveLP(Matrix C, Matrix A, Matrix rhs, Set optArgs)
   //////////////////////////////////////////////////////////////////////////////
   {
@@ -184,6 +184,6 @@
       "Rglpk_solve_LP.TOL('"+_om.bbm+"','"+_rhs.bbm+"','%A')";
 
-    Set rrs = Rapi::RunRScript(script,args.bbm,argList,result.names,verbose);
-    If(Card(rrs), 
+    Set result = Rapi::RunRScript(script,args.bbm,argList,result.names,verbose);
+    If(Card(result), 
     {[[
       Real status     = MatDat(result[1],1,1),
Index: tol/stdlib/math/optim/LP/test.tol
===================================================================
--- tol/stdlib/math/optim/LP/test.tol	(revision 64f04d229d12c2fee3e28943c0a2f6118c8f04d1)
+++ tol/stdlib/math/optim/LP/test.tol	(revision e5ac79b7232e38651a15d194c1a12d6d6b75abae)
@@ -20,5 +20,5 @@
   Matrix rhs = ((60, Real -1,80));
 
-  Set bounds = [[ {Set lower=[[ [[1, Real -Inf]], [[2, Real -Inf]], [[3, Real -Inf]] ]]} ]];
+  Set bounds = { [[ Set lower=[[ [[1, Real -Inf]], [[2, Real -Inf]], [[3, Real -Inf]] ]] ]] };
 
   Set sol=Rglpk::solveLP(obj, mat, rhs,
@@ -44,5 +44,5 @@
   Matrix rhs = ((60,40,80));
 
-  Set bounds = [[ {Set upper=[[ [[2, 4.0]] ]]} ]];
+  Set bounds = { [[ Set upper=[[ [[2, 4.0]] ]] ]] };
 
   Set sol=Rglpk::solveLP(obj, mat, rhs,