mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
f1aa2b6272
Adding procedures checkcolor and checkpoint. Modified test cases which are used QAGetPixelColor or QAAISGetPixelColor2d Allow using command QAAISGetPixelColor2d on WNT Rename test case tests/bugs/vis/bug19619 to pro19619 Added test cases to modalg and moddata
20 lines
348 B
Plaintext
Executable File
20 lines
348 B
Plaintext
Executable File
|
|
puts "========================"
|
|
puts " OCC422 "
|
|
puts "(case 2)"
|
|
puts "========================"
|
|
puts ""
|
|
|
|
plane ps 10 -3 0 1 0 0 0 .2 1
|
|
psphere ps ps 20
|
|
profile pf o 5 1 5 l 10 c 2 90 l 5 d -1 0 \
|
|
l 14 d 0 -1 l 5 c 2 90
|
|
prism pr pf 0 0 30
|
|
bfuse f ps pr
|
|
nexplode f f
|
|
|
|
depouille result f 0 0 1 f_4 4 0 0 30 0 0 1
|
|
|
|
set square 5719.09
|
|
set 2dviewer 0
|