f_chop.ihlp

来自「是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到」· IHLP 代码 · 共 8 行

{* 30nov2004}{...}
{phang}
{cmd:chop(}{it:x}{cmd:,}{it:tol}{cmd:)} returns
	{cmd:round(}{it:x}{cmd:)} if
        {cmd:abs(}{it:x}{cmd:-round(}{it:x}{cmd:))} < {it:tol}; otherwise,
        returns {it:x}.  {cmd:chop(}{it:x}{cmd:,}{it:tol}{cmd:)}
        returns {it:x} if {it:x} is missing.{p_end}