combine-text-dim ( dim1 dim2 -- dim3 )

Vocabulary

ui.text.private

Inputs

dim1	an object
dim2	an object

Outputs

dim3

an object

Definition

USING: arrays kernel math math.order sequences ;

IN: ui.text.private

: combine-text-dim ( dim1 dim2 -- dim3 )
    [ first2 ] bi@ swapd [ max ] [ + ] 2bi* 2array ; inline