
function ret = u_vr (vr)
  ret = 7 * vr;
endfunction

%!demo
%! df_vr
%! v = 2 * vr;
%! a = u_vr (v)
