0027322: geom/revolution_00/A1: Incorrect pcurve creation
[occt.git] / tests / bugs / modalg_6 / bug27322
CommitLineData
8f8398f6 1puts "========"
2puts "OCC27322"
3puts "========"
4puts ""
5####################################################
6# geom/revolution_00/A1: Incorrect pcurve creation
7####################################################
8
9restore [locate_data_file bug27325_edge.brep] en
10restore [locate_data_file bug27325_face.brep] f
11
12bhaspc en f do
13mk2dcurve c1 en f
14explode f e
15mk2dcurve c2 f_3 f
162dcvalue c1 0.0025 x y
172dproj c2 x y
18
19set bug_info [string trim [length ext_1]]
20set bug_info [string trim [string range $bug_info [expr {[string last " " $bug_info] + 1}] [expr {[string length $bug_info] - 1}]]]
21if {$bug_info >= 1.e-9} {
22 puts "ERROR: OCC27322 is reproduced. Incorrect pcurve creation."
23}