Action:
|
Determines if a Scheme object is a cylindrical face.
|
|
Filename:
|
kern/kern_scm/qfac_scm.cxx
|
|
Syntax:
|
(face:cylindrical? object)
|
|
Arg Types:
|
object
|
scheme-object
|
|
Returns:
|
boolean
|
|
Description:
|
The returned
boolean specifies whether the supplied
entity input is a cylindrical face. Note that the input argument is cylinder face and not a
solid:cylinder.
|
|
|
object specifies the
scheme-object that has to be queried for a cylindrical-face.
|
|
Example:
|
; face:cylindrical?
|
|
; Create a solid cylinder.
|
|
(define cyl1
|
|
|
(solid:cylinder (position 0 0 0)
|
|
|
(position 8 8 8) 32))
|
|
;; cyl1
|
|
; Find the faces of the cylinder.
|
|
(define faces1 (entity:faces cyl1))
|
|
;; faces1
|
|
; Determine whether cyl1 is a cylindrical face.
|
|
(face:cylindrical? cyl1)
|
|
;; #f
|
|
; Determine whether face 2 is a cylindrical face.
|
|
(face:cylindrical? (car faces1))
|
|
;; #t
|
|
; Determine whether face 3 is a cylindrical face.
|
|
(face:cylindrical? (car (cdr faces1)))
|
|
;; #f
|