mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
18 lines
311 B
Plaintext
18 lines
311 B
Plaintext
# Original bug : fra50091
|
|
# Date : 19Mai98
|
|
|
|
pcylinder cyla 100 400
|
|
|
|
circle circ 150 0 200 1 0 0 100
|
|
|
|
mkedge e circ
|
|
wire w e
|
|
mkplane f w 1
|
|
|
|
prism cylb f -300 0 0
|
|
|
|
bcommon result cyla cylb
|
|
|
|
checkprops result -s 160000
|
|
checkview -display result -2d -s -otherwise { cyla cylb } -path ${imagedir}/${test_image}.png
|