|
Action:
|
Gets the origin of the active WCS.
|
|
|
Filename:
|
kern/kern_scm/wcs_scm.cxx
|
|
|
Syntax:
|
(wcs:origin [wcs])
|
|
|
Arg Types:
|
wcs
|
wcs
|
|
|
Returns:
|
position
|
|
|
wcs is an optional argument that specifies the working coordinate system to search. If
wcs is not specified, the active WCS is used.
|
|
|
Example:
|
; wcs:origin
|
|
; Get the origin position of the current WCS.
|
|
(wcs:origin)
|
|
;; #[position 0 0 0]
|
|
; Define a new WCS.
|
|
(define wcs1 (wcs (position -10 -10 -10)
|
|
|
(position 0 10 0) (position 10 0 0)))
|
|
;; wcs1
|
|
; Get the origin position of the new WCS.
|
|
(wcs:origin wcs1)
|
|
;; #[position -10 -10 -10]
|