1# This file was automatically generated by SWIG (http://www.swig.org). 2# Version 4.0.1 3# 4# Do not make changes to this file unless you know what you are doing--modify 5# the SWIG interface file instead. 6 7package Math::GSL::Siman; 8use base qw(Exporter); 9use base qw(DynaLoader); 10package Math::GSL::Simanc; 11bootstrap Math::GSL::Siman; 12package Math::GSL::Siman; 13@EXPORT = qw(); 14 15# ---------- BASE METHODS ------------- 16 17package Math::GSL::Siman; 18 19sub TIEHASH { 20 my ($classname,$obj) = @_; 21 return bless $obj, $classname; 22} 23 24sub CLEAR { } 25 26sub FIRSTKEY { } 27 28sub NEXTKEY { } 29 30sub FETCH { 31 my ($self,$field) = @_; 32 my $member_func = "swig_${field}_get"; 33 $self->$member_func(); 34} 35 36sub STORE { 37 my ($self,$field,$newval) = @_; 38 my $member_func = "swig_${field}_set"; 39 $self->$member_func($newval); 40} 41 42sub this { 43 my $ptr = shift; 44 return tied(%$ptr); 45} 46 47 48# ------- FUNCTION WRAPPERS -------- 49 50package Math::GSL::Siman; 51 52*gsl_error = *Math::GSL::Simanc::gsl_error; 53*gsl_stream_printf = *Math::GSL::Simanc::gsl_stream_printf; 54*gsl_strerror = *Math::GSL::Simanc::gsl_strerror; 55*gsl_set_error_handler = *Math::GSL::Simanc::gsl_set_error_handler; 56*gsl_set_error_handler_off = *Math::GSL::Simanc::gsl_set_error_handler_off; 57*gsl_set_stream_handler = *Math::GSL::Simanc::gsl_set_stream_handler; 58*gsl_set_stream = *Math::GSL::Simanc::gsl_set_stream; 59*gsl_siman_solve = *Math::GSL::Simanc::gsl_siman_solve; 60*gsl_siman_solve_many = *Math::GSL::Simanc::gsl_siman_solve_many; 61 62############# Class : Math::GSL::Siman::gsl_siman_params_t ############## 63 64package Math::GSL::Siman::gsl_siman_params_t; 65use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS); 66@ISA = qw( Math::GSL::Siman ); 67%OWNER = (); 68%ITERATORS = (); 69*swig_n_tries_get = *Math::GSL::Simanc::gsl_siman_params_t_n_tries_get; 70*swig_n_tries_set = *Math::GSL::Simanc::gsl_siman_params_t_n_tries_set; 71*swig_iters_fixed_T_get = *Math::GSL::Simanc::gsl_siman_params_t_iters_fixed_T_get; 72*swig_iters_fixed_T_set = *Math::GSL::Simanc::gsl_siman_params_t_iters_fixed_T_set; 73*swig_step_size_get = *Math::GSL::Simanc::gsl_siman_params_t_step_size_get; 74*swig_step_size_set = *Math::GSL::Simanc::gsl_siman_params_t_step_size_set; 75*swig_k_get = *Math::GSL::Simanc::gsl_siman_params_t_k_get; 76*swig_k_set = *Math::GSL::Simanc::gsl_siman_params_t_k_set; 77*swig_t_initial_get = *Math::GSL::Simanc::gsl_siman_params_t_t_initial_get; 78*swig_t_initial_set = *Math::GSL::Simanc::gsl_siman_params_t_t_initial_set; 79*swig_mu_t_get = *Math::GSL::Simanc::gsl_siman_params_t_mu_t_get; 80*swig_mu_t_set = *Math::GSL::Simanc::gsl_siman_params_t_mu_t_set; 81*swig_t_min_get = *Math::GSL::Simanc::gsl_siman_params_t_t_min_get; 82*swig_t_min_set = *Math::GSL::Simanc::gsl_siman_params_t_t_min_set; 83sub new { 84 my $pkg = shift; 85 my $self = Math::GSL::Simanc::new_gsl_siman_params_t(@_); 86 bless $self, $pkg if defined($self); 87} 88 89sub DESTROY { 90 return unless $_[0]->isa('HASH'); 91 my $self = tied(%{$_[0]}); 92 return unless defined $self; 93 delete $ITERATORS{$self}; 94 if (exists $OWNER{$self}) { 95 Math::GSL::Simanc::delete_gsl_siman_params_t($self); 96 delete $OWNER{$self}; 97 } 98} 99 100sub DISOWN { 101 my $self = shift; 102 my $ptr = tied(%$self); 103 delete $OWNER{$ptr}; 104} 105 106sub ACQUIRE { 107 my $self = shift; 108 my $ptr = tied(%$self); 109 $OWNER{$ptr} = 1; 110} 111 112 113# ------- VARIABLE STUBS -------- 114 115package Math::GSL::Siman; 116 117*GSL_VERSION = *Math::GSL::Simanc::GSL_VERSION; 118*GSL_MAJOR_VERSION = *Math::GSL::Simanc::GSL_MAJOR_VERSION; 119*GSL_MINOR_VERSION = *Math::GSL::Simanc::GSL_MINOR_VERSION; 120*GSL_POSZERO = *Math::GSL::Simanc::GSL_POSZERO; 121*GSL_NEGZERO = *Math::GSL::Simanc::GSL_NEGZERO; 122*GSL_SUCCESS = *Math::GSL::Simanc::GSL_SUCCESS; 123*GSL_FAILURE = *Math::GSL::Simanc::GSL_FAILURE; 124*GSL_CONTINUE = *Math::GSL::Simanc::GSL_CONTINUE; 125*GSL_EDOM = *Math::GSL::Simanc::GSL_EDOM; 126*GSL_ERANGE = *Math::GSL::Simanc::GSL_ERANGE; 127*GSL_EFAULT = *Math::GSL::Simanc::GSL_EFAULT; 128*GSL_EINVAL = *Math::GSL::Simanc::GSL_EINVAL; 129*GSL_EFAILED = *Math::GSL::Simanc::GSL_EFAILED; 130*GSL_EFACTOR = *Math::GSL::Simanc::GSL_EFACTOR; 131*GSL_ESANITY = *Math::GSL::Simanc::GSL_ESANITY; 132*GSL_ENOMEM = *Math::GSL::Simanc::GSL_ENOMEM; 133*GSL_EBADFUNC = *Math::GSL::Simanc::GSL_EBADFUNC; 134*GSL_ERUNAWAY = *Math::GSL::Simanc::GSL_ERUNAWAY; 135*GSL_EMAXITER = *Math::GSL::Simanc::GSL_EMAXITER; 136*GSL_EZERODIV = *Math::GSL::Simanc::GSL_EZERODIV; 137*GSL_EBADTOL = *Math::GSL::Simanc::GSL_EBADTOL; 138*GSL_ETOL = *Math::GSL::Simanc::GSL_ETOL; 139*GSL_EUNDRFLW = *Math::GSL::Simanc::GSL_EUNDRFLW; 140*GSL_EOVRFLW = *Math::GSL::Simanc::GSL_EOVRFLW; 141*GSL_ELOSS = *Math::GSL::Simanc::GSL_ELOSS; 142*GSL_EROUND = *Math::GSL::Simanc::GSL_EROUND; 143*GSL_EBADLEN = *Math::GSL::Simanc::GSL_EBADLEN; 144*GSL_ENOTSQR = *Math::GSL::Simanc::GSL_ENOTSQR; 145*GSL_ESING = *Math::GSL::Simanc::GSL_ESING; 146*GSL_EDIVERGE = *Math::GSL::Simanc::GSL_EDIVERGE; 147*GSL_EUNSUP = *Math::GSL::Simanc::GSL_EUNSUP; 148*GSL_EUNIMPL = *Math::GSL::Simanc::GSL_EUNIMPL; 149*GSL_ECACHE = *Math::GSL::Simanc::GSL_ECACHE; 150*GSL_ETABLE = *Math::GSL::Simanc::GSL_ETABLE; 151*GSL_ENOPROG = *Math::GSL::Simanc::GSL_ENOPROG; 152*GSL_ENOPROGJ = *Math::GSL::Simanc::GSL_ENOPROGJ; 153*GSL_ETOLF = *Math::GSL::Simanc::GSL_ETOLF; 154*GSL_ETOLX = *Math::GSL::Simanc::GSL_ETOLX; 155*GSL_ETOLG = *Math::GSL::Simanc::GSL_ETOLG; 156*GSL_EOF = *Math::GSL::Simanc::GSL_EOF; 157 158@EXPORT_OK = qw/ 159 gsl_siman_solve 160 gsl_siman_solve_many 161 /; 162%EXPORT_TAGS = ( all => [ @EXPORT_OK ] ); 163 164__END__ 165 166=encoding utf8 167 168=head1 NAME 169 170Math::GSL::Siman - Simulated Annealing 171 172=head1 SYNOPSIS 173 174This module is not yet implemented. Patches Welcome! 175 176use Math::GSL::Siman qw /:all/; 177 178=head1 DESCRIPTION 179 180Here is a list of all the functions in this module : 181 182=over 183 184=item * C<gsl_siman_solve > 185 186=item * C<gsl_siman_solve_many > 187 188=back 189 190 191For more informations on the functions, we refer you to the GSL official 192documentation: L<http://www.gnu.org/software/gsl/manual/html_node/> 193 194 195 196 197=head1 AUTHORS 198 199Jonathan "Duke" Leto <jonathan@leto.net> and Thierry Moisan <thierry.moisan@gmail.com> 200 201=head1 COPYRIGHT AND LICENSE 202 203Copyright (C) 2008-2021 Jonathan "Duke" Leto and Thierry Moisan 204 205This program is free software; you can redistribute it and/or modify it 206under the same terms as Perl itself. 207 208=cut 209 210 211 2121; 213