Changeset 193 for trunk/gsl

Show
Ignore:
Timestamp:
07/09/07 07:50:50 (5 years ago)
Author:
truemped
Message:

gsl: changed names of the structs in order to get correct errors during compile time

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/gsl/gsl/gsl_complex.d

    r186 r193  
    6969alias real *gsl_const_complex_packed_long_double_ptr; 
    7070 
    71 struct _N1 
     71struct gsl_complex_long_double 
    7272{ 
    7373    real [2]dat; 
    74 } 
    75 alias _N1 gsl_complex_long_double; 
     74}; 
    7675 
    77 struct _N2 
     76struct gsl_complex 
    7877{ 
    7978    double [2]dat; 
    80 } 
    81 alias _N2 gsl_complex; 
     79}; 
    8280 
    83 struct _N3 
     81struct gsl_complex_float 
    8482{ 
    8583    float [2]dat; 
    86 } 
    87 alias _N3 gsl_complex_float; 
     84}; 
    8885 

  • trunk/gsl/gsl/gsl_eigen.d

    r186 r193  
    2626public import gsl.gsl_matrix; 
    2727 
    28 struct _N89 
     28struct gsl_eigen_symm_workspace 
    2929{ 
    3030    size_t size; 
    3131    double *d; 
    3232    double *sd; 
    33 } 
     33}; 
    3434extern (C): 
    35 alias _N89 gsl_eigen_symm_workspace; 
    3635 
    3736gsl_eigen_symm_workspace * gsl_eigen_symm_alloc(size_t n); 
    …… 
    4140int  gsl_eigen_symm(gsl_matrix *A, gsl_vector *eval, gsl_eigen_symm_workspace *w); 
    4241 
    43 struct _N90 
     42struct gsl_eigen_symmv_workspace 
    4443{ 
    4544    size_t size; 
    …… 
    4847    double *gc; 
    4948    double *gs; 
    50 } 
    51 alias _N90 gsl_eigen_symmv_workspace; 
     49}; 
    5250 
    5351gsl_eigen_symmv_workspace * gsl_eigen_symmv_alloc(size_t n); 
    …… 
    5755int  gsl_eigen_symmv(gsl_matrix *A, gsl_vector *eval, gsl_matrix *evec, gsl_eigen_symmv_workspace *w); 
    5856 
    59 struct _N91 
     57struct gsl_eigen_herm_workspace 
    6058{ 
    6159    size_t size; 
    …… 
    6361    double *sd; 
    6462    double *tau; 
    65 } 
    66 alias _N91 gsl_eigen_herm_workspace; 
     63}; 
    6764 
    6865gsl_eigen_herm_workspace * gsl_eigen_herm_alloc(size_t n); 
    …… 
    7269int  gsl_eigen_herm(gsl_matrix_complex *A, gsl_vector *eval, gsl_eigen_herm_workspace *w); 
    7370 
    74 struct _N92 
     71struct gsl_eigen_hermv_workspace 
    7572{ 
    7673    size_t size; 
    …… 
    8077    double *gc; 
    8178    double *gs; 
    82 } 
    83 alias _N92 gsl_eigen_hermv_workspace; 
     79}; 
    8480 
    8581gsl_eigen_hermv_workspace * gsl_eigen_hermv_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_fft.d

    r186 r193  
    2424public import gsl.gsl_complex; 
    2525 
     26extern (C): 
    2627enum 
    2728{ 
    …… 
    3132    gsl_fft_backward = 1, 
    3233} 
    33 extern (C): 
    3434alias int gsl_fft_direction; 
    3535 

  • trunk/gsl/gsl/gsl_fft_complex.d

    r186 r193  
    5151/*  Mixed Radix general-N routines  */ 
    5252 
    53 struct _N5 
     53struct gsl_fft_complex_wavetable 
    5454{ 
    5555    size_t n; 
    …… 
    5858    gsl_complex *[64]twiddle; 
    5959    gsl_complex *trig; 
    60 } 
    61 alias _N5 gsl_fft_complex_wavetable; 
     60}; 
    6261 
    63 struct _N6 
     62struct gsl_fft_complex_workspace 
    6463{ 
    6564    size_t n; 
    6665    double *scratch; 
    67 } 
    68 alias _N6 gsl_fft_complex_workspace; 
     66}; 
    6967 
    7068gsl_fft_complex_wavetable * gsl_fft_complex_wavetable_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_fft_complex_float.d

    r186 r193  
    5151/*  Mixed Radix general-N routines  */ 
    5252 
    53 struct _N5 
     53struct gsl_fft_complex_wavetable_float 
    5454{ 
    5555    size_t n; 
    …… 
    5858    gsl_complex_float *[64]twiddle; 
    5959    gsl_complex_float *trig; 
    60 } 
    61 alias _N5 gsl_fft_complex_wavetable_float; 
     60}; 
    6261 
    63 struct _N6 
     62struct gsl_fft_complex_workspace_float 
    6463{ 
    6564    size_t n; 
    6665    float *scratch; 
    67 } 
    68 alias _N6 gsl_fft_complex_workspace_float; 
     66}; 
    6967 
    7068gsl_fft_complex_wavetable_float * gsl_fft_complex_wavetable_float_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_fft_halfcomplex.d

    r186 r193  
    3939int  gsl_fft_halfcomplex_radix2_transform(double *data, size_t stride, size_t n); 
    4040 
    41 struct _N7 
     41struct gsl_fft_halfcomplex_wavetable 
    4242{ 
    4343    size_t n; 
    …… 
    4646    gsl_complex *[64]twiddle; 
    4747    gsl_complex *trig; 
    48 } 
    49 alias _N7 gsl_fft_halfcomplex_wavetable; 
     48}; 
    5049 
    5150gsl_fft_halfcomplex_wavetable * gsl_fft_halfcomplex_wavetable_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_fft_halfcomplex_float.d

    r186 r193  
    3939int  gsl_fft_halfcomplex_float_radix2_transform(float *data, size_t stride, size_t n); 
    4040 
    41 struct _N7 
     41struct gsl_fft_halfcomplex_wavetable_float 
    4242{ 
    4343    size_t n; 
    …… 
    4646    gsl_complex_float *[64]twiddle; 
    4747    gsl_complex_float *trig; 
    48 } 
    49 alias _N7 gsl_fft_halfcomplex_wavetable_float; 
     48}; 
    5049 
    5150gsl_fft_halfcomplex_wavetable_float * gsl_fft_halfcomplex_wavetable_float_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_fft_real.d

    r186 r193  
    3333int  gsl_fft_real_radix2_transform(double *data, size_t stride, size_t n); 
    3434 
    35 struct _N5 
     35struct gsl_fft_real_wavetable 
    3636{ 
    3737    size_t n; 
    …… 
    4040    gsl_complex *[64]twiddle; 
    4141    gsl_complex *trig; 
    42 } 
    43 alias _N5 gsl_fft_real_wavetable; 
     42}; 
    4443 
    45 struct _N6 
     44struct gsl_fft_real_workspace 
    4645{ 
    4746    size_t n; 
    4847    double *scratch; 
    49 } 
    50 alias _N6 gsl_fft_real_workspace; 
     48}; 
    5149 
    5250gsl_fft_real_wavetable * gsl_fft_real_wavetable_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_fft_real_float.d

    r186 r193  
    3333int  gsl_fft_real_float_radix2_transform(float *data, size_t stride, size_t n); 
    3434 
    35 struct _N5 
     35struct gsl_fft_real_wavetable_float 
    3636{ 
    3737    size_t n; 
    …… 
    4040    gsl_complex_float *[64]twiddle; 
    4141    gsl_complex_float *trig; 
    42 } 
    43 alias _N5 gsl_fft_real_wavetable_float; 
     42}; 
    4443 
    45 struct _N6 
     44struct gsl_fft_real_workspace_float 
    4645{ 
    4746    size_t n; 
    4847    float *scratch; 
    49 } 
    50 alias _N6 gsl_fft_real_workspace_float; 
     48}; 
    5149 
    5250gsl_fft_real_wavetable_float * gsl_fft_real_wavetable_float_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_histogram.d

    r186 r193  
    2626import tango.stdc.stdio; 
    2727 
    28 struct _N1 
     28extern (C): 
     29struct gsl_histogram 
    2930{ 
    3031    size_t n; 
    3132    double *range; 
    3233    double *bin; 
    33 } 
    34 extern (C): 
    35 alias _N1 gsl_histogram; 
     34}; 
    3635 
    37 struct _N2 
     36struct gsl_histogram_pdf 
    3837{ 
    3938    size_t n; 
    4039    double *range; 
    4140    double *sum; 
    42 } 
    43 alias _N2 gsl_histogram_pdf; 
     41}; 
    4442 
    4543gsl_histogram * gsl_histogram_alloc(size_t n); 
    …… 
    6159int  gsl_histogram_get_range(gsl_histogram *h, size_t i, double *lower, double *upper); 
    6260                                      
    63  
    6461double  gsl_histogram_max(gsl_histogram *h); 
    6562 
    …… 
    9693int  gsl_histogram_mul(gsl_histogram *h1, gsl_histogram *h2); 
    9794  
    98  
    9995int  gsl_histogram_div(gsl_histogram *h1, gsl_histogram *h2); 
    10096 

  • trunk/gsl/gsl/gsl_histogram2d.d

    r186 r193  
    2626import tango.stdc.stdio; 
    2727 
    28 struct _N1 
     28extern (C): 
     29struct gsl_histogram2d 
    2930{ 
    3031    size_t nx; 
    …… 
    3334    double *yrange; 
    3435    double *bin; 
    35 } 
    36 extern (C): 
    37 alias _N1 gsl_histogram2d; 
     36}; 
    3837 
    39 struct _N2 
     38struct gsl_histogram2d_pdf 
    4039{ 
    4140    size_t nx; 
    …… 
    4443    double *yrange; 
    4544    double *sum; 
    46 } 
    47 alias _N2 gsl_histogram2d_pdf; 
     45}; 
    4846 
    4947gsl_histogram2d * gsl_histogram2d_alloc(size_t nx, size_t ny); 
    …… 
    6664 
    6765int  gsl_histogram2d_get_yrange(gsl_histogram2d *h, size_t j, double *ylower, double *yupper); 
    68  
    69                                       
    7066 
    7167double  gsl_histogram2d_xmax(gsl_histogram2d *h); 

  • trunk/gsl/gsl/gsl_ieee_utils.d

    r186 r193  
    3333} 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_ieee_float_rep 
    3637{ 
    3738    int sign; 
    …… 
    3940    int exponent; 
    4041    int type; 
    41 } 
    42 extern (C): 
    43 alias _N2 gsl_ieee_float_rep; 
     42}; 
    4443 
    45 struct _N3 
     44struct gsl_ieee_double_rep 
    4645{ 
    4746    int sign; 
    …… 
    4948    int exponent; 
    5049    int type; 
    51 } 
    52 alias _N3 gsl_ieee_double_rep; 
     50}; 
    5351 
    5452void  gsl_ieee_printf_float(float *x); 

  • trunk/gsl/gsl/gsl_integration.d

    r186 r193  
    2828/* Workspace for adaptive integrators */ 
    2929 
    30 struct _N1 
     30extern (C): 
     31struct gsl_integration_workspace 
    3132{ 
    3233    size_t limit; 
    …… 
    4142    size_t *order; 
    4243    size_t *level; 
    43 } 
    44 extern (C): 
    45 alias _N1 gsl_integration_workspace; 
     44}; 
    4645 
    4746gsl_integration_workspace * gsl_integration_workspace_alloc(size_t n); 
    …… 
    5150/* Workspace for QAWS integrator */ 
    5251 
    53 struct _N2 
     52struct gsl_integration_qaws_table 
    5453{ 
    5554    double alpha; 
    …… 
    6160    double [25]rg; 
    6261    double [25]rh; 
    63 } 
    64 alias _N2 gsl_integration_qaws_table; 
     62}; 
    6563 
    6664gsl_integration_qaws_table * gsl_integration_qaws_table_alloc(double alpha, double beta, int mu, int nu); 
    …… 
    7876} 
    7977 
    80 struct _N3 
     78struct gsl_integration_qawo_table 
    8179{ 
    8280    size_t n; 
    …… 
    8684    gsl_integration_qawo_enum sine; 
    8785    double *chebmo; 
    88 } 
    89 alias _N3 gsl_integration_qawo_table; 
     86}; 
    9087 
    9188gsl_integration_qawo_table * gsl_integration_qawo_table_alloc(double omega, double L, gsl_integration_qawo_enum sine, size_t n); 

  • trunk/gsl/gsl/gsl_interp.d

    r186 r193  
    3131/* evaluation accelerator */ 
    3232 
    33 struct _N1 
     33extern (C): 
     34struct gsl_interp_accel 
    3435{ 
    3536    size_t cache; 
    3637    size_t miss_count; 
    3738    size_t hit_count; 
    38 } 
    39 extern (C): 
    40 alias _N1 gsl_interp_accel; 
     39}; 
    4140 
    4241/* interpolation object type */ 
    4342 
    44 struct _N2 
     43struct gsl_interp_type 
    4544{ 
    4645    char *name; 
    …… 
    5352    int  function(void *, double *xa, double *ya, size_t size, gsl_interp_accel *, double a, double b, double *result)eval_integ; 
    5453    void  function(void *)free; 
    55 } 
    56 alias _N2 gsl_interp_type; 
     54}; 
    5755 
    5856/* general interpolation object */ 
    5957 
    60 struct _N3 
     58struct gsl_interp 
    6159{ 
    6260    gsl_interp_type *type; 
    …… 
    6563    size_t size; 
    6664    void *state; 
    67 } 
    68 alias _N3 gsl_interp; 
     65}; 
    6966 
    7067/* available types */ 
    …… 
    119116size_t  gsl_interp_bsearch(double *x_array, double x, size_t index_lo, size_t index_hi); 
    120117 
    121    
    122  
    123   
    124  
    125    
    126  

  • trunk/gsl/gsl/gsl_matrix_char.d

    r186 r193  
    3333public import gsl.gsl_vector_char; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_char 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_char *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_char; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_char_view 
    4847{ 
    4948    gsl_matrix_char matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_char_view; 
    52  
     49}; 
    5350alias _gsl_matrix_char_view gsl_matrix_char_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_char_const_view 
    5653{ 
    5754    gsl_matrix_char matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_char_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_char_const_view gsl_matrix_char_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_complex_double.d

    r186 r193  
    3737public import gsl.gsl_block_complex_double; 
    3838 
    39 extern(C) { 
    40     alias _N11 gsl_matrix_complex; 
    41 } 
     39extern (C): 
    4240 
    43 struct _N11 
     41struct gsl_matrix_complex 
    4442{ 
    4543    size_t size1; 
    …… 
    4947    gsl_block_complex *block; 
    5048    int owner; 
    51 } 
    52 extern (C): 
     49}; 
    5350 
    54 struct _N12 
     51struct _gsl_matrix_complex_view 
    5552{ 
    5653    gsl_matrix_complex matrix; 
    57 } 
    58 alias _N12 _gsl_matrix_complex_view; 
    59  
     54}; 
    6055alias _gsl_matrix_complex_view gsl_matrix_complex_view; 
    6156 
    62 struct _N13 
     57struct _gsl_matrix_complex_const_view 
    6358{ 
    6459    gsl_matrix_complex matrix; 
    65 } 
    66 alias _N13 _gsl_matrix_complex_const_view; 
    67  
     60}; 
    6861alias _gsl_matrix_complex_const_view gsl_matrix_complex_const_view; 
    6962 

  • trunk/gsl/gsl/gsl_matrix_complex_float.d

    r186 r193  
    3737public import gsl.gsl_block_complex_float; 
    3838 
    39 struct _N11 
     39extern (C): 
     40struct gsl_matrix_complex_float 
    4041{ 
    4142    size_t size1; 
    …… 
    4546    gsl_block_complex_float *block; 
    4647    int owner; 
    47 } 
    48 extern (C): 
    49 alias _N11 gsl_matrix_complex_float; 
     48}; 
    5049 
    51 struct _N12 
     50struct _gsl_matrix_complex_float_view 
    5251{ 
    5352    gsl_matrix_complex_float matrix; 
    54 } 
    55 alias _N12 _gsl_matrix_complex_float_view; 
    56  
     53}; 
    5754alias _gsl_matrix_complex_float_view gsl_matrix_complex_float_view; 
    5855 
    59 struct _N13 
     56struct _gsl_matrix_complex_float_const_view 
    6057{ 
    6158    gsl_matrix_complex_float matrix; 
    62 } 
    63 alias _N13 _gsl_matrix_complex_float_const_view; 
    64  
     59}; 
    6560alias _gsl_matrix_complex_float_const_view gsl_matrix_complex_float_const_view; 
    6661 

  • trunk/gsl/gsl/gsl_matrix_complex_long_double.d

    r186 r193  
    3636public import gsl.gsl_block_complex_long_double; 
    3737 
    38 struct _N11 
     38extern (C): 
     39struct gsl_matrix_complex_long_double 
    3940{ 
    4041    size_t size1; 
    …… 
    4445    gsl_block_complex_long_double *block; 
    4546    int owner; 
    46 } 
    47 extern (C): 
    48 alias _N11 gsl_matrix_complex_long_double; 
     47}; 
    4948 
    50 struct _N12 
     49struct _gsl_matrix_complex_long_double_view 
    5150{ 
    5251    gsl_matrix_complex_long_double matrix; 
    53 } 
    54 alias _N12 _gsl_matrix_complex_long_double_view; 
    55  
     52}; 
    5653alias _gsl_matrix_complex_long_double_view gsl_matrix_complex_long_double_view; 
    5754 
    58 struct _N13 
     55struct _gsl_matrix_complex_long_double_const_view 
    5956{ 
    6057    gsl_matrix_complex_long_double matrix; 
    61 } 
    62 alias _N13 _gsl_matrix_complex_long_double_const_view; 
    63  
     58}; 
    6459alias _gsl_matrix_complex_long_double_const_view gsl_matrix_complex_long_double_const_view; 
    6560 

  • trunk/gsl/gsl/gsl_matrix_double.d

    r186 r193  
    3333public import gsl.gsl_vector_double; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_view 
    4847{ 
    4948    gsl_matrix matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_view; 
    52  
     49}; 
    5350alias _gsl_matrix_view gsl_matrix_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_const_view 
    5653{ 
    5754    gsl_matrix matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_const_view gsl_matrix_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_float.d

    r186 r193  
    3333public import gsl.gsl_vector_float; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_float 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_float *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_float; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_float_view 
    4847{ 
    4948    gsl_matrix_float matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_float_view; 
    52  
     49}; 
    5350alias _gsl_matrix_float_view gsl_matrix_float_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_float_const_view 
    5653{ 
    5754    gsl_matrix_float matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_float_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_float_const_view gsl_matrix_float_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_int.d

    r186 r193  
    3333public import gsl.gsl_vector_int; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_int 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_int *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_int; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_int_view 
    4847{ 
    4948    gsl_matrix_int matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_int_view; 
    52  
     49}; 
    5350alias _gsl_matrix_int_view gsl_matrix_int_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_int_const_view 
    5653{ 
    5754    gsl_matrix_int matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_int_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_int_const_view gsl_matrix_int_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_long.d

    r186 r193  
    3333public import gsl.gsl_vector_long; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_long 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_long *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_long; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_long_view 
    4847{ 
    4948    gsl_matrix_long matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_long_view; 
    52  
     49}; 
    5350alias _gsl_matrix_long_view gsl_matrix_long_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_long_const_view 
    5653{ 
    5754    gsl_matrix_long matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_long_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_long_const_view gsl_matrix_long_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_long_double.d

    r186 r193  
    3333public import gsl.gsl_vector_long_double; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_long_double 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_long_double *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_long_double; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_long_double_view 
    4847{ 
    4948    gsl_matrix_long_double matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_long_double_view; 
    52  
     49}; 
    5350alias _gsl_matrix_long_double_view gsl_matrix_long_double_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_long_double_const_view 
    5653{ 
    5754    gsl_matrix_long_double matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_long_double_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_long_double_const_view gsl_matrix_long_double_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_short.d

    r186 r193  
    3333public import gsl.gsl_vector_short; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_short 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_short *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_short; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_short_view 
    4847{ 
    4948    gsl_matrix_short matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_short_view; 
    52  
     49}; 
    5350alias _gsl_matrix_short_view gsl_matrix_short_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_short_const_view 
    5653{ 
    5754    gsl_matrix_short matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_short_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_short_const_view gsl_matrix_short_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_uchar.d

    r186 r193  
    3333public import gsl.gsl_vector_uchar; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_uchar 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_uchar *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_uchar; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_uchar_view 
    4847{ 
    4948    gsl_matrix_uchar matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_uchar_view; 
    52  
     49}; 
    5350alias _gsl_matrix_uchar_view gsl_matrix_uchar_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_uchar_const_view 
    5653{ 
    5754    gsl_matrix_uchar matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_uchar_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_uchar_const_view gsl_matrix_uchar_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_uint.d

    r186 r193  
    3333public import gsl.gsl_vector_uint; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_uint 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_uint *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_uint; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_uint_view 
    4847{ 
    4948    gsl_matrix_uint matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_uint_view; 
    52  
     49}; 
    5350alias _gsl_matrix_uint_view gsl_matrix_uint_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_uint_const_view 
    5653{ 
    5754    gsl_matrix_uint matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_uint_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_uint_const_view gsl_matrix_uint_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_ulong.d

    r186 r193  
    3333public import gsl.gsl_vector_ulong; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_ulong 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_ulong *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_ulong; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_ulong_view 
    4847{ 
    4948    gsl_matrix_ulong matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_ulong_view; 
    52  
     49}; 
    5350alias _gsl_matrix_ulong_view gsl_matrix_ulong_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_ulong_const_view 
    5653{ 
    5754    gsl_matrix_ulong matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_ulong_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_ulong_const_view gsl_matrix_ulong_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_matrix_ushort.d

    r186 r193  
    3333public import gsl.gsl_vector_ushort; 
    3434 
    35 struct _N5 
     35extern (C): 
     36struct gsl_matrix_ushort 
    3637{ 
    3738    size_t size1; 
    …… 
    4142    gsl_block_ushort *block; 
    4243    int owner; 
    43 } 
    44 extern (C): 
    45 alias _N5 gsl_matrix_ushort; 
     44}; 
    4645 
    47 struct _N6 
     46struct _gsl_matrix_ushort_view 
    4847{ 
    4948    gsl_matrix_ushort matrix; 
    50 } 
    51 alias _N6 _gsl_matrix_ushort_view; 
    52  
     49}; 
    5350alias _gsl_matrix_ushort_view gsl_matrix_ushort_view; 
    5451 
    55 struct _N7 
     52struct _gsl_matrix_ushort_const_view 
    5653{ 
    5754    gsl_matrix_ushort matrix; 
    58 } 
    59 alias _N7 _gsl_matrix_ushort_const_view; 
    60  
     55}; 
    6156alias _gsl_matrix_ushort_const_view gsl_matrix_ushort_const_view; 
    6257 

  • trunk/gsl/gsl/gsl_min.d

    r186 r193  
    2828public import gsl.gsl_math; 
    2929 
    30 struct _N1 
     30extern (C): 
     31struct gsl_min_fminimizer_type 
    3132{ 
    3233    char *name; 
    …… 
    3435    int  function(void *state, gsl_function *f, double x_minimum, double f_minimum, double x_lower, double f_lower, double x_upper, double f_upper)set; 
    3536    int  function(void *state, gsl_function *f, double *x_minimum, double *f_minimum, double *x_lower, double *f_lower, double *x_upper, double *f_upper)iterate; 
    36 } 
    37 extern (C): 
    38 alias _N1 gsl_min_fminimizer_type; 
     37}; 
    3938 
    40 struct _N2 
     39struct gsl_min_fminimizer 
    4140{ 
    4241    gsl_min_fminimizer_type *type; 
    …… 
    4948    double f_upper; 
    5049    void *state; 
    51 } 
    52 alias _N2 gsl_min_fminimizer; 
     50}; 
    5351 
    5452gsl_min_fminimizer * gsl_min_fminimizer_alloc(gsl_min_fminimizer_type *T); 
    55                                        
    5653 
    5754void  gsl_min_fminimizer_free(gsl_min_fminimizer *s); 

  • trunk/gsl/gsl/gsl_monte_miser.d

    r186 r193  
    3030public import gsl.gsl_monte_plain; 
    3131 
    32 struct _N5 
     32extern (C): 
     33struct gsl_monte_miser_state 
    3334{ 
    3435    size_t min_calls; 
    …… 
    5556    size_t *hits_l; 
    5657    size_t *hits_r; 
    57 } 
    58 extern (C): 
    59 alias _N5 gsl_monte_miser_state; 
     58}; 
    6059 
    6160int  gsl_monte_miser_integrate(gsl_monte_function *f, double *xl, double *xh, size_t dim, size_t calls, gsl_rng *r, gsl_monte_miser_state *state, double *result, double *abserr); 

  • trunk/gsl/gsl/gsl_monte_plain.d

    r186 r193  
    3232public import gsl.gsl_rng; 
    3333 
    34 struct _N4 
     34extern (C): 
     35struct gsl_monte_plain_state 
    3536{ 
    3637    size_t dim; 
    3738    double *x; 
    38 } 
    39 extern (C): 
    40 alias _N4 gsl_monte_plain_state; 
     39}; 
    4140 
    4241int  gsl_monte_plain_integrate(gsl_monte_function *f, double *xl, double *xu, size_t dim, size_t calls, gsl_rng *r, gsl_monte_plain_state *state, double *result, double *abserr); 

  • trunk/gsl/gsl/gsl_monte_vegas.d

    r186 r193  
    4646  /* scratch variables preserved between calls to vegas1/2/3  */ 
    4747 
    48 struct _N5 
     48extern (C): 
     49struct gsl_monte_vegas_state 
    4950{ 
    5051    size_t dim; 
    …… 
    7879    uint calls_per_box; 
    7980    FILE *ostream; 
    80 } 
    81 extern (C): 
    82 alias _N5 gsl_monte_vegas_state; 
     81}; 
    8382 
    8483int  gsl_monte_vegas_integrate(gsl_monte_function *f, double *xl, double *xu, size_t dim, size_t calls, gsl_rng *r, gsl_monte_vegas_state *state, double *result, double *abserr); 

  • trunk/gsl/gsl/gsl_multifit.d

    r186 r193  
    3030public import gsl.gsl_matrix; 
    3131 
    32 struct _N89 
     32extern (C): 
     33struct gsl_multifit_linear_workspace 
    3334{ 
    3435    size_t n; 
    …… 
    4142    gsl_vector *xt; 
    4243    gsl_vector *D; 
    43 } 
    44 extern (C): 
    45 alias _N89 gsl_multifit_linear_workspace; 
     44}; 
    4645 
    4746gsl_multifit_linear_workspace * gsl_multifit_linear_alloc(size_t n, size_t p); 

  • trunk/gsl/gsl/gsl_multifit_nlin.d

    r186 r193  
    4646    void *params; 
    4747} 
    48  
    4948alias gsl_multifit_function_struct gsl_multifit_function; 
    5049 
    51 struct _N89 
     50struct gsl_multifit_fsolver_type 
    5251{ 
    5352    char *name; 
    …… 
    5756    int  function(void *state, gsl_multifit_function *func, gsl_vector *x, gsl_vector *f, gsl_vector *dx)iterate; 
    5857    void  function(void *state)free; 
    59 } 
    60 alias _N89 gsl_multifit_fsolver_type; 
     58}; 
    6159 
    62 struct _N90 
     60struct gsl_multifit_fsolver 
    6361{ 
    6462    gsl_multifit_fsolver_type *type; 
    …… 
    6866    gsl_vector *dx; 
    6967    void *state; 
    70 } 
    71 alias _N90 gsl_multifit_fsolver; 
     68}; 
    7269 
    7370gsl_multifit_fsolver * gsl_multifit_fsolver_alloc(gsl_multifit_fsolver_type *T, size_t n, size_t p); 
    …… 
    9592    void *params; 
    9693} 
    97  
    9894alias gsl_multifit_function_fdf_struct gsl_multifit_function_fdf; 
    9995 
    100 struct _N91 
     96struct gsl_multifit_fdfsolver_type 
    10197{ 
    10298    char *name; 
    …… 
    106102    int  function(void *state, gsl_multifit_function_fdf *fdf, gsl_vector *x, gsl_vector *f, gsl_matrix *J, gsl_vector *dx)iterate; 
    107103    void  function(void *state)free; 
    108 } 
    109 alias _N91 gsl_multifit_fdfsolver_type; 
     104}; 
    110105 
    111 struct _N92 
     106struct gsl_multifit_fdfsolver 
    112107{ 
    113108    gsl_multifit_fdfsolver_type *type; 
    …… 
    118113    gsl_vector *dx; 
    119114    void *state; 
    120 } 
    121 alias _N92 gsl_multifit_fdfsolver; 
     115}; 
    122116 
    123117gsl_multifit_fdfsolver * gsl_multifit_fdfsolver_alloc(gsl_multifit_fdfsolver_type *T, size_t n, size_t p); 

  • trunk/gsl/gsl/gsl_multimin.d

    r186 r193  
    4040/* parameters */ 
    4141 
     42extern (C): 
    4243struct gsl_multimin_function_struct 
    4344{ 
    …… 
    4647    void *params; 
    4748} 
    48  
    49 extern (C): 
    5049alias gsl_multimin_function_struct gsl_multimin_function; 
    5150 
    …… 
    6160    void *params; 
    6261} 
    63  
    6462alias gsl_multimin_function_fdf_struct gsl_multimin_function_fdf; 
    6563 
    …… 
    6866/* minimization of non-differentiable functions */ 
    6967 
    70 struct _N91 
     68struct gsl_multimin_fminimizer_type 
    7169{ 
    7270    char *name; 
    …… 
    7674    int  function(void *state, gsl_multimin_function *f, gsl_vector *x, double *size, double *fval)iterate; 
    7775    void  function(void *state)free; 
    78 } 
    79 alias _N91 gsl_multimin_fminimizer_type; 
     76}; 
    8077 
    8178  /* multi dimensional part */ 
    …… 
    8380   
    8481 
    85 struct _N92 
     82struct gsl_multimin_fminimizer 
    8683{ 
    8784    gsl_multimin_fminimizer_type *type; 
    …… 
    9188    double size; 
    9289    void *state; 
    93 } 
    94 alias _N92 gsl_multimin_fminimizer; 
     90}; 
    9591 
    9692gsl_multimin_fminimizer * gsl_multimin_fminimizer_alloc(gsl_multimin_fminimizer_type *T, size_t n); 
    …… 
    118114/* minimisation of differentiable functions */ 
    119115 
    120 struct _N93 
     116struct gsl_multimin_fdfminimizer_type 
    121117{ 
    122118    char *name; 
    …… 
    127123    int  function(void *state)restart; 
    128124    void  function(void *state)free; 
    129 } 
    130 alias _N93 gsl_multimin_fdfminimizer_type; 
     125}; 
    131126 
    132127  /* multi dimensional part */ 
    133128 
    134 struct _N94 
     129struct gsl_multimin_fdfminimizer 
    135130{ 
    136131    gsl_multimin_fdfminimizer_type *type; 
    …… 
    141136    gsl_vector *dx; 
    142137    void *state; 
    143 } 
    144 alias _N94 gsl_multimin_fdfminimizer; 
     138}; 
    145139 
    146140gsl_multimin_fdfminimizer * gsl_multimin_fdfminimizer_alloc(gsl_multimin_fdfminimizer_type *T, size_t n); 

  • trunk/gsl/gsl/gsl_multiroots.d

    r186 r193  
    4646int  gsl_multiroot_fdjacobian(gsl_multiroot_function *F, gsl_vector *x, gsl_vector *f, double epsrel, gsl_matrix *jacobian); 
    4747 
    48 struct _N89 
     48struct gsl_multiroot_fsolver_type 
    4949{ 
    5050    char *name; 
    …… 
    5454    int  function(void *state, gsl_multiroot_function *func, gsl_vector *x, gsl_vector *f, gsl_vector *dx)iterate; 
    5555    void  function(void *state)free; 
    56 } 
    57 alias _N89 gsl_multiroot_fsolver_type; 
     56}; 
    5857 
    59 struct _N90 
     58struct gsl_multiroot_fsolver 
    6059{ 
    6160    gsl_multiroot_fsolver_type *type; 
    …… 
    6564    gsl_vector *dx; 
    6665    void *state; 
    67 } 
    68 alias _N90 gsl_multiroot_fsolver; 
     66}; 
    6967 
    7068gsl_multiroot_fsolver * gsl_multiroot_fsolver_alloc(gsl_multiroot_fsolver_type *T, size_t n); 
    …… 
    9896alias gsl_multiroot_function_fdf_struct gsl_multiroot_function_fdf; 
    9997 
    100 struct _N91 
     98struct gsl_multiroot_fdfsolver_type 
    10199{ 
    102100    char *name; 
    …… 
    106104    int  function(void *state, gsl_multiroot_function_fdf *fdf, gsl_vector *x, gsl_vector *f, gsl_matrix *J, gsl_vector *dx)iterate; 
    107105    void  function(void *state)free; 
    108 } 
    109 alias _N91 gsl_multiroot_fdfsolver_type; 
     106}; 
    110107 
    111 struct _N92 
     108struct gsl_multiroot_fdfsolver 
    112109{ 
    113110    gsl_multiroot_fdfsolver_type *type; 
    …… 
    118115    gsl_vector *dx; 
    119116    void *state; 
    120 } 
    121 alias _N92 gsl_multiroot_fdfsolver; 
     117}; 
    122118 
    123119gsl_multiroot_fdfsolver * gsl_multiroot_fdfsolver_alloc(gsl_multiroot_fdfsolver_type *T, size_t n); 

  • trunk/gsl/gsl/gsl_ntuple.d

    r186 r193  
    3333public import gsl.gsl_histogram; 
    3434 
    35 struct _N4 
     35extern (C): 
     36struct gsl_ntuple 
    3637{ 
    3738    FILE *file; 
    3839    void *ntuple_data; 
    3940    size_t size; 
    40 } 
    41 extern (C): 
    42 alias _N4 gsl_ntuple; 
     41}; 
    4342 
    44 struct _N5 
     43struct gsl_ntuple_select_fn 
    4544{ 
    4645    int  function(void *ntuple_data, void *params)func; 
    4746    void *params; 
    48 } 
    49 alias _N5 gsl_ntuple_select_fn; 
     47}; 
    5048 
    51 struct _N6 
     49struct gsl_ntuple_value_fn 
    5250{ 
    5351    double  function(void *ntuple_data, void *params)func; 
    5452    void *params; 
    55 } 
    56 alias _N6 gsl_ntuple_value_fn; 
     53}; 
    5754 
    5855gsl_ntuple * gsl_ntuple_open(char *filename, void *ntuple_data, size_t size); 

  • trunk/gsl/gsl/gsl_odeiv.d

    r186 r193  
    4747 */ 
    4848 
    49 struct _N1 
     49extern (C): 
     50struct gsl_odeiv_system 
    5051{ 
    5152    int  function(double t, double *y, double *dydt, void *params)func; 
    …… 
    5354    size_t dimension; 
    5455    void *params; 
    55 } 
    56 extern (C): 
    57 alias _N1 gsl_odeiv_system; 
     56}; 
    5857 
    5958/* General stepper object. 
    …… 
    6463 */ 
    6564 
    66 struct _N2 
     65struct gsl_odeiv_step_type 
    6766{ 
    6867    char *name; 
    …… 
    7473    uint  function(void *state)order; 
    7574    void  function(void *state)free; 
    76 } 
    77 alias _N2 gsl_odeiv_step_type; 
    78  
    79 struct _N3 
     75}; 
     76 
     77struct gsl_odeiv_step 
    8078{ 
    8179    gsl_odeiv_step_type *type; 
    8280    size_t dimension; 
    8381    void *state; 
    84 } 
    85 alias _N3 gsl_odeiv_step; 
     82}; 
    8683 
    8784/* Available stepper types. 
    …… 
    147144 */ 
    148145 
    149 struct _N4 
     146struct gsl_odeiv_control_type 
    150147{ 
    151148    char *name; 
    …… 
    154151    int  function(void *state, size_t dim, uint ord, double *y, double *yerr, double *yp, double *h)hadjust; 
    155152    void  function(void *state)free; 
    156 } 
    157 alias _N4 gsl_odeiv_control_type; 
    158  
    159 struct _N5 
     153}; 
     154 
     155struct gsl_odeiv_control 
    160156{ 
    161157    gsl_odeiv_control_type *type; 
    162158    void *state; 
    163 } 
    164 alias _N5 gsl_odeiv_control; 
     159}; 
    165160 
    166161/* Possible return values for an hadjust() evolution method. 
    …… 
    217212 */ 
    218213 
    219 struct _N6 
     214struct gsl_odeiv_evolve 
    220215{ 
    221216    size_t dimension; 
    …… 
    227222    uint count; 
    228223    uint failed_steps; 
    229 } 
    230 alias _N6 gsl_odeiv_evolve; 
     224}; 
    231225 
    232226/* Evolution object methods. 

  • trunk/gsl/gsl/gsl_poly.d

    r186 r193  
    6767/* Solve for the complex roots of a general real polynomial */ 
    6868 
    69 struct _N4 
     69struct gsl_poly_complex_workspace 
    7070{ 
    7171    size_t nc; 
    7272    double *matrix; 
    73 } 
    74 alias _N4 gsl_poly_complex_workspace; 
     73}; 
    7574 
    7675gsl_poly_complex_workspace * gsl_poly_complex_workspace_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_qrng.d

    r186 r193  
    1717 */ 
    1818 
    19 struct _N2 
     19extern (C): 
     20struct gsl_qrng_type 
    2021{ 
    2122    char *name; 
    …… 
    2425    int  function(void *state, uint dimension)init_state; 
    2526    int  function(void *state, uint dimension, double *x)get; 
    26 } 
    27 extern (C): 
    28 alias _N2 gsl_qrng_type; 
     27}; 
    2928 
    3029/* Structure describing a generator instance of a 
    …… 
    3332 */ 
    3433 
    35 struct _N3 
     34struct gsl_qrng 
    3635{ 
    3736    gsl_qrng_type *type; 
    …… 
    3938    size_t state_size; 
    4039    void *state; 
    41 } 
    42 alias _N3 gsl_qrng; 
     40}; 
    4341 
    4442/* Supported generator types. 

  • trunk/gsl/gsl/gsl_randist.d

    r186 r193  
    203203void  gsl_ran_sample(gsl_rng *r, void *dest, size_t k, void *src, size_t n, size_t size); 
    204204 
    205 struct _N4 
     205struct gsl_ran_discrete_t 
    206206{ 
    207207    size_t K; 
    208208    size_t *A; 
    209209    double *F; 
    210 } 
    211 alias _N4 gsl_ran_discrete_t; 
     210}; 
    212211 
    213212gsl_ran_discrete_t * gsl_ran_discrete_preproc(size_t K, double *P); 

  • trunk/gsl/gsl/gsl_rng.d

    r186 r193  
    2929public import gsl.gsl_errno; 
    3030 
    31 struct _N2 
     31extern (C): 
     32struct gsl_rng_type 
    3233{ 
    3334    char *name; 
    …… 
    3839    uint  function(void *state)get; 
    3940    double  function(void *state)get_double; 
    40 } 
    41 extern (C): 
    42 alias _N2 gsl_rng_type; 
    43  
    44 struct _N3 
     41}; 
     42 
     43struct gsl_rng 
    4544{ 
    4645    gsl_rng_type *type; 
    4746    void *state; 
    48 } 
    49 alias _N3 gsl_rng; 
     47}; 
    5048 
    5149/* These structs also need to appear in default.c so you can select 

  • trunk/gsl/gsl/gsl_roots.d

    r186 r193  
    2828public import gsl.gsl_math; 
    2929 
    30 struct _N1 
     30extern (C): 
     31struct gsl_root_fsolver_type 
    3132{ 
    3233    char *name; 
    …… 
    3435    int  function(void *state, gsl_function *f, double *root, double x_lower, double x_upper)set; 
    3536    int  function(void *state, gsl_function *f, double *root, double *x_lower, double *x_upper)iterate; 
    36 } 
    37 extern (C): 
    38 alias _N1 gsl_root_fsolver_type; 
     37}; 
    3938 
    40 struct _N2 
     39struct gsl_root_fsolver 
    4140{ 
    4241    gsl_root_fsolver_type *type; 
    …… 
    4645    double x_upper; 
    4746    void *state; 
    48 } 
    49 alias _N2 gsl_root_fsolver; 
     47}; 
    5048 
    51 struct _N3 
     49struct gsl_root_fdfsolver_type 
    5250{ 
    5351    char *name; 
    …… 
    5553    int  function(void *state, gsl_function_fdf *f, double *root)set; 
    5654    int  function(void *state, gsl_function_fdf *f, double *root)iterate; 
    57 } 
    58 alias _N3 gsl_root_fdfsolver_type; 
     55}; 
    5956 
    60 struct _N4 
     57struct gsl_root_fdfsolver 
    6158{ 
    6259    gsl_root_fdfsolver_type *type; 
    …… 
    6461    double root; 
    6562    void *state; 
    66 } 
    67 alias _N4 gsl_root_fdfsolver; 
     63}; 
    6864 
    6965gsl_root_fsolver * gsl_root_fsolver_alloc(gsl_root_fsolver_type *T); 

  • trunk/gsl/gsl/gsl_siman.d

    r186 r193  
    4949  /* the following parameters are for the Boltzmann distribution */ 
    5050 
    51 struct _N4 
     51struct gsl_siman_params_t 
    5252{ 
    5353    int n_tries; 
    …… 
    5858    double mu_t; 
    5959    double t_min; 
    60 } 
    61 alias _N4 gsl_siman_params_t; 
     60}; 
    6261 
    6362/* prototype for the workhorse function */ 

  • trunk/gsl/gsl/gsl_spline.d

    r186 r193  
    2828/* general interpolation object */ 
    2929 
    30 struct _N4 
     30extern (C): 
     31struct gsl_spline 
    3132{ 
    3233    gsl_interp *interp; 
    …… 
    3435    double *y; 
    3536    size_t size; 
    36 } 
    37 extern (C): 
    38 alias _N4 gsl_spline; 
     37}; 
    3938 
    4039gsl_spline * gsl_spline_alloc(gsl_interp_type *T, size_t size); 
    41       
    4240 
    4341int  gsl_spline_init(gsl_spline *spline, double *xa, double *ya, size_t size); 

  • trunk/gsl/gsl/gsl_sum.d

    r186 r193  
    3737 */ 
    3838 
    39 struct _N1 
     39extern (C): 
     40struct gsl_sum_levin_u_workspace 
    4041{ 
    4142    size_t size; 
    …… 
    4849    double *dq_den; 
    4950    double *dsum; 
    50 } 
    51 extern (C): 
    52 alias _N1 gsl_sum_levin_u_workspace; 
     51}; 
    5352 
    5453gsl_sum_levin_u_workspace * gsl_sum_levin_u_alloc(size_t n); 
    …… 
    103102   expected to change.  */ 
    104103 
    105 struct _N2 
     104struct gsl_sum_levin_utrunc_workspace 
    106105{ 
    107106    size_t size; 
    …… 
    112111    double *q_den; 
    113112    double *dsum; 
    114 } 
    115 alias _N2 gsl_sum_levin_utrunc_workspace; 
     113}; 
    116114 
    117115gsl_sum_levin_utrunc_workspace * gsl_sum_levin_utrunc_alloc(size_t n); 

  • trunk/gsl/gsl/gsl_vector_char.d

    r186 r193  
    3333public import gsl.gsl_block_char; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_char 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_char *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_char; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_char_view 
    4746{ 
    4847    gsl_vector_char vector; 
    49 } 
    50 alias _N3 _gsl_vector_char_view; 
    51  
     48}; 
    5249alias _gsl_vector_char_view gsl_vector_char_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_char_const_view 
    5552{ 
    5653    gsl_vector_char vector; 
    57 } 
    58 alias _N4 _gsl_vector_char_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_char_const_view gsl_vector_char_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_complex_double.d

    r186 r193  
    3939public import gsl.gsl_block_complex_double; 
    4040 
    41 struct _N8 
     41extern (C): 
     42struct gsl_vector_complex 
    4243{ 
    4344    size_t size; 
    …… 
    4647    gsl_block_complex *block; 
    4748    int owner; 
    48 } 
    49 extern (C): 
    50 alias _N8 gsl_vector_complex; 
     49}; 
    5150 
    52 struct _N9 
     51struct _gsl_vector_complex_view 
    5352{ 
    5453    gsl_vector_complex vector; 
    55 } 
    56 alias _N9 _gsl_vector_complex_view; 
    57  
     54}; 
    5855alias _gsl_vector_complex_view gsl_vector_complex_view; 
    5956 
    60 struct _N10 
     57struct _gsl_vector_complex_const_view 
    6158{ 
    6259    gsl_vector_complex vector; 
    63 } 
    64 alias _N10 _gsl_vector_complex_const_view; 
    65  
     60}; 
    6661alias _gsl_vector_complex_const_view gsl_vector_complex_const_view; 
    6762 

  • trunk/gsl/gsl/gsl_vector_complex_float.d

    r186 r193  
    3939public import gsl.gsl_block_complex_float; 
    4040 
    41 struct _N8 
     41extern (C): 
     42struct gsl_vector_complex_float 
    4243{ 
    4344    size_t size; 
    …… 
    4647    gsl_block_complex_float *block; 
    4748    int owner; 
    48 } 
    49 extern (C): 
    50 alias _N8 gsl_vector_complex_float; 
     49}; 
    5150 
    52 struct _N9 
     51struct _gsl_vector_complex_float_view 
    5352{ 
    5453    gsl_vector_complex_float vector; 
    55 } 
    56 alias _N9 _gsl_vector_complex_float_view; 
    57  
     54}; 
    5855alias _gsl_vector_complex_float_view gsl_vector_complex_float_view; 
    5956 
    60 struct _N10 
     57struct _gsl_vector_complex_float_const_view 
    6158{ 
    6259    gsl_vector_complex_float vector; 
    63 } 
    64 alias _N10 _gsl_vector_complex_float_const_view; 
    65  
     60}; 
    6661alias _gsl_vector_complex_float_const_view gsl_vector_complex_float_const_view; 
    6762 

  • trunk/gsl/gsl/gsl_vector_complex_long_double.d

    r186 r193  
    3939public import gsl.gsl_block_complex_long_double; 
    4040 
    41 struct _N8 
     41extern (C): 
     42struct gsl_vector_complex_long_double 
    4243{ 
    4344    size_t size; 
    …… 
    4647    gsl_block_complex_long_double *block; 
    4748    int owner; 
    48 } 
    49 extern (C): 
    50 alias _N8 gsl_vector_complex_long_double; 
     49}; 
    5150 
    52 struct _N9 
     51struct _gsl_vector_complex_long_double_view 
    5352{ 
    5453    gsl_vector_complex_long_double vector; 
    55 } 
    56 alias _N9 _gsl_vector_complex_long_double_view; 
    57  
     54}; 
    5855alias _gsl_vector_complex_long_double_view gsl_vector_complex_long_double_view; 
    5956 
    60 struct _N10 
     57struct _gsl_vector_complex_long_double_const_view 
    6158{ 
    6259    gsl_vector_complex_long_double vector; 
    63 } 
    64 alias _N10 _gsl_vector_complex_long_double_const_view; 
    65  
     60}; 
    6661alias _gsl_vector_complex_long_double_const_view gsl_vector_complex_long_double_const_view; 
    6762 

  • trunk/gsl/gsl/gsl_vector_double.d

    r186 r193  
    3333public import gsl.gsl_block_double; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_view 
    4746{ 
    4847    gsl_vector vector; 
    49 } 
    50 alias _N3 _gsl_vector_view; 
    51  
     48}; 
    5249alias _gsl_vector_view gsl_vector_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_const_view 
    5552{ 
    5653    gsl_vector vector; 
    57 } 
    58 alias _N4 _gsl_vector_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_const_view gsl_vector_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_float.d

    r186 r193  
    3333public import gsl.gsl_block_float; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_float 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_float *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_float; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_float_view 
    4746{ 
    4847    gsl_vector_float vector; 
    49 } 
    50 alias _N3 _gsl_vector_float_view; 
    51  
     48}; 
    5249alias _gsl_vector_float_view gsl_vector_float_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_float_const_view 
    5552{ 
    5653    gsl_vector_float vector; 
    57 } 
    58 alias _N4 _gsl_vector_float_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_float_const_view gsl_vector_float_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_int.d

    r186 r193  
    3333public import gsl.gsl_block_int; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_int 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_int *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_int; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_int_view 
    4746{ 
    4847    gsl_vector_int vector; 
    49 } 
    50 alias _N3 _gsl_vector_int_view; 
    51  
     48}; 
    5249alias _gsl_vector_int_view gsl_vector_int_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_int_const_view 
    5552{ 
    5653    gsl_vector_int vector; 
    57 } 
    58 alias _N4 _gsl_vector_int_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_int_const_view gsl_vector_int_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_long.d

    r186 r193  
    3333public import gsl.gsl_block_long; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_long 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_long *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_long; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_long_view 
    4746{ 
    4847    gsl_vector_long vector; 
    49 } 
    50 alias _N3 _gsl_vector_long_view; 
    51  
     48}; 
    5249alias _gsl_vector_long_view gsl_vector_long_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_long_const_view 
    5552{ 
    5653    gsl_vector_long vector; 
    57 } 
    58 alias _N4 _gsl_vector_long_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_long_const_view gsl_vector_long_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_long_double.d

    r186 r193  
    3333public import gsl.gsl_block_long_double; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_long_double 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_long_double *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_long_double; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_long_double_view 
    4746{ 
    4847    gsl_vector_long_double vector; 
    49 } 
    50 alias _N3 _gsl_vector_long_double_view; 
    51  
     48}; 
    5249alias _gsl_vector_long_double_view gsl_vector_long_double_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_long_double_const_view 
    5552{ 
    5653    gsl_vector_long_double vector; 
    57 } 
    58 alias _N4 _gsl_vector_long_double_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_long_double_const_view gsl_vector_long_double_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_short.d

    r186 r193  
    3333public import gsl.gsl_block_short; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_short 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_short *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_short; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_short_view 
    4746{ 
    4847    gsl_vector_short vector; 
    49 } 
    50 alias _N3 _gsl_vector_short_view; 
    51  
     48}; 
    5249alias _gsl_vector_short_view gsl_vector_short_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_short_const_view 
    5552{ 
    5653    gsl_vector_short vector; 
    57 } 
    58 alias _N4 _gsl_vector_short_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_short_const_view gsl_vector_short_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_uchar.d

    r186 r193  
    3333public import gsl.gsl_block_uchar; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_uchar 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_uchar *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_uchar; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_uchar_view 
    4746{ 
    4847    gsl_vector_uchar vector; 
    49 } 
    50 alias _N3 _gsl_vector_uchar_view; 
    51  
     48}; 
    5249alias _gsl_vector_uchar_view gsl_vector_uchar_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_uchar_const_view 
    5552{ 
    5653    gsl_vector_uchar vector; 
    57 } 
    58 alias _N4 _gsl_vector_uchar_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_uchar_const_view gsl_vector_uchar_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_uint.d

    r186 r193  
    3333public import gsl.gsl_block_uint; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_uint 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_uint *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_uint; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_uint_view 
    4746{ 
    4847    gsl_vector_uint vector; 
    49 } 
    50 alias _N3 _gsl_vector_uint_view; 
    51  
     48}; 
    5249alias _gsl_vector_uint_view gsl_vector_uint_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_uint_const_view 
    5552{ 
    5653    gsl_vector_uint vector; 
    57 } 
    58 alias _N4 _gsl_vector_uint_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_uint_const_view gsl_vector_uint_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_ulong.d

    r186 r193  
    3333public import gsl.gsl_block_ulong; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_ulong 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_ulong *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_ulong; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_ulong_view 
    4746{ 
    4847    gsl_vector_ulong vector; 
    49 } 
    50 alias _N3 _gsl_vector_ulong_view; 
    51  
     48}; 
    5249alias _gsl_vector_ulong_view gsl_vector_ulong_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_ulong_const_view 
    5552{ 
    5653    gsl_vector_ulong vector; 
    57 } 
    58 alias _N4 _gsl_vector_ulong_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_ulong_const_view gsl_vector_ulong_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_vector_ushort.d

    r186 r193  
    3333public import gsl.gsl_block_ushort; 
    3434 
    35 struct _N2 
     35extern (C): 
     36struct gsl_vector_ushort 
    3637{ 
    3738    size_t size; 
    …… 
    4041    gsl_block_ushort *block; 
    4142    int owner; 
    42 } 
    43 extern (C): 
    44 alias _N2 gsl_vector_ushort; 
     43}; 
    4544 
    46 struct _N3 
     45struct _gsl_vector_ushort_view 
    4746{ 
    4847    gsl_vector_ushort vector; 
    49 } 
    50 alias _N3 _gsl_vector_ushort_view; 
    51  
     48}; 
    5249alias _gsl_vector_ushort_view gsl_vector_ushort_view; 
    5350 
    54 struct _N4 
     51struct _gsl_vector_ushort_const_view 
    5552{ 
    5653    gsl_vector_ushort vector; 
    57 } 
    58 alias _N4 _gsl_vector_ushort_const_view; 
    59  
     54}; 
    6055alias _gsl_vector_ushort_const_view gsl_vector_ushort_const_view; 
    6156 

  • trunk/gsl/gsl/gsl_wavelet.d

    r186 r193  
    3838alias int gsl_wavelet_direction; 
    3939 
    40 struct _N3 
     40struct gsl_wavelet_type 
    4141{ 
    4242    char *name; 
    4343    int  function(double **h1, double **g1, double **h2, double **g2, size_t *nc, size_t *offset, size_t member)init; 
    44 } 
    45 alias _N3 gsl_wavelet_type; 
     44}; 
    4645 
    47 struct _N4 
     46struct gsl_wavelet 
    4847{ 
    4948    gsl_wavelet_type *type; 
    …… 
    5453    size_t nc; 
    5554    size_t offset; 
    56 } 
    57 alias _N4 gsl_wavelet; 
     55}; 
    5856 
    59 struct _N5 
     57struct gsl_wavelet_workspace 
    6058{ 
    6159    double *scratch; 
    6260    size_t n; 
    63 } 
    64 alias _N5 gsl_wavelet_workspace; 
     61}; 
    6562 
    6663extern gsl_wavelet_type *gsl_wavelet_daubechies;