**
** This package is free software; you can redistribute it and/or
** modify it under the terms of the GNU General Public License as
**
** This package is free software; you can redistribute it and/or
** modify it under the terms of the GNU General Public License as
v[1] = abs(v[1])/abs(span[1]);
float zdiv = max(v[0],v[1]);
v[1] = abs(v[1])/abs(span[1]);
float zdiv = max(v[0],v[1]);
{
get_work_area()->set_focus_point(newpos);
get_work_area()->set_zoom(get_work_area()->get_zoom()/zdiv);
{
get_work_area()->set_focus_point(newpos);
get_work_area()->set_zoom(get_work_area()->get_zoom()/zdiv);