Changeset 567228f in tol

Timestamp:

Jan 19, 2009, 8:54:12 AM (18 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

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

Children:

b0613c4

Parents:

b2c33bb

Message:

Ensuring missing prior parameters are known

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

File:

• tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/_import.tol (modified) (1 diff)

tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/_import.tol

@@ -133 +133 @@
   {
     Set P = segment::Get.Missing(k);
-    Real nr = LT(P->Prior.Sigma,+1/0);
-    Real lb = GT(P->Prior.LowerBound,-1/0);
-    Real ub = LT(P->Prior.UpperBound,+1/0);
+    Real nr = !IsUnknown(P->Prior.Sigma)      & LT(P->Prior.Sigma,+1/0);
+    Real lb = !IsUnknown(P->Prior.LowerBound) & GT(P->Prior.LowerBound,-1/0);
+    Real ub = !IsUnknown(P->Prior.UpperBound) & LT(P->Prior.UpperBound,+1/0);
+  //WriteLn("TRACE [Write.Data.MissingBlock] P->Prior.Sigma="<<P->Prior.Sigma+" nr="<<nr);
     Case(!nr & !lb & !ub,
     {