WARP
Param.damprob[WARP] = 70; /* warp drive 7.0% */
damage(WARP, repairs);
if (damaged(WARP)) {
out(WARP);