// <-- Short Description -->
// Calculating the mean value in the 3rd dimension "mean(A,3)", gives an error for input matrices of a certain size
test = rand(150,1,165);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then bugmes();quit;end
-if size(r) <> [1 150] then bugmes();quit;end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [150 1]);
test = rand(150,1,166);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then bugmes();quit;end
-if size(r) <> [1 150] then bugmes();quit;end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [150 1]);
test = rand(1000,1,165);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then bugmes();quit;end
-if size(r) <> [1 1000] then bugmes();quit;end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [1000 1]);
test = rand(1000,1,166);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then bugmes();quit;end
-if size(r) <> [1 1000] then bugmes();quit;end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [1000 1]);
test = rand(250,1,165);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then bugmes();quit;end
-if size(r) <> [1 250] then bugmes();quit;end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [250 1]);
test = rand(250,1,166);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then bugmes();quit;end
-if size(r) <> [1 250] then bugmes();quit;end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [250 1]);
test = rand(150,1,165);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then pause,end
-if size(r) <> [1 150] then pause,end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [150 1]);
test = rand(150,1,166);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then pause,end
-if size(r) <> [1 150] then pause,end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [150 1]);
test = rand(1000,1,165);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then pause,end
-if size(r) <> [1 1000] then pause,end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [1000 1]);
test = rand(1000,1,166);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then pause,end
-if size(r) <> [1 1000] then pause,end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [1000 1]);
test = rand(250,1,165);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then pause,end
-if size(r) <> [1 250] then pause,end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [250 1]);
test = rand(250,1,166);
-ierr = execstr('r = mean(test,3);','errcatch');
-if ierr <> 0 then pause,end
-if size(r) <> [1 250] then pause,end
+assert_checkfalse(execstr("r = mean(test,3);" ,"errcatch") <> 0);
+assert_checkequal(size(r), [250 1]);