scale-chunks ( chunks xwidth xmin,xmax yheight ymin,ymax -- chunks' )


Vocabulary
ui.gadgets.charts.lines.private

Inputs
chunksan object
xwidthan object
xmin,xmaxan object
yheightan object
ymin,ymaxan object


Outputs
chunks'an object


Definition
USING: assocs kernel sequences ;

IN: ui.gadgets.charts.lines.private

: scale-chunks
( chunks xwidth xmin,xmax yheight ymin,ymax -- chunks' )
[ scale-mapper ] 2bi@ [ bi* ] 2curry [ assoc-map ] curry map
;