|
Action:
|
Gets the normal of a planar face.
|
|
|
Filename:
|
kern/kern_scm/qfac_scm.cxx
|
|
|
Syntax:
|
(face:plane-normal entity)
|
|
|
Arg Types:
|
entity
|
planar-face
|
|
|
Returns:
|
gvector
|
|
|
Description:
|
This extension returns the normal of a planar face.
|
|
|
entity specifies a face entity.
|
|
|
Example:
|
; face:plane-normal
|
|
; Create a solid block.
|
|
(define block1
|
|
|
(solid:block (position 0 0 0)
|
|
|
(position 40 40 40)))
|
|
;; block1
|
|
; Get a list of the solid block's faces.
|
|
(define faces1 (entity:faces block1))
|
|
;; faces1
|
|
; Get the normal of one of the planar faces.
|
|
(face:plane-normal (car (cdr faces1)))
|
|
;; #[gvector 0 0 -1]
|
|
; Get the normal of another planar face.
|
|
(face:plane-normal (car (cdr (cdr (cdr faces1)))))
|
|
;; #[gvector -1 0 0]
|