draw-rectangle ( loc dim -- )


Vocabulary
processing.shapes

Inputs
locan object
diman object


Outputs
None

Definition


:: draw-rectangle ( loc dim -- )
loc first2 :> ( x y ) dim first2 :> ( dx dy ) x y 2array
x dx + y 2array x dx + y dy + 2array x y dy + 2array 4array
draw-polygon ;