Code covered by the BSD License

# Chebfun V4

### Chebfun Team (view profile)

30 Apr 2009 (Updated )

Numerical computation with functions instead of numbers.

### Editor's Notes:

This file was selected as MATLAB Central Pick of the Week

webexamples
function pass = webexamples
% Test the examples that are on the front page of the Chebfun website
% A Level 0 Chebtest.
% (Well, it includes a Level 3 chebop problem, but if this test
% doesn't work we're sunk!)
tol = 10*chebfunpref('eps');

% What's the integral of sin(sin(x)) from 0 to 10?
x = chebfun('x',[0 10]);
sum(sin(sin(x)));
pass(1) = abs(ans - 1.629603118459496) < tol;

% What's the maximum of sin(x)+sin(x2) over the same interval?
max(sin(x)+sin(x.^2));
pass(2) = abs(ans - 1.985446580874100) < 2*tol;

% (This used to be on the web page, though no longer)
% How many roots does the Bessel function J0(x) have between 0 and 1000?
% length(roots(chebfun(@(x) besselj(0,x),[0 1000])));
% pass(3) = ~(ans-318);

% An Airy function
L = chebop(-20,20);
L.op = @(x,u) diff(u,2) - x.*u;
L.bc = 'dirichlet';
pass(3) = abs(feval(L\1,-5) - 1.981471116055969) < 500*tol;