Preparing to move the computation of nearby_extr out of procedure

set_max_speed. Abandon the computation with pack_indices, this was
supposed to give the same result than the computation with argwhere
but be faster if not any(extr_map) < 0. I was not sure of that. I
abandon that because I want to eventually remove the coding of
sufficient amplitude in extr_map.