File: mlgsl_matrix_complex_float.h

package info (click to toggle)
ocamlgsl 0.6.0-7
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd, squeeze, wheezy
  • size: 4,028 kB
  • ctags: 3,090
  • sloc: ml: 8,539; ansic: 7,338; makefile: 261; sh: 149; awk: 13
file content (13 lines) | stat: -rw-r--r-- 336 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 

#include "wrappers.h"

#define BASE_TYPE complex_float

#undef CONV_FLAT

#define TYPE(t) CONCAT2(t,BASE_TYPE)
#define _DECLARE_BASE_TYPE(v) gsl_complex_float conv_##v
#define _CONVERT_BASE_TYPE(v) GSL_SET_COMPLEX(&conv_##v,Double_field(v, 0), Double_field(v,1))
#define FUNCTION(a,b) CONCAT3(a,BASE_TYPE,b)

#include "mlgsl_matrix.h"