Action:
|
Determines if a Scheme object is a planar face.
|
|
Filename:
|
kern/kern_scm/qfac_scm.cxx
|
|
Syntax:
|
(face:planar? object)
|
|
Arg Types:
|
object
|
scheme-object
|
|
Returns:
|
boolean
|
|
Description:
|
This extension returns #t if the specified object is a planar face.
|
|
|
object specifies the
scheme-object that has to be queried for a planar face.
|
|
Example:
|
; face:planar?
|
|
; Create a solid block.
|
|
(define block1
|
|
|
(solid:block (position -10 -10 0)
|
|
|
(position 25 25 25)))
|
|
;; block1
|
|
; Get a list of the solid block's faces.
|
|
(define faces1 (entity:faces block1))
|
|
;; faces1
|
|
; Determine if one of these faces is
|
|
; actually a planar face.
|
|
(face:planar? (car (cdr (cdr faces1))))
|
|
;; #t
|