testdistxd.pl

Revision 1117, 0.5 kB (checked in by shawnw, 1 year ago)
Merge with devel

Line
1	run tests:
2	test('dist2d.1', $god, 'think dist2d(0,0, 5,5)', "7.071068");
3	test('dist2d.2', $god, 'think lmath(dist2d, 0 0 5 5)', "7.071068");
4	test('dist2d.3', $god, 'think dist2d(0,0, 0,0)', "0");
5	test('dist2d.4', $god, 'think dist2d(0,0, 0,1)', "1");
6
7	test('dist3d.1', $god, 'think dist3d(0,0,0, 5,5,5)', "8\\.660254");
8	test('dist3d.2', $god, 'think lmath(dist3d, 0 0 0 5 5 5)', "8\\.660254");
9	test('dist3d.3', $god, 'think dist3d(0,0,0, 0,0,0)', "0");
10	test('dist3d.4', $god, 'think dist3d(0,0,0, 1,0,0)', "1");

Note: See TracBrowser for help on using the browser.