|
a/SVDLib2.mod.m2pp |
|
b/SVDLib2.mod.m2pp |
|
... |
|
... |
46 |
(*------------------------------------------------------------------------*)
|
46 |
(*------------------------------------------------------------------------*)
|
47 |
(* Implementation : Michael Riedl *)
|
47 |
(* Implementation : Michael Riedl *)
|
48 |
(* Licence : GNU Lesser General Public License (LGPL) *)
|
48 |
(* Licence : GNU Lesser General Public License (LGPL) *)
|
49 |
(*------------------------------------------------------------------------*)
|
49 |
(*------------------------------------------------------------------------*)
|
50 |
|
50 |
|
51 |
(* $Id: SVDLib2.mod.m2pp,v 1.3 2018/08/25 15:04:22 mriedl Exp mriedl $ *)
|
51 |
(* $Id: SVDLib2.mod.m2pp,v 1.3 2018/08/25 15:04:22 mriedl Exp $ *)
|
52 |
|
52 |
|
53 |
|
53 |
|
54 |
FROM SYSTEM IMPORT TSIZE;
|
54 |
FROM SYSTEM IMPORT TSIZE;
|
55 |
FROM Storage IMPORT ALLOCATE,DEALLOCATE;
|
55 |
FROM Storage IMPORT ALLOCATE,DEALLOCATE;
|
56 |
FROM Deklera IMPORT PMATRIX,PVEKTOR;
|
56 |
FROM Deklera IMPORT PMATRIX,PVEKTOR;
|