z.Precision((int)(y.Double()));
z.Precision((int)(LispStandard.bits_to_digits((long)(y.Double()), 10)));
    public void Eval(LispEnvironment aEnvironment,int aStackTop) throws Exception    {      BigNumber x = GetNumber(aEnvironment, aStackTop, 1);      BigNumber y = GetNumber(aEnvironment, aStackTop, 2);      BigNumber z = new BigNumber(aEnvironment.BinaryPrecision());      z.SetTo(x);	  // do nothing for integers	  if (!(z.IsInt()))	    z.Precision((int)(y.Double()));	// segfaults unless y is defined?      RESULT(aEnvironment, aStackTop).Set(new LispNumber(z));    }