Action:
|
Determines if a Scheme object is a solid.
|
|
Filename:
|
kern/kern_scm/ent_scm.cxx
|
|
Syntax:
|
(solid? object)
|
|
Arg Types:
|
object
|
scheme-object
|
|
Returns:
|
boolean
|
|
|
object specifies the
scheme-object to be queried for a solid.
|
|
Example:
|
; solid?
|
|
; Create a solid block.
|
|
(define block1
|
|
|
(solid:block (position 0 0 0)
|
|
|
(position 40 40 40)))
|
|
;; block1
|
|
; Determine if the solid block is a solid.
|
|
(solid? block1)
|
|
;; #t
|
|
; Create a solid sphere.
|
|
(define sphere1 (solid:sphere (position 0 0 0) 38))
|
|
;; sphere1
|
|
; Determine if the solid sphere is a solid.
|
|
(solid? sphere1)
|
|
;; #t
|
|
; Create a circular edge.
|
|
(define edge-1
|
|
|
(edge:circular (position 0 0 0) 25 0 180))
|
|
;; edge-1
|
|
; Determine if the edge is a solid.
|
|
(solid? edge-1)
|
|
;; #f
|