changeset 2840:64f2368e3723

[project @ 1997-03-26 21:23:31 by jwe]
author jwe
date Wed, 26 Mar 1997 21:23:40 +0000
parents dd463ae53854
children cf388123941a
files test/octave.test/zero-one/tf/m-1.m test/octave.test/zero-one/tf/m-10.m test/octave.test/zero-one/tf/m-11.m test/octave.test/zero-one/tf/m-12.m test/octave.test/zero-one/tf/m-13.m test/octave.test/zero-one/tf/m-14.m test/octave.test/zero-one/tf/m-15.m test/octave.test/zero-one/tf/m-16.m test/octave.test/zero-one/tf/m-17.m test/octave.test/zero-one/tf/m-18.m test/octave.test/zero-one/tf/m-19.m test/octave.test/zero-one/tf/m-2.m test/octave.test/zero-one/tf/m-20.m test/octave.test/zero-one/tf/m-21.m test/octave.test/zero-one/tf/m-22.m test/octave.test/zero-one/tf/m-23.m test/octave.test/zero-one/tf/m-24.m test/octave.test/zero-one/tf/m-25.m test/octave.test/zero-one/tf/m-26.m test/octave.test/zero-one/tf/m-27.m test/octave.test/zero-one/tf/m-28.m test/octave.test/zero-one/tf/m-29.m test/octave.test/zero-one/tf/m-3.m test/octave.test/zero-one/tf/m-30.m test/octave.test/zero-one/tf/m-31.m test/octave.test/zero-one/tf/m-32.m test/octave.test/zero-one/tf/m-33.m test/octave.test/zero-one/tf/m-34.m test/octave.test/zero-one/tf/m-35.m test/octave.test/zero-one/tf/m-36.m test/octave.test/zero-one/tf/m-4.m test/octave.test/zero-one/tf/m-5.m test/octave.test/zero-one/tf/m-6.m test/octave.test/zero-one/tf/m-7.m test/octave.test/zero-one/tf/m-8.m test/octave.test/zero-one/tf/m-9.m test/octave.test/zero-one/tf/s-1.m test/octave.test/zero-one/tf/s-2.m test/octave.test/zero-one/tf/s-3.m test/octave.test/zero-one/tf/s-4.m test/octave.test/zero-one/tf/v-1.m test/octave.test/zero-one/tf/v-2.m test/octave.test/zero-one/tf/v-3.m test/octave.test/zero-one/tf/v-4.m test/octave.test/zero-one/tf/zero-one.exp test/octave.test/zero-one/tt/m-1.m test/octave.test/zero-one/tt/m-10.m test/octave.test/zero-one/tt/m-11.m test/octave.test/zero-one/tt/m-12.m test/octave.test/zero-one/tt/m-13.m test/octave.test/zero-one/tt/m-14.m test/octave.test/zero-one/tt/m-15.m test/octave.test/zero-one/tt/m-16.m test/octave.test/zero-one/tt/m-17.m test/octave.test/zero-one/tt/m-18.m test/octave.test/zero-one/tt/m-19.m test/octave.test/zero-one/tt/m-2.m test/octave.test/zero-one/tt/m-20.m test/octave.test/zero-one/tt/m-21.m test/octave.test/zero-one/tt/m-22.m test/octave.test/zero-one/tt/m-23.m test/octave.test/zero-one/tt/m-24.m test/octave.test/zero-one/tt/m-25.m test/octave.test/zero-one/tt/m-26.m test/octave.test/zero-one/tt/m-27.m test/octave.test/zero-one/tt/m-28.m test/octave.test/zero-one/tt/m-29.m test/octave.test/zero-one/tt/m-3.m test/octave.test/zero-one/tt/m-30.m test/octave.test/zero-one/tt/m-31.m test/octave.test/zero-one/tt/m-32.m test/octave.test/zero-one/tt/m-33.m test/octave.test/zero-one/tt/m-34.m test/octave.test/zero-one/tt/m-35.m test/octave.test/zero-one/tt/m-36.m test/octave.test/zero-one/tt/m-4.m test/octave.test/zero-one/tt/m-5.m test/octave.test/zero-one/tt/m-6.m test/octave.test/zero-one/tt/m-7.m test/octave.test/zero-one/tt/m-8.m test/octave.test/zero-one/tt/m-9.m test/octave.test/zero-one/tt/s-1.m test/octave.test/zero-one/tt/s-2.m test/octave.test/zero-one/tt/s-3.m test/octave.test/zero-one/tt/s-4.m test/octave.test/zero-one/tt/v-1.m test/octave.test/zero-one/tt/v-2.m test/octave.test/zero-one/tt/v-3.m test/octave.test/zero-one/tt/v-4.m test/octave.test/zero-one/tt/zero-one.exp
diffstat 90 files changed, 363 insertions(+), 363 deletions(-) [+]
line wrap: on
line diff
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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]))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/s-1.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = [];
-a(0)
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/s-2.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = 2;
-a(1) == 2
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/s-3.m
+++ /dev/null
@@ -1,4 +0,0 @@
-prefer_column_vectors = 1;
-do_fortran_indexing = 0;
-a = 2;
-a(1) == 2
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])))
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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])
deleted file mode 100644
--- a/test/octave.test/zero-one/tf/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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]))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/s-1.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = [];
+a(0)
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/s-2.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = 2;
+a(1) == 2
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/s-3.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = 2;
+a(1) == 2
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/s-4.m
@@ -0,0 +1,4 @@
+prefer_column_vectors = 1;
+do_fortran_indexing = 0;
+a = 2;
+all (a(logical ([1,1])) == [2;2])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])))
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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])
new file mode 100644
--- /dev/null
+++ b/test/octave.test/zero-one/tt/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