Index: tol_tests/tol/Text/test_0007/test.tol
===================================================================
--- tol_tests/tol/Text/test_0007/test.tol	(revision 51f1662e018e0bf11a7352deb8d047661e4ef9ca)
+++ tol_tests/tol/Text/test_0007/test.tol	(revision 51f1662e018e0bf11a7352deb8d047661e4ef9ca)
@@ -0,0 +1,41 @@
+//////////////////////////////////////////////////////////////////////////////
+// FILE   : test.tol
+// PURPOSE: test for Massive Simulation Test Of Text Coherence
+//////////////////////////////////////////////////////////////////////////////
+
+  Text email_ = "vdebuen@tol-project.org"; 
+  Text link_ = "";
+  Text summary_ = "DecodeBase64ToFile and EncodeBase64FromFile";
+
+  Real numErr0=Copy(NError);
+  Matrix M1 = Rand(100,10,-1,1);
+  Matrix MatWriteFile("M.bbm",M1);
+  Text encoded = EncodeBase64FromFile("M.bbm");
+  Real DecodeBase64ToFile("M2.bbm",encoded);
+  Matrix M2 = MatReadFile("M2.bbm");
+
+  Real ok = MatMax(Abs(M1-M2))==0;
+
+//Extented information about test behaviour
+  Set partialResults_ = 
+  [[
+    ok
+  ]];
+
+
+//This is a messure of the success of the test 
+  Real quality_ = And
+  (
+    numErr0==NError,
+    ok
+  );
+
+//Return the results 
+  Set resultStr_ = @strTestStatus(summary_, link_, quality_,
+                    "Partial results = "<<partialResults_,
+                    "NO DBServerType", "NO DBServerHost", "NO DBAlias",
+                    email_);
+  WriteLn(""<<resultStr_);
+  resultStr_
+
+/**/