position-x

Arguments: pos

Returns the x component of the argument position.

The function is setf'able, with the setf function being #'(setf position-x) with arguments (x position). Thus:

cg-user(4): (setq p1 (make-position 10 20))
#<position 10 20>
cg-user(5): (position-x p1)
10
cg-user(6): (setf (position-x p1) 11)
11
cg-user(7): p1
#<position 11 20>
cg-user(8): (apply #'(setf position-x) (list 12 p1))
12
cg-user(9): p1
#<position 12 20>
cg-user(10): 

See also position-y and make-position.

Copyright (c) 1998-2022, Franz Inc. Lafayette, CA., USA. All rights reserved.
This page was not revised from the 10.0 page.
Created 2019.8.20.