E_ISSUE
case E_ISSUE: /* issue a distress call */
xresched(e, E_ISSUE, 1);
Param.eventdly[E_ISSUE] = 1.0;
xsched(E_ISSUE, 1, 0, 0, 0);