Changeset 5daefcc43f8b88741634f7a982bdb8b976739a1c
- Timestamp:
- 04/12/12 14:37:38 (13 months ago)
- Author:
- Raymond Toy <toy.raymond@…>
- Children:
- 2f48eb872f71a8f41187decbc57878cb67fa86de, 76ea9b133d74861db511d7c3e3a29653ce4ebda7
- Parents:
- 235ac2e4756b7c3f03815b267d292a26e8e1df37
- git-committer:
- Raymond Toy <toy.raymond@…> (04/12/12 14:37:38)
- Message:
-
Enable test of complex args.
- Files:
-
Legend:
- Unmodified
- Added
- Removed
-
|
r0823ac
|
r5daefc
|
|
| 1674 | 1674 | |
| 1675 | 1675 | ;; Bessel J for complex args |
| 1676 | | #+nil |
| 1677 | 1676 | (rt:deftest bessel-j-complex.pos-order.d.1 |
| 1678 | 1677 | (let ((b (bessel-j 0d0 #c(1d0 1))) |
| 1679 | 1678 | (true #c(0.9376084768060293d0 -0.4965299476091221d0))) |
| 1680 | | (check-accuracy 53 b true)) |
| 1681 | | nil) |
| 1682 | | |
| | 1679 | (check-accuracy 50.73 b true)) |
| | 1680 | nil) |
| | 1681 | |