source:
MML/trunk/machine/SOLEIL/common/toolbox/chebfun_v2_0501/chebfun/chebtests/ivp1.m
@
17
Last change on this file since 17 was 17, checked in by , 10 years ago | |
---|---|
|
|
File size: 206 bytes |
Line | |
---|---|
1 | function pass = ivp1 |
2 | |
3 | tol = chebfunpref('eps'); |
4 | |
5 | d = domain(-1,1); |
6 | x = chebfun(@(x)x,d); |
7 | I = eye(d); |
8 | D = diff(d); |
9 | A = (D-I) & {'dirichlet',exp(-1)-1}; |
10 | u = A\(1-x); |
11 | |
12 | pass = norm( u - (exp(x)+x) ) < 100*tol; |
Note: See TracBrowser
for help on using the repository browser.