SCM

SCM Repository

[matrix] Diff of /pkg/src/dense.c
ViewVC logotype

Diff of /pkg/src/dense.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 10, Mon Mar 22 20:20:05 2004 UTC revision 338, Fri Nov 12 21:17:36 2004 UTC
# Line 1  Line 1 
1  #include "dense.h"  #include "dense.h"
2    #include "Mutils.h"
3    
4  /**  /**
5   * Perform a left cyclic shift of columns j to k in the upper triangular   * Perform a left cyclic shift of columns j to k in the upper triangular
# Line 240  Line 240 
240          SET_VECTOR_ELT(Gcpy, i, VECTOR_ELT(Givens, i));          SET_VECTOR_ELT(Gcpy, i, VECTOR_ELT(Givens, i));
241      SET_VECTOR_ELT(ans, 1, ScalarInteger(rank));      SET_VECTOR_ELT(ans, 1, ScalarInteger(rank));
242      setAttrib(ans, install("useLAPACK"), ScalarLogical(1));      setAttrib(ans, install("useLAPACK"), ScalarLogical(1));
243      setAttrib(ans, install("rcond"), ScalarReal(rcond));      setAttrib(ans, Matrix_rcondSym, ScalarReal(rcond));
244      UNPROTECT(2);      UNPROTECT(2);
245      return ans;      return ans;
246  }  }

Legend:
Removed from v.10  
changed lines
  Added in v.338

root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business Powered By FusionForge