source: proiecte/pmake3d/make3d_original/Make3dSingleImageStanford_version0.1/third_party/lightspeed/test_gammaln.m @ 37

Last change on this file since 37 was 37, checked in by (none), 14 years ago

Added original make3d

  • Property svn:executable set to *
File size: 642 bytes
Line 
1gammaln(0.1) - 2.2527126517342059598697
2gammaln(0.6) - .39823385806923489961685
3gammaln(0.7) - .26086724653166651438573
4gammaln(1.0)
5gammaln(2.0)
6gammaln(3.4) - 1.0923280598027415674947
7gammaln(4.0) - 1.791759469228055000812477
8gammaln(8.0) - 8.525161361065414300165531
9gammaln(64.0) - 201.00931639928152667928
10gammaln(256.0) - 1161.71210111840065079
11if gammaln(0) ~= Inf
12  error('gammaln(0) should be Inf');
13end
14if ~isnan(gammaln(-1))
15  error('gammaln(-1) should be NaN');
16end
17if gammaln(Inf) ~= Inf
18  error('gammaln(Inf) should be Inf');
19end
20% should be NaN?
21gammaln(-Inf)
22if ~isnan(gammaln(NaN))
23  error('gammaln(NaN) should be NaN');
24end
Note: See TracBrowser for help on using the repository browser.