Converts a function of two variables into a numeric function of two variables that uses evalhf for low precision numerical evaluation, if possible, evalf otherwise.

$g≔\left(x\,y\right)\mapsto \sin \left(x\right)\cdot y-y^3$

$g≔\left(x\,y\right)\mapsto \sin \left(x\right)\cdot y-y^3$

$f≔\mathrm{convert}\left(g\,\mathrm{numericproc}\right)$

$f≔\mathbf{proc}\left(x\,y\right)\mathbf{local}r\;\mathbf{try}r≔\mathrm{evalhf}\left(g\left(x\,y\right)\right)\mathbf{catch}\:\mathbf{end\; try}\;\mathbf{if}\mathbf{not}\mathrm{type}\left(r\,\'\mathrm{numeric}\'\right)\mathbf{then}\mathbf{try}r≔\mathrm{evalf}\left(g\left(x\,y\right)\right)\mathbf{catch}\:\mathbf{end\; try}\mathbf{end\; if}\;\mathrm{if}\left(\mathrm{type}\left(r\,\'\mathrm{numeric}\'\right)\,r\,\'\mathrm{undefined}\'\right)\mathbf{end\; proc}$