Action:
|
Gets the active work coordinate system.
|
|
Filename:
|
kern/kern_scm/wcs_scm.cxx
|
|
APIs:
|
api_wcs_get_active
|
|
Syntax:
|
(wcs:active)
|
|
Arg Types:
|
None
|
|
Returns:
|
wcs | boolean
|
|
Description:
|
This extension returns the active WCS; otherwise, it returns
#f if no WCS is active.
|
|
Example:
|
; wcs:active
|
|
; Create a WCS.
|
|
(define wcs1 (wcs (position 0 0 0) (gvector 1 0 0)
|
|
|
(gvector 0 1 0)))
|
|
;; wcs1
|
|
; Determine if the WCS is active.
|
|
(wcs:active)
|
|
;; #f
|
|
; Set the new WCS to be active.
|
|
(wcs:set-active wcs1)
|
|
;; ()
|
|
; Get the active WCS.
|
|
(wcs:active)
|
|
;; #[entity 2 1]
|