From 79a0de7c6623433170f4965f0a6f07ebfed27f16 Mon Sep 17 00:00:00 2001 From: jofret Date: Tue, 22 Jun 2010 15:31:55 +0000 Subject: separate float and double tests --- tests/unit_tests/test_float_Stdevf.sci | 46 ---------------------------------- 1 file changed, 46 deletions(-) delete mode 100644 tests/unit_tests/test_float_Stdevf.sci (limited to 'tests/unit_tests/test_float_Stdevf.sci') diff --git a/tests/unit_tests/test_float_Stdevf.sci b/tests/unit_tests/test_float_Stdevf.sci deleted file mode 100644 index d429e557..00000000 --- a/tests/unit_tests/test_float_Stdevf.sci +++ /dev/null @@ -1,46 +0,0 @@ -//SCI2C: DEFAULT_PRECISION= FLOAT - -function test_float_Stdevf() - disp (stdevf (4 , 5 )) ; - disp ("*******1*******"); - disp (stdevf ([4 5 6], [1 2 3])); - disp ("*******2*******"); - disp (stdevf (4 , 5*%i )) ; - disp ("*******3*******"); - disp (stdevf ([4 5 6], [1 2 3]*%i)); - disp ("*******4*******"); - - - - disp (stdevf ([4 5 6 ; 7 8 9], [1 2 3 ; 4 5 6],1)); - disp ("*******5*******"); - disp (stdevf ([4 7; 5 8; 6 9], [1 4; 2 5; 3 6],2)); -// complex - disp ("*******6*******"); - disp (stdevf (4 +4*%i , 5 )) ; - disp ("*******7*******"); - disp (stdevf ([4*%i, 5+6*%i, 6], [1 2 3])); - disp ("*******8*******"); - disp (stdevf (4 +4*%i , 5*%i )) ; - disp ("*******9*******"); - disp (stdevf ([4*%i, 5+6*%i, 6], [1 2 3]*%i)); - disp ("******10*******"); - - - disp (stdevf ([4 5 6 ; 7 8 9]*%i, [1 2 3 ; 4 5 6],1)); - disp ("******11*******"); - disp (stdevf ([4 7; 5 8; 6 9], [1 4; 2 5; 3 6]*%i,2)); - disp (stdevf ([4 5 6 ; 7 8 9],[1 2 3 ; 4 8 9] + [1 2 3 ; 4 5 6]*%i,1)); - disp ("******12*******"); - disp (stdevf ([4 5 6 ; 7 8 9], [1 2 3 ; 4 5 6]*%i,1)); - disp ("******13*******"); - disp (stdevf ([4 7; 5 8; 6 9]*%i, [1 4; 2 5; 3 6],2)); - disp ("******14*******"); - - disp (stdevf ([4 5 6 ; 7 8 9]*%i, [1 2 3 ; 4 5 6]*%i,1)); - disp ("******15*******"); - disp (stdevf ([4 7; 5 8; 6 9]*%i, [1 4; 2 5; 3 6]*%i,2)); - disp ("******16*******"); -// - -endfunction -- cgit