summaryrefslogtreecommitdiff
path: root/apps/interpreters/bas/test/test49
diff options
context:
space:
mode:
Diffstat (limited to 'apps/interpreters/bas/test/test49')
-rw-r--r--apps/interpreters/bas/test/test4954
1 files changed, 0 insertions, 54 deletions
diff --git a/apps/interpreters/bas/test/test49 b/apps/interpreters/bas/test/test49
deleted file mode 100644
index 0d8bcb455..000000000
--- a/apps/interpreters/bas/test/test49
+++ /dev/null
@@ -1,54 +0,0 @@
-#!/bin/sh
-
-echo -n $0: 'Matrix determinant... '
-
-cat >test.bas <<'eof'
-width 120
-dim a(7,7),b(7,7)
-mat read a
-mat print a;
-print
-data 58,71,67,36,35,19,60
-data 50,71,71,56,45,20,52
-data 64,40,84,50,51,43,69
-data 31,28,41,54,31,18,33
-data 45,23,46,38,50,43,50
-data 41,10,28,17,33,41,46
-data 66,72,71,38,40,27,69
-mat b=inv(a)
-mat print b
-print det
-eof
-
-cat >test.ref <<'eof'
- 58 71 67 36 35 19 60
- 50 71 71 56 45 20 52
- 64 40 84 50 51 43 69
- 31 28 41 54 31 18 33
- 45 23 46 38 50 43 50
- 41 10 28 17 33 41 46
- 66 72 71 38 40 27 69
-
- 9.636025e+07 320206 -537449 2323650 -1.135486e+07 3.019632e+07
- -9.650941e+07
- 4480 15 -25 108 -528 1404 -4487
--39436 -131 220 -951 4647 -12358 39497
- 273240 908 -1524 6589 -32198 85625 -273663
--1846174 -6135 10297 -44519 217549 -578534 1849032
- 1.315035e+07 43699 -73346 317110 -1549606 4120912 -1.31707e+07
-
--9.636079e+07 -320208 537452 -2323663 1.135493e+07 -3.019649e+07
- 9.650995e+07
- 1
-eof
-
-sh ./test/runbas test.bas >test.data
-
-if cmp test.ref test.data
-then
- rm -f test.*
- echo passed
-else
- echo failed
- exit 1
-fi