Changeset 9d3daf
 Timestamp:
 03/22/12 01:58:02 (3 years ago)
 Branches:
 master
 Children:
 4b332e
 Parents:
 0d5870
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

rttests.lisp
r612465 r9d3daf 1369 1369 nil) 1370 1370 1371 (rt:deftest expintegrale.1d 1372 (let* ((z 1d0) 1373 (e (expintegrale 0 z)) 1374 (true (/ (exp ( z)) z))) 1375 (checkaccuracy 53 e true)) 1376 nil) 1377 1378 (rt:deftest expintegrale.1q 1379 (let* ((z #q1) 1380 (e (expintegrale 0 z)) 1381 (true (/ (exp ( z)) z))) 1382 (checkaccuracy 212 e true)) 1383 nil) 1384 1385 (rt:deftest expintegrale.2d 1386 (let* ((z 15d0) 1387 (e (expintegrale 0 z)) 1388 (true (/ (exp ( z)) z))) 1389 (checkaccuracy 53 e true)) 1390 nil) 1391 1392 (rt:deftest expintegrale.2q 1393 (let* ((z #q15) 1394 (e (expintegrale 0 z)) 1395 (true (/ (exp ( z)) z))) 1396 (checkaccuracy 212 e true)) 1397 nil) 1398 1399 (rt:deftest expintegrale.3d 1400 (let* ((e (expintegrale 2 1d0)) 1401 (true 0.14849550677592204791835999d0)) 1402 (checkaccuracy 47.5 e true)) 1403 nil)
Note: See TracChangeset
for help on using the changeset viewer.