Index: tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/gibbs/_estim.tol
===================================================================
--- tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/gibbs/_estim.tol	(revision 84500372fb46449c95f9734d57ee1b42819104ac)
+++ tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/gibbs/_estim.tol	(revision 051a978d8a888c2a36e121d518439cfd9c119998)
@@ -60,5 +60,5 @@
 "Argument `ascii` must be an ASCII file path prepared to be parsed by "
 "function BSR.Parse\n";
-@Cycler GetCyclerFromAscii(Text ascii_, 
+@Cycler GetCyclerFromAscii(Text ascii_, Text moduleType,
                           @McmcPartialHandler mcmcPartialHandler,
                           @Config config,
@@ -69,5 +69,5 @@
   Text ascii = ascii_;
   Real notifier::parsing(0);
-  Set parsed = BSR.Parse(ascii);
+  Set parsed = BSR.Parse(ascii,moduleType);
   BysMcmc::@Cycler cycler = GetCyclerFromParsed(
     parsed, mcmcPartialHandler, config, notifier);
@@ -97,10 +97,13 @@
       modelDef, mcmcPartialHandler, config, notifier),
     g=="Text", GetCyclerFromAscii(
-      modelDef, mcmcPartialHandler, config, notifier),
+      modelDef, "joint", mcmcPartialHandler, config, notifier),
     g=="NameBlock", 
     {
       Text ascii = BysMcmc::Bsr::Import::Write(modelDef);
+      Real metModTyp = FunctionExist("Text","modelDef::Get.ModuleType");
+      Text moduleType = If(!metModTyp, "joint",
+        ToLower(modelDef::Get.ModuleType(0)));
       BysMcmc::@Cycler cycler = GetCyclerFromAscii(
-        ascii, mcmcPartialHandler, config, notifier);
+        ascii, moduleType, mcmcPartialHandler, config, notifier);
       Real cycler::setImporter(modelDef);
       cycler