--- /dev/null
+puts "================"
+puts "OCC22900: Problem with shape displaying in shading mode"
+puts "================"
+puts ""
+
+pload MODELING VISUALIZATION
+vertex v1 0 0 0
+vertex v2 0 0 30
+edge e1 v1 v2
+pcone con1 5 0 10
+ttranslate con1 0 0 30
+compound con1 e1 c1
+don c1
+fit
+vinit View1
+vdisplay c1
+vfit
+vsetcolor c1 RED
+vsetcolor c1 GREEN
+vsetdispmode 1
+vsetcolor c1 RED
+
+checkcolor 204 202 1 0 0
+
+vdump $imagedir/${casename}.png