From 6e2423221942230183eb2a744d982d42acb0244e Mon Sep 17 00:00:00 2001 From: mkv Date: Wed, 8 Oct 2014 19:46:03 +0400 Subject: [PATCH] 0022614: Scaling fails with linear (p-)curves Test cases for issue CR22614 --- tests/bugs/modalg_5/bug22614_1 | 30 ++++++++++++++++++++++++++++++ tests/bugs/modalg_5/bug22614_2 | 30 ++++++++++++++++++++++++++++++ tests/bugs/modalg_5/bug22614_3 | 29 +++++++++++++++++++++++++++++ 3 files changed, 89 insertions(+) create mode 100644 tests/bugs/modalg_5/bug22614_1 create mode 100644 tests/bugs/modalg_5/bug22614_2 create mode 100644 tests/bugs/modalg_5/bug22614_3 diff --git a/tests/bugs/modalg_5/bug22614_1 b/tests/bugs/modalg_5/bug22614_1 new file mode 100644 index 0000000000..2ac59c2a57 --- /dev/null +++ b/tests/bugs/modalg_5/bug22614_1 @@ -0,0 +1,30 @@ +puts "========================" +puts "OCC22614" +puts "========================" +puts "" +####################################################################### +# Scaling fails with linear (p-)curves +####################################################################### + +pcylinder p 10 50 + +explode p f + +# p_1 is a cylindrical face +tscale p_1 0 0 0 0.001 + +renamevar p_1 result + +set square 0.00314159 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 7 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_5/bug22614_2 b/tests/bugs/modalg_5/bug22614_2 new file mode 100644 index 0000000000..3943a31728 --- /dev/null +++ b/tests/bugs/modalg_5/bug22614_2 @@ -0,0 +1,30 @@ +puts "========================" +puts "OCC22614" +puts "========================" +puts "" +####################################################################### +# Scaling fails with linear (p-)curves +####################################################################### + +pcylinder p 10 50 + +explode p f + +# p_2 is top planar face +tscale p_2 0 0 0 0.001 + +renamevar p_2 result + +set square 0.000314159 + +set nb_v_good 1 +set nb_e_good 1 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 4 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_5/bug22614_3 b/tests/bugs/modalg_5/bug22614_3 new file mode 100644 index 0000000000..d63e72faae --- /dev/null +++ b/tests/bugs/modalg_5/bug22614_3 @@ -0,0 +1,29 @@ +puts "========================" +puts "OCC22614" +puts "========================" +puts "" +####################################################################### +# Scaling fails with linear (p-)curves +####################################################################### + +cylinder c 50 + +mkface f c 0 5 0 10 + +tscale f 0 0 0 0.001 + +renamevar f result + +set square 0.0025 + +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 10 + +set 2dviewer 1