#include <stdio.h>
#include "kernel/mod2.h"
#include "Singular/svd_si.h"
#include "kernel/structs.h"
#include "kernel/polys.h"
#include "polys/matpol.h"
#include "Singular/lists.h"
Go to the source code of this file.
◆ p_svdInit()
poly p_svdInit |
( |
char * |
s | ) |
|
◆ testsvd()
Definition at line 27 of file calcSVD.cc.
30 const unsigned int Precision=300;
68 for(
i=1;
i<=max_i;
i++)
70 for(
j=1;
j<=max_j;
j++)
73 Print(
" to svd:%d,%d=%s\n",
i,
j,str);
81 svd::svddecomposition<Precision>(a, max_i, max_j, 2, 2, 2,
w, u, vt);
83 Mu=
mpNew(max_i,max_i);
84 Mw=
mpNew(max_i,max_j);
85 Mvt=
mpNew(max_j,max_j);
101 for(
j=1;
j<=max_j;
j++)
112 L->
m[0].
data=(
char*)Mu;
113 L->
m[1].
data=(
char*)Mw;
114 L->
m[2].
data=(
char*)Mvt;
static FORCE_INLINE const char * n_Read(const char *s, number *a, const coeffs r)
!!! Recommendation: This method is too cryptic to be part of the user- !!! interface....