Bug 13402 fixed: Bounding boxes of xarcs were not correct
[scilab.git] / scilab / modules / graphics / tests / nonreg_tests / bug_13402.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2014 - Scilab Enterprises - Calixte DENIZET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7
8 // <-- TEST WITH GRAPHIC -->
9
10 // <-- Non-regression test for bug 13402 -->
11 //
12 // <-- Bugzilla URL -->
13 // http://bugzilla.scilab.org/13402
14 //
15 // <-- Short Description -->
16 // Bounding boxes of xarcs were not correct
17
18 xarc(0, 0, 2, 1, 64 * 0, 64 * 360);
19 a = gca();
20 assert_checkequal(a.data_bounds, [0 -1 ; 2 0]);
21 clf();
22
23 xarc(0, 0, 2, 1, 64 * 0, 64 * 90);
24 a = gca();
25 assert_checkequal(a.data_bounds, [1 -0.5 ; 2 0]);
26 clf();
27
28 xarc(0, 0, 2, 1, 64 * 45, 64 * 90);
29 a = gca();
30 assert_checkalmostequal(a.data_bounds, [1-sqrt(2)/2 sqrt(2)/4-0.5 ; 1+sqrt(2)/2 0]);
31 clf();
32
33 xarc(0, 0, 2, 1, 64 * 45, 64 * -90);
34 a = gca();
35 assert_checkalmostequal(a.data_bounds, [1+sqrt(2)/2 -0.5-sqrt(2)/4 ; 2 sqrt(2)/4-0.5]);
36 clf();