Last change
on this file since 4 was
4,
checked in by zhangj, 11 years ago
|
Initial import--MML version from SOLEIL@2013
|
File size:
398 bytes
|
Line | |
---|
1 | |
---|
2 | function pass = misclnttests1 |
---|
3 | |
---|
4 | % LNT 24 May 2008 |
---|
5 | % This code fools around in various ways |
---|
6 | |
---|
7 | pass1 = (sum(chebfun(1,2,3,4,5,0:5))==15); |
---|
8 | pass2 = (sum(chebfun(1,1,2i,-2,-1i,-1i,0:6))==0); |
---|
9 | x = chebfun('t',[1 2]); |
---|
10 | n1 = norm(sin(x).^2+cos(x).^2-1); |
---|
11 | pass3 = (n1<10*chebfunpref('eps')); |
---|
12 | n2 = norm(sin(1i*x).^2+cos(1i*x).^2-1); |
---|
13 | pass4 = (n2<100*chebfunpref('eps')); |
---|
14 | |
---|
15 | pass = pass1 && pass2 && pass3 && pass4; |
---|
Note: See
TracBrowser
for help on using the repository browser.