Changeset 389cf33 in tol

Timestamp:

Nov 25, 2009, 8:04:33 PM (17 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

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

Children:

2d517f2

Parents:

c7623c38

Message:

Correct use of new argument in pack function

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

File:

• tol/stdlib/math/stat/models/bayesian/arima/_arma_process.tol (modified) (1 diff)

tol/stdlib/math/stat/models/bayesian/arima/_arma_process.tol

@@ -55 +55 @@
   //WriteLn("TRACE CholeskiFactorCov("+FullName(cov)+") VRows(cov)="<<VRows(cov)+" Sparsity(cov)="<<Real(VNonNullCells(cov)/VRows(cov)^2));
     VMatrix c = Drop(cov,1.E-16/VRows(cov)^2);
-  //WriteLn("TRACE CholeskiFactorCov Sparsity(c)="<<Real(VNonNullCells(c)/VRows(c)^2));
-  //Real t0 = Copy(Time);
-  //VMatrix L = CholeskiFactor(c,"X",True);
-  //Real tm = Time-t0;
-  //WriteLn("TRACE CholeskiFactorCov time="<<tm);
-  //L 
-    Pack(CholeskiFactor(c,"X",True))
+    VMatrix L = CholeskiFactor(c,"X",True);
+  //WriteLn("TRACE CholeskiFactorCov L:"<<L);
+    VMatrix pL = Pack(L,1);
+  //WriteLn("TRACE CholeskiFactorCov pL:"<<pL);
+    pL
   };