Markus Mottl avatar Markus Mottl committed 32c4852

Changed API of trmm and trsm

Comments (0)

Files changed (4)

+2009-10-03:  Minor API change.
+
+             trmm and trsm now have a similar API wrt. variable labeling.
+
 2009-09-21:  Added new functions:
 
                * ormqr
 name="lacaml"
-version="5.4.6"
+version="5.4.7"
 description="LACAML - BLAS/LAPACK-interface for OCaml"
 
 requires="lacaml.core"
 external direct_trmm :
   side : char ->
   uplo : char ->
-  trans : char ->
+  transa : char ->
   diag : char ->
   m : int ->
   n : int ->
   alpha : num_type ->
   unit = "lacaml_NPRECtrmm_stub_bc" "lacaml_NPRECtrmm_stub"
 
-let trmm ?m ?n ?(side = `L) ?(up = true) ?(trans = `N) ?(diag = `N)
-      ?(br = 1) ?(bc = 1) ~b ?(alpha = one) ?(ar = 1) ?(ac = 1) a =
+let trmm ?m ?n ?(side = `L) ?(up = true) ?(transa = `N) ?(diag = `N)
+      ?(alpha = one) ?(ar = 1) ?(ac = 1) ~a ?(br = 1) ?(bc = 1) b =
   let loc = "Lacaml.Impl.NPREC.trmm" in
-  let m, n, side, uplo, trans, diag =
-    trXm_get_params loc ar ac a br bc b m n side up trans diag
+  let m, n, side, uplo, transa, diag =
+    trXm_get_params loc ar ac a br bc b m n side up transa diag
   in
-  direct_trmm ~side ~uplo ~trans ~diag ~m ~n ~ar ~ac ~a ~br ~bc ~b ~alpha
+  direct_trmm ~side ~uplo ~transa ~diag ~m ~n ~ar ~ac ~a ~br ~bc ~b ~alpha
 
 
 (* TRSM *)
 external direct_trsm :
   side : char ->
   uplo : char ->
-  trans : char ->
+  transa : char ->
   diag : char ->
   m : int ->
   n : int ->
   alpha : num_type ->
   unit = "lacaml_NPRECtrsm_stub_bc" "lacaml_NPRECtrsm_stub"
 
-let trsm ?m ?n ?(side = `L) ?(up = true) ?(trans = `N) ?(diag = `N)
+let trsm ?m ?n ?(side = `L) ?(up = true) ?(transa = `N) ?(diag = `N)
       ?(alpha = one) ?(ar = 1) ?(ac = 1) ~a ?(br = 1) ?(bc = 1) b =
   let loc = "Lacaml.Impl.NPREC.trsm" in
-  let m, n, side, uplo, trans, diag =
-    trXm_get_params loc ar ac a br bc b m n side up trans diag
+  let m, n, side, uplo, transa, diag =
+    trXm_get_params loc ar ac a br bc b m n side up transa diag
   in
-  direct_trsm ~side ~uplo ~trans ~diag ~m ~n ~ar ~ac ~a ~br ~bc ~b ~alpha
+  direct_trsm ~side ~uplo ~transa ~diag ~m ~n ~ar ~ac ~a ~br ~bc ~b ~alpha
 
 
 (* SYRK *)

lib/impl_SDCZ.mli

   ?n : int ->
   ?side : side ->
   ?up : bool ->
-  ?trans : trans3 ->
+  ?transa : trans3 ->
   ?diag : diag ->
-  ?br : int ->
-  ?bc : int ->
-  b : mat ->
   ?alpha : num_type ->
   ?ar : int ->
   ?ac : int ->
+  a : mat ->
+  ?br : int ->
+  ?bc : int ->
   mat ->
   unit
-(** [trmm ?m ?n ?side ?up ?trans ?diag ?br ?bc ~b ?alpha ?ar ?ac a]
+(** [trmm ?m ?n ?side ?up ?transa ?diag ?alpha ?ar ?ac ~a ?br ?bc b]
     see BLAS documentation!
     @param m default = number of rows of [b]
     @param n default = number of columns of [b]
     @param side default = `L (left - multiplication is [a][b])
     @param up default = true (upper triangular portion of [a] is accessed)
-    @param trans default = `N
+    @param transa default = `N
     @param diag default = `N (non-unit)
     @param alpha default = [{ re = 1.; im = 0. }]
     @param ar default = 1
   ?n : int ->
   ?side : side ->
   ?up : bool ->
-  ?trans : trans3 ->
+  ?transa : trans3 ->
   ?diag : diag ->
   ?alpha : num_type ->
   ?ar : int ->
   ?bc : int ->
   mat ->
   unit
-(** [trsm ?m ?n ?side ?up ?trans ?diag ?alpha ?ar ?ac ~a ?br ?bc b]
+(** [trsm ?m ?n ?side ?up ?transa ?diag ?alpha ?ar ?ac ~a ?br ?bc b]
     see BLAS documentation!
     @return matrix [b], which is overwritten.
     @param m default = number of rows of [b]
     @param n default = number of columns of [b]
     @param side default = `L (left - multiplication is [a][b])
     @param up default = true (upper triangular portion of [a] is accessed)
-    @param trans default = `N
+    @param transa default = `N
     @param diag default = `N (non-unit)
     @param alpha default = [{ re = 1.; im = 0. }]
     @param ar default = 1
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.