"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "GENERATED/PDL/GSL/MROOT.pm" between
PDL-2.080.tar.gz and PDL-2.081.tar.gz

About: PDL (Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).

MROOT.pm  (PDL-2.080)	:	MROOT.pm  (PDL-2.081)
skipping to change at line 65		skipping to change at line 65
$y1 .= $d * ($x->slice(1) - $x->slice(0)**2);		$y1 .= $d * ($x->slice(1) - $x->slice(0)**2);
return $y;		return $y;
}		}
#line 70 "MROOT.pm"		#line 70 "MROOT.pm"
=head1 FUNCTIONS		=head1 FUNCTIONS
=cut		=cut
#line 948 "../../../blib/lib/PDL/PP.pm"		#line 949 "/home/osboxes/pdl-code/blib/lib/PDL/PP.pm"
=head2 gslmroot_fsolver		=head2 gslmroot_fsolver
=for sig		=for sig
Signature: (double [io]xfree(n); double epsabs(); int method(); SV* function 1)		Signature: (double [io]xfree(n); double epsabs(); int method(); SV* function 1)
=for ref		=for ref
info not available		info not available
=for bad		=for bad
gslmroot_fsolver does not process bad values.		gslmroot_fsolver does not process bad values.
It will set the bad-value flag of all output ndarrays if the flag is set for any of the input ndarrays.		It will set the bad-value flag of all output ndarrays if the flag is set for any of the input ndarrays.
=cut		=cut
#line 107 "MROOT.pm"		#line 107 "MROOT.pm"
#line 949 "../../../blib/lib/PDL/PP.pm"		#line 950 "/home/osboxes/pdl-code/blib/lib/PDL/PP.pm"
sub gslmroot_fsolver {		sub gslmroot_fsolver {
my ($x, $f_vect) = @_;		my ($x, $f_vect) = @_;
my $opt = ref($_[-1]) eq 'HASH' ? pop @_ : {Method => 0, EpsAbs => 1e-3} ;		my $opt = ref($_[-1]) eq 'HASH' ? pop @_ : {Method => 0, EpsAbs => 1e-3} ;
if( (ref($x) ne 'PDL')){		if( (ref($x) ne 'PDL')){
barf("Have to pass ndarray as first argument to fsolver\n");		barf("Have to pass ndarray as first argument to fsolver\n");
}		}
my $res = $x->copy;		my $res = $x->copy;
_gslmroot_fsolver_int($res, $$opt{'EpsAbs'}, $$opt{'Method'}, $f_vect);		_gslmroot_fsolver_int($res, $$opt{'EpsAbs'}, $$opt{'Method'}, $f_vect);
return $res;		return $res;
}		}
#line 123 "MROOT.pm"		#line 123 "MROOT.pm"
#line 950 "../../../blib/lib/PDL/PP.pm"		#line 951 "/home/osboxes/pdl-code/blib/lib/PDL/PP.pm"
*gslmroot_fsolver = \&PDL::GSL::MROOT::gslmroot_fsolver;		*gslmroot_fsolver = \&PDL::GSL::MROOT::gslmroot_fsolver;
#line 130 "MROOT.pm"		#line 130 "MROOT.pm"
#line 114 "gsl_mroot.pd"		#line 114 "gsl_mroot.pd"
=head1 SEE ALSO		=head1 SEE ALSO
L<PDL>		L<PDL>
End of changes. 3 change blocks.
3 lines changed or deleted		3 lines changed or added

---