[Teem-commit] teem/src/ell eigen.c,1.21,1.22

[Milan I. <ik...@us...>]

Update of /cvsroot/teem/teem/src/ell
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9481

Modified Files:
	eigen.c 
Log Message:
added proper scaling by the inverse of the frobenius norm

Index: eigen.c
===================================================================
RCS file: /cvsroot/teem/teem/src/ell/eigen.c,v
retrieving revision 1.21
retrieving revision 1.22
diff -C2 -d -r1.21 -r1.22
*** eigen.c	4 Apr 2004 21:26:11 -0000	1.21
--- eigen.c	22 Apr 2004 10:13:51 -0000	1.22
***************
*** 179,183 ****
  
    frob = ELL_3M_FROB(_m);
!   scale = frob > 10 ? 10.0/frob : 1.0;
    ELL_3M_SCALE(m, scale, _m);
    /* 
--- 179,183 ----
  
    frob = ELL_3M_FROB(_m);
!   scale = frob ? 1.0/frob : 1.0;
    ELL_3M_SCALE(m, scale, _m);
    /*