f:{:[x<2;x;+/f'x-1 2]} f 5 g:{*|(x-2){x,+/-2#x}/1 1} g 5