|
Action:
|
Determines if the given entity is of the type
cell.
|
|
|
Filename:
|
ct/ct_scm/cell_scm.cxx
|
|
|
Syntax:
|
(cell? entity)
|
|
|
Arg Types:
|
entity
|
entity
|
|
|
Returns:
|
boolean
|
|
|
Description:
|
This extension returns
#t if the given
entity is of the type
cell; otherwise, it returns
#f.
|
|
|
Example:
|
; cell?
|
|
; Create a solid block.
|
|
(define block1 (solid:block (position -20 -20 -20)
|
|
|
(position 20 20 20)))
|
|
;; block1
|
|
; Create a solid sphere.
|
|
(define sphere1 (solid:sphere (position 0 0 0) 30))
|
|
;; sphere1
|
|
; Attach the solid block and sphere to a cell.
|
|
(define cell1 (cell:attach
|
|
|
(list block1 sphere1)))
|
|
;; cell1
|
|
; Determine if the solid block is a cell type.
|
|
(cell? block1)
|
|
;; #f
|
|
; Determine if the lump is a cell type.
|
|
(cell? (car cell1))
|
|
;; #t
|
|
(cell? (car (cdr cell1)))
|
|
;; #t
|