argv@island.uu.net (Dan Heller) (09/29/89)
Submitted-by: Ed Kubaitis <uunet!ux1.cso.uiuc.edu!ejk> Posting-number: Volume 5, Issue 7 Archive-name: xfroot/patch1 Patch-To: xfroot: Volume 5, Issue 3 *** xfroot.c.orig Sat Sep 23 11:14:26 1989 --- xfroot.c Mon Sep 25 08:12:48 1989 *************** *** 90,98 hopset() { int r = Ranfseed; double pmax=1.0*W, logpmax=log(pmax); ! A = (A) ? A : exp(Ranf()*logpmax); if (r&2) A = -A; ! B = (B) ? B : exp(Ranf()*logpmax); if (r&4) B = -B; ! C = (C) ? C : Ranf()*pmax; if (r&8) C = -C; } --- 90,98 ----- hopset() { int r = Ranfseed; double pmax=1.0*W, logpmax=log(pmax); ! if (!A) { A = exp(Ranf()*logpmax); if (r&2) A = -A; } ! if (!B) { B = exp(Ranf()*logpmax); if (r&4) B = -B; } ! if (!C) { C = Ranf()*pmax; if (r&8) C = -C; } }