E_REPRO
case E_REPRO:
case E_REPRO:
e = schedule(E_REPRO, Param.eventdly[E_REPRO] * franf(), e->x, e->y, e->systemname);
case E_REPRO: /* Klingon reproduces */
xresched(e, E_REPRO, 1);
case E_REPRO:
Param.eventdly[E_REPRO] = 2.0;