mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-25 09:07:26 +08:00
38 lines
793 B
Plaintext
Executable File
38 lines
793 B
Plaintext
Executable File
puts "========"
|
|
puts "OCC184"
|
|
puts "========"
|
|
#
|
|
## Bad IGES/BREP translation
|
|
#
|
|
puts "FaceBrep must be identical FaceIGES!!!"
|
|
puts "========"
|
|
|
|
restore [locate_data_file OCC184.brep] FaceBrep
|
|
checkshape FaceBrep
|
|
|
|
regexp {Mass +: +([-0-9.+eE]+)} [sprops FaceBrep] full square1
|
|
|
|
catch {exec rm ${imagedir}/OCC184.igs}
|
|
brepiges FaceBrep ${imagedir}/OCC184.igs
|
|
catch {exec chmod 777 ${imagedir}/OCC184.igs}
|
|
|
|
igesbrep ${imagedir}/OCC184.igs FaceIGES *
|
|
|
|
sewing result FaceIGES
|
|
checkshape result
|
|
|
|
regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full square2
|
|
|
|
checknbshapes result -ref [nbshapes FaceBrep]
|
|
|
|
if { ${square2} != ${square1} } {
|
|
puts "Error : Square is not valid"
|
|
}
|
|
|
|
checkmaxtol result -ref 9.9999999999999995e-008
|
|
checknbshapes result -shell 0
|
|
checkfreebounds result 2
|
|
|
|
set 2dviewer 0
|
|
|