The R Project SVN R

Rev

Rev 60959 | Rev 64445 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 60959 Rev 60961
Line 18... Line 18...
18 
 *  http://www.r-project.org/Licenses/
 18 
 *  http://www.r-project.org/Licenses/
19 
 */
 19 
 */
20 
 
 20 
 
21 
/*
 21 
/*
22 
   C declarations of LAPACK Fortran subroutines included in R.
 22 
   C declarations of LAPACK Fortran subroutines included in R.
- 
 
 23 
   Just those used (currently or previously) by C routines in R itself.
23 
 
 24 
 
24 
   Part of the API.
 25 
   Part of the API.
- 
 
 26 
 
- 
 
 27 
   R packages that use these should have PKG_LIBS in src/Makevars include
- 
 
 28 
   $(LAPACK_LIBS) $(BLAS_LIBS) $(FLIBS)
25 
 */
 29 
 */
26 
 
 30 
 
27 
 
 31 
 
28 
#ifndef R_LAPACK_H
 32 
#ifndef R_LAPACK_H
29 
#define R_LAPACK_H
 33 
#define R_LAPACK_H
30 
/* C declarations of BLAS routines.  R packages that use these should have */
 - 
 
31 
/* src/Makevars declare PKG_LIBS = $(LAPACK_LIBS) $(BLAS_LIBS) $(FLIBS) */
 - 
 
32 
 
 34 
 
33 
#include <R_ext/RS.h>		/* for F77_... */
 35 
#include <R_ext/RS.h>		/* for F77_... */
34 
#include <R_ext/Complex.h>	/* for Rcomplex */
 36 
#include <R_ext/Complex.h>	/* for Rcomplex */
35 
#include <R_ext/BLAS.h>
 37 
#include <R_ext/BLAS.h>
36 
 
 38 
 
37 
/*
 39 
/*
38 
  LAPACK function names are [zds]<name>(), where d denotes the real
 40 
  LAPACK function names are [dz]<name>(), where d denotes the real
39 
  version of the function, z the complex version and
 41 
  version of the function, z the complex version.  (Only
40 
  s the symmetric (and real) version. Only the d<name> functions are
 42 
  double-precision versions are used in R.)
41 
  documented.
 - 
 
42 
*/
 43 
*/
43 
 
 44 
 
44 
#ifdef	__cplusplus
 45 
#ifdef	__cplusplus
45 
extern "C" {
 46 
extern "C" {
46 
#endif
 47 
#endif
47 
 
 48 
 
- 
 
 49 
// Never defined by R itself.
48 
#ifndef La_extern
 50 
#ifndef La_extern
49 
#define La_extern extern
 51 
#define La_extern extern
50 
#endif
 52 
#endif
51 
 
 53 
 
52 
// Utilities for Lapack-using packages :
 54 
// Utilities for Lapack-using packages :