[Octave-cvsupdate] SF.net SVN: octave:[9373] trunk/octave-forge/main/sparsersb/src/ sparsersbbench.m

[<mic...@us...>]

Revision: 9373
          http://octave.svn.sourceforge.net/octave/?rev=9373&view=rev
Author:   michelemartone
Date:     2011-12-13 10:23:28 +0000 (Tue, 13 Dec 2011)
Log Message:
-----------
sparsersb: in the benchmark script, added non-integer test cases to some elemental operations; added a plain clone operation case.  

Modified Paths:
--------------
    trunk/octave-forge/main/sparsersb/src/sparsersbbench.m

Modified: trunk/octave-forge/main/sparsersb/src/sparsersbbench.m
===================================================================
--- trunk/octave-forge/main/sparsersb/src/sparsersbbench.m	2011-12-13 02:19:53 UTC (rev 9372)
+++ trunk/octave-forge/main/sparsersb/src/sparsersbbench.m	2011-12-13 10:23:28 UTC (rev 9373)
@@ -40,6 +40,7 @@
 	sparsersbbench_("",[cinitstr,""],"C=sparsersb(ia,ja,va);clear C;","clear A C ia ja va","",mint);
 	sparsersbbench_("",[cinitstr,""],"C=sparsersb(ja,ia,va);clear C;","clear A C ia ja va","",mint);
 	sparsersbbench_("",[finitstr,""],"C=sparsersb(A);clear C;","clear A C","",mint);
+	sparsersbbench_("",[rinitstr,""],"C=A;          ;clear C;","clear A C","",mint);
 	sparsersbbench_("",[rinitstr,""],"C=A.';        ;clear C;","clear A C","",mint);
 	sparsersbbench_("",[rinitstr,""],"C=transpose(A);clear C;","clear A C","",mint);
 	for nrhs=1:3
@@ -57,9 +58,12 @@
 	sparsersbbench_("",[rinitstr,"B=A;"],"C=A.'*B;clear C","clear A B C","",mint);
 	sparsersbbench_("",[rinitstr,"D=ones(size(A)(1),1);"],"D=diag(A);","clear A D","",mint);
 	sparsersbbench_("",[rinitstr,""],"A.*=2.0;","clear A","",mint);
+	sparsersbbench_("",[rinitstr,""],"A.*=2.5;","clear A","",mint);
 	sparsersbbench_("",[rinitstr,""],"A./=2.0;","clear A","",mint);
+	sparsersbbench_("",[rinitstr,""],"A./=2.5;","clear A","",mint);
 	#sparsersbbench_("",[rinitstr,""],"A.*=0.0;","clear A","",mint);
 	#sparsersbbench_("",[rinitstr,""],"A./=0.0;","clear A","",mint);
+	sparsersbbench_("",[rinitstr,""],"A.^=2.5;","clear A","",mint);
 	sparsersbbench_("",[rinitstr,""],"A.^=2.0;","clear A","",mint);
 	sparsersbbench_("",[rinitstr,""],"A.^=0.5;","clear A","",mint);
 	sparsersbbench_("",[rinitstr,"B=A;"],"C=A+B;","clear A B C","",mint);

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.