Index: tol_tests/tol/Bugzilla/bug_000831/Delta/master.bsr
===================================================================
--- tol_tests/tol/Bugzilla/bug_000831/Delta/master.bsr	(revision 11d460a4976b62c4cdd9365dbb40d00dbab1bcb7)
+++ tol_tests/tol/Bugzilla/bug_000831/Delta/master.bsr	(revision 11d460a4976b62c4cdd9365dbb40d00dbab1bcb7)
@@ -0,0 +1,17 @@
+/////////////////////////////////////////////////////////////////////////////
+// Bayesian Sparse Regression 
+/////////////////////////////////////////////////////////////////////////////
+
+$BEGIN
+
+Module.Type = master;
+Model.Name = "ModelA__3";
+Model.Description = "";
+Session.Name = "y2010m01d05h16i10s15.00";
+Session.Description = "Sesión creada en el instante y2010m01d05h16i10s15.00";
+Session.Authors = "user@bayesforecast.com";
+
+Modular.Schema = monophasic;
+Include master module "./obs/OutputA/master.bsr";
+
+$END
Index: tol_tests/tol/Bugzilla/bug_000831/Delta/obs/OutputA/master.bsr
===================================================================
--- tol_tests/tol/Bugzilla/bug_000831/Delta/obs/OutputA/master.bsr	(revision 11d460a4976b62c4cdd9365dbb40d00dbab1bcb7)
+++ tol_tests/tol/Bugzilla/bug_000831/Delta/obs/OutputA/master.bsr	(revision 11d460a4976b62c4cdd9365dbb40d00dbab1bcb7)
@@ -0,0 +1,17 @@
+/////////////////////////////////////////////////////////////////////////////
+// Bayesian Sparse Regression 
+/////////////////////////////////////////////////////////////////////////////
+
+$BEGIN
+
+Module.Type = master;
+Model.Name = "OutputA";
+Model.Description = "";
+Session.Name = "y2010m01d05h16i10s15.00";
+Session.Description = "Sesión creada en el instante y2010m01d05h16i10s15.00";
+Session.Authors = "user@bayesforecast.com";
+
+Modular.Schema = monophasic;
+Include primary module "./primary/primary.bsr";
+
+$END
Index: tol_tests/tol/Bugzilla/bug_000831/Delta/obs/OutputA/primary/primary.bsr
===================================================================
--- tol_tests/tol/Bugzilla/bug_000831/Delta/obs/OutputA/primary/primary.bsr	(revision 11d460a4976b62c4cdd9365dbb40d00dbab1bcb7)
+++ tol_tests/tol/Bugzilla/bug_000831/Delta/obs/OutputA/primary/primary.bsr	(revision 11d460a4976b62c4cdd9365dbb40d00dbab1bcb7)
@@ -0,0 +1,53 @@
+/////////////////////////////////////////////////////////////////////////////
+// Bayesian Sparse Regression 
+/////////////////////////////////////////////////////////////////////////////
+
+$BEGIN
+
+Module.Type = primary;
+Model.Name = "OutputA";
+Model.Description = "";
+Session.Name = "y2010m01d05h16i10s15.00";
+Session.Description = "Sesión creada en el instante y2010m01d05h16i10s15.00";
+Session.Authors = "user@bayesforecast.com";
+
+
+
+/////////////////////////////////////////////////////////////////////////////
+// Defining header of Regression Variables
+/////////////////////////////////////////////////////////////////////////////
+
+OutputA__ExpTermA1.Deg0.Coef <- +1;
+OutputA__ExpTermA2.Deg0.Coef <- +1;
+OutputA__ExpTermA3.Deg0.Coef <- +1;
+
+
+/////////////////////////////////////////////////////////////////////////////
+// Defining header of noise distribution
+/////////////////////////////////////////////////////////////////////////////
+
+OutputA::Noise[84 dating DatingA from y2003m01d01h00i00s00.00 until y2009m12d01h00i00s00.00]
+  ~ Normal(0,OutputA::sigma2 * Cov = ArimaCovariance([[
+  @ARIMAStruct(1,1-0.1*B,1,1),
+  @ARIMAStruct(12,1,1-0.1*B^12,1-B^12)]]))
+with non linear filters 
+  {$ Set { Include("OutputA.NonLinearFilters.oza") } $};
+
+
+/////////////////////////////////////////////////////////////////////////////
+// Defining regression equations
+/////////////////////////////////////////////////////////////////////////////
+
+
+Output =   {$ VMatrix { Include("./Output.oza")[1] } $};
+Input =   {$ VMatrix { Include("./Input.oza")[1] } $};
+
+/////////////////////////////////////////////////////////////////////////////
+// Defining header of Regression Missing Values
+/////////////////////////////////////////////////////////////////////////////
+
+ExpTermA1__Input.y2008m01d01 ? 
+ at row 61 for input 1
+ <- +0;
+
+$END
Index: tol_tests/tol/Bugzilla/bug_000831/test.tol
===================================================================
--- tol_tests/tol/Bugzilla/bug_000831/test.tol	(revision 11d460a4976b62c4cdd9365dbb40d00dbab1bcb7)
+++ tol_tests/tol/Bugzilla/bug_000831/test.tol	(revision 11d460a4976b62c4cdd9365dbb40d00dbab1bcb7)
@@ -0,0 +1,65 @@
+/* -*- mode: C++ -*- */
+//////////////////////////////////////////////////////////////////////////////
+// FILE   : test.tol
+// PURPOSE: test for a resolved bug
+//////////////////////////////////////////////////////////////////////////////
+
+//Sets the bugzilla identifier number, your e-mail and the bugŽs summary
+  Real bugNum_ =  831;
+  Text email_ = "vdebuen@tol-project.org"; 
+  Text summary_="Error fixing values for delta parameters";
+  Text link_ = GetTolBugzillaLink(bugNum_);
+
+  //Write here the initial test TOL code if needed
+  Real numErr0 = Copy(NError);
+  Real numWar0 = Copy(NWarning);
+ 
+  TimeSet If(Not(ObjectExist("TimeSet", "DatingA")), 
+    TimeSet DatingA = D(1)
+  );
+  
+  //////////////////////////////////////////////////////////////////////////////
+  // BSR.Probit
+  
+  BysMcmc::@Cycler cycler = BysMcmc::Bsr::Gibbs::GetCyclerFromParsed(
+    BSR.Parse("Delta/master.bsr", "master");
+    BysMcmc::@McmcPartialHandler::New(
+      // A escoger uno:
+      // (1) un parámetro lineal
+      // [[ "OutputA__ExpTermA3.Deg0.Coef" ]], SetCol([[ 1.3 ]]),
+      // (2) un parámetro ARIMA
+      // [[ "ArmaBlk::OutputA::Noise::AR.F1.D1" ]], SetCol([[ 0.7 ]]),
+      // (3) un parámetro delta
+      [[ "DeltaBlk__OutputA__ExpTermA3__DenDeg.1" ]], SetCol([[ 0.7 ]]),
+      // (4) un parámetro de valor inicial en un término delta
+      // [[ "DeltaBlk__OutputA__ExpTermA3__DenIni.0" ]], SetCol([[ 0 ]]),
+      Copy(Empty), BysMcmc::@McmcReloader::Null(?)
+    );
+    BysMcmc::@Config::Default(?);
+    BysMcmc::@Notifier::Null(?)
+  );
+  
+  Real cycler::_.config::mcmc.sampleLength := 200; 
+  BysMcmc::@Estimation estim = BysMcmc::@Estimation::New(cycler);
+  Real estim::Run(?);
+  
+
+  Real numErr1 = Copy(NError);
+  Real numWar1 = Copy(NWarning);
+
+  Set partialResults_ = [[ numErr0, numErr1]];
+
+//This is a messure of the success of the test 
+  Real quality_ = And(numErr1 == numErr0, 
+                      numWar1 == numWar0);
+
+//Return the results 
+  Set resultStr_ = @strTestStatus(summary_, link_, quality_,
+                    "Partial results = "<<partialResults_,
+                    "NO DBServerType", "NO DBServerHost", "NO DBAlias",
+                    email_);
+  WriteLn(""<<resultStr_);
+  resultStr_;
+
+/* */
+