implemented until my-take function
implementation of seq-merge