# HG changeset patch
# User jwe
# Date 859411409 0
# Node ID dd463ae5385496a5d68098e41155c080a988f1ff
# Parent  4a6658d653a21d18bf8b6a67778cacf0109498a4
[project @ 1997-03-26 21:22:31 by jwe]

diff --git a/test/octave.test/zero-one/ft/m-1.m b/test/octave.test/zero-one/ft/m-1.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-1.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+isempty (a(logical ([0,0,0,0])))
diff --git a/test/octave.test/zero-one/ft/m-10.m b/test/octave.test/zero-one/ft/m-10.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-10.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical (0:1),logical ([1,1])) == [7,6])
diff --git a/test/octave.test/zero-one/ft/m-11.m b/test/octave.test/zero-one/ft/m-11.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-11.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(2:-1:1,logical (0:1)) == [6;8])
diff --git a/test/octave.test/zero-one/ft/m-12.m b/test/octave.test/zero-one/ft/m-12.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-12.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(2:-1:1,logical ([0,1])) == [6;8])
diff --git a/test/octave.test/zero-one/ft/m-13.m b/test/octave.test/zero-one/ft/m-13.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-13.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8]))
diff --git a/test/octave.test/zero-one/ft/m-14.m b/test/octave.test/zero-one/ft/m-14.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-14.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+a(logical ([0,1]),logical (0:1)) == 6
diff --git a/test/octave.test/zero-one/ft/m-15.m b/test/octave.test/zero-one/ft/m-15.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-15.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([0,1]),2:-1:1) == [6,7])
diff --git a/test/octave.test/zero-one/ft/m-16.m b/test/octave.test/zero-one/ft/m-16.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-16.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+a(logical ([0,1]),logical ([0,1])) == 6
diff --git a/test/octave.test/zero-one/ft/m-17.m b/test/octave.test/zero-one/ft/m-17.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-17.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([0,1]),[2,1]) == [6,7])
diff --git a/test/octave.test/zero-one/ft/m-18.m b/test/octave.test/zero-one/ft/m-18.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-18.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([0,1]),:) == [7,6])
diff --git a/test/octave.test/zero-one/ft/m-19.m b/test/octave.test/zero-one/ft/m-19.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-19.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+a(logical ([0,1]),1) == 7
diff --git a/test/octave.test/zero-one/ft/m-2.m b/test/octave.test/zero-one/ft/m-2.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-2.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([1,1,1,1])) == [9;7;8;6])
diff --git a/test/octave.test/zero-one/ft/m-20.m b/test/octave.test/zero-one/ft/m-20.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-20.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([0,1]),logical ([1,1])) == [7,6])
diff --git a/test/octave.test/zero-one/ft/m-21.m b/test/octave.test/zero-one/ft/m-21.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-21.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a([2,1],logical (0:1)) == [6;8])
diff --git a/test/octave.test/zero-one/ft/m-22.m b/test/octave.test/zero-one/ft/m-22.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-22.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a([2,1],logical ([0,1])) == [6;8])
diff --git a/test/octave.test/zero-one/ft/m-23.m b/test/octave.test/zero-one/ft/m-23.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-23.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (all (a([2,1],logical ([1,1])) == [7,6;9,8]))
diff --git a/test/octave.test/zero-one/ft/m-24.m b/test/octave.test/zero-one/ft/m-24.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-24.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(:,logical (0:1)) == [8;6])
diff --git a/test/octave.test/zero-one/ft/m-25.m b/test/octave.test/zero-one/ft/m-25.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-25.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(:,logical ([0,1])) == [8;6])
diff --git a/test/octave.test/zero-one/ft/m-26.m b/test/octave.test/zero-one/ft/m-26.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-26.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (all (a(:,logical ([1,1])) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/ft/m-27.m b/test/octave.test/zero-one/ft/m-27.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-27.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+a(1,logical (0:1)) == 8
diff --git a/test/octave.test/zero-one/ft/m-28.m b/test/octave.test/zero-one/ft/m-28.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-28.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+a(1,logical ([0,1])) == 8
diff --git a/test/octave.test/zero-one/ft/m-29.m b/test/octave.test/zero-one/ft/m-29.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-29.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(1,logical ([1,1])) == [9,8])
diff --git a/test/octave.test/zero-one/ft/m-3.m b/test/octave.test/zero-one/ft/m-3.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-3.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([0,1,1,0])) == [7;8])
diff --git a/test/octave.test/zero-one/ft/m-30.m b/test/octave.test/zero-one/ft/m-30.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-30.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([1,1]),logical (0:1)) == [8;6])
diff --git a/test/octave.test/zero-one/ft/m-31.m b/test/octave.test/zero-one/ft/m-31.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-31.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7]))
diff --git a/test/octave.test/zero-one/ft/m-32.m b/test/octave.test/zero-one/ft/m-32.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-32.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([1,1]),logical ([0,1])) == [8;6])
diff --git a/test/octave.test/zero-one/ft/m-33.m b/test/octave.test/zero-one/ft/m-33.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-33.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7]))
diff --git a/test/octave.test/zero-one/ft/m-34.m b/test/octave.test/zero-one/ft/m-34.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-34.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (all (a(logical ([1,1]),:) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/ft/m-35.m b/test/octave.test/zero-one/ft/m-35.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-35.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical ([1,1]),1) == [9;7])
diff --git a/test/octave.test/zero-one/ft/m-36.m b/test/octave.test/zero-one/ft/m-36.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-36.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/ft/m-4.m b/test/octave.test/zero-one/ft/m-4.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-4.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+a(logical (0:1),logical (0:1)) == 6
diff --git a/test/octave.test/zero-one/ft/m-5.m b/test/octave.test/zero-one/ft/m-5.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-5.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical (0:1),2:-1:1) == [6,7])
diff --git a/test/octave.test/zero-one/ft/m-6.m b/test/octave.test/zero-one/ft/m-6.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-6.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+a(logical (0:1),logical ([0,1])) == 6
diff --git a/test/octave.test/zero-one/ft/m-7.m b/test/octave.test/zero-one/ft/m-7.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-7.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical (0:1),[2,1]) == [6,7])
diff --git a/test/octave.test/zero-one/ft/m-8.m b/test/octave.test/zero-one/ft/m-8.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-8.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+all (a(logical (0:1),:) == [7,6])
diff --git a/test/octave.test/zero-one/ft/m-9.m b/test/octave.test/zero-one/ft/m-9.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/m-9.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8;7,6];
+a(logical (0:1),1) == 7
diff --git a/test/octave.test/zero-one/ft/s-1.m b/test/octave.test/zero-one/ft/s-1.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/s-1.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [];
+a(0)
diff --git a/test/octave.test/zero-one/ft/s-2.m b/test/octave.test/zero-one/ft/s-2.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/s-2.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = 2;
+a(1) == 2
diff --git a/test/octave.test/zero-one/ft/s-3.m b/test/octave.test/zero-one/ft/s-3.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/s-3.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = 2;
+a(1) == 2
diff --git a/test/octave.test/zero-one/ft/s-4.m b/test/octave.test/zero-one/ft/s-4.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/s-4.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = 2;
+all (a(logical ([1,1])) == [2,2])
diff --git a/test/octave.test/zero-one/ft/v-1.m b/test/octave.test/zero-one/ft/v-1.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/v-1.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8,7,6];
+isempty (a(logical ([0,0,0,0])))
diff --git a/test/octave.test/zero-one/ft/v-2.m b/test/octave.test/zero-one/ft/v-2.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/v-2.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8,7,6];
+all (a(logical ([1,1,1,1])) == [9,8,7,6])
diff --git a/test/octave.test/zero-one/ft/v-3.m b/test/octave.test/zero-one/ft/v-3.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/v-3.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8,7,6];
+all (a(logical ([0,1,1,0])) == [8,7])
diff --git a/test/octave.test/zero-one/ft/v-4.m b/test/octave.test/zero-one/ft/v-4.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/v-4.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 0;
+do_fortran_indexing = 1;
+a = [9,8,7,6];
+all (a(logical ([1,1])) == [9,9])
diff --git a/test/octave.test/zero-one/ft/zero-one.exp b/test/octave.test/zero-one/ft/zero-one.exp
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/ft/zero-one.exp
@@ -0,0 +1,187 @@
+## Tests with:
+##
+## prefer_zero_one_indexing == "true"
+## prefer_column_vectors    == "false"
+## do_fortran_indexing      == "true"
+
+## scalar tests
+
+set test zero-one-tft-s-1
+set prog_output "error:.*"
+do_test s-1.m
+
+set test zero-one-tft-s-2
+set prog_output "ans = *1"
+do_test s-2.m
+
+set test zero-one-tft-s-3
+set prog_output "ans = *1"
+do_test s-3.m
+
+set test zero-one-tft-s-4
+set prog_output "ans = *1"
+do_test s-4.m
+
+## vector tests
+
+set test zero-one-tft-v-1
+set prog_output "ans = *1"
+do_test v-1.m
+
+set test zero-one-tft-v-2
+set prog_output "ans = *1"
+do_test v-2.m
+
+set test zero-one-tft-v-3
+set prog_output "ans = *1"
+do_test v-3.m
+
+set test zero-one-tft-v-4
+set prog_output "ans = *1"
+do_test v-4.m
+
+## matrix tests
+
+set test zero-one-tft-m-1
+set prog_output "ans = *1"
+do_test m-1.m
+
+set test zero-one-tft-m-2
+set prog_output "ans = *1"
+do_test m-2.m
+
+set test zero-one-tft-m-3
+set prog_output "ans = *1"
+do_test m-3.m
+
+set test zero-one-tft-m-4
+set prog_output "ans = *1"
+do_test m-4.m
+
+set test zero-one-tft-m-5
+set prog_output "ans = *1"
+do_test m-5.m
+
+set test zero-one-tft-m-6
+set prog_output "ans = *1"
+do_test m-6.m
+
+set test zero-one-tft-m-7
+set prog_output "ans = *1"
+do_test m-7.m
+
+set test zero-one-tft-m-8
+set prog_output "ans = *1"
+do_test m-8.m
+
+set test zero-one-tft-m-9
+set prog_output "ans = *1"
+do_test m-9.m
+
+set test zero-one-tft-m-10
+set prog_output "ans = *1"
+do_test m-10.m
+
+set test zero-one-tft-m-11
+set prog_output "ans = *1"
+do_test m-11.m
+
+set test zero-one-tft-m-12
+set prog_output "ans = *1"
+do_test m-12.m
+
+set test zero-one-tft-m-13
+set prog_output "ans = *1"
+do_test m-13.m
+
+set test zero-one-tft-m-14
+set prog_output "ans = *1"
+do_test m-14.m
+
+set test zero-one-tft-m-15
+set prog_output "ans = *1"
+do_test m-15.m
+
+set test zero-one-tft-m-16
+set prog_output "ans = *1"
+do_test m-16.m
+
+set test zero-one-tft-m-17
+set prog_output "ans = *1"
+do_test m-17.m
+
+set test zero-one-tft-m-18
+set prog_output "ans = *1"
+do_test m-18.m
+
+set test zero-one-tft-m-19
+set prog_output "ans = *1"
+do_test m-19.m
+
+set test zero-one-tft-m-20
+set prog_output "ans = *1"
+do_test m-20.m
+
+set test zero-one-tft-m-21
+set prog_output "ans = *1"
+do_test m-21.m
+
+set test zero-one-tft-m-22
+set prog_output "ans = *1"
+do_test m-22.m
+
+set test zero-one-tft-m-23
+set prog_output "ans = *1"
+do_test m-23.m
+
+set test zero-one-tft-m-24
+set prog_output "ans = *1"
+do_test m-24.m
+
+set test zero-one-tft-m-25
+set prog_output "ans = *1"
+do_test m-25.m
+
+set test zero-one-tft-m-26
+set prog_output "ans = *1"
+do_test m-26.m
+
+set test zero-one-tft-m-27
+set prog_output "ans = *1"
+do_test m-27.m
+
+set test zero-one-tft-m-28
+set prog_output "ans = *1"
+do_test m-28.m
+
+set test zero-one-tft-m-29
+set prog_output "ans = *1"
+do_test m-29.m
+
+set test zero-one-tft-m-30
+set prog_output "ans = *1"
+do_test m-30.m
+
+set test zero-one-tft-m-31
+set prog_output "ans = *1"
+do_test m-31.m
+
+set test zero-one-tft-m-32
+set prog_output "ans = *1"
+do_test m-32.m
+
+set test zero-one-tft-m-33
+set prog_output "ans = *1"
+do_test m-33.m
+
+set test zero-one-tft-m-34
+set prog_output "ans = *1"
+do_test m-34.m
+
+set test zero-one-tft-m-35
+set prog_output "ans = *1"
+do_test m-35.m
+
+set test zero-one-tft-m-36
+set prog_output "ans = *1"
+do_test m-36.m
diff --git a/test/octave.test/zero-one/tf/m-1.m b/test/octave.test/zero-one/tf/m-1.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-1.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical ([0,0,0,0]))
diff --git a/test/octave.test/zero-one/tf/m-10.m b/test/octave.test/zero-one/tf/m-10.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-10.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical (0:1),logical ([1,1])) == [7,6])
diff --git a/test/octave.test/zero-one/tf/m-11.m b/test/octave.test/zero-one/tf/m-11.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-11.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(2:-1:1,logical (0:1)) == [6;8])
diff --git a/test/octave.test/zero-one/tf/m-12.m b/test/octave.test/zero-one/tf/m-12.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-12.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(2:-1:1,logical ([0,1])) == [6;8])
diff --git a/test/octave.test/zero-one/tf/m-13.m b/test/octave.test/zero-one/tf/m-13.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-13.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8]))
diff --git a/test/octave.test/zero-one/tf/m-14.m b/test/octave.test/zero-one/tf/m-14.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-14.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical ([0,1]),logical (0:1)) == 6
diff --git a/test/octave.test/zero-one/tf/m-15.m b/test/octave.test/zero-one/tf/m-15.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-15.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical ([0,1]),2:-1:1) == [6,7])
diff --git a/test/octave.test/zero-one/tf/m-16.m b/test/octave.test/zero-one/tf/m-16.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-16.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical ([0,1]),logical ([0,1])) == 6
diff --git a/test/octave.test/zero-one/tf/m-17.m b/test/octave.test/zero-one/tf/m-17.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-17.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical ([0,1]),[2,1]) == [6,7])
diff --git a/test/octave.test/zero-one/tf/m-18.m b/test/octave.test/zero-one/tf/m-18.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-18.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical ([0,1]),:) == [7,6])
diff --git a/test/octave.test/zero-one/tf/m-19.m b/test/octave.test/zero-one/tf/m-19.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-19.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical ([0,1]),1) == 7
diff --git a/test/octave.test/zero-one/tf/m-2.m b/test/octave.test/zero-one/tf/m-2.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-2.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical ([1,1,1,1]))
diff --git a/test/octave.test/zero-one/tf/m-20.m b/test/octave.test/zero-one/tf/m-20.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-20.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical ([0,1]),logical ([1,1])) == [7,6])
diff --git a/test/octave.test/zero-one/tf/m-21.m b/test/octave.test/zero-one/tf/m-21.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-21.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a([2,1],logical (0:1)) == [6;8])
diff --git a/test/octave.test/zero-one/tf/m-22.m b/test/octave.test/zero-one/tf/m-22.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-22.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a([2,1],logical ([0,1])) == [6;8])
diff --git a/test/octave.test/zero-one/tf/m-23.m b/test/octave.test/zero-one/tf/m-23.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-23.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (all (a([2,1],logical ([1,1])) == [7,6;9,8]))
diff --git a/test/octave.test/zero-one/tf/m-24.m b/test/octave.test/zero-one/tf/m-24.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-24.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(:,logical (0:1)) == [8;6])
diff --git a/test/octave.test/zero-one/tf/m-25.m b/test/octave.test/zero-one/tf/m-25.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-25.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(:,logical ([0,1])) == [8;6])
diff --git a/test/octave.test/zero-one/tf/m-26.m b/test/octave.test/zero-one/tf/m-26.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-26.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (all (a(:,logical ([1,1])) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/tf/m-27.m b/test/octave.test/zero-one/tf/m-27.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-27.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(1,logical (0:1)) == 8
diff --git a/test/octave.test/zero-one/tf/m-28.m b/test/octave.test/zero-one/tf/m-28.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-28.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(1,logical ([0,1])) == 8
diff --git a/test/octave.test/zero-one/tf/m-29.m b/test/octave.test/zero-one/tf/m-29.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-29.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(1,logical ([1,1])) == [9,8])
diff --git a/test/octave.test/zero-one/tf/m-3.m b/test/octave.test/zero-one/tf/m-3.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-3.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical ([0,1,1,0]))
diff --git a/test/octave.test/zero-one/tf/m-30.m b/test/octave.test/zero-one/tf/m-30.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-30.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical ([1,1]),logical (0:1)) == [8;6])
diff --git a/test/octave.test/zero-one/tf/m-31.m b/test/octave.test/zero-one/tf/m-31.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-31.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7]))
diff --git a/test/octave.test/zero-one/tf/m-32.m b/test/octave.test/zero-one/tf/m-32.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-32.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical ([1,1]),logical ([0,1])) == [8;6])
diff --git a/test/octave.test/zero-one/tf/m-33.m b/test/octave.test/zero-one/tf/m-33.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-33.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7]))
diff --git a/test/octave.test/zero-one/tf/m-34.m b/test/octave.test/zero-one/tf/m-34.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-34.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (all (a(logical ([1,1]),:) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/tf/m-35.m b/test/octave.test/zero-one/tf/m-35.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-35.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical ([1,1]),1) == [9;7])
diff --git a/test/octave.test/zero-one/tf/m-36.m b/test/octave.test/zero-one/tf/m-36.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-36.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/tf/m-4.m b/test/octave.test/zero-one/tf/m-4.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-4.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical (0:1),logical (0:1)) == 6
diff --git a/test/octave.test/zero-one/tf/m-5.m b/test/octave.test/zero-one/tf/m-5.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-5.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical (0:1),2:-1:1) == [6,7])
diff --git a/test/octave.test/zero-one/tf/m-6.m b/test/octave.test/zero-one/tf/m-6.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-6.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical (0:1),logical ([0,1])) == 6
diff --git a/test/octave.test/zero-one/tf/m-7.m b/test/octave.test/zero-one/tf/m-7.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-7.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical (0:1),[2,1]) == [6,7])
diff --git a/test/octave.test/zero-one/tf/m-8.m b/test/octave.test/zero-one/tf/m-8.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-8.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+all (a(logical (0:1),:) == [7,6])
diff --git a/test/octave.test/zero-one/tf/m-9.m b/test/octave.test/zero-one/tf/m-9.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/m-9.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8;7,6];
+a(logical (0:1),1) == 7
diff --git a/test/octave.test/zero-one/tf/s-1.m b/test/octave.test/zero-one/tf/s-1.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/s-1.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [];
+a(0)
diff --git a/test/octave.test/zero-one/tf/s-2.m b/test/octave.test/zero-one/tf/s-2.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/s-2.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = 2;
+a(1) == 2
diff --git a/test/octave.test/zero-one/tf/s-3.m b/test/octave.test/zero-one/tf/s-3.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/s-3.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = 2;
+a(1) == 2
diff --git a/test/octave.test/zero-one/tf/s-4.m b/test/octave.test/zero-one/tf/s-4.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/s-4.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = 2;
+all (a(logical ([1,1])) == [2;2])
diff --git a/test/octave.test/zero-one/tf/v-1.m b/test/octave.test/zero-one/tf/v-1.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/v-1.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8,7,6];
+isempty (a(logical ([0,0,0,0])))
diff --git a/test/octave.test/zero-one/tf/v-2.m b/test/octave.test/zero-one/tf/v-2.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/v-2.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8,7,6];
+all (a(logical ([1,1,1,1])) == [9,8,7,6])
diff --git a/test/octave.test/zero-one/tf/v-3.m b/test/octave.test/zero-one/tf/v-3.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/v-3.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8,7,6];
+all (a(logical ([0,1,1,0])) == [8,7])
diff --git a/test/octave.test/zero-one/tf/v-4.m b/test/octave.test/zero-one/tf/v-4.m
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/v-4.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [9,8,7,6];
+all (a(logical ([1,1])) == [9,9])
diff --git a/test/octave.test/zero-one/tf/zero-one.exp b/test/octave.test/zero-one/tf/zero-one.exp
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tf/zero-one.exp
@@ -0,0 +1,187 @@
+## Tests with:
+##
+## prefer_zero_one_indexing == "true"
+## prefer_column_vectors    == "true"
+## do_fortran_indexing      == "false"
+
+## scalar tests
+
+set test zero-one-ttf-s-1
+set prog_output "error:.*"
+do_test s-1.m
+
+set test zero-one-ttf-s-2
+set prog_output "ans = *1"
+do_test s-2.m
+
+set test zero-one-ttf-s-3
+set prog_output "ans = *1"
+do_test s-3.m
+
+set test zero-one-ttf-s-4
+set prog_output "ans = *1"
+do_test s-4.m
+
+## vector tests
+
+set test zero-one-ttf-v-1
+set prog_output "ans = *1"
+do_test v-1.m
+
+set test zero-one-ttf-v-2
+set prog_output "ans = *1"
+do_test v-2.m
+
+set test zero-one-ttf-v-3
+set prog_output "ans = *1"
+do_test v-3.m
+
+set test zero-one-ttf-v-4
+set prog_output "ans = *1"
+do_test v-4.m
+
+## matrix tests
+
+set test zero-one-ttf-m-1
+set prog_output "error:.*"
+do_test m-1.m
+
+set test zero-one-ttf-m-2
+set prog_output "error:.*"
+do_test m-2.m
+
+set test zero-one-ttf-m-3
+set prog_output "error:.*"
+do_test m-3.m
+
+set test zero-one-ttf-m-4
+set prog_output "ans = *1"
+do_test m-4.m
+
+set test zero-one-ttf-m-5
+set prog_output "ans = *1"
+do_test m-5.m
+
+set test zero-one-ttf-m-6
+set prog_output "ans = *1"
+do_test m-6.m
+
+set test zero-one-ttf-m-7
+set prog_output "ans = *1"
+do_test m-7.m
+
+set test zero-one-ttf-m-8
+set prog_output "ans = *1"
+do_test m-8.m
+
+set test zero-one-ttf-m-9
+set prog_output "ans = *1"
+do_test m-9.m
+
+set test zero-one-ttf-m-10
+set prog_output "ans = *1"
+do_test m-10.m
+
+set test zero-one-ttf-m-11
+set prog_output "ans = *1"
+do_test m-11.m
+
+set test zero-one-ttf-m-12
+set prog_output "ans = *1"
+do_test m-12.m
+
+set test zero-one-ttf-m-13
+set prog_output "ans = *1"
+do_test m-13.m
+
+set test zero-one-ttf-m-14
+set prog_output "ans = *1"
+do_test m-14.m
+
+set test zero-one-ttf-m-15
+set prog_output "ans = *1"
+do_test m-15.m
+
+set test zero-one-ttf-m-16
+set prog_output "ans = *1"
+do_test m-16.m
+
+set test zero-one-ttf-m-17
+set prog_output "ans = *1"
+do_test m-17.m
+
+set test zero-one-ttf-m-18
+set prog_output "ans = *1"
+do_test m-18.m
+
+set test zero-one-ttf-m-19
+set prog_output "ans = *1"
+do_test m-19.m
+
+set test zero-one-ttf-m-20
+set prog_output "ans = *1"
+do_test m-20.m
+
+set test zero-one-ttf-m-21
+set prog_output "ans = *1"
+do_test m-21.m
+
+set test zero-one-ttf-m-22
+set prog_output "ans = *1"
+do_test m-22.m
+
+set test zero-one-ttf-m-23
+set prog_output "ans = *1"
+do_test m-23.m
+
+set test zero-one-ttf-m-24
+set prog_output "ans = *1"
+do_test m-24.m
+
+set test zero-one-ttf-m-25
+set prog_output "ans = *1"
+do_test m-25.m
+
+set test zero-one-ttf-m-26
+set prog_output "ans = *1"
+do_test m-26.m
+
+set test zero-one-ttf-m-27
+set prog_output "ans = *1"
+do_test m-27.m
+
+set test zero-one-ttf-m-28
+set prog_output "ans = *1"
+do_test m-28.m
+
+set test zero-one-ttf-m-29
+set prog_output "ans = *1"
+do_test m-29.m
+
+set test zero-one-ttf-m-30
+set prog_output "ans = *1"
+do_test m-30.m
+
+set test zero-one-ttf-m-31
+set prog_output "ans = *1"
+do_test m-31.m
+
+set test zero-one-ttf-m-32
+set prog_output "ans = *1"
+do_test m-32.m
+
+set test zero-one-ttf-m-33
+set prog_output "ans = *1"
+do_test m-33.m
+
+set test zero-one-ttf-m-34
+set prog_output "ans = *1"
+do_test m-34.m
+
+set test zero-one-ttf-m-35
+set prog_output "ans = *1"
+do_test m-35.m
+
+set test zero-one-ttf-m-36
+set prog_output "ans = *1"
+do_test m-36.m
diff --git a/test/octave.test/zero-one/tt/m-1.m b/test/octave.test/zero-one/tt/m-1.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-1.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-isempty (a(logical ([0,0,0,0])))
diff --git a/test/octave.test/zero-one/tt/m-10.m b/test/octave.test/zero-one/tt/m-10.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-10.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical (0:1),logical ([1,1])) == [7,6])
diff --git a/test/octave.test/zero-one/tt/m-11.m b/test/octave.test/zero-one/tt/m-11.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-11.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(2:-1:1,logical (0:1)) == [6;8])
diff --git a/test/octave.test/zero-one/tt/m-12.m b/test/octave.test/zero-one/tt/m-12.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-12.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(2:-1:1,logical ([0,1])) == [6;8])
diff --git a/test/octave.test/zero-one/tt/m-13.m b/test/octave.test/zero-one/tt/m-13.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-13.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8]))
diff --git a/test/octave.test/zero-one/tt/m-14.m b/test/octave.test/zero-one/tt/m-14.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-14.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-a(logical ([0,1]),logical (0:1)) == 6
diff --git a/test/octave.test/zero-one/tt/m-15.m b/test/octave.test/zero-one/tt/m-15.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-15.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([0,1]),2:-1:1) == [6,7])
diff --git a/test/octave.test/zero-one/tt/m-16.m b/test/octave.test/zero-one/tt/m-16.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-16.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-a(logical ([0,1]),logical ([0,1])) == 6
diff --git a/test/octave.test/zero-one/tt/m-17.m b/test/octave.test/zero-one/tt/m-17.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-17.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([0,1]),[2,1]) == [6,7])
diff --git a/test/octave.test/zero-one/tt/m-18.m b/test/octave.test/zero-one/tt/m-18.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-18.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([0,1]),:) == [7,6])
diff --git a/test/octave.test/zero-one/tt/m-19.m b/test/octave.test/zero-one/tt/m-19.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-19.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-a(logical ([0,1]),1) == 7
diff --git a/test/octave.test/zero-one/tt/m-2.m b/test/octave.test/zero-one/tt/m-2.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-2.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([1,1,1,1])) == [9;7;8;6])
diff --git a/test/octave.test/zero-one/tt/m-20.m b/test/octave.test/zero-one/tt/m-20.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-20.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([0,1]),logical ([1,1])) == [7,6])
diff --git a/test/octave.test/zero-one/tt/m-21.m b/test/octave.test/zero-one/tt/m-21.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-21.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a([2,1],logical (0:1)) == [6;8])
diff --git a/test/octave.test/zero-one/tt/m-22.m b/test/octave.test/zero-one/tt/m-22.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-22.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a([2,1],logical ([0,1])) == [6;8])
diff --git a/test/octave.test/zero-one/tt/m-23.m b/test/octave.test/zero-one/tt/m-23.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-23.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (all (a([2,1],logical ([1,1])) == [7,6;9,8]))
diff --git a/test/octave.test/zero-one/tt/m-24.m b/test/octave.test/zero-one/tt/m-24.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-24.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(:,logical (0:1)) == [8;6])
diff --git a/test/octave.test/zero-one/tt/m-25.m b/test/octave.test/zero-one/tt/m-25.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-25.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(:,logical ([0,1])) == [8;6])
diff --git a/test/octave.test/zero-one/tt/m-26.m b/test/octave.test/zero-one/tt/m-26.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-26.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (all (a(:,logical ([1,1])) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/tt/m-27.m b/test/octave.test/zero-one/tt/m-27.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-27.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-a(1,logical (0:1)) == 8
diff --git a/test/octave.test/zero-one/tt/m-28.m b/test/octave.test/zero-one/tt/m-28.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-28.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-a(1,logical ([0,1])) == 8
diff --git a/test/octave.test/zero-one/tt/m-29.m b/test/octave.test/zero-one/tt/m-29.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-29.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(1,logical ([1,1])) == [9,8])
diff --git a/test/octave.test/zero-one/tt/m-3.m b/test/octave.test/zero-one/tt/m-3.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-3.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([0,1,1,0])) == [7;8])
diff --git a/test/octave.test/zero-one/tt/m-30.m b/test/octave.test/zero-one/tt/m-30.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-30.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([1,1]),logical (0:1)) == [8;6])
diff --git a/test/octave.test/zero-one/tt/m-31.m b/test/octave.test/zero-one/tt/m-31.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-31.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7]))
diff --git a/test/octave.test/zero-one/tt/m-32.m b/test/octave.test/zero-one/tt/m-32.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-32.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([1,1]),logical ([0,1])) == [8;6])
diff --git a/test/octave.test/zero-one/tt/m-33.m b/test/octave.test/zero-one/tt/m-33.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-33.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7]))
diff --git a/test/octave.test/zero-one/tt/m-34.m b/test/octave.test/zero-one/tt/m-34.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-34.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (all (a(logical ([1,1]),:) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/tt/m-35.m b/test/octave.test/zero-one/tt/m-35.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-35.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical ([1,1]),1) == [9;7])
diff --git a/test/octave.test/zero-one/tt/m-36.m b/test/octave.test/zero-one/tt/m-36.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-36.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/tt/m-4.m b/test/octave.test/zero-one/tt/m-4.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-4.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-a(logical (0:1),logical (0:1)) == 6
diff --git a/test/octave.test/zero-one/tt/m-5.m b/test/octave.test/zero-one/tt/m-5.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-5.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical (0:1),2:-1:1) == [6,7])
diff --git a/test/octave.test/zero-one/tt/m-6.m b/test/octave.test/zero-one/tt/m-6.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-6.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-a(logical (0:1),logical ([0,1])) == 6
diff --git a/test/octave.test/zero-one/tt/m-7.m b/test/octave.test/zero-one/tt/m-7.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-7.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical (0:1),[2,1]) == [6,7])
diff --git a/test/octave.test/zero-one/tt/m-8.m b/test/octave.test/zero-one/tt/m-8.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-8.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-all (a(logical (0:1),:) == [7,6])
diff --git a/test/octave.test/zero-one/tt/m-9.m b/test/octave.test/zero-one/tt/m-9.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/m-9.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8;7,6];
-a(logical (0:1),1) == 7
diff --git a/test/octave.test/zero-one/tt/s-1.m b/test/octave.test/zero-one/tt/s-1.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/s-1.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [];
-a(0)
diff --git a/test/octave.test/zero-one/tt/s-2.m b/test/octave.test/zero-one/tt/s-2.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/s-2.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = 2;
-a(1) == 2
diff --git a/test/octave.test/zero-one/tt/s-3.m b/test/octave.test/zero-one/tt/s-3.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/s-3.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = 2;
-a(1) == 2
diff --git a/test/octave.test/zero-one/tt/s-4.m b/test/octave.test/zero-one/tt/s-4.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/s-4.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = 2;
-all (a(logical ([1,1])) == [2,2])
diff --git a/test/octave.test/zero-one/tt/v-1.m b/test/octave.test/zero-one/tt/v-1.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/v-1.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8,7,6];
-isempty (a(logical ([0,0,0,0])))
diff --git a/test/octave.test/zero-one/tt/v-2.m b/test/octave.test/zero-one/tt/v-2.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/v-2.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8,7,6];
-all (a(logical ([1,1,1,1])) == [9,8,7,6])
diff --git a/test/octave.test/zero-one/tt/v-3.m b/test/octave.test/zero-one/tt/v-3.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/v-3.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8,7,6];
-all (a(logical ([0,1,1,0])) == [8,7])
diff --git a/test/octave.test/zero-one/tt/v-4.m b/test/octave.test/zero-one/tt/v-4.m
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/v-4.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 0;
-do_fortran_indexing = 1;
-a = [9,8,7,6];
-all (a(logical ([1,1])) == [9,9])
diff --git a/test/octave.test/zero-one/tt/zero-one.exp b/test/octave.test/zero-one/tt/zero-one.exp
deleted file mode 100644
--- a/test/octave.test/zero-one/tt/zero-one.exp
+++ /dev/null
@@ -1,187 +0,0 @@
-## Tests with:
-##
-## prefer_zero_one_indexing == "true"
-## prefer_column_vectors    == "false"
-## do_fortran_indexing      == "true"
-
-## scalar tests
-
-set test zero-one-tft-s-1
-set prog_output "error:.*"
-do_test s-1.m
-
-set test zero-one-tft-s-2
-set prog_output "ans = *1"
-do_test s-2.m
-
-set test zero-one-tft-s-3
-set prog_output "ans = *1"
-do_test s-3.m
-
-set test zero-one-tft-s-4
-set prog_output "ans = *1"
-do_test s-4.m
-
-## vector tests
-
-set test zero-one-tft-v-1
-set prog_output "ans = *1"
-do_test v-1.m
-
-set test zero-one-tft-v-2
-set prog_output "ans = *1"
-do_test v-2.m
-
-set test zero-one-tft-v-3
-set prog_output "ans = *1"
-do_test v-3.m
-
-set test zero-one-tft-v-4
-set prog_output "ans = *1"
-do_test v-4.m
-
-## matrix tests
-
-set test zero-one-tft-m-1
-set prog_output "ans = *1"
-do_test m-1.m
-
-set test zero-one-tft-m-2
-set prog_output "ans = *1"
-do_test m-2.m
-
-set test zero-one-tft-m-3
-set prog_output "ans = *1"
-do_test m-3.m
-
-set test zero-one-tft-m-4
-set prog_output "ans = *1"
-do_test m-4.m
-
-set test zero-one-tft-m-5
-set prog_output "ans = *1"
-do_test m-5.m
-
-set test zero-one-tft-m-6
-set prog_output "ans = *1"
-do_test m-6.m
-
-set test zero-one-tft-m-7
-set prog_output "ans = *1"
-do_test m-7.m
-
-set test zero-one-tft-m-8
-set prog_output "ans = *1"
-do_test m-8.m
-
-set test zero-one-tft-m-9
-set prog_output "ans = *1"
-do_test m-9.m
-
-set test zero-one-tft-m-10
-set prog_output "ans = *1"
-do_test m-10.m
-
-set test zero-one-tft-m-11
-set prog_output "ans = *1"
-do_test m-11.m
-
-set test zero-one-tft-m-12
-set prog_output "ans = *1"
-do_test m-12.m
-
-set test zero-one-tft-m-13
-set prog_output "ans = *1"
-do_test m-13.m
-
-set test zero-one-tft-m-14
-set prog_output "ans = *1"
-do_test m-14.m
-
-set test zero-one-tft-m-15
-set prog_output "ans = *1"
-do_test m-15.m
-
-set test zero-one-tft-m-16
-set prog_output "ans = *1"
-do_test m-16.m
-
-set test zero-one-tft-m-17
-set prog_output "ans = *1"
-do_test m-17.m
-
-set test zero-one-tft-m-18
-set prog_output "ans = *1"
-do_test m-18.m
-
-set test zero-one-tft-m-19
-set prog_output "ans = *1"
-do_test m-19.m
-
-set test zero-one-tft-m-20
-set prog_output "ans = *1"
-do_test m-20.m
-
-set test zero-one-tft-m-21
-set prog_output "ans = *1"
-do_test m-21.m
-
-set test zero-one-tft-m-22
-set prog_output "ans = *1"
-do_test m-22.m
-
-set test zero-one-tft-m-23
-set prog_output "ans = *1"
-do_test m-23.m
-
-set test zero-one-tft-m-24
-set prog_output "ans = *1"
-do_test m-24.m
-
-set test zero-one-tft-m-25
-set prog_output "ans = *1"
-do_test m-25.m
-
-set test zero-one-tft-m-26
-set prog_output "ans = *1"
-do_test m-26.m
-
-set test zero-one-tft-m-27
-set prog_output "ans = *1"
-do_test m-27.m
-
-set test zero-one-tft-m-28
-set prog_output "ans = *1"
-do_test m-28.m
-
-set test zero-one-tft-m-29
-set prog_output "ans = *1"
-do_test m-29.m
-
-set test zero-one-tft-m-30
-set prog_output "ans = *1"
-do_test m-30.m
-
-set test zero-one-tft-m-31
-set prog_output "ans = *1"
-do_test m-31.m
-
-set test zero-one-tft-m-32
-set prog_output "ans = *1"
-do_test m-32.m
-
-set test zero-one-tft-m-33
-set prog_output "ans = *1"
-do_test m-33.m
-
-set test zero-one-tft-m-34
-set prog_output "ans = *1"
-do_test m-34.m
-
-set test zero-one-tft-m-35
-set prog_output "ans = *1"
-do_test m-35.m
-
-set test zero-one-tft-m-36
-set prog_output "ans = *1"
-do_test m-36.m
diff --git a/test/octave.test/zero-one/ttf/m-1.m b/test/octave.test/zero-one/ttf/m-1.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-1.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical ([0,0,0,0]))
diff --git a/test/octave.test/zero-one/ttf/m-10.m b/test/octave.test/zero-one/ttf/m-10.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-10.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical (0:1),logical ([1,1])) == [7,6])
diff --git a/test/octave.test/zero-one/ttf/m-11.m b/test/octave.test/zero-one/ttf/m-11.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-11.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(2:-1:1,logical (0:1)) == [6;8])
diff --git a/test/octave.test/zero-one/ttf/m-12.m b/test/octave.test/zero-one/ttf/m-12.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-12.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(2:-1:1,logical ([0,1])) == [6;8])
diff --git a/test/octave.test/zero-one/ttf/m-13.m b/test/octave.test/zero-one/ttf/m-13.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-13.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8]))
diff --git a/test/octave.test/zero-one/ttf/m-14.m b/test/octave.test/zero-one/ttf/m-14.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-14.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical ([0,1]),logical (0:1)) == 6
diff --git a/test/octave.test/zero-one/ttf/m-15.m b/test/octave.test/zero-one/ttf/m-15.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-15.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical ([0,1]),2:-1:1) == [6,7])
diff --git a/test/octave.test/zero-one/ttf/m-16.m b/test/octave.test/zero-one/ttf/m-16.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-16.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical ([0,1]),logical ([0,1])) == 6
diff --git a/test/octave.test/zero-one/ttf/m-17.m b/test/octave.test/zero-one/ttf/m-17.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-17.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical ([0,1]),[2,1]) == [6,7])
diff --git a/test/octave.test/zero-one/ttf/m-18.m b/test/octave.test/zero-one/ttf/m-18.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-18.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical ([0,1]),:) == [7,6])
diff --git a/test/octave.test/zero-one/ttf/m-19.m b/test/octave.test/zero-one/ttf/m-19.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-19.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical ([0,1]),1) == 7
diff --git a/test/octave.test/zero-one/ttf/m-2.m b/test/octave.test/zero-one/ttf/m-2.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-2.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical ([1,1,1,1]))
diff --git a/test/octave.test/zero-one/ttf/m-20.m b/test/octave.test/zero-one/ttf/m-20.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-20.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical ([0,1]),logical ([1,1])) == [7,6])
diff --git a/test/octave.test/zero-one/ttf/m-21.m b/test/octave.test/zero-one/ttf/m-21.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-21.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a([2,1],logical (0:1)) == [6;8])
diff --git a/test/octave.test/zero-one/ttf/m-22.m b/test/octave.test/zero-one/ttf/m-22.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-22.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a([2,1],logical ([0,1])) == [6;8])
diff --git a/test/octave.test/zero-one/ttf/m-23.m b/test/octave.test/zero-one/ttf/m-23.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-23.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (all (a([2,1],logical ([1,1])) == [7,6;9,8]))
diff --git a/test/octave.test/zero-one/ttf/m-24.m b/test/octave.test/zero-one/ttf/m-24.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-24.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(:,logical (0:1)) == [8;6])
diff --git a/test/octave.test/zero-one/ttf/m-25.m b/test/octave.test/zero-one/ttf/m-25.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-25.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(:,logical ([0,1])) == [8;6])
diff --git a/test/octave.test/zero-one/ttf/m-26.m b/test/octave.test/zero-one/ttf/m-26.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-26.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (all (a(:,logical ([1,1])) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/ttf/m-27.m b/test/octave.test/zero-one/ttf/m-27.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-27.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(1,logical (0:1)) == 8
diff --git a/test/octave.test/zero-one/ttf/m-28.m b/test/octave.test/zero-one/ttf/m-28.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-28.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(1,logical ([0,1])) == 8
diff --git a/test/octave.test/zero-one/ttf/m-29.m b/test/octave.test/zero-one/ttf/m-29.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-29.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(1,logical ([1,1])) == [9,8])
diff --git a/test/octave.test/zero-one/ttf/m-3.m b/test/octave.test/zero-one/ttf/m-3.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-3.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical ([0,1,1,0]))
diff --git a/test/octave.test/zero-one/ttf/m-30.m b/test/octave.test/zero-one/ttf/m-30.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-30.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical ([1,1]),logical (0:1)) == [8;6])
diff --git a/test/octave.test/zero-one/ttf/m-31.m b/test/octave.test/zero-one/ttf/m-31.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-31.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7]))
diff --git a/test/octave.test/zero-one/ttf/m-32.m b/test/octave.test/zero-one/ttf/m-32.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-32.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical ([1,1]),logical ([0,1])) == [8;6])
diff --git a/test/octave.test/zero-one/ttf/m-33.m b/test/octave.test/zero-one/ttf/m-33.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-33.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7]))
diff --git a/test/octave.test/zero-one/ttf/m-34.m b/test/octave.test/zero-one/ttf/m-34.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-34.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (all (a(logical ([1,1]),:) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/ttf/m-35.m b/test/octave.test/zero-one/ttf/m-35.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-35.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical ([1,1]),1) == [9;7])
diff --git a/test/octave.test/zero-one/ttf/m-36.m b/test/octave.test/zero-one/ttf/m-36.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-36.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6]))
diff --git a/test/octave.test/zero-one/ttf/m-4.m b/test/octave.test/zero-one/ttf/m-4.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-4.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical (0:1),logical (0:1)) == 6
diff --git a/test/octave.test/zero-one/ttf/m-5.m b/test/octave.test/zero-one/ttf/m-5.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-5.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical (0:1),2:-1:1) == [6,7])
diff --git a/test/octave.test/zero-one/ttf/m-6.m b/test/octave.test/zero-one/ttf/m-6.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-6.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical (0:1),logical ([0,1])) == 6
diff --git a/test/octave.test/zero-one/ttf/m-7.m b/test/octave.test/zero-one/ttf/m-7.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-7.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical (0:1),[2,1]) == [6,7])
diff --git a/test/octave.test/zero-one/ttf/m-8.m b/test/octave.test/zero-one/ttf/m-8.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-8.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-all (a(logical (0:1),:) == [7,6])
diff --git a/test/octave.test/zero-one/ttf/m-9.m b/test/octave.test/zero-one/ttf/m-9.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/m-9.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8;7,6];
-a(logical (0:1),1) == 7
diff --git a/test/octave.test/zero-one/ttf/s-1.m b/test/octave.test/zero-one/ttf/s-1.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/s-1.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [];
-a(0)
diff --git a/test/octave.test/zero-one/ttf/s-2.m b/test/octave.test/zero-one/ttf/s-2.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/s-2.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = 2;
-a(1) == 2
diff --git a/test/octave.test/zero-one/ttf/s-3.m b/test/octave.test/zero-one/ttf/s-3.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/s-3.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = 2;
-a(1) == 2
diff --git a/test/octave.test/zero-one/ttf/s-4.m b/test/octave.test/zero-one/ttf/s-4.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/s-4.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = 2;
-all (a(logical ([1,1])) == [2;2])
diff --git a/test/octave.test/zero-one/ttf/v-1.m b/test/octave.test/zero-one/ttf/v-1.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/v-1.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8,7,6];
-isempty (a(logical ([0,0,0,0])))
diff --git a/test/octave.test/zero-one/ttf/v-2.m b/test/octave.test/zero-one/ttf/v-2.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/v-2.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8,7,6];
-all (a(logical ([1,1,1,1])) == [9,8,7,6])
diff --git a/test/octave.test/zero-one/ttf/v-3.m b/test/octave.test/zero-one/ttf/v-3.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/v-3.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8,7,6];
-all (a(logical ([0,1,1,0])) == [8,7])
diff --git a/test/octave.test/zero-one/ttf/v-4.m b/test/octave.test/zero-one/ttf/v-4.m
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/v-4.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [9,8,7,6];
-all (a(logical ([1,1])) == [9,9])
diff --git a/test/octave.test/zero-one/ttf/zero-one.exp b/test/octave.test/zero-one/ttf/zero-one.exp
deleted file mode 100644
--- a/test/octave.test/zero-one/ttf/zero-one.exp
+++ /dev/null
@@ -1,187 +0,0 @@
-## Tests with:
-##
-## prefer_zero_one_indexing == "true"
-## prefer_column_vectors    == "true"
-## do_fortran_indexing      == "false"
-
-## scalar tests
-
-set test zero-one-ttf-s-1
-set prog_output "error:.*"
-do_test s-1.m
-
-set test zero-one-ttf-s-2
-set prog_output "ans = *1"
-do_test s-2.m
-
-set test zero-one-ttf-s-3
-set prog_output "ans = *1"
-do_test s-3.m
-
-set test zero-one-ttf-s-4
-set prog_output "ans = *1"
-do_test s-4.m
-
-## vector tests
-
-set test zero-one-ttf-v-1
-set prog_output "ans = *1"
-do_test v-1.m
-
-set test zero-one-ttf-v-2
-set prog_output "ans = *1"
-do_test v-2.m
-
-set test zero-one-ttf-v-3
-set prog_output "ans = *1"
-do_test v-3.m
-
-set test zero-one-ttf-v-4
-set prog_output "ans = *1"
-do_test v-4.m
-
-## matrix tests
-
-set test zero-one-ttf-m-1
-set prog_output "error:.*"
-do_test m-1.m
-
-set test zero-one-ttf-m-2
-set prog_output "error:.*"
-do_test m-2.m
-
-set test zero-one-ttf-m-3
-set prog_output "error:.*"
-do_test m-3.m
-
-set test zero-one-ttf-m-4
-set prog_output "ans = *1"
-do_test m-4.m
-
-set test zero-one-ttf-m-5
-set prog_output "ans = *1"
-do_test m-5.m
-
-set test zero-one-ttf-m-6
-set prog_output "ans = *1"
-do_test m-6.m
-
-set test zero-one-ttf-m-7
-set prog_output "ans = *1"
-do_test m-7.m
-
-set test zero-one-ttf-m-8
-set prog_output "ans = *1"
-do_test m-8.m
-
-set test zero-one-ttf-m-9
-set prog_output "ans = *1"
-do_test m-9.m
-
-set test zero-one-ttf-m-10
-set prog_output "ans = *1"
-do_test m-10.m
-
-set test zero-one-ttf-m-11
-set prog_output "ans = *1"
-do_test m-11.m
-
-set test zero-one-ttf-m-12
-set prog_output "ans = *1"
-do_test m-12.m
-
-set test zero-one-ttf-m-13
-set prog_output "ans = *1"
-do_test m-13.m
-
-set test zero-one-ttf-m-14
-set prog_output "ans = *1"
-do_test m-14.m
-
-set test zero-one-ttf-m-15
-set prog_output "ans = *1"
-do_test m-15.m
-
-set test zero-one-ttf-m-16
-set prog_output "ans = *1"
-do_test m-16.m
-
-set test zero-one-ttf-m-17
-set prog_output "ans = *1"
-do_test m-17.m
-
-set test zero-one-ttf-m-18
-set prog_output "ans = *1"
-do_test m-18.m
-
-set test zero-one-ttf-m-19
-set prog_output "ans = *1"
-do_test m-19.m
-
-set test zero-one-ttf-m-20
-set prog_output "ans = *1"
-do_test m-20.m
-
-set test zero-one-ttf-m-21
-set prog_output "ans = *1"
-do_test m-21.m
-
-set test zero-one-ttf-m-22
-set prog_output "ans = *1"
-do_test m-22.m
-
-set test zero-one-ttf-m-23
-set prog_output "ans = *1"
-do_test m-23.m
-
-set test zero-one-ttf-m-24
-set prog_output "ans = *1"
-do_test m-24.m
-
-set test zero-one-ttf-m-25
-set prog_output "ans = *1"
-do_test m-25.m
-
-set test zero-one-ttf-m-26
-set prog_output "ans = *1"
-do_test m-26.m
-
-set test zero-one-ttf-m-27
-set prog_output "ans = *1"
-do_test m-27.m
-
-set test zero-one-ttf-m-28
-set prog_output "ans = *1"
-do_test m-28.m
-
-set test zero-one-ttf-m-29
-set prog_output "ans = *1"
-do_test m-29.m
-
-set test zero-one-ttf-m-30
-set prog_output "ans = *1"
-do_test m-30.m
-
-set test zero-one-ttf-m-31
-set prog_output "ans = *1"
-do_test m-31.m
-
-set test zero-one-ttf-m-32
-set prog_output "ans = *1"
-do_test m-32.m
-
-set test zero-one-ttf-m-33
-set prog_output "ans = *1"
-do_test m-33.m
-
-set test zero-one-ttf-m-34
-set prog_output "ans = *1"
-do_test m-34.m
-
-set test zero-one-ttf-m-35
-set prog_output "ans = *1"
-do_test m-35.m
-
-set test zero-one-ttf-m-36
-set prog_output "ans = *1"
-do_test m-36.m