test_logical-wfi-f.m File Reference

Functions
"query","Octave:fortran-indexing"	warning ()
	!warning ("off","Octave:fortran-indexing")
	!fail ("a(0);")
	!warning ("wfi.state","Octave:fortran-indexing")
	!assert (a(1)==2)
!error< A\(I\):Index exceeds matrix dimension\.>	a (logical([1, 1]))
	!assert (isempty(a(logical([0, 0, 0, 0]))))
	!assert (all(a(logical([1, 1, 1, 1]))==[9, 8, 7, 6]))
	!assert (all(a(logical([0, 1, 1, 0]))==[8, 7]))
	!assert (all(a(logical([1, 1]))==[9, 8]))
	!assert (all(a(logical([1, 1, 1, 1]))==[9, 7, 8, 6]))
	!assert (all(a(logical([0, 1, 1, 0]))==[7, 8]))
	!assert (a(logical(0:1), logical(0:1))==6)
	!assert (all(a(logical(0:1), 2:-1:1)==[6, 7]))
	!assert (a(logical(0:1), logical([0, 1]))==6)
	!assert (all(a(logical(0:1),[2, 1])==[6, 7]))
	!assert (all(a(logical(0:1),:)==[7, 6]))
	!assert (a(logical(0:1), 1)==7)
	!assert (all(a(logical(0:1), logical([1, 1]))==[7, 6]))
	!assert (all(a(2:-1:1, logical(0:1))==[6;8]))
	!assert (all(a(2:-1:1, logical([0, 1]))==[6;8]))
	!assert (all(all(a(2:-1:1, logical([1, 1]))==[7, 6;9, 8])))
	!assert (a(logical([0, 1]), logical(0:1))==6)
	!assert (all(a(logical([0, 1]), 2:-1:1)==[6, 7]))
	!assert (a(logical([0, 1]), logical([0, 1]))==6)
	!assert (all(a(logical([0, 1]),[2, 1])==[6, 7]))
	!assert (all(a(logical([0, 1]),:)==[7, 6]))
	!assert (a(logical([0, 1]), 1)==7)
	!assert (all(a(logical([0, 1]), logical([1, 1]))==[7, 6]))
	!assert (all(a([2, 1], logical(0:1))==[6;8]))
	!assert (all(a([2, 1], logical([0, 1]))==[6;8]))
	!assert (all(all(a([2, 1], logical([1, 1]))==[7, 6;9, 8])))
	!assert (all(a(:, logical(0:1))==[8;6]))
	!assert (all(a(:, logical([0, 1]))==[8;6]))
	!assert (all(all(a(:, logical([1, 1]))==[9, 8;7, 6])))
	!assert (a(1, logical(0:1))==8)
	!assert (a(1, logical([0, 1]))==8)
	!assert (all(a(1, logical([1, 1]))==[9, 8]))
	!assert (all(a(logical([1, 1]), logical(0:1))==[8;6]))
	!assert (all(all(a(logical([1, 1]), 2:-1:1)==[8, 9;6, 7])))
	!assert (all(a(logical([1, 1]), logical([0, 1]))==[8;6]))
	!assert (all(all(a(logical([1, 1]),[2, 1])==[8, 9;6, 7])))
	!assert (all(all(a(logical([1, 1]),:)==[9, 8;7, 6])))
	!assert (all(a(logical([1, 1]), 1)==[9;7]))
	!assert (all(all(a(logical([1, 1]), logical([1, 1]))==[9, 8;7, 6])))
Variables
	!a = []

---

Function Documentation

!assert

(

all(all(a(logical([1, 1]), logical([1, 1]))==[9, 8;7, 6]))

)

!assert

(

all(a(logical([1, 1]), 1)==[9;7])

)

!assert

(

all(all(a(logical([1, 1]),:)==[9, 8;7, 6]))

)

!assert

(

all(all(a(logical([1, 1]),[2, 1])==[8, 9;6, 7]))

)

!assert

(

all(a(logical([1, 1]), logical([0, 1]))==[8;6])

)

!assert

(

all(all(a(logical([1, 1]), 2:-1:1)==[8, 9;6, 7]))

)

!assert

(

all(a(logical([1, 1]), logical(0:1))==[8;6])

)

!assert

(

all(a(1, logical([1, 1]))==[9, 8])

)

!assert

(

a(1, logical([0, 1]))

= =8

)

!assert

(

a(1, logical(0:1))

= =8

)

!assert

(

all(all(a(:, logical([1, 1]))==[9, 8;7, 6]))

)

!assert

(

all(a(:, logical([0, 1]))==[8;6])

)

!assert

(

all(a(:, logical(0:1))==[8;6])

)

!assert

(

all(all(a([2, 1], logical([1, 1]))==[7, 6;9, 8]))

)

!assert

(

all(a([2, 1], logical([0, 1]))==[6;8])

)

!assert

(

all(a([2, 1], logical(0:1))==[6;8])

)

!assert

(

all(a(logical([0, 1]), logical([1, 1]))==[7, 6])

)

!assert

(

a(logical([0, 1]), 1)

= =7

)

!assert

(

all(a(logical([0, 1]),:)==[7, 6])

)

!assert

(

all(a(logical([0, 1]),[2, 1])==[6, 7])

)

!assert

(

a(logical([0, 1]), logical([0, 1]))

= =6

)

!assert

(

all(a(logical([0, 1]), 2:-1:1)==[6, 7])

)

!assert

(

a(logical([0, 1]), logical(0:1))

= =6

)

!assert

(

all(all(a(2:-1:1, logical([1, 1]))==[7, 6;9, 8]))

)

!assert

(

all(a(2:-1:1, logical([0, 1]))==[6;8])

)

!assert

(

all(a(2:-1:1, logical(0:1))==[6;8])

)

!assert

(

all(a(logical(0:1), logical([1, 1]))==[7, 6])

)

!assert

(

a(logical(0:1), 1)

= =7

)

!assert

(

all(a(logical(0:1),:)==[7, 6])

)

!assert

(

all(a(logical(0:1),[2, 1])==[6, 7])

)

!assert

(

a(logical(0:1), logical([0, 1]))

= =6

)

!assert

(

all(a(logical(0:1), 2:-1:1)==[6, 7])

)

!assert

(

a(logical(0:1), logical(0:1))

= =6

)

!assert

(

all(a(logical([0, 1, 1, 0]))==[7, 8])

)

!assert

(

all(a(logical([1, 1, 1, 1]))==[9, 7, 8, 6])

)

!assert

(

all(a(logical([1, 1]))==[9, 8])

)

!assert

(

all(a(logical([0, 1, 1, 0]))==[8, 7])

)

!assert

(

all(a(logical([1, 1, 1, 1]))==[9, 8, 7, 6])

)

!assert

(

isempty(a(logical([0, 0, 0, 0])))

)

!assert

(

a(1)

= =2

)

!fail

(

"a(0);"

)

!warning	(	"wfi.state"	,
		"Octave:fortran-indexing"
	)

!warning	(	"off"	,
		"Octave:fortran-indexing"
	)

!error<A\(I\): Index exceeds matrix dimension\.> a

(

logical([1, 1])

)

"query", "Octave:fortran-indexing" warning

(

)

[virtual]

---

Variable Documentation

!a = []