From da1e60063e75b508799ec1703e24af7d429b22b6 Mon Sep 17 00:00:00 2001 From: aml Date: Fri, 20 May 2016 14:04:14 +0300 Subject: [PATCH] 0027524: Incorrect result of "checkshape" command Test script is added. --- tests/bugs/modalg_6/bug27524 | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) create mode 100644 tests/bugs/modalg_6/bug27524 diff --git a/tests/bugs/modalg_6/bug27524 b/tests/bugs/modalg_6/bug27524 new file mode 100644 index 0000000000..a6bd427083 --- /dev/null +++ b/tests/bugs/modalg_6/bug27524 @@ -0,0 +1,24 @@ +puts "TODO 0027524 ALL: Error: pcurve deviation is greater than shape tolerance" +puts "=========" +puts "CR27524" +puts "=========" +puts "" +############################### +## Incorrect result of "checkshape" command +############################### + +set aTol 1.0e-7 +set aShapeToler 0.0069791772900578497 + +restore [locate_data_file bug27524.brep] aS + +checkshape aS + +explode aS E +explode aS F +set log [xdistef aS_3 aS_1] +regexp {Max Distance = +([-0-9.+eE]+);} ${log} full aDist + +if { $aDist > $aShapeToler + $aTol } { + puts "Error: pcurve deviation is greater than shape tolerance" +} -- 2.39.5