extract harp_set_cur_vh