[source,pli]
----
declare point (3) float decimal;
declare size (3) float decimal;
declare angles (3) float decimal;

/* ... */

set_coordinates: proc(origin, size, angles);
    /* ... */
end set_coordinates;
----