Changeset 35a50a2 in tol

Timestamp:

Dec 16, 2009, 8:51:57 AM (17 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

27cc2179

Parents:

6d9a5e9

Message:

Fixes #810

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@1821 be4846ae-f051-483a-831f-b64e7d08527f

Location:

tol

Files:

• btol/vmatrix_type/vmat_bsr_primary.cpp (modified) (1 diff)
• stdlib/math/stat/models/bayesian/bysMcmc/bsr/modularSchema/_monophasic.tol (modified) (3 diffs)

tol/btol/vmatrix_type/vmat_bsr_primary.cpp

@@ -253 +253 @@
         );
       missing =
-        (s.mis.table | newIdentifier[increment_a(s.mis.info.index)])
+        ((nonExistentIdentifier[increment_a(s.mis.info.index)]) | s.mis.table)
         [assign_a(s.mis.info.name)]
         >> 

tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/modularSchema/_monophasic.tol

@@ -14 +14 @@
   //////////////////////////////////////////////////////////////////////////
   {
-    WriteLn("TRACE ChildToJoint module "+module->ModuleType+" "+Name(module));
+  //WriteLn("TRACE ChildToJoint module "+module->ModuleType+" "+Name(module));
     If(module->ModuleType!="master", module, 
        BysMcmc::Bsr::ModularSchema::Monophasic::MasterToJoint(module))
@@ -23 +23 @@
   {
     Text _MID = "[MasterToJoint]";
-    WriteLn("TRACE MasterToJoint module "+master->ModuleType+" "+Name(master));
+  //WriteLn("TRACE MasterToJoint module "+master->ModuleType+" "+Name(master));
     Set subModule = EvalSet(master->SubModule, childToJoint);
     Case(
@@ -54 +54 @@
         })
       });
-      Set aux.2 = BinGroup("<<", aux.1);
+      Set aux.2 = Unique(BinGroup("<<", aux.1));
       Real SetIndexByName(aux.2);
       aux.2