Changeset 95469a2 in tol

Timestamp:

Oct 26, 2009, 12:17:57 PM (17 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

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

Children:

7145ae0

Parents:

ec0e896

Message:

Ensuring non empty matrix in InputVMatrix

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@1570 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

@@ -369 +369 @@
   Text ResName = segment::Get.Name(0)+"::Noise";
   VMatrix Y = segment::Get.OutputVMatrix(0);
-  VMatrix X = segment::Get.InputVMatrix(0);
   Real Ois.Store([[Y]],path.prefix+"Output.oza");
-  Real Ois.Store([[X]],path.prefix+"Input.oza");
   Real FPutText(fileHandler, "\nOutput = "
   "  {$ VMatrix { Include(\"./Output.oza\")[1] } $};");
-  Real FPutText(fileHandler, "\nInput = "
-  "  {$ VMatrix { Include(\"./Input.oza\")[1] } $};");
-  0
+  VMatrix X = segment::Get.InputVMatrix(0);
+  If(!VColumns(X),1,
+  {
+    Real Ois.Store([[X]],path.prefix+"Input.oza");
+    Real FPutText(fileHandler, "\nInput = "
+    "  {$ VMatrix { Include(\"./Input.oza\")[1] } $};");
+    2
+  })
 };