puts "==========="
puts "OCC24902"
puts "==========="
puts ""
###########################################################################################
# Visualization - advanced processing of compounds containing solids and other shape types
# Tests capping on solid, shell and unclosed compound
###########################################################################################

vinit
box b 0 0 0 10 10 10
box b_shell 15 0 0 10 10 10
box b_solid 30 0 0 10 10 10
explode b F
explode b_shell Sh

# Put shell and solid into compound
compound b_1 b_2 b_3 b_4 b_6 b_comp
vdisplay b_comp b_shell_1 b_solid
vsetdispmode 1
vfit

# set clipping plane
vclipplane create pln1
vclipplane change pln1 equation 0 2 -1 -1
vclipplane change pln1 capping on
vclipplane change pln1 capping color 0.9 0.9 0.9
vclipplane set pln1 view Driver1/Viewer1/View1

vrotate 0 0.2 0

set only_screen 1