SCM

SCM Repository

[matrix] Diff of /pkg/Matrix/src/Mutils.h
ViewVC logotype

Diff of /pkg/Matrix/src/Mutils.h

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

revision 2676, Sat Jun 25 19:14:05 2011 UTC revision 2677, Sat Jun 25 19:18:12 2011 UTC
# Line 211  Line 211 
211  /**  /**
212   * Check if slot(obj, "x") contains any NA (or NaN).   * Check if slot(obj, "x") contains any NA (or NaN).
213   *   *
214   * @param obj   a 'Matrix' object with an 'x' slot.   * @param obj   a 'Matrix' object with a (double precision) 'x' slot.
215   *   *
216   * @return Rboolean :== any(is.na(slot(obj, "x") )   * @return Rboolean :== any(is.na(slot(obj, "x") )
217   */   */
# Line 285  Line 285 
285  # define Matrix_check_class_and_super R_check_class_and_super  # define Matrix_check_class_and_super R_check_class_and_super
286  #endif  #endif
287    
288    
289    /** Accessing  *sparseVectors :  fast (and recycling)  v[i] for v = ?sparseVector:
290     * -> ./sparseVector.c  -> ./t_sparseVector.c :
291     */
292    // Type_ans sparseVector_sub(int64_t i, int nnz_v, int* v_i, Type_ans* v_x, int len_v):
293    
294    /* Define all of
295     *  dsparseVector_sub(....)
296     *  isparseVector_sub(....)
297     *  lsparseVector_sub(....)
298     *  nsparseVector_sub(....)
299     *  zsparseVector_sub(....)
300     */
301    #define _dspV_
302    #include "t_sparseVector.c"
303    
304    #define _ispV_
305    #include "t_sparseVector.c"
306    
307    #define _lspV_
308    #include "t_sparseVector.c"
309    
310    #define _nspV_
311    #include "t_sparseVector.c"
312    
313    #define _zspV_
314    #include "t_sparseVector.c"
315    
316    
317  #ifdef __cplusplus  #ifdef __cplusplus
318  }  }
319  #endif  #endif

Legend:
Removed from v.2676  
changed lines
  Added in v.2677

R-Forge@R-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business University of Wisconsin - Madison Powered By FusionForge