*

: kk x 2 / .5 + y sample swap -rot + .3 - > ;
: mix swap over 1 swap - * -rot * + ;
x 2 / y sample
x 2 / .5 + y sample
push push push
rot pop kk mix
rot pop kk mix
rot pop kk mix