[Matlisp-commit] [matlisp-git]matlisp branch matlisp-cffi updated. 2012-02-23-58-gf748feb

[Akshay S. <ak...@us...>]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "matlisp".

The branch, matlisp-cffi has been updated
       via  f748feb7a04396a6ddd3c61407d11d02aca3034f (commit)
      from  61733620324195c7c1a45a770e29637a74329ebd (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit f748feb7a04396a6ddd3c61407d11d02aca3034f
Author: Akshay Srinivasan <aks...@gm...>
Date:   Sun Mar 18 19:46:49 2012 +0530

    -> Added method another method into gemm!

diff --git a/src/gemm.lisp b/src/gemm.lisp
index ae4d935..b8609f9 100644
--- a/src/gemm.lisp
+++ b/src/gemm.lisp
@@ -245,6 +245,13 @@
 			      (complex-coerce beta) c job))
 
 ;
+(defmethod gemm! ((alpha number) (a real-matrix) (b real-matrix)
+		  (beta number) (c complex-matrix)
+		  &optional (job :nn))
+  (scal! (complex-coerce beta) c)
+  (gemm! alpha a b 1d0 (realpart! c)))
+
+;
 (defmethod gemm! ((alpha number) (a real-matrix) (b complex-matrix)
 		  (beta complex) (c complex-matrix)
 		  &optional (job :nn))

-----------------------------------------------------------------------

Summary of changes:
 src/gemm.lisp |    7 +++++++
 1 files changed, 7 insertions(+), 0 deletions(-)


hooks/post-receive
-- 
matlisp