1 puts "=================================="
2 puts "0031336: Modeling data - extend BRepPrimAPI_MakeBox with planar shape creation"
3 puts "Check a creation preview if it is a vertex"
4 puts "=================================="
10 set anImage1 $imagedir/${casename}_1.png
11 set anImage2 $imagedir/${casename}_2.png
13 box vertex1 0.0 0.0 0.0 0.0 0.0 0.0 -preview
16 checkview -screenshot -2d -path $anImage1
18 box vertex2 -min 30.0 0.0 0.0 -max 30.0 0.0 0.0 -preview
21 checkview -screenshot -2d -path $anImage2