1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
//SCI2C: DEFAULT_PRECISION= FLOAT function test_float_OpExt () a = [1 2 3 ; 4 5 6]; disp(a(2)); disp(a([3 5])); disp(a(2,3)); disp(a(2,[2 3])); disp(a ([1 2],1)); disp(a ([1 2],[2 3])); b = [1 2 3 ; 4 5 6] * %i; disp(b(2)); disp(b([3 5])); disp(b(2,3)); disp(b(2,[2 3])); disp(b ([1 2],1)); disp(b ([1 2],[2 3])); endfunction