BLAS.i

   1 %module BLAS
   2
   3 %include "typemaps.i"
   4
   5 %apply float *OUTPUT { float *result };
   6
   7 %{
   8     #include "/usr/local/include/gsl/gsl_blas.h"
   9     #include "/usr/local/include/gsl/gsl_blas_types.h"
  10 %}
  11
  12 %include "/usr/local/include/gsl/gsl_blas.h"
  13 %include "/usr/local/include/gsl/gsl_blas_types.h"
  14
  15 %perlcode %{
  16
  17 @EXPORT_OK_level1 = qw/
  18                         gsl_blas_sdsdot gsl_blas_dsdot gsl_blas_sdot gsl_blas_ddot
  19                         gsl_blas_cdotu gsl_blas_cdotc gsl_blas_zdotu gsl_blas_zdotc
  20                         gsl_blas_snrm2 gsl_blas_sasum gsl_blas_dnrm2 gsl_blas_dasum
  21                         gsl_blas_scnrm2 gsl_blas_scasum gsl_blas_dznrm2 gsl_blas_dzasum
  22                         gsl_blas_isamax gsl_blas_idamax gsl_blas_icamax gsl_blas_izamax
  23                         gsl_blas_sswap gsl_blas_scopy gsl_blas_saxpy gsl_blas_dswap
  24                         gsl_blas_dcopy gsl_blas_daxpy gsl_blas_cswap gsl_blas_ccopy
  25                         gsl_blas_caxpy gsl_blas_zswap gsl_blas_zcopy gsl_blas_zaxpy
  26                         gsl_blas_srotg gsl_blas_srotmg gsl_blas_srot gsl_blas_srotm
  27                         gsl_blas_drotg gsl_blas_drotmg gsl_blas_drot gsl_blas_drotm
  28                         gsl_blas_sscal gsl_blas_dscal gsl_blas_cscal gsl_blas_zscal
  29                         gsl_blas_csscal gsl_blas_zdscal
  30                     /;
  31 @EXPORT_OK_level2 = qw/
  32                         gsl_blas_sgemv gsl_blas_strmv
  33                         gsl_blas_strsv gsl_blas_dgemv gsl_blas_dtrmv gsl_blas_dtrsv
  34                         gsl_blas_cgemv gsl_blas_ctrmv gsl_blas_ctrsv gsl_blas_zgemv
  35                         gsl_blas_ztrmv gsl_blas_ztrsv gsl_blas_ssymv gsl_blas_sger
  36                         gsl_blas_ssyr gsl_blas_ssyr2 gsl_blas_dsymv gsl_blas_dger
  37                         gsl_blas_dsyr gsl_blas_dsyr2 gsl_blas_chemv gsl_blas_cgeru
  38                         gsl_blas_cgerc gsl_blas_cher gsl_blas_cher2 gsl_blas_zhemv
  39                         gsl_blas_zgeru gsl_blas_zgerc gsl_blas_zher gsl_blas_zher2
  40                     /;
  41
  42 @EXPORT_OK_level3 = qw/
  43                         gsl_blas_sgemm gsl_blas_ssymm gsl_blas_ssyrk gsl_blas_ssyr2k
  44                         gsl_blas_strmm gsl_blas_strsm gsl_blas_dgemm gsl_blas_dsymm
  45                         gsl_blas_dsyrk gsl_blas_dsyr2k gsl_blas_dtrmm gsl_blas_dtrsm
  46                         gsl_blas_cgemm gsl_blas_csymm gsl_blas_csyrk gsl_blas_csyr2k
  47                         gsl_blas_ctrmm gsl_blas_ctrsm gsl_blas_zgemm gsl_blas_zsymm
  48                         gsl_blas_zsyrk gsl_blas_zsyr2k gsl_blas_ztrmm gsl_blas_ztrsm
  49                         gsl_blas_chemm gsl_blas_cherk gsl_blas_cher2k gsl_blas_zhemm
  50                         gsl_blas_zherk gsl_blas_zher2k
  51                     /;
  52 @EXPORT_OK = (@EXPORT_OK_level1, @EXPORT_OK_level2, @EXPORT_OK_level3);
  53 %EXPORT_TAGS = (
  54                 all    => [ @EXPORT_OK ],
  55                 level1 => [ @EXPORT_OK_level1 ],
  56                 level2 => [ @EXPORT_OK_level2 ],
  57                 level3 => [ @EXPORT_OK_level3 ],
  58                );
  59 __END__
  60
  61 =head1 NAME
  62
  63 Math::GSL::BLAS - Basic Linear Algebra Subprograms
  64
  65 =head1 SYPNOPSIS
  66
  67 use Math::GSL::QRNG qw/:all/;
  68
  69 =head1 DESCRIPTION
  70
  71 The functions of this module are divised into 3 levels:
  72
  73 =head2 Level 1 - Vector operations
  74
  75 =over 3
  76
  77 =item C<gsl_blas_sdsdot>
  78
  79 =item C<gsl_blas_dsdot>
  80
  81 =item C<gsl_blas_sdot>
  82
  83 =item C<gsl_blas_ddot >
  84
  85 =item C<gsl_blas_cdotu>
  86
  87 =item C<gsl_blas_cdotc>
  88
  89 =item C<gsl_blas_zdotu>
  90
  91 =item C<gsl_blas_zdotc >
  92
  93 =item C<gsl_blas_snrm2>
  94
  95 =item C<gsl_blas_sasum>
  96
  97 =item C<gsl_blas_dnrm2>
  98
  99 =item C<gsl_blas_dasum >
 100
 101 =item C<gsl_blas_scnrm2>
 102
 103 =item C<gsl_blas_scasum>
 104
 105 =item C<gsl_blas_dznrm2>
 106
 107 =item C<gsl_blas_dzasum >
 108
 109 =item C<gsl_blas_isamax>
 110
 111 =item C<gsl_blas_idamax>
 112
 113 =item C<gsl_blas_icamax>
 114
 115 =item C<gsl_blas_izamax >
 116
 117 =item C<gsl_blas_sswap>
 118
 119 =item C<gsl_blas_scopy>
 120
 121 =item C<gsl_blas_saxpy>
 122
 123 =item C<gsl_blas_dswap >
 124
 125 =item C<gsl_blas_dcopy>
 126
 127 =item C<gsl_blas_daxpy>
 128
 129 =item C<gsl_blas_cswap>
 130
 131 =item C<gsl_blas_ccopy >
 132
 133 =item C<gsl_blas_caxpy>
 134
 135 =item C<gsl_blas_zswap>
 136
 137 =item C<gsl_blas_zcopy>
 138
 139 =item C<gsl_blas_zaxpy >
 140
 141 =item C<gsl_blas_srotg>
 142
 143 =item C<gsl_blas_srotmg>
 144
 145 =item C<gsl_blas_srot>
 146
 147 =item C<gsl_blas_srotm >
 148
 149 =item C<gsl_blas_drotg>
 150
 151 =item C<gsl_blas_drotmg>
 152
 153 =item C<gsl_blas_drot>
 154
 155 =item C<gsl_blas_drotm >
 156
 157 =item C<gsl_blas_sscal>
 158
 159 =item C<gsl_blas_dscal>
 160
 161 =item C<gsl_blas_cscal>
 162
 163 =item C<gsl_blas_zscal >
 164
 165 =item C<gsl_blas_csscal>
 166
 167 =item C<gsl_blas_zdscal>
 168
 169 =back
 170
 171 =head2 Level 2 - Matrix-vector operations
 172
 173 =over 3
 174
 175 =item C<gsl_blas_sgemv>
 176
 177 =item C<gsl_blas_strmv >
 178
 179 =item C<gsl_blas_strsv>
 180
 181 =item C<gsl_blas_dgemv>
 182
 183 =item C<gsl_blas_dtrmv>
 184
 185 =item C<gsl_blas_dtrsv >
 186
 187 =item C<gsl_blas_cgemv >
 188
 189 =item C<gsl_blas_ctrmv>
 190
 191 =item C<gsl_blas_ctrsv>
 192
 193 =item C<gsl_blas_zgemv >
 194
 195 =item C<gsl_blas_ztrmv>
 196
 197 =item C<gsl_blas_ztrsv>
 198
 199 =item C<gsl_blas_ssymv>
 200
 201 =item C<gsl_blas_sger >
 202
 203 =item C<gsl_blas_ssyr>
 204
 205 =item C<gsl_blas_ssyr2>
 206
 207 =item C<gsl_blas_dsymv>
 208
 209 =item C<gsl_blas_dger >
 210
 211 =item C<gsl_blas_dsyr>
 212
 213 =item C<gsl_blas_dsyr2>
 214
 215 =item C<gsl_blas_chemv>
 216
 217 =item C<gsl_blas_cgeru >
 218
 219 =item C<gsl_blas_cgerc>
 220
 221 =item C<gsl_blas_cher>
 222
 223 =item C<gsl_blas_cher2>
 224
 225 =item C<gsl_blas_zhemv >
 226
 227 =item C<gsl_blas_zgeru>
 228
 229 =item C<gsl_blas_zgerc>
 230
 231 =item C<gsl_blas_zher>
 232
 233 =item C<gsl_blas_zher2 >
 234
 235 =back
 236
 237 =head2 Level 3 - Matrix-matrix operations
 238
 239 =over 3
 240
 241 =item C<gsl_blas_sgemm>
 242
 243 =item C<gsl_blas_ssymm>
 244
 245 =item C<gsl_blas_ssyrk>
 246
 247 =item C<gsl_blas_ssyr2k >
 248
 249 =item C<gsl_blas_strmm>
 250
 251 =item C<gsl_blas_strsm>
 252
 253 =item C<gsl_blas_dgemm>
 254
 255 =item C<gsl_blas_dsymm >
 256
 257 =item C<gsl_blas_dsyrk>
 258
 259 =item C<gsl_blas_dsyr2k>
 260
 261 =item C<gsl_blas_dtrmm>
 262
 263 =item C<gsl_blas_dtrsm >
 264
 265 =item C<gsl_blas_cgemm>
 266
 267 =item C<gsl_blas_csymm>
 268
 269 =item C<gsl_blas_csyrk>
 270
 271 =item C<gsl_blas_csyr2k >
 272
 273 =item C<gsl_blas_ctrmm>
 274
 275 =item C<gsl_blas_ctrsm>
 276
 277 =item C<gsl_blas_zgemm>
 278
 279 =item C<gsl_blas_zsymm >
 280
 281 =item C<gsl_blas_zsyrk>
 282
 283 =item C<gsl_blas_zsyr2k>
 284
 285 =item C<gsl_blas_ztrmm>
 286
 287 =item C<gsl_blas_ztrsm >
 288
 289 =item C<gsl_blas_chemm>
 290
 291 =item C<gsl_blas_cherk>
 292
 293 =item C<gsl_blas_cher2k>
 294
 295 =item C<gsl_blas_zhemm >
 296
 297 =item C<gsl_blas_zherk >
 298
 299 =item C<gsl_blas_zher2k >
 300
 301 =back
 302
 303 You have to add the functions you want to use inside the qw /put_funtion_here /.
 304 You can also write use Math::GSL::PowInt qw/:all/ to use all avaible functions of the module.
 305 Other tags are also avaible, here is a complete list of all tags for this module :
 306
 307 =over 3
 308
 309 =item C<level1>
 310
 311 =item C<level2>
 312
 313 =item C<level3>
 314
 315 =back
 316
 317 For more informations on the functions, we refer you to the GSL offcial documentation: L<http://www.gnu.org/software/gsl/manual/html_node/>
 318
 319 Tip : search on google: site:http://www.gnu.org/software/gsl/manual/html_node/ name_of_the_function_you_want
 320
 321
 322 =head1 EXAMPLES
 323
 324 =head1 AUTHOR
 325
 326 Jonathan Leto <jonathan@leto.net> and Thierry Moisan <thierry.moisan@gmail.com>
 327
 328 =head1 COPYRIGHT AND LICENSE
 329
 330 Copyright (C) 2008 Jonathan Leto and Thierry Moisan
 331
 332 This program is free software; you can redistribute it and/or modify it
 333 under the same terms as Perl itself.
 334
 335 =cut
 336
 337 %}