mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
32 lines
556 B
Plaintext
32 lines
556 B
Plaintext
puts "========"
|
|
puts "OCC28768"
|
|
puts "========"
|
|
puts ""
|
|
#############################################
|
|
# ShapeFix slightly corrupts the source face
|
|
#############################################
|
|
|
|
binrestore [locate_data_file bug28768_f12g.brep] f12g
|
|
fixshape r12g f12g
|
|
|
|
explode r12g E
|
|
|
|
smallview +X+Y
|
|
|
|
# Picture creation: "should be"
|
|
clear
|
|
display r12g_4
|
|
display r12g_6
|
|
fit
|
|
display r12g_5
|
|
xwd $imagedir/${casename}_should_be.png
|
|
|
|
# Picture creation: "is"
|
|
clear
|
|
display r12g_4
|
|
display r12g_6
|
|
fit
|
|
display r12g_7
|
|
display r12g_3
|
|
xwd $imagedir/${casename}_is.png
|