summaryrefslogtreecommitdiff
path: root/src/3rdparty/squirrel/samples/matrix.nut
diff options
context:
space:
mode:
authorrubidium <rubidium@openttd.org>2014-09-19 20:06:51 +0000
committerrubidium <rubidium@openttd.org>2014-09-19 20:06:51 +0000
commit79ca66eb673c710432d1f4e51af70730a09a82c8 (patch)
tree5c26b5456711549c69e6d7c74b6e966072670cb6 /src/3rdparty/squirrel/samples/matrix.nut
parentbd0cd31d4b4e13dcf99c3b4170069d9eb08a91cf (diff)
downloadopenttd-79ca66eb673c710432d1f4e51af70730a09a82c8.tar.xz
(svn r26853) -Cleanup [Squirrel]: remove some stuff that we never did and especially never should use
Diffstat (limited to 'src/3rdparty/squirrel/samples/matrix.nut')
-rw-r--r--src/3rdparty/squirrel/samples/matrix.nut44
1 files changed, 0 insertions, 44 deletions
diff --git a/src/3rdparty/squirrel/samples/matrix.nut b/src/3rdparty/squirrel/samples/matrix.nut
deleted file mode 100644
index c8b16c65a..000000000
--- a/src/3rdparty/squirrel/samples/matrix.nut
+++ /dev/null
@@ -1,44 +0,0 @@
-/*
-*
-* Original Javascript version by David Hedbor(http://www.bagley.org/~doug/shootout/)
-*
-*/
-local SIZE=30;
-
-function mkmatrix(rows, cols) {
- local i, j, count = 1;
- local m = []; m.resize(rows);
- for (i = 0; i < rows; i+=1) {
- m[i] = [];m[i].resize(cols)
- for (j = 0; j < cols; j+=1) {
- m[i][j] = count+=1;
- }
- }
- return m;
-}
-
-function mmult(rows, cols, m1, m2, m3) {
- local i, j, k, val;
- for (i = 0; i < rows; i+=1) {
- for (j = 0; j < cols; j+=1) {
- val = 0;
- for (k = 0; k < cols; k+=1) {
- val += m1[i][k] * m2[k][j];
- }
- m3[i][j] = val;
- }
- }
- return m3;
-}
-
-local n = ARGS.len()!=0?ARGS[0].tointeger():1
-
-local m1 = mkmatrix(SIZE, SIZE);
-local m2 = mkmatrix(SIZE, SIZE);
-local mm = mkmatrix(SIZE, SIZE);
-
-for (local i = 0; i < n; i+=1) {
- mmult(SIZE, SIZE, m1, m2, mm);
-}
-
-print(mm[0][0]+" "+mm[2][3]+" "+mm[3][2]+" "+mm[4][4]);