diff options
Diffstat (limited to 'tests/unit_tests/test_double_Meanf.sci')
-rw-r--r-- | tests/unit_tests/test_double_Meanf.sci | 48 |
1 files changed, 0 insertions, 48 deletions
diff --git a/tests/unit_tests/test_double_Meanf.sci b/tests/unit_tests/test_double_Meanf.sci deleted file mode 100644 index 2e88e4d9..00000000 --- a/tests/unit_tests/test_double_Meanf.sci +++ /dev/null @@ -1,48 +0,0 @@ - -function test_double_Meanf() - - disp (meanf (4 , 5 )) ; - disp ("*******1*******"); - disp (meanf ([4 5 6], [1 2 3])); - disp ("*******2*******"); - disp (meanf (4 , 5*%i )) ; - disp ("*******3*******"); - disp (meanf ([4 5 6], [1 2 3]*%i)); - disp ("*******4*******"); - - - - disp (meanf ([4 5 6 ; 7 8 9], [1 2 3 ; 4 5 6],1)); - disp ("*******5*******"); - disp (meanf ([4 7; 5 8; 6 9], [1 4; 2 5; 3 6],2)); -// complex - disp ("*******6*******"); - disp (meanf (4 +4*%i , 5 )) ; - disp ("*******7*******"); - disp (meanf ([4*%i, 5+6*%i, 6], [1 2 3])); - disp ("*******8*******"); - disp (meanf (4 +4*%i , 5*%i )) ; - disp ("*******9*******"); - disp (meanf ([4*%i, 5+6*%i, 6], [1 2 3]*%i)); - disp ("******10*******"); - - - disp (meanf ([4 5 6 ; 7 8 9]*%i, [1 2 3 ; 4 5 6],1)); - disp ("******11*******"); - disp (meanf ([4 7; 5 8; 6 9], [1 4; 2 5; 3 6]*%i,2)); - disp ("******12*******"); - disp (meanf ([4 5 6 ; 7 8 9],[1 2 3 ; 4 8 9] + [1 2 3 ; 4 5 6]*%i,1)); - disp ("******13*******"); - disp (meanf ([4 7; 5 8; 6 9]*%i, [1 4; 2 5; 3 6],2)); - disp ("******14*******"); - - disp (meanf ([4 5 6 ; 7 8 9]*%i, [1 2 3 ; 4 5 6]*%i,1)); - disp ("******15*******"); - disp (meanf ([4 7; 5 8; 6 9]*%i, [1 4; 2 5; 3 6]*%i,2)); - disp ("******16*******"); -// - - -// - -endfunction |