NTuple.i

   1 %module "Math::GSL::NTuple"
   2
   3 %typemap(in) void *ntuple_data {
   4     fprintf(stderr,"symname=$symname\n");
   5     if ($input)
   6         $1 = (double *) $input;
   7 };
   8
   9 %typemap(argout) void *ntuple_data {
  10     //Perl_sv_dump($1);
  11 }
  12
  13 %{
  14     #include "gsl/gsl_ntuple.h"
  15 %}
  16
  17 %include "gsl/gsl_ntuple.h"
  18
  19
  20 %perlcode %{
  21
  22 # Intermittent failure happens *after* this
  23 # END { warn "This is the end" }
  24
  25
  26 @EXPORT_OK = qw/
  27                gsl_ntuple_open
  28                gsl_ntuple_create
  29                gsl_ntuple_write
  30                gsl_ntuple_read
  31                gsl_ntuple_bookdata
  32                gsl_ntuple_project
  33                gsl_ntuple_close
  34              /;
  35 %EXPORT_TAGS = ( all => [ @EXPORT_OK ] );
  36
  37 __END__
  38
  39 =head1 NAME
  40
  41 Math::GSL::NTuple - Functions for creating and manipulating ntuples, sets of values associated with events
  42
  43 =head1 SYNOPSIS
  44
  45 This module is partially implemented. Patches Welcome!
  46
  47     use Math::GSL::NTuple qw /:all/;
  48
  49 =head1 DESCRIPTION
  50
  51 Here is a list of all the functions in this module :
  52
  53 =over
  54
  55 =item * <gsl_ntuple_open($filename, $ntuple_data, $size)> - This function opens an existing ntuple file $filename for reading and returns a pointer to a corresponding ntuple struct. The ntuples in the file must have size $size. A pointer to memory for the current ntuple row $ntuple_data, which is an array reference, must be supplied—this is used to copy ntuples in and out of the file.
  56
  57 =item * <gsl_ntuple_create > - This function creates a new write-only ntuple file $filename for ntuples of size $size and returns a pointer to the newly created ntuple struct. Any existing file with the same name is truncated to zero length and overwritten. A pointer to memory for the current ntuple row $ntuple_data, which is an array reference, must be supplied—this is used to copy ntuples in and out of the file.
  58
  59
  60 =item * <gsl_ntuple_write($ntuple)> - This function writes the current $ntuple $ntuple->{ntuple_data} of size $ntuple->{size} to the corresponding file.
  61
  62 =item * <gsl_ntuple_bookdata($ntuple)> - This function is a synonym for gsl_ntuple_write.
  63
  64 =item * <gsl_ntuple_read($ntuple)> - This function reads the current row of the ntuple file for ntuple and stores the values in $ntuple->{data}.
  65
  66 =item * <gsl_ntuple_project >
  67
  68 =item * <gsl_ntuple_close($ntuple)> - This function closes the ntuple file ntuple and frees its associated allocated memory.
  69
  70 =back
  71
  72 For more informations on the functions, we refer you to the GSL offcial
  73 documentation: L<http://www.gnu.org/software/gsl/manual/html_node/>
  74
  75  Tip : search on google: site:http://www.gnu.org/software/gsl/manual/html_node/ name_of_the_function_you_want
  76
  77
  78 =head1 AUTHORS
  79
  80 Jonathan Leto <jonathan@leto.net> and Thierry Moisan <thierry.moisan@gmail.com>
  81
  82 =head1 COPYRIGHT AND LICENSE
  83
  84 Copyright (C) 2008 Jonathan Leto and Thierry Moisan
  85
  86 This program is free software; you can redistribute it and/or modify it
  87 under the same terms as Perl itself.
  88
  89 =cut
  90
  91 %}