kprev            2315 src/number.c       int k, s, kprev, sign_d;
kprev            2336 src/number.c       kprev = k;
kprev            2386 src/number.c           if (kprev >= 0) {
kprev            2402 src/number.c                       if (k != kprev) x = Scm_Ash(Scm_Multiply2(f, iexpt10(e)), -k);
kprev            2405 src/number.c                       if (k != kprev) x = Scm_Ash(f, -k);