samer@4: function y=qlog(x), I=(x==0); x(I)=1; y=log(x); y(I)=-inf; end samer@4: % qlog - quiet log (no warning when x=0) samer@4: % samer@4: % qlog :: [[D]] -> [[D]]. samer@4: