Zoom = ShapeTransformer ?, '?', ?(Scale), TR_ZOOM
Rotate = ShapeTransformer ?, '?', ?(Angle), TR_ROTATE

...

Call ArrayTransform Src 'Dest' ( A, 'B' : 
                                          Call Z
                                          Where Z = Zoom( A, 'B', Scale )
                               )
Where Scale = 2 / 3