1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
occt/tests/bugs/modalg_5/bug22614_3
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

22 lines
573 B
Plaintext

puts "========================"
puts "OCC22614"
puts "========================"
puts ""
#######################################################################
# Scaling fails with linear (p-)curves
#######################################################################
cylinder c 50
mkface f c 0 5 0 10
tscale f 0 0 0 0.001
renamevar f result
checkprops result -s 0.0025
checkshape result
checknbshapes result -vertex 4 -edge 4 -wire 1 -face 1 -shell 0 -solid 0 -compsolid 0 -compound 0 -shape 10
checkview -display result -2d -path ${imagedir}/${test_image}.png