mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
32 lines
872 B
Plaintext
Executable File
32 lines
872 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC1477"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# Problems in MakePipeShell
|
|
# (case 13)
|
|
######################################################
|
|
|
|
restore [locate_data_file OCC1477_3dPolyline_c0.brep] s1
|
|
restore [locate_data_file OCC1477_profile1_polygon.brep] e1
|
|
wire s2 e1
|
|
|
|
puts "###############################################################################"
|
|
puts "# (case /-CF/-T -R/-C -S/)"
|
|
puts "###############################################################################"
|
|
|
|
checkshape s1
|
|
checkshape s2
|
|
|
|
mksweep s1
|
|
|
|
setsweep -CF
|
|
addsweep s2 -T -R
|
|
if [catch { buildsweep result -C -S} res] {
|
|
puts "Faulty OCC1477: buildsweep is wrong"
|
|
}
|
|
|
|
checkprops result -s 27718.7 -v 89336.2
|
|
|
|
checknbshapes result -vertex 25 -edge 45 -wire 22 -face 22 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 116
|