+++ /dev/null
-puts "================"
-puts "OCC389"
-puts "================"
-puts ""
-
-v2dinit
-
-box b 10 10 10
-
-if [catch { OCC389 proj b } res] {
- puts "OCC389: Error"
- puts "${res}"
-} else {
- puts "OCC389: OK"
-}
-
-v2ddisplay proj
-v2dfit
-set only_screen2d 1
-